Functions/Subroutines
subroutine	lundin

subroutine	bamlun (IHAD, KFA1, KFA2, KFA3, KFA4, AEO, IOPT, IREJ)

subroutine	xseapa (ECM, XXXX, IPSQ1, IPSAQ1, XPSQ1, XPSAQ1, IREJ)

subroutine	shmaki (NA, NCA, NB, NCB, RPROJ, RTARG, PPN)

DOUBLE PRECISION function	sigsds (S)

subroutine	shmakf (NA, NCA, NB, NCB)

subroutine	shmako (NA, NB, B, INTT, INTA, INTB, JS, JT, PPN, KKMAT)

subroutine	title (NA, NB, NCA, NCB)

subroutine	conucl (X, N, R)

subroutine	modb (BSITE, N, BSTEP, B)

subroutine	diagr (NA, NB, B, JS, JT, INT, INTA, INTB)

subroutine	fluini

subroutine	calbam (NNCH, I1, I2, IFB11, IFB22, IFB33, IFB44, AMCH, NOBAM, IHAD)

subroutine	dbamje (IHAD, KFA1, KFA2, KFA3, KFA4, AE0, IOPT)

subroutine	indexd (KA, KB, IND)

DOUBLE PRECISION function	dbeta (X1, X2, BET)

subroutine	ddrela (X, Y, Z, COTE, SITE, COPS, SIPS)

subroutine	dthrep (UMO, ECM1, ECM2, ECM3, PCM1, PCM2, PCM3, COD1, COF1, SIF1, COD2, COF2, SIF2, COD3, COF3, SIF3, AM1, AM2, AM3)

DOUBLE PRECISION function	dxlamb (X, Y, Z)

subroutine	strafo (GAM, BGAM, CX, CY, CZ, COD, COF, SIF, P, ECM, PL, CXL, CYL, CZL, EL)

subroutine	drtran (XO, YO, ZO, CDE, SDE, SFE, CFE, X, Y, Z)

subroutine	dchant

subroutine	dtwopd (UMO, ECM1, ECM2, PCM1, PCM2, COD1, COF1, SIF1, COD2, COF2, SIF2, AM1, AM2)

subroutine	dsfecf (SFE, CFE)

subroutine	ddates

subroutine	ddatar

subroutine	tecalb

subroutine	distcm (IOP, NHAD, POLAB, KPROJ, KTARG)

subroutine	ddecay (IHAD, ISTAB)

subroutine	shmak (ICASE, NN, NNA, NNB, NA, NB, UMO, BIMP)

subroutine	shmak1 (ICASE, NN, NNA, NNB, NA, NB, UMO, BIMP)

subroutine	previo (RA, RB, NSTB, BMAX, BSTEP, SIG, RO, G)

subroutine	profb (BSTEP, NSTAT, NA, RA, NB, RB, BSITE, NSITEB)

subroutine	dparje (IHAD, I)

subroutine	sort (A, N)

subroutine	sortin (A, N)

subroutine	xsglau (NA, NB, IJPROJ, NTARG)

subroutine	conuclx (COOP1, NA, RASH, I)

subroutine	dbklas (I, J, K, I8, I10)

DOUBLE PRECISION function	sippsd (ECM)

DOUBLE PRECISION function	siinel (KPROJ, KTARG, UMO)

DOUBLE PRECISION function	phnsch (KP, KTARG, PLAB)

subroutine	selpts (PTXSQ1, PTYSQ1, PLQ1, EQ1, PTXSA2, PTYSA2, PLAQ2, EAQ2, AMCH1, IREJ, IKVALA, PTTQ1)

Function/Subroutine Documentation

subroutine bamlun	(	IHAD,
		KFA1,
		KFA2,
		KFA3,
		KFA4,
		AEO,
		IOPT,
		IREJ
	)

Definition at line 371 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine calbam	(	NNCH,
		I1,
		I2,
		IFB11,
		IFB22,
		IFB33,
		IFB44,
		AMCH,
		NOBAM,
		IHAD
	)

Definition at line 2141 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine conucl	(	dimension(3,n)	X,
			N,
			R
	)

Definition at line 1759 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine conuclx	(	dimension(3,maxncl)	COOP1,
			NA,
			RASH,
			I
	)

Definition at line 6087 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine dbamje	(	IHAD,
		KFA1,
		KFA2,
		KFA3,
		KFA4,
		AE0,
		IOPT
	)

Definition at line 2377 of file dpm25nuc7g4.f.

Here is the call graph for this function:

DOUBLE PRECISION function dbeta	(	X1,
		X2,
		BET
	)

Definition at line 2675 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine dbklas	(	I,
		J,
		K,
		I8,
		I10
	)

Definition at line 6099 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine dchant ( )

Definition at line 3292 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine ddatar ( )

Definition at line 3506 of file dpm25nuc7g4.f.

subroutine ddates ( )

Definition at line 3377 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine ddecay	(	IHAD,
		ISTAB
	)

Definition at line 4060 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine ddrela	(	X,
		Y,
		Z,
		COTE,
		SITE,
		COPS,
		SIPS
	)

Definition at line 2689 of file dpm25nuc7g4.f.

