Sat Dec 14 20:27:11 2024

rref_test():
  Test rref(), reduced row echelon format functions.

is_rref_test():
  is_rref() reports whether a matrix is in reduced row echelon format.

  A0:
[[1 0 0 9 4]
 [0 0 1 0 8]
 [0 0 0 0 0]
 [0 0 0 1 0]]
p<c
  is_rref(A0) =  False

  A1:
[[1 0 0 9 4]
 [0 0 0 1 0]
 [0 0 1 0 8]
 [0 0 0 0 0]]
A[i,c]!= 0.0
  is_rref(A1) =  False

  A2:
[[1 0 0 9 4]
 [0 1 0 2 8]
 [0 0 3 0 0]
 [0 0 0 0 0]]
A[r,c] != 1.0
  is_rref(A2) =  False

  A3:
[[1 0 3 9 4]
 [0 1 0 2 8]
 [0 0 1 0 0]
 [0 0 0 0 0]]
A[i,c]!= 0.0
  is_rref(A3) =  False

  A4:
[[1 0 3 0 4]
 [0 1 2 0 8]
 [0 0 0 1 0]
 [0 0 0 0 0]]
  is_rref(A4) =  True

pivot_row_test():

  A:
[[ 1 10  0  0  0]
 [ 0  2  4  0  0]
 [-5  0  8  0  0]
 [ 0  9  7  0  6]]

  pivot_row( A, 0 , 0 ) =  2
  A[ 2 , 0 ] =  -5

  pivot_row( A, 0 , 1 ) =  0
  A[ 0 , 0 ] =  10

  pivot_row( A, 1 , 2 ) =  2
  A[ 2 , 1 ] =  8

  pivot_row( A, 3 , 2 ) =  3
  A[ 3 , 3 ] =  7

  pivot_row( A, 0 , 3 ) =  4 = NO PIVOT

  pivot_row( A, 1 , 4 ) =  3
  A[ 3 , 1 ] =  6

rref_test():
  Normal end of execution.
Sat Dec 14 20:27:11 2024