BEGIN { $| = 1; print "1..7\n"; }
END {print "not ok 1\n" unless $loaded;}
use Math::MatrixReal;
$loaded = 1;
print "ok 1\n";
my $DEBUG = 0;
do 'funcs.pl';
$matrix = Math::MatrixReal->new_from_string(<<"MATRIX");
[ 1 0 -1 0 3 ]
[ -1 0 1 1 -3 ]
[ 2 0 -2 2 0 ]
MATRIX
print $matrix->row_echelon . "\n";