Previous: sgbco Up: ../linpack.html Next: sgbfa

SGBDI

       SUBROUTINE SGBDI(ABD,LDA,N,ML,MU,IPVT,DET)
       INTEGER LDA,N,ML,MU,IPVT(1)
       REAL ABD(LDA,1),DET(2)
 C
 C     SGBDI COMPUTES THE DETERMINANT OF A BAND MATRIX
 C     USING THE FACTORS COMPUTED BY SGBCO OR SGBFA.
 C     IF THE INVERSE IS NEEDED, USE SGBSL  N  TIMES.
 C
 C     ON ENTRY
 C
 C        ABD     REAL(LDA, N)
 C                THE OUTPUT FROM SGBCO OR SGBFA.
 C
 C        LDA     INTEGER
 C                THE LEADING DIMENSION OF THE ARRAY  ABD .
 C
 C        N       INTEGER
 C                THE ORDER OF THE ORIGINAL MATRIX.
 C
 C        ML      INTEGER
 C                NUMBER OF DIAGONALS BELOW THE MAIN DIAGONAL.
 C
 C        MU      INTEGER
 C                NUMBER OF DIAGONALS ABOVE THE MAIN DIAGONAL.
 C
 C        IPVT    INTEGER(N)
 C                THE PIVOT VECTOR FROM SGBCO OR SGBFA.
 C
 C     ON RETURN
 C
 C        DET     REAL(2)
 C                DETERMINANT OF ORIGINAL MATRIX.
 C                DETERMINANT = DET(1) * 10.0**DET(2)
 C                WITH  1.0 .LE. ABS(DET(1)) .LT. 10.0
 C                OR  DET(1) = 0.0 .
 C
 C     LINPACK. THIS VERSION DATED 08/14/78 .
 C     CLEVE MOLER, UNIVERSITY OF NEW MEXICO, ARGONNE NATIONAL LAB.
 C
 C     SUBROUTINES AND FUNCTIONS
 C
 C     FORTRAN ABS
 C