fcvkryx.f File Reference

Namespaces
namespace	requires
Functions
subroutine	INITKX (MX, MY, U0, IPAR, RPAR)
subroutine	FCVFUN (T, U, UDOT, IPAR, RPAR, IER)
subroutine	FCVPSET (T, U, FU, JOK, JCUR, GAMMA, H,&IPAR, RPAR, V1, V2, V3, IER)
subroutine	FCVPSOL (T, U, FU, R, Z, GAMMA, DELTA, LR,&IPAR, RPAR, VTEMP, IER)
subroutine	PREC_JAC (MX, MY, MM, U, BD,&Q1, Q2, Q3, Q4, C3, DY, HDCO, VDCO)
subroutine	PREC_LU (MM, P, IPP, IER)
subroutine	PREC_SOL (MM, P, IPP, Z)
subroutine	dgefa (a, lda, n, ipvt, info)
subroutine	dgesl (a, lda, n, ipvt, b, job)
subroutine	daxpy (n, da, dx, incx, dy, incy)
subroutine	dscal (n, da, dx, incx)
double precision	ddot (n, dx, incx, dy, incy)
integer	idamax (n, dx, incx)
subroutine	dcopy (n, dx, incx, dy, incy)
Variables
INTEGER *4	MX
INTEGER *4	MY
INTEGER *4	NEQ
INTEGER *4	LENIPAR
INTEGER *4	LENRPAR
INTEGER	METH
INTEGER	ITMETH
INTEGER	IATOL
INTEGER	ITASK
INTEGER	IER
INTEGER	LNCFL
INTEGER	LNPS
INTEGER	LNST
INTEGER	LNFE
INTEGER	LNSETUP
INTEGER	LNNI
INTEGER	LNCF
INTEGER	LQ
INTEGER	LH
INTEGER	LNPE
INTEGER	LNLI
INTEGER	LNETF
INTEGER	JOUT
INTEGER	JPRETYPE
INTEGER	IGSTYPE
INTEGER	MAXL
INTEGER *4	IOUT
INTEGER *4	IPAR
INTEGER *4	NST
INTEGER *4	NFE
INTEGER *4	NPSET
INTEGER *4	NPE
INTEGER *4	NPS
INTEGER *4	NNI
INTEGER *4	NETF
INTEGER *4	NLI
INTEGER *4	NCFN
INTEGER *4	NCFL
DOUBLE PRECISION	ATOL
DOUBLE PRECISION	AVDIM
DOUBLE PRECISION	T
DOUBLE PRECISION	TOUT
DOUBLE PRECISION	TWOHR
DOUBLE PRECISION	RTOL
DOUBLE PRECISION	FLOOR
DOUBLE PRECISION	DELT
DOUBLE PRECISION	U
DOUBLE PRECISION	ROUT
DOUBLE PRECISION	RPAR

---

Function Documentation

subroutine daxpy	(	integer*4	n,
		double precision	da,
		double precision,dimension(1)	dx,
		integer	incx,
		double precision,dimension(1)	dy,
		integer	incy
	)

References a, c, dx, dy, m, and n.

Referenced by dgefa(), dgesl(), and Ipopt::IpBlasDaxpy().

subroutine dcopy	(	integer*4	n,
		double precision,dimension(1)	dx,
		integer	incx,
		double precision,dimension(1)	dy,
		integer	incy
	)

References a, c, dx, dy, m, n, x, and y.

Referenced by Ipopt::IpBlasDcopy().

double precision ddot	(	integer*4	n,
		double precision,dimension(1)	dx,
		integer	incx,
		double precision,dimension(1)	dy,
		integer	incy
	)

References c, dx, dy, m, and n.

Referenced by dgesl(), and Ipopt::IpBlasDdot().

subroutine dgefa	(	double precision,dimension	a,
		integer*4	lda,
		integer	n,
		integer*4,dimension(1)	ipvt,
		integer	info
	)

References a, c, daxpy(), dgesl(), dscal(), idamax(), info, k, lda, and n.

Referenced by dgesl().

subroutine dgesl	(	double precision,dimension	a,
		integer	lda,
		integer	n,
		integer*4,dimension(1)	ipvt,
		double precision,dimension(1)	b,
		integer	job
	)

