pivot Subroutine

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

Arguments

Type	Intent	Optional	Attributes		Name
real				::	p
real				::	q
integer				::	n
integer				::	nm
real				::	a
integer				::	la
real				::	e
real				::	aa
integer				::	ll
integer				::	ifail
integer				::	npv

Contents

Common Blocks

noutc iprintc schurc factorc mxm1c refactorc epsc pqc

Common Blocks

common /noutc/

Type	Attributes		Name		Initial
integer		::	nout

common /iprintc/

Type	Attributes		Name		Initial
integer		::	iprint

common /schurc/

Type	Attributes		Name		Initial
integer		::	ns
integer		::	ns1
integer		::	nt
integer		::	nt1
integer		::	nu
integer		::	nu1
integer		::	nx
integer		::	nx1
integer		::	np
integer		::	np1
integer		::	neb
integer		::	neb1
integer		::	nprof
integer		::	lc
integer		::	lc1
integer		::	li
integer		::	li1
integer		::	lm
integer		::	lm1
integer		::	lp
integer		::	lp1
integer		::	lq
integer		::	lq1
integer		::	lr
integer		::	lr1
integer		::	ls_
integer		::	ls1
integer		::	lt
integer		::	lt1
integer		::	nq
integer		::	nq1
integer		::	nr
integer		::	nr1
integer		::	ny
integer		::	ny1
integer		::	nz
integer		::	nz1
integer		::	lv
integer		::	lv1
integer		::	le
integer		::	le1

common /factorc/

Type	Attributes		Name		Initial
integer		::	m1
integer		::	m2
integer		::	mp
integer		::	mq
integer		::	lastr
integer		::	irow

common /mxm1c/

Type	Attributes		Name		Initial
integer		::	mxm1

common /refactorc/

Type	Attributes		Name		Initial
integer		::	mc
integer		::	mxmc

common /epsc/

Type	Attributes		Name		Initial
real		::	eps
real		::	tol
real		::	emin

common /pqc/

Type	Attributes		Name		Initial
real		::	pc
real		::	qr
integer		::	lmp