dpm25nuc7.f File Reference

Go to the source code of this file.

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 dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

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

Definition at line 2138 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

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

Definition at line 1759 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

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

Definition at line 6084 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

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

Definition at line 2374 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

DOUBLE PRECISION function dbeta	(		X1,
			X2,
			BET
	)

Definition at line 2672 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

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

Definition at line 6096 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine dchant

(

)

Definition at line 3289 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine ddatar

(

)

Definition at line 3503 of file dpm25nuc7.f.

Here is the caller graph for this function:

subroutine ddates

(

)

Definition at line 3374 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine ddecay	(		IHAD,
			ISTAB
	)

Definition at line 4057 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

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

Definition at line 2686 of file dpm25nuc7.f.

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

Definition at line 1952 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

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

Definition at line 3745 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine dparje	(		IHAD,
			I
	)

Definition at line 4630 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

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

Definition at line 3265 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine dsfecf	(		SFE,
			CFE
	)

Definition at line 3354 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller 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 2748 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

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

Definition at line 3326 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

DOUBLE PRECISION function dxlamb	(		X,
			Y,
			Z
	)

Definition at line 3207 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine fluini

(

)

Definition at line 2076 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine indexd	(		KA,
			KB,
			IND
	)

Definition at line 2637 of file dpm25nuc7.f.

Here is the caller graph for this function:

subroutine lundin

(

)

Definition at line 62 of file dpm25nuc7.f.

Here is the caller graph for this function:

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

Definition at line 1869 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

DOUBLE PRECISION function phnsch	(		KP,
			KTARG,
			PLAB
	)

Definition at line 6170 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

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

Definition at line 4470 of file dpm25nuc7.f.

Here is the caller graph for this function:

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

Definition at line 4525 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

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

Definition at line 7324 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

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

Definition at line 4192 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

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

Definition at line 4358 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine shmakf	(		NA,
			NCA,
			NB,
			NCB
	)

Definition at line 1515 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

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

Definition at line 1406 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller 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 dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

DOUBLE PRECISION function sigsds

(

S

)

Definition at line 1505 of file dpm25nuc7.f.

Here is the caller graph for this function:

DOUBLE PRECISION function siinel	(		KPROJ,
			KTARG,
			UMO
	)

Definition at line 6156 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

DOUBLE PRECISION function sippsd

(

ECM

)

Definition at line 6127 of file dpm25nuc7.f.

Here is the caller graph for this function:

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

Definition at line 4670 of file dpm25nuc7.f.

Here is the caller graph for this function:

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

Definition at line 4700 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

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

Definition at line 3244 of file dpm25nuc7.f.

Here is the call graph for this function:

subroutine tecalb

(

)

Definition at line 3635 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine title	(		NA,
			NB,
			NCA,
			NCB
	)

Definition at line 1744 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

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

Definition at line 1323 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine xsglau	(		NA,
			NB,
			IJPROJ,
			NTARG
	)

Definition at line 5699 of file dpm25nuc7.f.

Here is the call graph for this function:

Here is the caller graph for this function: