solve

solve, a FORTRAN90 code which solves a linear system of equations A*x=b using Gauss elimination.

There are many automatic ways to solve linear systems, as in MATLAB, and sophisticated packages such as LAPACK. However, this simpler set of routines may have some uses for students, beginners and those who need a quick and simple solver that can be replaced later if it turns out to be inadequate.

This library is useful because:

• it shows the steps involved in a simple Gauss-elimination procedure;
• it can be used to count the number of operations in Gauss-elimination;
• it can be used as a guide for writing a corresponding program in another language;
• its performance can be compared to corresponding versions in C or Fortran;
• it can be used as a starting point for exploring band storage, sparse storage, iterative solutions and other topics in linear algebra.

Licensing:

The computer code and data files made available on this web page are distributed under the MIT license

Languages:

solve is available in a C version and a C++ version and a FORTRAN90 version and a MATLAB version.

Related Data and Programs:

QR_SOLVE, a FORTRAN90 code which computes the linear least squares (LLS) solution of a rectangular linear system A*x=b.

R8LIB, a FORTRAN90 code which contains many utility routines using double precision real (R8) arithmetic.

solve_test

Source Code:

• solve.f90, the source code.
• solve.sh, compiles the source code.