21 December 2023 1:46:47.276 PM simplex_coordinates_test(): Fortran77 version Test simplex_coordinates(). TEST01 Call SIMPLEX_COORDINATES1 Simplex vertex coordinates: Row 1 2 3 Col 1: 1.00000 0.00000 0.00000 2: -0.333333 0.942809 0.00000 3: -0.333333 -0.471405 0.816497 4: -0.333333 -0.471405 -0.816497 Side length = 1.63299 Volume = 0.513200 Expected volume = 0.513200 Dot product matrix: Row 1 2 3 4 Col 1: 1.00000 -0.333333 -0.333333 -0.333333 2: -0.333333 1.00000 -0.333333 -0.333333 3: -0.333333 -0.333333 1.00000 -0.333333 4: -0.333333 -0.333333 -0.333333 1.00000 TEST02 Call SIMPLEX_COORDINATES2 Simplex vertex coordinates: Row 1 2 3 Col 1: 0.962250 -0.192450 -0.192450 2: -0.192450 0.962250 -0.192450 3: -0.192450 -0.192450 0.962250 4: -0.577350 -0.577350 -0.577350 Side length = 1.63299 Volume = 0.513200 Expected volume = 0.513200 Dot product matrix: Row 1 2 3 4 Col 1: 1.00000 -0.333333 -0.333333 -0.333333 2: -0.333333 1.00000 -0.333333 -0.333333 3: -0.333333 -0.333333 1.00000 -0.333333 4: -0.333333 -0.333333 -0.333333 1.00000 TEST01 Call SIMPLEX_COORDINATES1 Simplex vertex coordinates: Row 1 2 3 4 Col 1: 1.00000 0.00000 0.00000 0.00000 2: -0.250000 0.968246 0.00000 0.00000 3: -0.250000 -0.322749 0.912871 0.00000 4: -0.250000 -0.322749 -0.456435 0.790569 5: -0.250000 -0.322749 -0.456435 -0.790569 Side length = 1.58114 Volume = 0.145577 Expected volume = 0.145577 Dot product matrix: Row 1 2 3 4 5 Col 1: 1.00000 -0.250000 -0.250000 -0.250000 -0.250000 2: -0.250000 1.00000 -0.250000 -0.250000 -0.250000 3: -0.250000 -0.250000 1.00000 -0.250000 -0.250000 4: -0.250000 -0.250000 -0.250000 1.00000 -0.250000 5: -0.250000 -0.250000 -0.250000 -0.250000 1.00000 TEST02 Call SIMPLEX_COORDINATES2 Simplex vertex coordinates: Row 1 2 3 4 Col 1: 0.963525 -0.154508 -0.154508 -0.154508 2: -0.154508 0.963525 -0.154508 -0.154508 3: -0.154508 -0.154508 0.963525 -0.154508 4: -0.154508 -0.154508 -0.154508 0.963525 5: -0.500000 -0.500000 -0.500000 -0.500000 Side length = 1.58114 Volume = 0.145577 Expected volume = 0.145577 Dot product matrix: Row 1 2 3 4 5 Col 1: 1.00000 -0.250000 -0.250000 -0.250000 -0.250000 2: -0.250000 1.00000 -0.250000 -0.250000 -0.250000 3: -0.250000 -0.250000 1.00000 -0.250000 -0.250000 4: -0.250000 -0.250000 -0.250000 1.00000 -0.250000 5: -0.250000 -0.250000 -0.250000 -0.250000 1.00000 simplex_coordinates_test(): Normal end of execution. 21 December 2023 1:46:47.276 PM