15 September 2021 3:23:21.316 PM SPHERE_CUBED_GRID_TEST FORTRAN90 version Test the SPHERE_CUBED_GRID library. SPHERE_CUBED_GRID_POINT_COUNT_TEST SPHERE_CUBED_GRID_POINT_COUNT counts points on a cubed sphere grid. Each square face is divided into NxN subfaces, and there are 6 faces. N POINT_COUNT 1 8 2 26 3 56 4 98 5 152 6 218 7 296 8 386 9 488 10 602 SPHERE_CUBED_GRID_POINTS_TEST SPHERE_CUBED_GRID_POINTS computes points on a cubed sphere grid. Number of divisions on each face = 10 Total number of points = 602 Initial part of XYZ array: Row 1 2 3 Col 1: -0.577350 -0.577350 -0.577350 2: -0.628960 -0.456966 -0.628960 3: -0.665247 -0.338960 -0.665247 4: -0.689152 -0.223919 -0.689152 5: -0.702714 -0.111299 -0.702714 6: -0.707107 0.00000 -0.707107 7: -0.702714 0.111299 -0.702714 8: -0.689152 0.223919 -0.689152 9: -0.665247 0.338960 -0.665247 10: -0.628960 0.456966 -0.628960 11: -0.577350 0.577350 -0.577350 12: -0.456966 -0.628960 -0.628960 13: -0.506732 -0.506732 -0.697457 14: -0.543426 -0.381106 -0.747962 15: -0.568473 -0.254229 -0.782436 16: -0.583019 -0.127097 -0.802456 17: -0.587785 0.00000 -0.809017 18: -0.583019 0.127097 -0.802456 19: -0.568473 0.254229 -0.782436 20: -0.543426 0.381106 -0.747962 SPHERE_CUBED_GRID_POINTS_FACE_TEST SPHERE_CUBED_GRID_POINTS_FACE computes points associated with one face of a cubed sphere grid. Number of divisions on each face = 3 Total number of points = 56 Current number of points = 16 XYZ array after call for bottom face: Row 1 2 3 4 5 Col 1: -0.577350 -0.577350 -0.577350 -0.694747 -0.186157 2: -0.250563 -0.935113 -0.250563 0.250563 -0.935113 3: -0.935113 0.186157 0.694747 -0.694747 0.577350 Row 6 7 8 9 10 Col 1: -0.694747 -0.694747 0.186157 -0.694747 -0.577350 2: -0.186157 0.694747 -0.694747 0.186157 -0.694747 3: -0.577350 -0.577350 0.694747 -0.186157 -0.694747 Row 11 12 13 14 15 Col 1: 0.577350 -0.577350 -0.186157 -0.694747 -0.694747 2: -0.694747 0.250563 -0.250563 -0.935113 0.250563 3: 0.694747 0.186157 -0.694747 0.577350 0.577350 Row 16 Col 1: -0.250563 2: 0.250563 3: -0.577350 Current number of points = 22 XYZ array after call for a side face face: Row 1 2 3 4 5 Col 1: -0.577350 -0.577350 -0.577350 -0.694747 -0.186157 2: 0.694747 -0.694747 0.186157 -0.694747 -0.694747 3: -0.694747 0.577350 0.577350 -0.577350 -0.694747 Row 6 7 8 9 10 Col 1: -0.694747 -0.694747 0.186157 -0.694747 -0.577350 2: 0.250563 -0.250563 -0.935113 0.250563 0.250563 3: -0.694747 -0.186157 -0.694747 -0.694747 0.186157 Row 11 12 13 14 15 Col 1: 0.577350 -0.577350 -0.186157 -0.694747 -0.694747 2: -0.935113 0.186157 0.694747 -0.694747 0.577350 3: -0.935113 -0.250563 -0.250563 -0.935113 -0.250563 Row 16 17 18 19 20 Col 1: -0.250563 -0.250563 -0.935113 -0.250563 0.250563 2: -0.577350 -0.577350 0.694747 -0.186157 -0.694747 3: 0.250563 -0.935113 0.250563 -0.250563 -0.935113 Row 21 22 Col 1: -0.935113 -0.186157 2: 0.694747 0.186157 3: 0.250563 0.250563 SPHERE_CUBED_GRID_POINTS_DISPLAY_TEST SPHERE_CUBED_GRID_POINTS_DISPLAY_TEST displays points on a cubed sphere grid. Number of divisions on each face = 10 Total number of points = 602 Created node file "sphere_cubed_grid_points_nodes.txt". Created command file "sphere_cubed_grid_points_commands.txt". SPHERE_CUBED_GRID_IJK_TO_XYZ_TEST: SPHERE_CUBED_GRID_IJK_TO_XYZ returns the XYZ coordinates of a point on the surface of the cubed sphere, given its (I,J,K) indices. Using grid parameter N = 3 I J K X Y Z 0 0 0 -0.5774 -0.5774 -0.5774 0 0 1 -0.6947 -0.6947 -0.1862 0 0 2 -0.6947 -0.6947 0.1862 0 0 3 -0.5774 -0.5774 0.5774 0 1 0 -0.6947 -0.1862 -0.6947 0 1 1 -0.9351 -0.2506 -0.2506 0 1 2 -0.9351 -0.2506 0.2506 0 1 3 -0.6947 -0.1862 0.6947 0 2 0 -0.6947 0.1862 -0.6947 0 2 1 -0.9351 0.2506 -0.2506 0 2 2 -0.9351 0.2506 0.2506 0 2 3 -0.6947 0.1862 0.6947 0 3 0 -0.5774 0.5774 -0.5774 0 3 1 -0.6947 0.6947 -0.1862 0 3 2 -0.6947 0.6947 0.1862 0 3 3 -0.5774 0.5774 0.5774 1 0 0 -0.1862 -0.6947 -0.6947 1 0 1 -0.2506 -0.9351 -0.2506 1 0 2 -0.2506 -0.9351 0.2506 1 0 3 -0.1862 -0.6947 0.6947 1 1 0 -0.2506 -0.2506 -0.9351 1 1 3 -0.2506 -0.2506 0.9351 1 2 0 -0.2506 0.2506 -0.9351 1 2 3 -0.2506 0.2506 0.9351 1 3 0 -0.1862 0.6947 -0.6947 1 3 1 -0.2506 0.9351 -0.2506 1 3 2 -0.2506 0.9351 0.2506 1 3 3 -0.1862 0.6947 0.6947 2 0 0 0.1862 -0.6947 -0.6947 2 0 1 0.2506 -0.9351 -0.2506 2 0 2 0.2506 -0.9351 0.2506 2 0 3 0.1862 -0.6947 0.6947 2 1 0 0.2506 -0.2506 -0.9351 2 1 3 0.2506 -0.2506 0.9351 2 2 0 0.2506 0.2506 -0.9351 2 2 3 0.2506 0.2506 0.9351 2 3 0 0.1862 0.6947 -0.6947 2 3 1 0.2506 0.9351 -0.2506 2 3 2 0.2506 0.9351 0.2506 2 3 3 0.1862 0.6947 0.6947 3 0 0 0.5774 -0.5774 -0.5774 3 0 1 0.6947 -0.6947 -0.1862 3 0 2 0.6947 -0.6947 0.1862 3 0 3 0.5774 -0.5774 0.5774 3 1 0 0.6947 -0.1862 -0.6947 3 1 1 0.9351 -0.2506 -0.2506 3 1 2 0.9351 -0.2506 0.2506 3 1 3 0.6947 -0.1862 0.6947 3 2 0 0.6947 0.1862 -0.6947 3 2 1 0.9351 0.2506 -0.2506 3 2 2 0.9351 0.2506 0.2506 3 2 3 0.6947 0.1862 0.6947 3 3 0 0.5774 0.5774 -0.5774 3 3 1 0.6947 0.6947 -0.1862 3 3 2 0.6947 0.6947 0.1862 3 3 3 0.5774 0.5774 0.5774 SPHERE_CUBED_GRID_LINE_COUNT_TEST SPHERE_CUBED_GRID_LINE_COUNT counts lines on a cubed sphere grid. Each square face is divided into NxN subfaces, and there are 6 faces. N LINE_COUNT 1 12 2 48 3 108 4 192 5 300 6 432 7 588 8 768 9 972 10 1200 SPHERE_CUBED_GRID_LINES_TEST SPHERE_CUBED_GRID_LINES defines the lines on a cubed sphere grid. Each cube face is divided into 5 by 5 subfaces The number of points is 152 The number of grid lines is 300 Line Start End Index X Y Z X Y Z 1 -0.5774 -0.5774 -0.5774 -0.3390 -0.6652 -0.6652 2 -0.5774 -0.5774 -0.5774 -0.6652 -0.3390 -0.6652 3 -0.5774 -0.5774 -0.5774 -0.6652 -0.6652 -0.3390 4 0.5774 -0.5774 -0.5774 0.3390 -0.6652 -0.6652 5 0.5774 -0.5774 -0.5774 -0.6652 -0.3390 -0.6652 6 0.5774 -0.5774 -0.5774 0.6652 -0.6652 -0.3390 7 0.5774 0.5774 -0.5774 0.3390 0.6652 -0.6652 8 0.5774 0.5774 -0.5774 0.6652 0.3390 -0.6652 9 0.5774 0.5774 -0.5774 0.6652 0.6652 -0.3390 10 -0.5774 0.5774 -0.5774 -0.3390 0.6652 -0.6652 SPHERE_CUBED_GRID_LINES_DISPLAY_TEST SPHERE_CUBED_GRID_LINES_DISPLAY displays the lines on a cubed sphere grid. Each cube face is divided into 5 by 5 subfaces The number of grid lines is 300 Created line file "sphere_cubed_grid_lines_lines.txt". Created command file "sphere_cubed_grid_lines_commands.txt". SPHERE_CUBED_GRID_TEST Normal end of execution. 15 September 2021 3:23:21.319 PM