Mathematica Subroutine (Limited Gauss-Jordan Elimination).
(c) John H. Mathews 2003