Matrix solver


INTERFACE:

    subroutine matrix(n,a,r,c)
DESCRIPTION:

This is a Gaussian solver for multi-dimensional linear equations.


USES:

    IMPLICIT NONE
INPUT PARAMETERS:
    integer, intent(in)                 :: n
   INPUT/OUTPUT PARAMETERS:
   REALTYPE                             :: a(1:n,1:n),r(1:n)
   OUTPUT PARAMETERS:
   REALTYPE, intent(out)                :: c(1:n)
REVISION HISTORY:
    Original author(s): Hans Burchard, Karsten Bolding
LOCAL VARIABLES:
   integer  :: i,j,k



Karsten Bolding 2012-01-24