08-Oct-2025 14:15:02 r8lt_test() MATLAB/Octave version 6.4.0 Test r8lt(). r8ge_to_r8lt_test(): r8ge_to_r8lt() converts an R8GE matrix to R8LT format. The random R8GE matrix: Col: 1 2 3 4 Row --- 1 0.700196 0.994529 0.363341 0.227341 2 0.0227121 0.316525 0.862844 0.347592 3 0.295771 0.210318 0.451698 0.286669 4 0.761296 0.999574 0.0952163 0.519166 5 0.579427 0.226667 0.0401198 0.797645 The R8LT matrix: Col: 1 2 3 4 Row --- 1 0.700196 2 0.0227121 0.316525 3 0.295771 0.210318 0.451698 4 0.761296 0.999574 0.0952163 0.519166 5 0.579427 0.226667 0.0401198 0.797645 r8lt_det_test(): r8lt_det() computes the determinant of an R8LT matrix The matrix A: Col: 1 2 3 4 5 Row --- 1 0.693755 2 0.545739 0.16791 3 0.813786 0.940946 0.0323665 4 0.429394 0.216131 0.313763 0.33078 5 0.00363992 0.834534 0.367159 0.607819 0.447648 Determinant is 0.000558283 r8lt_indicator_test(): r8lt_indicator() sets up an indicator matrix in R8LT format; The R8LT indicator matrix: Col: 1 2 3 4 5 Row --- 1 11 2 21 22 3 31 32 33 4 41 42 43 44 5 51 52 53 54 55 6 61 62 63 64 65 r8lt_inverse_test(): r8lt_inverse() computes the inverse of an R8LT matrix. The matrix A: Col: 1 2 3 4 5 Row --- 1 0.343423 2 0.261215 0.748015 3 0.570721 0.0689241 0.998541 4 0.118912 0.38789 0.244482 0.925743 5 0.577199 0.604454 0.678853 0.408684 0.0162603 The inverse matrix B: Col: 1 2 3 4 5 Row --- 1 2.91186 2 -1.01685 1.33687 3 -1.5941 -0.0922773 1.00146 4 0.473027 -0.535785 -0.264479 1.08021 5 -10.9002 -32.3776 -35.1628 -27.1499 61.4995 The product C = A * B: Col: 1 2 3 4 5 Row --- 1 1 2 0 1 3 0 0 1 4 0 0 -2.77556e-17 1 5 0 0 0 0 1 r8lt_mm_test(): r8lt_mm() computes C = A * B for R8LT matrices. The matrix A: Col: 1 2 3 4 5 Row --- 1 1 2 1 1 3 1 1 1 4 1 1 1 1 5 1 1 1 1 1 The product C = A * A Col: 1 2 3 4 5 Row --- 1 1 2 2 1 3 3 2 1 4 4 3 2 1 5 5 4 3 2 1 r8lt_mtm_test(): r8lt_mtm() computes C = A' * B for R8LT matrices. The matrix A: Col: 1 2 3 4 5 Row --- 1 1 2 1 1 3 1 1 1 4 1 1 1 1 5 1 1 1 1 1 The product C = A' * A Col: 1 2 3 4 5 Row --- 1 5 4 3 2 1 2 4 4 3 2 1 3 3 3 3 2 1 4 2 2 2 2 1 5 1 1 1 1 1 r8lt_mtv_test(): r8lt_mtv() computes A'*x for an R8LT matrix. The matrix A: Col: 1 2 3 4 Row --- 1 11 2 21 22 3 31 32 33 4 41 42 43 44 5 51 52 53 54 The vector x 1: 1 2: 2 3: 3 4: 4 5: 5 b = A'*x: 1: 565 2: 568 3: 536 4: 446 r8lt_mv_test(): r8lt_mv() computes A*x for an R8LT matrix. The matrix A: Col: 1 2 3 4 Row --- 1 11 2 21 22 3 31 32 33 4 41 42 43 44 5 51 52 53 54 The vector x 1: 1 2: 2 3: 3 4: 4 b = A*x: 1: 11 2: 65 3: 194 4: 430 5: 530 r8lt_print_test(): r8lt_print() prints an R8LT matrix; The R8LT matrix: Col: 1 2 3 4 5 Row --- 1 11 2 21 22 3 31 32 33 4 41 42 43 44 5 51 52 53 54 55 6 61 62 63 64 65 r8lt_print_some_test(): r8lt_print_some() prints some of an R8LT matrix; Rows 2-3, Cols 2-4: Col: 2 3 4 Row --- 2 22 3 32 33 r8lt_random_test(): r8lt_random() randomizes an R8LT matrix; The random R8LT matrix: Col: 1 2 3 4 5 Row --- 1 0.476826 2 0.424322 0.376689 3 0.723202 0.0958672 0.423309 4 0.490168 0.342316 0.456658 0.979294 5 0.190211 0.507969 0.307734 0.283012 0.984122 6 0.68319 0.653035 0.930552 0.154269 0.0284736 r8lt_sl_test(): r8lt_sl() solves A*x=b for an R8LT matrix A. The R8LT matrix: Col: 1 2 3 4 5 Row --- 1 1 2 1 2 3 1 2 3 4 1 2 3 4 5 1 2 3 4 5 Solution: 1: 1 2: 2 3: 3 4: 4 5: 5 r8lt_slt_test(): r8lt_slt() solves A'*x=b for an R8LT matrix A The R8LT matrix: Col: 1 2 3 4 5 Row --- 1 1 2 1 2 3 1 2 3 4 1 2 3 4 5 1 2 3 4 5 Solution to transposed system: 1: 1 2: 2 3: 3 4: 4 5: 5 r8lt_to_r8ge_test(): r8lt_to_r8ge() converts an R8LT matrix to R8GE format. The random R8LT matrix: Col: 1 2 3 4 Row --- 1 0.813826 2 0.34393 0.246832 3 0.447128 0.825414 0.363487 4 0.13789 0.0237235 0.424989 0.883666 5 0.0667767 0.513988 0.931157 0.689053 The R8GE matrix Col: 1 2 3 4 Row --- 1 0.813826 0 0 0 2 0.34393 0.246832 0 0 3 0.447128 0.825414 0.363487 0 4 0.13789 0.0237235 0.424989 0.883666 5 0.0667767 0.513988 0.931157 0.689053 r8lt_zeros_test(): r8lt_zeros() zeros out space for an R8LT matrix. Matrix order M, N = 5, 4 Matrix A: Col: 1 2 3 4 Row --- 1 0 2 0 0 3 0 0 0 4 0 0 0 0 5 0 0 0 0 r8lt_test(): Normal end of execution. 08-Oct-2025 14:15:02