References a, b, c, daxpy(), ddot(), dgefa(), info, k, lda, n, trans, x, and y.

Referenced by dgefa().

subroutine dscal	(	integer*4	n,
		double precision	da,
		double precision,dimension(1)	dx,
		integer	incx
	)

References a, c, dx, m, and n.

Referenced by dgefa(), and Ipopt::IpBlasDscal().

subroutine FCVFUN	(	DOUBLE PRECISION	T,
		DOUBLE PRECISION,dimension(2,*)	U,
		DOUBLE PRECISION,dimension(2,*)	UDOT,
		INTEGER*4,dimension(*)	IPAR,
		DOUBLE PRECISION,dimension(*)	RPAR,
		INTEGER*4	IER
	)

References A3, A4, C3, DY, EXP, MM, MX, MY, Q1, and Q2.

subroutine FCVPSET	(	DOUBLE PRECISION	T,
		DOUBLE PRECISION,dimension(2,*)	U,
		DOUBLE PRECISION,dimension(*)	FU,
		INTEGER	JOK,
		INTEGER	JCUR,
		DOUBLE PRECISION	GAMMA,
		DOUBLE PRECISION	H,
		&,dimension(*)	IPAR,
		DOUBLE PRECISION,dimension(*)	RPAR,
		DOUBLE PRECISION,dimension(*)	V1,
		DOUBLE PRECISION,dimension(*)	V2,
		DOUBLE PRECISION,dimension(*)	V3,
		INTEGER	IER
	)

References C3, DY, FCVFUN(), MM, MX, MY, PREC_JAC(), PREC_LU(), Q1, and Q2.

subroutine FCVPSOL	(	DOUBLE PRECISION	T,
		DOUBLE PRECISION,dimension(*)	U,
		DOUBLE PRECISION,dimension(*)	FU,
		DOUBLE PRECISION,dimension(*)	R,
		DOUBLE PRECISION,dimension(2,*)	Z,
		DOUBLE PRECISION	GAMMA,
		DOUBLE PRECISION	DELTA,
		INTEGER	LR,
		&,dimension(*)	IPAR,
		DOUBLE PRECISION,dimension(*)	RPAR,
		DOUBLE PRECISION,dimension(*)	VTEMP,
		INTEGER	IER
	)

References MM, and PREC_SOL().

integer idamax	(	integer*4	n,
		double precision,dimension(1)	dx,
		integer	incx
	)

References c, dx, and n.

Referenced by dgefa(), and Ipopt::IpBlasIdamax().

subroutine INITKX	(	INTEGER*4	MX,
		INTEGER*4	MY,
		DOUBLE PRECISION,dimension(2,mx,my),dimension	U0,
		INTEGER*4,dimension(*)	IPAR,
		DOUBLE PRECISION,dimension(*)	RPAR
	)

References A3, A4, C3, DX, DY, MM, MX, MY, PI, Q1, Q2, and VEL.

subroutine PREC_JAC	(	INTEGER*4	MX,
		INTEGER*4	MY,
		INTEGER*4	MM,
		DOUBLE PRECISION,dimension(2,*)	U,
		DOUBLE PRECISION,dimension(2,2,mm)	BD,
		&	Q1,
		DOUBLE PRECISION	Q2,
		DOUBLE PRECISION	Q3,
		DOUBLE PRECISION	Q4,
		DOUBLE PRECISION	C3,
		DOUBLE PRECISION	DY,
		DOUBLE PRECISION	HDCO,
		DOUBLE PRECISION	VDCO
	)

References C3, DIAG, DY, EXP, MX, MY, Q1, and Q2.

Referenced by FCVPSET().

subroutine PREC_LU	(	INTEGER*4	MM,
		DOUBLE PRECISION,dimension(2,2,mm)	P,
		INTEGER*4,dimension(2,mm)	IPP,
		INTEGER	IER
	)

References MM.

Referenced by FCVPSET().

subroutine PREC_SOL	(	INTEGER*4	MM,
		DOUBLE PRECISION,dimension(2,2,mm)	P,
		INTEGER*4,dimension(2,mm)	IPP,
		DOUBLE PRECISION,dimension(2,mm)	Z
	)

References MM.

Referenced by FCVPSOL().