ADAS Subroutine b4matv
SUBROUTINE B4MATV(A,N,B,M,DETERM) IMPLICIT REAL*8 (A-H,O-Z) C----------------------------------------------------------------------- C C ************** FORTRAN77 SUBROUTINE: B4MATV ************************ C C VERSION: 1.0 C C PURPOSE: C MATRIX INVERSION WITH ACCOMPANYING SOLUTION OF LINEAR EQUATIONS C C THIS SUBROUTINE IS NOT YET PROPERLY DOCUMENTED C C----------------------------------------------------------------------- C C UNIX-IDL CONVERSION: C C VERSION: 1.1 DATE: 05-03-98 C MODIFIED: RICHARD MARTIN C - RENAMED FROM V2MATIV.FOR V1.1 C C----------------------------------------------------------------------- C----------------------------------------------------------------------- C INTEGER M, N REAL*8 A(NREPDM,NREPDM), B(NREPDM), DETERM