Functions/Subroutines
subroutine	calcrand (RAT, LAM, MRR, MRI, EPS, NP, DDELT, NDGS, NPNAX, AXMAX, B, GAM, NDISTR, NKMAX, NPNA, NCOEFF, REFF, VEFF, CEXTIN, CSCAT, WALB, ASYMM, F)

subroutine	gsp (NMAX, CSCA, LAM, ALF1, ALF2, ALF3, ALF4, BET1, BET2, LMAX)

subroutine	fact

subroutine	signum

subroutine	ccg (N, N1, NMAX, K1, K2, GG)

subroutine	direct (N, M, N1, M1, NN, MM, C)

subroutine	ccgin (N, N1, M, MM, G)

subroutine	power (A, B, R1, R2)

double precision function	zeroin (AX, BX, F, TOL)

double precision function	f (R1)

subroutine	distrb (NNK, YY, WY, NDISTR, AA, BB, GAM, R1, R2, REFF, VEFF, PI)

subroutine	hovenr (L1, A1, A2, A3, A4, B1, B2)

subroutine	matr (A1, A2, A3, A4, B1, B2, LMAX, NPNA, F)

Function/Subroutine Documentation

◆ calcrand()

subroutine calcrand	(		RAT,
		real*8	LAM,
		real*8	MRR,
		real*8	MRI,
			EPS,
			NP,
			DDELT,
			NDGS,
			NPNAX,
			AXMAX,
			B,
			GAM,
			NDISTR,
			NKMAX,
			NPNA,
			NCOEFF,
		real*8	REFF,
		real*8	VEFF,
		real*8	CEXTIN,
		real*8	CSCAT,
		real*8	WALB,
		real*8	ASYMM,
		real*8, dimension(npna,4,4)	F
	)

Definition at line 362 of file tmd.lp.f.

◆ ccg()

subroutine ccg	(		N,
			N1,
			NMAX,
			K1,
			K2,
		real*8, dimension(npl1,npn6)	GG
	)

Definition at line 1209 of file tmd.lp.f.

◆ ccgin()

subroutine ccgin	(	N,
		N1,
		M,
		MM,
		G
	)

Definition at line 1318 of file tmd.lp.f.

◆ direct()

subroutine direct	(	N,
		M,
		N1,
		M1,
		NN,
		MM,
		C
	)

Definition at line 1299 of file tmd.lp.f.

◆ distrb()

subroutine distrb	(		NNK,
		real*8, dimension(nnk)	YY,
		real*8, dimension(nnk)	WY,
			NDISTR,
			AA,
			BB,
			GAM,
			R1,
			R2,
			REFF,
			VEFF,
			PI
	)

Definition at line 1474 of file tmd.lp.f.

◆ f()

double precision function f ( R1 )

Definition at line 1454 of file tmd.lp.f.

◆ fact()

subroutine fact

Definition at line 1161 of file tmd.lp.f.

◆ gsp()

subroutine gsp	(		NMAX,
		real*8	CSCA,
		real*8	LAM,
		real*8, dimension(npl)	ALF1,
		real*8, dimension(npl)	ALF2,
		real*8, dimension(npl)	ALF3,
		real*8, dimension(npl)	ALF4,
		real*8, dimension(npl)	BET1,
		real*8, dimension(npl)	BET2,
			LMAX
	)

Definition at line 813 of file tmd.lp.f.

◆ hovenr()

subroutine hovenr	(		L1,
		real*8, dimension(l1)	A1,
		real*8, dimension(l1)	A2,
		real*8, dimension(l1)	A3,
		real*8, dimension(l1)	A4,
		real*8, dimension(l1)	B1,
		real*8, dimension(l1)	B2
	)

Definition at line 1561 of file tmd.lp.f.

◆ matr()

subroutine matr	(	real*8, dimension(npl)	A1,
		real*8, dimension(npl)	A2,
		real*8, dimension(npl)	A3,
		real*8, dimension(npl)	A4,
		real*8, dimension(npl)	B1,
		real*8, dimension(npl)	B2,
			LMAX,
			NPNA,
		real*8, dimension(npna,4,4)	F
	)

Definition at line 1615 of file tmd.lp.f.

◆ power()

subroutine power	(	A,
		B,
		R1,
		R2
	)

Definition at line 1380 of file tmd.lp.f.

◆ signum()

subroutine signum

Definition at line 1178 of file tmd.lp.f.

◆ zeroin()

double precision function zeroin	(	AX,
		BX,
		F,
		TOL
	)

Definition at line 1395 of file tmd.lp.f.

Functions/Subroutines