28 May 2008 08:31:52 AM TABLE_IO_PRB C++ version Tests the routines in the TABLE_IO library. TEST01 DTABLE_WRITE writes a real TABLE file. Spatial dimension M = 5 Number of points N = 20 5x5 portion of the data written to file: Col: 1 2 3 4 5 Row --- 1 10.1 20.1 30.1 40.1 50.1 2 10.2 20.2 30.2 40.2 50.2 3 10.3 20.3 30.3 40.3 50.3 4 10.4 20.4 30.4 40.4 50.4 5 10.5 20.5 30.5 40.5 50.5 5x5 portion of the TRANSPOSED data: Row: 1 2 3 4 5 Col 1 10.1 10.2 10.3 10.4 10.5 2 20.1 20.2 20.3 20.4 20.5 3 30.1 30.2 30.3 30.4 30.5 4 40.1 40.2 40.3 40.4 40.5 5 50.1 50.2 50.3 50.4 50.5 Wrote the header and data for "dtable_05_00020.txt" TEST02 For real data stored in a TABLE file, DTABLE_HEADER_READ reads the header (Information about the dimension of the data) DTABLE_DATA_READ reads the data. Read the header of "dtable_05_00020.txt". Spatial dimension M = 5 Number of points N = 20 Read the data in "dtable_05_00020.txt". 5x5 portion of data read from file: Col: 1 2 3 4 5 Row --- 1 10.1 20.1 30.1 40.1 50.1 2 10.2 20.2 30.2 40.2 50.2 3 10.3 20.3 30.3 40.3 50.3 4 10.4 20.4 30.4 40.4 50.4 5 10.5 20.5 30.5 40.5 50.5 TEST03 ITABLE_WRITE writes an integer TABLE file. Spatial dimension M = 5 Number of points N = 20 5 x 5 portion of data written to file: Col: 1 2 3 4 5 Row --- 1 101 201 301 401 501 2 102 202 302 402 502 3 103 203 303 403 503 4 104 204 304 404 504 5 105 205 305 405 505 Wrote the header and data for "itable_05_00020.txt" TEST04 For integer data stored in a TABLE file, ITABLE_HEADER_READ reads the header (Information about the dimension of the data) ITABLE_DATA_READ reads the data. Read the header of "itable_05_00020.txt". Spatial dimension M = 5 Number of points N = 20 Read the data in "itable_05_00020.txt". 5x5 portion of data read from file: Col: 1 2 3 4 5 Row --- 1 101 201 301 401 501 2 102 202 302 402 502 3 103 203 303 403 503 4 104 204 304 404 504 5 105 205 305 405 505 TEST05 R8MAT_UNIFORM_01 sets a random double precision table dataset. Spatial dimension M = 2 Number of points N = 10 5x10 portion of random real table dataset: Col: 1 2 3 4 5 Row --- 1 0.218418 0.829509 0.415307 0.257578 0.043829 2 0.956318 0.561695 0.0661187 0.109957 0.633966 Col: 6 7 8 9 10 Row --- 1 0.0617272 0.401306 0.797287 0.897504 0.0945448 2 0.449539 0.754673 0.00183837 0.350752 0.0136169 TEST06 ITABLE_DATA_BORDER_CUT cuts off the border; ITABLE_DATA_BORDER_ADD adds a zero border; Spatial dimension M = 6 Number of points N = 4 Initial dataset: Col: 1 2 3 4 Row --- 1 11 12 13 14 2 21 22 23 24 3 31 32 33 34 4 41 42 43 44 5 51 52 53 54 6 61 62 63 64 'Cut' dataset: Col: 1 2 Row --- 1 22 23 2 32 33 3 42 43 4 52 53 'Added' dataset: Col: 1 2 3 4 Row --- 1 0 0 0 0 2 0 22 23 0 3 0 32 33 0 4 0 42 43 0 5 0 52 53 0 6 0 0 0 0 TABLE_IO_PRB Normal end of execution. 28 May 2008 08:31:52 AM