(%i3) A : matrix([ 1, 3, 2],[ 2, 5, 6],[ - 3, - 2, 7]) ;
x : lu_factor( A) $
get_lu_factors( x) ;
(A) [ 1 3 2 2 5 6 3 2 7 ] 0 errores, 0 advertencias (%o3) [ [ 1 0 0 0 1 0 0 0 1 ] , [ 1 0 0 2 1 0 3 7 1 ] , [ 1 3 2 0 1 2 0 0 27 ] ]

Created with wxMaxima.