linpack_d_test, a FORTRAN90 code which call linpack_d(), which solves systems of linear equations for a variety of matrix types and storage modes.
The information on this web page is distributed under the MIT license.
linpack_d, a FORTRAN90 code which factors and solves linear systems using double precision real arithmetic, by Jack Dongarra, Jim Bunch, Cleve Moler, Pete Stewart.