pivot Subroutine

  1. denseL.f90
  2. pivot

subroutine pivot(p, q, n, nm, a, la, e, aa, ll, ifail, info)

Arguments

Type IntentOptional AttributesName
real :: p
real :: q
integer :: n
integer :: nm
real :: a
integer :: la
real :: e
real :: aa
integer :: ll
integer :: ifail
integer :: info

Calls

proc~~pivot~2~~CallsGraph proc~pivot~2 pivot proc~aiscpri1 aiscpri1 proc~pivot~2->proc~aiscpri1 proc~scpr scpr proc~pivot~2->proc~scpr proc~check_l~2 check_L proc~pivot~2->proc~check_l~2

Contents

Common Blocks


Common Blocks

common /noutc/

Type AttributesNameInitial
integer :: nout

common /iprintc/

Type AttributesNameInitial
integer :: iprint

common /densec/

Type AttributesNameInitial
integer :: ns
integer :: ns1
integer :: nt
integer :: nt1
integer :: nu
integer :: nu1
integer :: mx1
integer :: lc
integer :: lc1
integer :: li
integer :: li1

common /factorc/

Type AttributesNameInitial
integer :: m0
integer :: m1
integer :: mm0
integer :: mm
integer :: mp
integer :: mq

common /mxm1c/

Type AttributesNameInitial
integer :: mxm1

common /refactorc/

Type AttributesNameInitial
integer :: nup
integer :: nfreq

common /epsc/

Type AttributesNameInitial
real :: eps
real :: tol
real :: emin