TABLE_IO
TABLE file
Read and Write Utilities

TABLE_IO is a FORTRAN77 library, using double precision arithmetic, which can read or write a TABLE file.

A TABLE file is a simple format for storing a double-indexed array of data. We regard this is a situation involving N points in M dimensions, with M relatively small (often just 2 or 3, but possibly 10 or 20) while N can be "enormous" (10, 100, 1,000 or 10,000).

To keep things simple, then, the data is written to an ASCII file, with optional comment lines (which must start with the '#' character) and blank lines (which are ignored). The point data is stored by writing the coordinates of each point on a separate line. No information about M or N is explicitly included in the file. It is up to the I/O program to determine this.

TABLE_IO supplies routines by which a TABLE file can easily be written or read. A typical write operation for a single precision real table simply calls routine RTABLE_WRITE. A typical read operation will probably first want to call TABLE_HEADER_READ to determine the values of M and N, and then allocate space for the table, and then call RTABLE_DATA_READ to read the data.

TABLE_IO includes routines to read and write table datasets that are integer, single precision real, or double precision real quantities.

Licensing:

The computer code and data files described and made available on this web page are distributed under the GNU LGPL license.

Related Data and Programs:

TABLE is the format used to store data in files.

TABLE_BARPLOT_PPMA is a FORTRAN90 program which reads a table file and creates a PPMA bargraph of the data.

TABLE_BORDER is a FORTRAN90 program which can be used to add a border (of zero values) to a table file.

TABLE_COLUMNS is a FORTRAN90 program which can extract specific columns of data from a table file.

TABLE_COLUMNS_PERMUTE is a FORTRAN90 program which permutes the columns of a table file.

TABLE_DELAUNAY is a FORTRAN90 program which computes the Delaunay triangulation of a set of points.

TABLE_DIAPHONY is a FORTRAN90 program which computes the diaphony of a set of points stored in a table file.

TABLE_HISTOGRAM is a FORTRAN90 program which can make a histogram of a set of points stored in a table file.

TABLE_IO is also available in a C version and a C++ version and a FORTRAN90 version and a MATLAB version.

TABLE_LATINIZE is a FORTRAN90 program which reads a file of points and creates a "latinized" version by adjusting the data.

TABLE_MERGE is a FORTRAN90 program which reads a file of points, and removes duplicates, and points that are close to each other.

TABLE_ORTHONORMALIZE is a FORTRAN90 program which reads a file of points and orthonormalizes the columns.

TABLE_QUALITY is a FORTRAN90 program which reads a file of points and computes the quality of dispersion.

TABLE_READ is a MATLAB program which can read in a TABLE file.

TABLE_RECORD_MATCH is a FORTRAN90 program which finds close records in a table file.

TABLE_SCALE is a FORTRAN90 program which multiplies the entries of a table file by a scale vector.

TABLE_SHIFT is a FORTRAN90 program which shifts the entries of a table file by a shift vector.

TABLE_STATS is a FORTRAN90 program which reads a table file and computes certain statistics.

TABLE_TET_MESH is a FORTRAN90 program which reads a table file of 3D data, and computes a tetrahedral mesh.

TABLE_TOP is a FORTRAN90 program which reads a table file of M-dimensional data and makes a table of plots of all pairs of coordinates.

TABLE_UNBORDER is a FORTRAN90 program which removes the border from a table file.

TABLE_UNIFORM_NOISE is a FORTRAN90 program which adds a uniform noise term to the data in a table file.

TABLE_VORONOI is a FORTRAN program which can be used to compute information about the Voronoi diagram of the points.

VEC_IO is a FORTRAN90 library which reads and writes vectors to a file. The file may have binary format. The file may be direct access, in which case the vectors can be read or written one at a time, in any order.

Source Code:

• table_io.f, the source code.
• table_io.csh, commands to compile the source code.

Examples and Tests:

• table_io_prb.f, a sample calling program.
• table_io_prb.csh, commands to compile and run the sample program.
• table_io_prb.out, the output from a run of the sample program.
• dtable_05_00020.txt, a table file with double precision real data created by the sample program, with N = 20 points in M = 5 dimensions.
• itable_05_00020.txt, a table file with integer data created by the sample program, with N = 20 points in M = 5 dimensions.

List of Routines:

• CH_CAP capitalizes a single character.
• CH_EQI is a case insensitive comparison of two characters for equality.
• CH_TO_DIGIT returns the integer value of a base 10 digit.
• DTABLE_CLOSE_WRITE closes a file used to write a DTABLE.
• DTABLE_DATA_BORDER_ADD adds a "border" to DTABLE data.
• DTABLE_DATA_BORDER_CUT cuts the "border" of DTABLE data.
• DTABLE_DATA_READ reads DTABLE data to a file.
• DTABLE_DATA_WRITE writes DTABLE data to a file.
• DTABLE_HEADER_READ reads the header from a DTABLE file.
• DTABLE_HEADER_WRITE writes the header to a DTABLE file.
• DTABLE_OPEN_WRITE opens a file to write a DTABLE.
• DTABLE_WRITE writes a DTABLE to a file.
• FILE_COLUMN_COUNT counts the number of columns in the first line of a file.
• FILE_ROW_COUNT counts the number of row records in a file.
• GET_UNIT returns a free FORTRAN unit number.
• I4_LOG_10 returns the integer part of the logarithm base 10 of ABS(X).
• I4MAT_INDICATOR sets up an "indicator" I4MAT.
• I4MAT_PRINT prints an I4MAT.
• I4MAT_PRINT_SOME prints some of an I4MAT.
• ITABLE_CLOSE_WRITE closes a file used to write an ITABLE.
• ITABLE_DATA_BORDER_ADD adds a "border" to ITABLE data.
• ITABLE_DATA_BORDER_CUT cuts the "border" of ITABLE data.
• ITABLE_DATA_READ reads data from an ITABLE file.
• ITABLE_DATA_WRITE writes data to an ITABLE file.
• ITABLE_HEADER_READ reads the header from an integer table file.
• ITABLE_HEADER_WRITE writes the header to an ITABLE file.
• ITABLE_OPEN_WRITE opens a file to write ITABLE data.
• ITABLE_WRITE writes an ITABLE file.
• R8MAT_INDICATOR sets up an "indicator" R8MAT.
• R8MAT_PRINT prints an R8MAT.
• R8MAT_PRINT_SOME prints some of an R8MAT.
• R8MAT_TRANSPOSE_PRINT prints an R8MAT, transposed.
• R8MAT_TRANSPOSE_PRINT_SOME prints some of an R8MAT transposed.
• R8MAT_UNIFORM_01 returns a unit pseudorandom R8MAT.
• S_BLANK_DELETE removes blanks from a string, left justifying the remainder.
• S_TO_I4 reads an I4 from a string.
• S_TO_I4VEC reads an I4VEC from a string.
• S_TO_R8 reads an R8 from a string.
• S_TO_R8VEC reads an R8VEC from a string.
• S_WORD_COUNT counts the number of "words" in a string.
• TIMESTAMP prints the current YMDHMS date as a time stamp.
• TIMESTRING writes the current YMDHMS date into a string.

You can go up one level to the FORTRAN77 source codes.