15-May-2025 20:34:00 r8ccs_test(): MATLAB/Octave version 6.4.0 Test r8ccs(). r8ccs_dif2_test(): r8ccs_dif2() sets the second difference as an r8ccs matrix; Matrix rows M = 5 Matrix columns N = 5 Nonzeros NZ_NUM = 13 The r8ccs matrix: Col: 1 2 3 4 5 Row --- 1 2 -1 0 0 0 2 -1 2 -1 0 0 3 0 -1 2 -1 0 4 0 0 -1 2 -1 5 0 0 0 -1 2 r8ccs_get_test(): r8ccs_get() gets an entry of an r8ccs matrix; Matrix rows M = 5 Matrix columns N = 5 Matrix nonzeros NZ_NUM = 12 The COLPTR vector: 1: 1 2: 4 3: 6 4: 8 5: 10 6: 13 The ROWIND vector: 1: 1 2: 2 3: 4 4: 1 5: 2 6: 3 7: 5 8: 4 9: 5 10: 1 11: 2 12: 5 The initial r8ccs matrix: Col: 1 2 3 4 5 Row --- 1 -0.0926452 -0.397208 0 0 -1.82953 2 0.0620907 0.426416 0 0 -0.249392 3 0 0 0.271804 0 0 4 -1.94399 0 0 0.431353 0 5 0 0 1.75058 1.45281 1.46879 r8ccs_get retrieves 10 entries. I J K VALUE 4 4 8 0.431353 1 2 4 -0.397208 1 5 10 -1.829530 2 5 11 -0.249392 3 3 6 0.271804 1 5 10 -1.829530 3 3 6 0.271804 1 5 10 -1.829530 1 1 1 -0.092645 1 2 4 -0.397208 r8ccs_ijk_test(): r8ccs_ijk() gets K from (I,J) for an r8ccs matrix. Matrix rows M = 5 Matrix columns N = 5 Matrix nonzeros NZ_NUM = 12 The COLPTR vector: 1: 1 2: 4 3: 6 4: 8 5: 10 6: 13 The ROWIND vector: 1: 1 2: 2 3: 4 4: 1 5: 2 6: 3 7: 5 8: 4 9: 5 10: 1 11: 2 12: 5 The initial r8ccs matrix: Col: 1 2 3 4 5 Row --- 1 0.343344 -0.590071 0 0 0.00785983 2 0.897402 0.0804595 0 0 -0.1761 3 0 0 0.115293 0 0 4 -0.0308721 0 0 -0.198031 0 5 0 0 -0.0893461 -0.00312513 0.286185 r8ccs_ijk locates some (I,J) entries. I J K 4 5 -1 1 4 -1 4 2 -1 4 5 -1 2 1 2 3 5 -1 4 5 -1 4 2 -1 2 2 5 4 5 -1 3 4 -1 2 2 5 5 4 9 2 5 11 2 3 -1 3 3 6 3 3 6 5 5 12 2 5 11 5 3 7 r8ccs_inc_test(): r8ccs_inc() increments entries in an r8ccs matrix. Matrix rows M = 5 Matrix columns N = 5 Matrix nonzeros NZ_NUM = 12 The COLPTR vector: 1: 1 2: 4 3: 6 4: 8 5: 10 6: 13 The ROWIND vector: 1: 1 2: 2 3: 4 4: 1 5: 2 6: 3 7: 5 8: 4 9: 5 10: 1 11: 2 12: 5 The initial r8ccs matrix: Col: 1 2 3 4 5 Row --- 1 -1.58094 -1.37611 0 0 -0.720056 2 -0.2985 -1.09702 0 0 0.297167 3 0 0 0.0950515 0 0 4 -0.473243 0 0 1.19089 0 5 0 0 -0.0696224 0.0580104 0.783505 r8ccs_inc increments 10 entries at random. I J K NEW_VALUE 1 1 1 19.419063 4 1 3 21.526757 1 1 1 42.419063 3 3 6 24.095052 1 1 1 67.419063 2 1 2 25.701500 5 4 9 27.058010 1 2 4 26.623890 5 3 7 28.930378 4 4 8 31.190888 The final r8ccs matrix: Col: 1 2 3 4 5 Row --- 1 67.4191 26.6239 0 0 -0.720056 2 25.7015 -1.09702 0 0 0.297167 3 0 0 24.0951 0 0 4 21.5268 0 0 31.1909 0 5 0 0 28.9304 27.058 0.783505 r8ccs_indicator_test(): r8ccs_indicator() sets up the indicator matrix; Matrix rows M = 5 Matrix columns N = 5 Nonzeros NZ_NUM = 12 The r8ccs matrix: Col: 1 2 3 4 5 Row --- 1 11 12 0 0 15 2 21 22 0 0 25 3 0 0 33 0 0 4 41 0 0 44 0 5 0 0 53 54 55 r8ccs_kij_test(): r8ccs_kij() gets (I,J) from K in an r8ccs matrix. Matrix rows M = 5 Matrix columns N = 5 Matrix nonzeros NZ_NUM = 12 The COLPTR vector: 1: 1 2: 4 3: 6 4: 8 5: 10 6: 13 The ROWIND vector: 1: 1 2: 2 3: 4 4: 1 5: 2 6: 3 7: 5 8: 4 9: 5 10: 1 11: 2 12: 5 The initial r8ccs matrix: Col: 1 2 3 4 5 Row --- 1 0.561445 0.0875843 0 0 -0.16462 2 -0.425855 -0.151711 0 0 0.636391 3 0 0 -0.838295 0 0 4 -0.0618547 0 0 -1.13714 0 5 0 0 0.390186 -1.61818 -0.71266 r8ccs_KIJ locates some K entries. K I J 5 2 2 10 1 5 9 5 4 8 4 4 7 5 3 8 4 4 2 2 1 3 4 1 9 5 4 9 5 4 10 1 5 10 1 5 10 1 5 1 1 1 7 5 3 12 5 5 10 1 5 1 1 1 2 2 1 8 4 4 r8ccs_mtv_test(): r8ccs_mtv() computes b=A'*x, where A is an r8ccs matrix. Matrix rows M = 5 Matrix columns N = 5 Matrix nonzeros NZ_NUM = 12 The r8ccs matrix A: Col: 1 2 3 4 5 Row --- 1 -0.384812 -0.391726 0 0 -0.626166 2 -0.0722068 -0.286964 0 0 -1.45975 3 0 0 -0.31242 0 0 4 2.33584 0 0 0.228523 0 5 0 0 0.302431 0.741391 0.743827 x: 1: 1 2: 0 3: 0 4: 0 5: -1 b=A'*x: 1: -0.384812 2: -0.391726 3: -0.302431 4: -0.741391 5: -1.36999 r8ccs_mv_test(): r8ccs_mv() computes b=A*x, where A is an r8ccs matrix; Matrix rows M = 5 Matrix columns N = 5 Matrix nonzeros NZ_NUM = 12 The r8ccs matrix A: Col: 1 2 3 4 5 Row --- 1 -1.58015 -0.392366 0 0 1.05859 2 -1.11906 -0.29905 0 0 -0.776393 3 0 0 -1.96663 0 0 4 -0.907799 0 0 -0.198644 0 5 0 0 -2.22129 -1.72367 2.2595 The x: 1: 1 2: 0 3: 0 4: 0 5: -1 b=A*x: 1: -2.63874 2: -0.342669 3: 0 4: -0.907799 5: -2.2595 r8ccs_print_test(): r8ccs_print() prints a r8ccs matrix. Matrix rows M = 5 Matrix columns N = 5 Matrix nonzeros NZ_NUM = 12 The r8ccs matrix: Col: 1 2 3 4 5 Row --- 1 0.475234 0.0487319 0 0 -0.743363 2 1.29468 -1.37495 0 0 0.271916 3 0 0 -1.00492 0 0 4 1.17163 0 0 -1.01229 0 5 0 0 1.53122 0.399454 -0.213073 r8ccs_print_some_test(): r8ccs_print_some() prints some of an r8ccs matrix. Matrix rows M = 10 Matrix columns N = 10 Nonzeros NZ_NUM = 28 Rows 2-6, Cols 5-8: Col: 5 6 7 8 Row --- 2 0 0 0 0 3 0 0 0 0 4 405 0 0 0 5 505 506 0 0 6 605 606 607 0 r8ccs_random_test() r8ccs_random(): randomizes an r8ccs matrix. Matrix rows M = 5 Matrix columns N = 5 Nonzeros NZ_NUM = 12 The r8ccs matrix: Col: 1 2 3 4 5 Row --- 1 0.283465 1.08872 0 0 -0.55924 2 -0.346533 -0.0387759 0 0 0.693044 3 0 0 0.0604072 0 0 4 -0.445345 0 0 0.678804 0 5 0 0 -1.0617 0.5953 -0.457861 r8ccs_read_test(): r8ccs_read() reads an r8ccs matrix from a file. Matrix rows M = 5 Matrix columns N = 5 Nonzeros NZ_NUM = 12 Index base (0/1) = 1 The COL vector: 1: 1 2: 4 3: 6 4: 8 5: 10 6: 13 The ROW vector: 1: 1 2: 2 3: 4 4: 1 5: 2 6: 3 7: 5 8: 4 9: 5 10: 1 11: 2 12: 5 The r8ccs matrix: Col: 1 2 3 4 5 Row --- 1 11 12 0 0 15 2 21 22 0 0 25 3 0 0 33 0 0 4 41 0 0 44 0 5 0 0 53 54 55 r8ccs_set_test(): r8ccs_set() sets entries in an r8ccs matrix; Matrix rows M = 5 Matrix columns N = 5 Matrix nonzeros NZ_NUM = 12 The COLPTR vector: 1: 1 2: 4 3: 6 4: 8 5: 10 6: 13 The ROWIND vector: 1: 1 2: 2 3: 4 4: 1 5: 2 6: 3 7: 5 8: 4 9: 5 10: 1 11: 2 12: 5 The initial r8ccs matrix: Col: 1 2 3 4 5 Row --- 1 1.85473 0.841689 0 0 -1.59177 2 0.78616 -1.026 0 0 0.583517 3 0 0 -1.1963 0 0 4 -1.76064 0 0 0.160658 0 5 0 0 1.63701 -1.0449 -1.02068 r8ccs_set sets 10 entries at random. I J K NEW_VALUE 4 1 3 101.000000 5 4 9 102.000000 5 5 12 103.000000 1 2 4 104.000000 1 2 4 105.000000 1 5 10 106.000000 2 2 5 107.000000 4 4 8 108.000000 1 5 10 109.000000 5 3 7 110.000000 The final r8ccs matrix: Col: 1 2 3 4 5 Row --- 1 1.85473 105 0 0 109 2 0.78616 107 0 0 0.583517 3 0 0 -1.1963 0 0 4 101 0 0 108 0 5 0 0 110 102 103 r8ccs_to_r8ge_test(): r8ccs_to_r8ge() converts a matrix from r8ccs to r8ge format. Matrix rows M = Matrix columns N = Nonzeros NZ_NUM = The r8ccs matrix: Col: 1 2 3 4 5 Row --- 1 11 12 0 0 15 2 21 22 0 0 25 3 0 0 33 0 0 4 41 0 0 44 0 5 0 0 53 54 55 The R8GE matrix: Col: 1 2 3 4 5 Row --- 1 11 12 0 0 15 2 21 22 0 0 25 3 0 0 33 0 0 4 41 0 0 44 0 5 0 0 53 54 55 r8ccs_write_test(): r8ccs_write() writes an r8ccs matrix to 3 files Matrix rows M = 5 Matrix columns N = 5 Nonzeros NZ_NUM = 12 The COL vector: 1: 1 2: 4 3: 6 4: 8 5: 10 6: 13 The ROW vector: 1: 1 2: 2 3: 4 4: 1 5: 2 6: 3 7: 5 8: 4 9: 5 10: 1 11: 2 12: 5 The r8ccs matrix: Col: 1 2 3 4 5 Row --- 1 11 12 0 0 15 2 21 22 0 0 25 3 0 0 33 0 0 4 41 0 0 44 0 5 0 0 53 54 55 r8ccs_zeros_test(): r8ccs_zeros() zeros an r8ccs matrix. Matrix rows M = 5 Matrix columns N = 5 Nonzeros NZ_NUM = 12 The r8ccs matrix: Col: 1 2 3 4 5 Row --- 1 0 0 0 0 0 2 0 0 0 0 0 3 0 0 0 0 0 4 0 0 0 0 0 5 0 0 0 0 0 r8ccs_test(): Normal end of execution. 15-May-2025 20:34:00