krdem2_m Module

Procedures for test_krdem2.

Uses

- daskr_kinds
Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.
Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Used by

Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.
Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Variables

Type	Visibility	Attributes		Name		Initial
integer,	public,	parameter	::	neq	=	2
integer,	public,	parameter	::	nrt	=	1
integer,	public,	parameter	::	nrowpd	=	2

Subroutines

public pure subroutine f(t, y, yprime)

dy/dt routine.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=rk),	intent(in)			::	t
real(kind=rk),	intent(in)			::	y(:)
real(kind=rk),	intent(out)			::	yprime(:)

public pure subroutine res(t, y, yprime, cj, delta, ires, rpar, ipar)

Residuals routine.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=rk),	intent(in)			::	t
real(kind=rk),	intent(in)			::	y(neq)
real(kind=rk),	intent(in)			::	yprime(neq)
real(kind=rk),	intent(in)			::	cj
real(kind=rk),	intent(out)			::	delta(neq)
integer,	intent(inout)			::	ires
real(kind=rk),	intent(in)			::	rpar
integer,	intent(in)			::	ipar

public pure subroutine jac(t, y, yprime, pd, cj, rpar, ipar)

Jacobian routine.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=rk),	intent(in)			::	t
real(kind=rk),	intent(in)			::	y(neq)
real(kind=rk),	intent(in)			::	yprime(neq)
real(kind=rk),	intent(out)			::	pd(nrowpd,neq)
real(kind=rk),	intent(in)			::	cj
real(kind=rk),	intent(in)			::	rpar
integer,	intent(in)			::	ipar

public pure subroutine rt(neq, t, y, yprime, nrt, rval, rpar, ipar)

Roots routine.

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	neq
real(kind=rk),	intent(in)			::	t
real(kind=rk),	intent(in)			::	y(neq)
real(kind=rk),	intent(in)			::	yprime(neq)
integer,	intent(in)			::	nrt
real(kind=rk),	intent(out)			::	rval(nrt)
real(kind=rk),	intent(in)			::	rpar
integer,	intent(in)			::	ipar