December 9 2006 8:41:56.860 AM TRIANGULATION_RCM (FORTRAN90 version) Read a node dataset of NODE_NUM points in 2 dimensions. Read an associated triangulation dataset of TRI_NUM triangles using 3 or 6 nodes. Apply the RCM reordering (Reverse Cuthill-McKee). Reorder the data and write it out to files. Read the header of "nodes3_extra.txt". Spatial dimension DIM_NUM = 4 Number of nodes NODE_NUM = 9 Read the data in "nodes3_extra.txt". Coordinates of first 5 nodes: Row 1 2 3 4 Col 1 1.00000 0.00000 1.00000 0.00000 2 2.00000 1.00000 3.00000 2.00000 3 2.00000 0.00000 2.00000 0.00000 4 0.00000 1.00000 1.00000 0.00000 5 1.00000 2.00000 3.00000 2.00000 Read the header of "triangles3.txt". Triangle order TRI_ORDER = 3 Number of triangles TRI_NUM = 7 Read the data in "triangles3.txt". First 5 triangles: Row 1 2 3 Col 1 1 8 9 2 4 9 8 3 3 2 1 4 8 1 2 5 2 7 8 ADJ bandwidth = 17 Permuted ADJ bandwidth = 11 Created the node file "nodes3_extra.rcm.txt". Created the triangulation file "triangles3.rcm.txt". TRIANGULATION_RCM Normal end of execution. December 9 2006 8:41:56.919 AM