ILUFDS Subroutine

subroutine ILUFDS(NP1, B, LENB, ROWPOSP, COLPOSP)

Uses

  • proc~~ilufds~~UsesGraph proc~ilufds ILUFDS module~real_precision REAL_PRECISION proc~ilufds->module~real_precision

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: NP1
real(kind=R8), intent(inout) :: B(LENB)
integer, intent(in) :: LENB
integer, intent(in) :: ROWPOSP(NP1+1)
integer, intent(in) :: COLPOSP(LENB)

Variables

Type Visibility Attributes Name Initial
real(kind=R8), public :: SIJ
real(kind=R8), public :: LIT
real(kind=R8), public :: LII
integer, public :: I
integer, public :: J
integer, public :: COUNT
integer, public :: ISTRT
integer, public :: IFIN
integer, public :: TMAX
integer, public :: K
integer, public :: T
integer, public :: M

Source Code

        SUBROUTINE ILUFDS(NN, Q, LENQ, ROWPOS, COLPOS)
          USE REAL_PRECISION
          INTEGER, INTENT(IN):: LENQ, NN, COLPOS(LENQ), ROWPOS(NN+1) 
          REAL (KIND=R8), INTENT(IN OUT):: Q(LENQ) 
        END SUBROUTINE ILUFDS