subroutine diagr	(		NA,
			NB,
			B,
		dimension(namx)	JS,
		dimension(namx)	JT,
			INT,
			INTA,
			INTB
	)

Definition at line 1955 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine distcm	(	IOP,
		NHAD,
		POLAB,
		KPROJ,
		KTARG
	)

Definition at line 3748 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine dparje	(	IHAD,
		I
	)

Definition at line 4633 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine drtran	(	XO,
		YO,
		ZO,
		CDE,
		SDE,
		SFE,
		CFE,
		X,
		Y,
		Z
	)

Definition at line 3268 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine dsfecf	(	SFE,
		CFE
	)

Definition at line 3357 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine dthrep	(	UMO,
		ECM1,
		ECM2,
		ECM3,
		PCM1,
		PCM2,
		PCM3,
		COD1,
		COF1,
		SIF1,
		COD2,
		COF2,
		SIF2,
		COD3,
		COF3,
		SIF3,
		AM1,
		AM2,
		AM3
	)

Definition at line 2751 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine dtwopd	(	UMO,
		ECM1,
		ECM2,
		PCM1,
		PCM2,
		COD1,
		COF1,
		SIF1,
		COD2,
		COF2,
		SIF2,
		AM1,
		AM2
	)

Definition at line 3329 of file dpm25nuc7g4.f.

Here is the call graph for this function:

DOUBLE PRECISION function dxlamb	(	X,
		Y,
		Z
	)

Definition at line 3210 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine fluini ( )

Definition at line 2079 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine indexd	(	KA,
		KB,
		IND
	)

Definition at line 2640 of file dpm25nuc7g4.f.

subroutine lundin ( )

Definition at line 62 of file dpm25nuc7g4.f.

subroutine modb	(	dimension(0:1,n)	BSITE,
			N,
			BSTEP,
			B
	)

Definition at line 1869 of file dpm25nuc7g4.f.

Here is the call graph for this function:

DOUBLE PRECISION function phnsch	(	KP,
		KTARG,
		PLAB
	)

Definition at line 6173 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine previo	(	RA,
		RB,
		NSTB,
		BMAX,
		BSTEP,
		SIG,
		RO,
		G
	)

Definition at line 4473 of file dpm25nuc7g4.f.

subroutine profb	(		BSTEP,
			NSTAT,
			NA,
			RA,
			NB,
			RB,
		dimension(0:1,nsiteb)	BSITE,
			NSITEB
	)

Definition at line 4528 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine selpts	(	PTXSQ1,
		PTYSQ1,
		PLQ1,
		EQ1,
		PTXSA2,
		PTYSA2,
		PLAQ2,
		EAQ2,
		AMCH1,
		IREJ,
		IKVALA,
		PTTQ1
	)

Definition at line 7327 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine shmak	(	ICASE,
		NN,
		NNA,
		NNB,
		NA,
		NB,
		UMO,
		BIMP
	)

Definition at line 4195 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine shmak1	(	ICASE,
		NN,
		NNA,
		NNB,
		NA,
		NB,
		UMO,
		BIMP
	)

Definition at line 4361 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine shmakf	(	NA,
		NCA,
		NB,
		NCB
	)

Definition at line 1515 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine shmaki	(	NA,
		NCA,
		NB,
		NCB,
		RPROJ,
		RTARG,
		PPN
	)

Definition at line 1406 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine shmako	(		NA,
			NB,
			B,
			INTT,
			INTA,
			INTB,
		dimension(namx)	JS,
		dimension(namx)	JT,
			PPN,
			KKMAT
	)

Definition at line 1606 of file dpm25nuc7g4.f.

Here is the call graph for this function:

DOUBLE PRECISION function sigsds ( S )

Definition at line 1505 of file dpm25nuc7g4.f.

Here is the call graph for this function:

DOUBLE PRECISION function siinel	(	KPROJ,
		KTARG,
		UMO
	)

Definition at line 6159 of file dpm25nuc7g4.f.

Here is the call graph for this function:

DOUBLE PRECISION function sippsd ( ECM )

Definition at line 6130 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine sort	(	dimension(3,n)	A,
			N
	)

Definition at line 4673 of file dpm25nuc7g4.f.

subroutine sortin	(	dimension(3,n)	A,
			N
	)

Definition at line 4703 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine strafo	(	GAM,
		BGAM,
		CX,
		CY,
		CZ,
		COD,
		COF,
		SIF,
		P,
		ECM,
		PL,
		CXL,
		CYL,
		CZL,
		EL
	)

Definition at line 3247 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine tecalb ( )

Definition at line 3638 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine title	(	NA,
		NB,
		NCA,
		NCB
	)

Definition at line 1744 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine xseapa	(	ECM,
		XXXX,
		IPSQ1,
		IPSAQ1,
		XPSQ1,
		XPSAQ1,
		IREJ
	)

Definition at line 1323 of file dpm25nuc7g4.f.

Here is the call graph for this function:

subroutine xsglau	(	NA,
		NB,
		IJPROJ,
		NTARG
	)

Definition at line 5702 of file dpm25nuc7g4.f.

Here is the call graph for this function:

Functions/Subroutines

Function/Subroutine Documentation