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-12-28