pythia61.f File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	pytest (MTEST)
subroutine	pyhepc (MCONV)
subroutine	pyinit (FRAME, BEAM, TARGET, WIN)
subroutine	pyevnt
subroutine	pystat (MSTAT)
subroutine	pyinre
subroutine	pyinbm (CHFRAM, CHBEAM, CHTARG, WIN)
subroutine	pyinki (MODKI)
subroutine	pyinpr
subroutine	pyxtot
subroutine	pymaxi
subroutine	pypile (MPILE)
subroutine	pysave (ISAVE, IGA)
subroutine	pyrand
subroutine	pyscat
subroutine	pysspa (IPU1, IPU2)
subroutine	pyresd (IRES)
subroutine	pymult (MMUL)
subroutine	pyremn (IPU1, IPU2)
subroutine	pydiff
subroutine	pydocu
subroutine	pyfram (IFRAME)
subroutine	pywidt (KFLR, SH, WDTP, WDTE)
subroutine	pyofsh (MOFSH, KFMO, KFD1, KFD2, PMMO, RET1, RET2)
subroutine	pyreco (IW1, IW2, NSD1, NAFT1)
subroutine	pyklim (ILIM)
subroutine	pykmap (IVAR, MVAR, VVAR)
subroutine	pysigh (NCHN, SIGS)
subroutine	pypdfu (KF, X, Q2, XPQ)
subroutine	pypdfl (KF, X, Q2, XPQ)
subroutine	pypdel (X, Q2, XPEL)
subroutine	pypdga (X, Q2, XPGA)
subroutine	pyggam (ISET, X, Q2, P2, IP2, F2GM, XPDFGM)
subroutine	pygvmd (ISET, KF, X, Q2, P2, ALAM, XPGA, VXPGA)
subroutine	pygano (KF, X, Q2, P2, ALAM, XPGA, VXPGA)
subroutine	pygbeh (KF, X, Q2, P2, PM2, XPBH)
subroutine	pygdir (X, Q2, P2, Q02, XPGA)
subroutine	pypdpi (X, Q2, XPPI)
subroutine	pypdpr (X, Q2, XPPR)
function	pycteq (ISET, IPRT, X, Q)
subroutine	pygrvl (X, Q2, UV, DV, DEL, UDB, SB, CHM, BOT, GL)
subroutine	pygrvm (X, Q2, UV, DV, DEL, UDB, SB, CHM, BOT, GL)
subroutine	pygrvd (X, Q2, UV, DV, DEL, UDB, SB, CHM, BOT, GL)
function	pygrvv (X, N, AK, BK, A, B, C, D)
function	pygrvw (X, S, AL, BE, AK, BK, A, B, C, D, E, ES)
function	pygrvs (X, S, STH, AL, BE, AK, AG, B, D, E, ES)
function	pyhfth (SH, SQM, FRATT)
subroutine	pyspli (KF, KFLIN, KFLCH, KFLSP)
function	pygamm (X)
subroutine	pywaux (IAUX, EPS, WRE, WIM)
subroutine	pyi3au (EPS, RAT, Y3RE, Y3IM)
function	pyspen (XREIN, XIMIN, IREIM)
subroutine	pyqqbh (WTQQBH)
subroutine	pymsin
subroutine	pyapps
function	pyrnmq (ID, DTERM)
function	pyrnmt (XMT)
subroutine	pythrg
subroutine	pyinom
function	pyrnm3 (RGUT)
subroutine	pyeig4 (A, W, Z)
subroutine	pyhggm (ALPHA)
subroutine	pysubh (XMA, TANB, XMQ, XMUR, XMTOP, AU, AD, XMU, XMH, XHM, XMHCH, SA, CA, TANBA)
subroutine	pypole (IHIGGS, XMC, XMA, TANB, XMQ, XMUR, XMDR, XMT, AT, AB, XMU, XMH, XMHP, HM, HMP, AMP, SA, CA, STOP1, STOP2, SBOT1, SBOT2, TANBA)
subroutine	pyvacu (IHIGGS, XMC, XMA, TANB, XMQ, XMUR, XMDR, XMT, AT, AB, XMU, XMH, XMHP, HM, HMP, AMP, STOP1, STOP2, SBOT1, SBOT2, SA, CA, STOP1W, STOP2W, TANBA)
subroutine	pyrghm (XMC, XMA, TANB, XMQ, XMUR, XMDL, XMT, AU, AD, XMU, XMHP, HMP, SA, CA, TANBA)
subroutine	pygfxx (XMA, TANB, XMQ, XMUR, XMDL, XMT, AT, AB, XMU, VH, STOP1, STOP2)
function	pyfint (A, B, C)
function	pyfisb (X)
subroutine	pysfdc (KFIN, XLAM, IDLAM, IKNT)
subroutine	pyglui (KFIN, XLAM, IDLAM, IKNT)
subroutine	pytbbn (I, NN, E, XMGLU, GAM)
subroutine	pytbbc (I, NN, XMGLU, GAM)
subroutine	pynjdc (KFIN, XLAM, IDLAM, IKNT)
subroutine	pycjdc (KFIN, XLAM, IDLAM, IKNT)
double precision function	pyxxz5 (X)
double precision function	pyxxw5 (X)
double precision function	pyxxga (C0, XM1, XM2, XMTR, XMTL)
double precision function	pyx2xg (C1, XM1, XM2, XM3, GL, GR)
double precision function	pyx2xh (C1, XM1, XM2, XM3, GL, GR)
double precision function	pyxxz2 (X)
subroutine	pyhext (KFIN, XLAM, IDLAM, IKNT)
double precision function	pyh2xx (C1, XM1, XM2, XM3, GL, GR)
function	pygaus (F, A, B, EPS)
function	pysimp (Y, X0, X1, N)
double precision function	pylamf (X, Y, Z)
subroutine	pytbdy (XM)
subroutine	py1ent (IP, KF, PE, THE, PHI)
subroutine	py2ent (IP, KF1, KF2, PECM)
subroutine	py3ent (IP, KF1, KF2, KF3, PECM, X1, X3)
subroutine	py4ent (IP, KF1, KF2, KF3, KF4, PECM, X1, X2, X4, X12, X14)
subroutine	pyjoin (NJOIN, IJOIN)
subroutine	pygive (CHIN)
subroutine	pyexec
subroutine	pyprep (IP)
subroutine	pystrf (IP)
subroutine	pyindf (IP)
subroutine	pydecy (IP)
subroutine	pykfdi (KFL1, KFL2, KFL3, KF)
subroutine	pyptdi (KFL, PX, PY)
subroutine	pyzdis (KFL1, KFL2, PR, Z)
subroutine	pyshow (IP1, IP2, QMAX)
subroutine	pyboei (NSAV)
function	pymass (KF)
subroutine	pyname (KF, CHAU)
integer function	pychge (KF)
integer function	pycomp (KF)
subroutine	pyerrm (MERR, CHMESS)
function	pyalem (Q2)
function	pyalps (Q2)
function	pyangl (X, Y)
function	pyr (IDUMMY)
subroutine	pyrget (LFN, MOVE)
subroutine	pyrset (LFN, MOVE)
subroutine	pyrobo (IMI, IMA, THE, PHI, BEX, BEY, BEZ)
subroutine	pyedit (MEDIT)
subroutine	pylist (MLIST)
subroutine	pylogo
subroutine	pyupda (MUPDA, LFN)
integer function	pyk (I, J)
function	pyp (I, J)
subroutine	pysphe (SPH, APL)
subroutine	pythru (THR, OBL)
subroutine	pyclus (NJET)
subroutine	pycell (NJET)
subroutine	pyjmas (PMH, PML)
subroutine	pyfowo (H10, H20, H30, H40)
subroutine	pytabu (MTABU)
subroutine	pyeevt (KFL, ECM)
subroutine	pyxtee (KFL, ECM, XTOT)
subroutine	pyradk (ECM, MK, PAK, THEK, PHIK, ALPK)
subroutine	pyxkfl (KFL, ECM, ECMC, KFLC)
subroutine	pyxjet (ECM, NJET, CUT)
subroutine	pyx3jt (NJET, CUT, KFL, ECM, X1, X2)
subroutine	pyx4jt (NJET, CUT, KFL, ECM, KFLN, X1, X2, X4, X12, X14)
subroutine	pyxdif (NC, NJET, KFL, ECM, CHI, THE, PHI)
subroutine	pyonia (KFL, ECM)
subroutine	pybook (ID, TITLE, NX, XL, XU)
subroutine	pyfill (ID, X, W)
subroutine	pyfact (ID, F)
subroutine	pyoper (ID1, OPER, ID2, ID3, F1, F2)
subroutine	pyhist
subroutine	pyplot (ID)
subroutine	pynull (ID)
subroutine	pydump (MDUMP, LFN, NHI, IHI)
subroutine	pykcut (MCUT)
subroutine	pyevwt (WTXS)
subroutine	pyupin (ISUB, TITLE, SIGMAX)
subroutine	pyupev (ISUB, SIGEV)
subroutine	pdfset (PARM, VALUE)
subroutine	structm (XX, QQ, UPV, DNV, USEA, DSEA, STR, CHM, BOT, TOP, GLU)
subroutine	pytaud (ITAU, IORIG, KFORIG, NDECAY)
subroutine	pytime (IDATI)

Function/Subroutine Documentation

subroutine pdfset	(	character*20, dimension(20)	PARM,
		double precision, dimension(20)	VALUE
	)

Definition at line 42189 of file pythia61.f.

References pydat1, and pyr().

Referenced by pyinit(), pypdel(), and pypdfu().

subroutine py1ent	(		IP,
			KF,
			PE,
			THE,
			PHI
	)

Definition at line 30603 of file pythia61.f.

References c2_factory< float_type >::cos(), n, HepGeom::BasicVector3D< T >::phi(), pycomp, pydat1, pyerrm(), pyexec(), pyjets, pylist(), pymass(), c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

subroutine py2ent	(		IP,
			KF1,
			KF2,
			PECM
	)

Definition at line 30657 of file pythia61.f.

References n, pycomp, pydat1, pyerrm(), pyexec(), pyjets, pylist(), pymass(), and c2_factory< float_type >::sqrt().

Referenced by bamlun(), pyeevt(), pyonia(), pyresd(), and pytest().

subroutine py3ent	(		IP,
			KF1,
			KF2,
			KF3,
			PECM,
			X1,
			X3
	)

Definition at line 30748 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), n, pycomp, pydat1, pyerrm(), pyexec(), pyjets, pylist(), pymass(), and c2_factory< float_type >::sqrt().

Referenced by pyeevt(), pyonia(), pyresd(), and pytest().

subroutine py4ent	(		IP,
			KF1,
			KF2,
			KF3,
			KF4,
			PECM,
			X1,
			X2,
			X4,
			X12,
			X14
	)

Definition at line 30869 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), int(), n, pycomp, pydat1, pyerrm(), pyexec(), pyjets, pylist(), pymass(), pyr(), and c2_factory< float_type >::sqrt().

Referenced by bamlun(), pyeevt(), pyresd(), and pytest().

function pyalem

(

Q2

)

Definition at line 36446 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), c2_factory< float_type >::log(), and pydat1.

Referenced by pycjdc(), pyglui(), pyhext(), pyinom(), pynjdc(), pypdel(), pysfdc(), pysigh(), pysubh(), pytbbc(), pytbbn(), and pywidt().

function pyalps

(

Q2

)

Definition at line 36491 of file pythia61.f.

References c2_factory< float_type >::log(), pydat1, and c2_factory< float_type >::sqrt().

Referenced by pycjdc(), pyglui(), pyhext(), pyhfth(), pyinom(), pynjdc(), pyonia(), pyrnm3(), pyrnmq(), pyrnmt(), pysfdc(), pysigh(), pysspa(), pysubh(), pytbbc(), pytbbn(), pywidt(), pyxjet(), and pyxtee().

function pyangl	(		X,
			Y
	)

Definition at line 36555 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), pydat1, HepGeom::BasicVector3D< T >::r(), c2_factory< float_type >::sqrt(), and HepGeom::BasicVector3D< T >::y().

Referenced by pycell(), pydecy(), pydiff(), pydocu(), pyedit(), pyindf(), pyinki(), pyp(), pyradk(), pyremn(), pyscat(), pyshow(), pysspa(), pytabu(), and pythru().

subroutine pyapps

(

)

Definition at line 24501 of file pythia61.f.

References G4INCL::Random::SeedVector::at(), CLHEP::HepBoost::beta(), c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), pycomp, pydat1, pyrnmq(), pyrnmt(), and c2_factory< float_type >::sqrt().

Referenced by pymsin().

subroutine pyboei

(

NSAV

)

Definition at line 36019 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), c2_factory< float_type >::exp(), n, G4Abla::nint(), pydat1, pyerrm(), pyjets, pymass(), pyrobo(), and c2_factory< float_type >::sqrt().

Referenced by pyexec().

subroutine pybook	(		ID,
		character, dimension(*)	TITLE,
			NX,
			XL,
			XU
	)

Definition at line 41442 of file pythia61.f.

References pyerrm(), pynull(), and title().

Referenced by pydump().

subroutine pycell

(

NJET

)

Definition at line 38887 of file pythia61.f.

References c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), HepGeom::BasicVector3D< T >::eta(), int(), c2_factory< float_type >::log(), n, HepGeom::BasicVector3D< T >::phi(), pyangl(), pychge(), pycomp, pydat1, pyerrm(), pyjets, pyr(), c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

integer function pychge

(

KF

)

Definition at line 36280 of file pythia61.f.

References pycomp.

Referenced by pycell(), pyclus(), pyedit(), pyexec(), pyfowo(), pyjmas(), pyk(), pyp(), pyscat(), pysphe(), pytabu(), pythru(), and pyupda().

subroutine pycjdc	(	integer	KFIN,
		double precision, dimension(0:200)	XLAM,
		integer, dimension(200,3)	IDLAM,
		integer	IKNT
	)

Definition at line 28817 of file pythia61.f.

References CLHEP::HepBoost::beta(), c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), G4Abla::mod(), pyalem(), pyalps(), pycomp, pydat1, pygaus(), pylamf(), pyx2xg(), pyx2xh(), pyxxw5(), pyxxz2(), pyxxz5(), c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by pymsin().

subroutine pyclus

(

NJET

)

Definition at line 38515 of file pythia61.f.

References n, pychge(), pycomp, pydat1, pyerrm(), pyjets, and c2_factory< float_type >::sqrt().

integer function pycomp

(

KF

)

Definition at line 36303 of file pythia61.f.

References pycomp, and pydat1.

function pycteq	(		ISET,
			IPRT,
			X,
			Q
	)

Definition at line 22492 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), c2_factory< float_type >::exp(), and c2_factory< float_type >::log().

Referenced by pypdpr().

subroutine pydecy

(

IP

)

Definition at line 33638 of file pythia61.f.

References a, c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), int(), c2_factory< float_type >::log(), G4Abla::mod(), n, HepGeom::BasicVector3D< T >::phi(), pyangl(), pycomp, pydat1, pydat3, pyerrm(), pyjets, pykfdi(), pymass(), pyr(), pyrobo(), pytaud(), c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by pydiff(), and pyexec().

subroutine pydiff

(

)

Definition at line 11687 of file pythia61.f.

References G4Abla::mod(), n, HepGeom::BasicVector3D< T >::phi(), pyangl(), pydat1, pydecy(), pyjets, pykfdi(), pymass(), pyr(), pyrobo(), pyspli(), CLHEP::HepLorentzVector::pz(), and c2_factory< float_type >::sqrt().

Referenced by pyevnt(), and pythia().

subroutine pydocu

(

)

Definition at line 11910 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), c2_factory< float_type >::log(), n, pyangl(), pydat1, pyjets, pysave(), and c2_factory< float_type >::sqrt().

Referenced by pyevnt().

subroutine pydump	(		MDUMP,
			LFN,
			NHI,
		dimension(*)	IHI
	)

Definition at line 41838 of file pythia61.f.

References G4VITManager::iterator::end(), G4Abla::mod(), G4Abla::nint(), pybook(), pyerrm(), and title().

subroutine pyedit

(

MEDIT

)

Definition at line 36852 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), iz, G4Abla::mod(), n, ns, pyangl(), pychge(), pycomp, pydat1, pyerrm(), pyjets, pyrobo(), and c2_factory< float_type >::sqrt().

Referenced by __pythia_main.f__(), bamlun(), and pyevnt().

subroutine pyeevt	(		KFL,
			ECM
	)

Definition at line 40111 of file pythia61.f.

References c2_factory< float_type >::cos(), n, HepGeom::BasicVector3D< T >::phi(), py1ent, py2ent(), py3ent(), py4ent(), pydat1, pyerrm(), pyexec(), pyjets, pylist(), pyprep(), pyradk(), pyrobo(), pyshow(), pyx3jt(), pyx4jt(), pyxdif(), pyxjet(), pyxkfl(), pyxtee(), c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by pytest().

subroutine pyeig4	(	dimension(4,4)	A,
		dimension(4)	W,
		dimension(4,4)	Z
	)

Definition at line 25304 of file pythia61.f.

References a, c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), CLHEP::HepLorentzVector::e(), int(), G4Abla::mod(), G4StokesVector::p1(), G4StokesVector::p2(), pyr(), c2_factory< float_type >::sqrt(), and z.

Referenced by pyinom().

subroutine pyerrm	(		MERR,
		character, dimension(*)	CHMESS
	)

Definition at line 36385 of file pythia61.f.

References a, n, pydat1, pyjets, and pylist().

Referenced by py1ent(), py2ent(), py3ent(), py4ent(), pyboei(), pybook(), pycell(), pyclus(), pydecy(), pydump(), pyedit(), pyeevt(), pyevnt(), pyexec(), pyfowo(), pygaus(), pygive(), pyhepc(), pyindf(), pyinki(), pyinpr(), pyjmas(), pyjoin(), pykfdi(), pymult(), pyofsh(), pyonia(), pyprep(), pyresd(), pyrget(), pyrobo(), pyrset(), pyshow(), pysphe(), pysspa(), pystrf(), pytabu(), pythru(), pyupda(), pyxjet(), pyxkfl(), and pyxtot().

subroutine pyevnt

(

)

Definition at line 2291 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), c2_factory< float_type >::log(), G4Abla::mod(), n, pycomp, pydat1, pydiff(), pydocu(), pyedit(), pyerrm(), pyexec(), pyfram(), pyinki(), pyjets, pymult(), pypile(), pyprep(), pyr(), pyrand(), pyremn(), pyresd(), pysave(), pyscat(), pyshow(), pysspa(), pyxtot(), c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by __pythia_main.f__(), and pytest().

subroutine pyevwt

(

WTXS

)

Definition at line 42061 of file pythia61.f.

References pydat1, pyr(), and G4Abla::tau().

Referenced by pymaxi(), and pyrand().

subroutine pyexec

(

)

Definition at line 31539 of file pythia61.f.

References G4Abla::mod(), n, pyboei(), pychge(), pycomp, pydat1, pydat3, pydecy(), pyerrm(), pyindf(), pyjets, pylist(), pyprep(), pyresd(), pyshow(), pystrf(), and c2_factory< float_type >::sqrt().

Referenced by bamlun(), gen_delta(), py1ent(), py2ent(), py3ent(), py4ent(), pyeevt(), pyevnt(), pyonia(), and pytest().

subroutine pyfact	(		ID,
			F
	)

Definition at line 41519 of file pythia61.f.

References G4Abla::f(), and G4Abla::nint().

subroutine pyfill	(		ID,
			X,
			W
	)

Definition at line 41487 of file pythia61.f.

References G4Abla::nint().

function pyfint	(		A,
			B,
			C
	)

Definition at line 26591 of file pythia61.f.

References a, HepGeom::Plane3D< T >::d(), pyfisb(), and pygaus().

Referenced by pyvacu().

function pyfisb

(

X

)

Definition at line 26616 of file pythia61.f.

References c2_factory< float_type >::log().

Referenced by pyfint().

subroutine pyfowo	(		H10,
			H20,
			H30,
			H40
	)

Definition at line 39276 of file pythia61.f.

References n, pychge(), pycomp, pydat1, pyerrm(), pyjets, and c2_factory< float_type >::sqrt().

subroutine pyfram

(

IFRAME

)

Definition at line 12082 of file pythia61.f.

References pydat1, and pyrobo().

Referenced by pyevnt(), and pythia().

function pygamm

(

X

)

Definition at line 23369 of file pythia61.f.

References HepGeom::Transform3D::dx(), and int().

Referenced by pygamm(), pypdel(), pypdpi(), and pystfu().

subroutine pygano	(		KF,
			X,
			Q2,
			P2,
			ALAM,
		dimension(-6:6)	XPGA,
		dimension(-6:6)	VXPGA
	)

Definition at line 21978 of file pythia61.f.

References c2_factory< float_type >::log(), and G4StokesVector::p2().

Referenced by pyggam(), and pypdfu().

function pygaus	(	external	F,
			A,
			B,
			EPS
	)

Definition at line 30317 of file pythia61.f.

References a, HepGeom::Plane3D< T >::d(), G4Abla::f(), and pyerrm().

Referenced by pycjdc(), pyfint(), pyglui(), and pynjdc().

subroutine pygbeh	(		KF,
			X,
			Q2,
			P2,
			PM2,
			XPBH
	)

Definition at line 22139 of file pythia61.f.

References CLHEP::HepBoost::beta(), HepGeom::Plane3D< T >::d(), c2_factory< float_type >::log(), G4StokesVector::p2(), and c2_factory< float_type >::sqrt().

Referenced by pyggam().

subroutine pygdir	(		X,
			Q2,
			P2,
			Q02,
		dimension(-6:6)	XPGA
	)

Definition at line 22204 of file pythia61.f.

References c2_factory< float_type >::log(), and G4StokesVector::p2().

Referenced by pyggam().

subroutine pygfxx	(		XMA,
			TANB,
			XMQ,
			XMUR,
			XMDL,
			XMT,
			AT,
			AB,
			XMU,
		dimension(2,2)	VH,
			STOP1,
			STOP2
	)

Definition at line 26349 of file pythia61.f.

References G4INCL::Random::SeedVector::at(), HepGeom::Plane3D< T >::d(), c2_factory< float_type >::log(), c2_factory< float_type >::sqrt(), CLHEP::HepBoost::tt(), and HepGeom::BasicVector3D< T >::y().

Referenced by pyrghm().

subroutine pyggam	(		ISET,
			X,
			Q2,
			P2,
			IP2,
			F2GM,
		dimension(-6:6)	XPDFGM
	)

Definition at line 21566 of file pythia61.f.

References c2_factory< float_type >::exp(), c2_factory< float_type >::log(), G4Abla::mod(), G4StokesVector::p2(), pygano(), pygbeh(), pygdir(), pygvmd(), and c2_factory< float_type >::sqrt().

Referenced by pypdfu().

subroutine pygive

(

character, dimension(*)

CHIN

)

Definition at line 31094 of file pythia61.f.

References n, pycomp, pydat1, pydat3, pyerrm(), pyjets, and pylist().

subroutine pyglui	(	integer	KFIN,
		double precision, dimension(0:200)	XLAM,
		integer, dimension(200,3)	IDLAM,
		integer	IKNT
	)

Definition at line 27268 of file pythia61.f.

References CLHEP::HepBoost::beta(), HepGeom::Plane3D< T >::d(), G4Abla::mod(), pyalem(), pyalps(), pycomp, pydat1, pygaus(), pylamf(), pytbbc(), pytbbn(), pyxxw5(), pyxxz2(), pyxxz5(), and c2_factory< float_type >::sqrt().

Referenced by pymsin().

subroutine pygrvd	(		X,
			Q2,
			UV,
			DV,
			DEL,
			UDB,
			SB,
			CHM,
			BOT,
			GL
	)

Definition at line 22997 of file pythia61.f.

References HepGeom::Transform3D::dx(), c2_factory< float_type >::log(), pygrvs(), pygrvv(), pygrvw(), and c2_factory< float_type >::sqrt().

Referenced by pypdpr().

subroutine pygrvl	(		X,
			Q2,
			UV,
			DV,
			DEL,
			UDB,
			SB,
			CHM,
			BOT,
			GL
	)

Definition at line 22764 of file pythia61.f.

References HepGeom::Transform3D::dx(), c2_factory< float_type >::log(), pygrvs(), pygrvv(), pygrvw(), and c2_factory< float_type >::sqrt().

Referenced by pypdpr().

subroutine pygrvm	(		X,
			Q2,
			UV,
			DV,
			DEL,
			UDB,
			SB,
			CHM,
			BOT,
			GL
	)

Definition at line 22881 of file pythia61.f.

References HepGeom::Transform3D::dx(), c2_factory< float_type >::log(), pygrvs(), pygrvv(), pygrvw(), and c2_factory< float_type >::sqrt().

Referenced by pypdpr().

function pygrvs	(		X,
			S,
			STH,
			AL,
			BE,
			AK,
			AG,
			B,
			D,
			E,
			ES
	)

Definition at line 23153 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), HepGeom::Transform3D::dx(), CLHEP::HepLorentzVector::e(), c2_factory< float_type >::exp(), c2_factory< float_type >::log(), and c2_factory< float_type >::sqrt().

Referenced by pygrvd(), pygrvl(), and pygrvm().

function pygrvv	(		X,
			N,
			AK,
			BK,
			A,
			B,
			C,
			D
	)

Definition at line 23113 of file pythia61.f.

References a, bk(), HepGeom::Plane3D< T >::d(), HepGeom::Transform3D::dx(), n, and c2_factory< float_type >::sqrt().

Referenced by pygrvd(), pygrvl(), and pygrvm().

function pygrvw	(		X,
			S,
			AL,
			BE,
			AK,
			BK,
			A,
			B,
			C,
			D,
			E,
			ES
	)

Definition at line 23133 of file pythia61.f.

References a, bk(), HepGeom::Plane3D< T >::d(), CLHEP::HepLorentzVector::e(), c2_factory< float_type >::exp(), c2_factory< float_type >::log(), and c2_factory< float_type >::sqrt().

Referenced by pygrvd(), pygrvl(), and pygrvm().

subroutine pygvmd	(		ISET,
			KF,
			X,
			Q2,
			P2,
			ALAM,
		dimension(-6:6)	XPGA,
		dimension(-6:6)	VXPGA
	)

Definition at line 21760 of file pythia61.f.

References c2_factory< float_type >::exp(), c2_factory< float_type >::log(), and G4StokesVector::p2().

Referenced by pyggam(), and pypdfu().

double precision function pyh2xx	(	double precision	C1,
		double precision	XM1,
		double precision	XM2,
		double precision	XM3,
		double precision	GL,
		double precision	GR
	)

Definition at line 30280 of file pythia61.f.

References pydat1, pylamf(), and c2_factory< float_type >::sqrt().

Referenced by pyhext().

subroutine pyhepc

(

MCONV

)

Definition at line 1921 of file pythia61.f.

References G4Abla::mod(), n, pycomp, pydat1, pyerrm(), and pyjets.

Referenced by __pythia_main.f__().

subroutine pyhext	(	integer	KFIN,
		double precision, dimension(0:200)	XLAM,
		integer, dimension(200,3)	IDLAM,
		integer	IKNT
	)

Definition at line 29831 of file pythia61.f.

References CLHEP::HepBoost::beta(), c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), G4Abla::mod(), pyalem(), pyalps(), pycomp, pydat1, pyh2xx(), pylamf(), c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by pymsin().

function pyhfth	(		SH,
			SQM,
			FRATT
	)

Definition at line 23177 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), c2_factory< float_type >::exp(), pyalps(), pydat1, and c2_factory< float_type >::sqrt().

Referenced by pysigh(), and pywidt().

subroutine pyhggm

(

double precision

ALPHA

)

Definition at line 25455 of file pythia61.f.

References G4INCL::Random::SeedVector::at(), pycomp, pydat1, pypole(), and pysubh().

Referenced by pymsin().

subroutine pyhist

(

)

Definition at line 41638 of file pythia61.f.

References G4Abla::nint(), pynull(), and pyplot().

subroutine pyi3au	(		EPS,
			RAT,
			Y3RE,
			Y3IM
	)

Definition at line 23443 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), c2_factory< float_type >::log(), HepGeom::BasicVector3D< T >::phi(), pydat1, pyspen(), HepGeom::BasicVector3D< T >::r(), and c2_factory< float_type >::sqrt().

Referenced by pyi3au(), and pysigh().

subroutine pyinbm	(	character	CHFRAM,
		character	CHBEAM,
		character	CHTARG,
			WIN
	)

Definition at line 3108 of file pythia61.f.

References a, n, pydat1, pyjets, pymass(), and c2_factory< float_type >::sqrt().

Referenced by pyinit().

subroutine pyindf

(

IP

)

Definition at line 33170 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), int(), iz, G4Abla::mod(), n, G4StokesVector::p2(), HepGeom::BasicVector3D< T >::phi(), CLHEP::HepEulerAngles::psi(), pyangl(), pycomp, pydat1, pyerrm(), pyjets, pykfdi(), pymass(), pyptdi(), pyr(), pyrobo(), pyzdis(), c2_factory< float_type >::sqrt(), and z.

Referenced by pyexec().

subroutine pyinit	(	character*(*)	FRAME,
		character*(*)	BEAM,
		character*(*)	TARGET,
			WIN
	)

Definition at line 2077 of file pythia61.f.

References G4Abla::mod(), pdfset(), pydat1, pydat3, pyinbm(), pyinki(), pyinpr(), pyinre(), pylist(), pymaxi(), pymsin(), pymult(), pypile(), pysave(), and pyxtot().

Referenced by __pythia_main.f__(), jetini(), and pytest().

subroutine pyinki

(

MODKI

)

Definition at line 3336 of file pythia61.f.

References c2_factory< float_type >::log(), n, pyangl(), pydat1, pyerrm(), pyjets, pyrobo(), and c2_factory< float_type >::sqrt().

Referenced by pyevnt(), and pyinit().

subroutine pyinom

(

)

Definition at line 25006 of file pythia61.f.

References G4INCL::Random::SeedVector::at(), CLHEP::HepBoost::beta(), c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), c2_factory< float_type >::log(), pyalem(), pyalps(), pycomp, pydat1, pyeig4(), pyrnm3(), and c2_factory< float_type >::sqrt().

Referenced by pymsin().

subroutine pyinpr

(

)

Definition at line 3488 of file pythia61.f.

References c2_factory< float_type >::log(), pydat1, pydat3, and pyerrm().

Referenced by pyinit().

subroutine pyinre

(

)

Definition at line 2849 of file pythia61.f.

References c2_factory< float_type >::cos(), pycomp, pydat1, pydat3, pywidt(), c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by pyinit().

subroutine pyjmas	(		PMH,
			PML
	)

Definition at line 39100 of file pythia61.f.

References c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), n, pychge(), pycomp, pydat1, pyerrm(), pyjets, smax, and c2_factory< float_type >::sqrt().

subroutine pyjoin	(		NJOIN,
		dimension(*)	IJOIN
	)

Definition at line 31035 of file pythia61.f.

References int(), n, pycomp, pydat1, pyerrm(), pyjets, and pyr().

Referenced by bamlun(), and pyreco().

integer function pyk	(		I,
			J
	)

Definition at line 37961 of file pythia61.f.

References G4Abla::mod(), n, pychge(), pycomp, pydat1, and pyjets.

subroutine pykcut

(

MCUT

)

Definition at line 41984 of file pythia61.f.

References c2_factory< float_type >::exp(), pydat1, pyr(), rm3, c2_factory< float_type >::sqrt(), and G4Abla::tau().

Referenced by pyrand().

subroutine pykfdi	(		KFL1,
			KFL2,
			KFL3,
			KF
	)

Definition at line 34429 of file pythia61.f.

References int(), G4Abla::mod(), pycomp, pydat1, pyerrm(), pyr(), and c2_factory< float_type >::sqrt().

Referenced by pydecy(), pydiff(), pyindf(), pyprep(), pyspli(), and pystrf().

subroutine pyklim

(

ILIM

)

Definition at line 14932 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), c2_factory< float_type >::exp(), c2_factory< float_type >::log(), n, pycomp, pydat1, pydat3, pyjets, rm3, c2_factory< float_type >::sqrt(), and G4Abla::tau().

Referenced by pymaxi(), pymult(), and pyrand().

subroutine pykmap	(		IVAR,
			MVAR,
			VVAR
	)

Definition at line 15323 of file pythia61.f.

References c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), c2_factory< float_type >::exp(), c2_factory< float_type >::log(), pydat1, pyr(), c2_factory< float_type >::sqrt(), c2_factory< float_type >::tan(), and G4Abla::tau().

Referenced by pymaxi(), pymult(), and pyrand().

double precision function pylamf	(	double precision	X,
		double precision	Y,
		double precision	Z
	)

Definition at line 30407 of file pythia61.f.

References HepGeom::BasicVector3D< T >::y(), and z.

Referenced by pycjdc(), pyglui(), pyh2xx(), pyhext(), pynjdc(), pysfdc(), pytbbc(), pytbbn(), pyx2xg(), and pyx2xh().

subroutine pylist

(

MLIST

)

Definition at line 37135 of file pythia61.f.

References G4Abla::mod(), n, pycomp, pydat1, pydat3, pyjets, pylogo(), pyname(), and pyp().

Referenced by bamlun(), kkevnu(), py1ent(), py2ent(), py3ent(), py4ent(), pyeevt(), pyerrm(), pyexec(), pygive(), pyinit(), pyonia(), pytest(), and pyupda().

subroutine pylogo

(

)

Definition at line 37427 of file pythia61.f.

References pydat1, and pytime().

Referenced by pylist().

function pymass

(

KF

)

Definition at line 36187 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), G4Abla::mod(), pycomp, pydat1, pyr(), c2_factory< float_type >::sqrt(), and c2_factory< float_type >::tan().

Referenced by bamlun(), jsparr(), py1ent(), py2ent(), py3ent(), py4ent(), pyboei(), pydecy(), pydiff(), pyinbm(), pyindf(), pyp(), pyprep(), pyradk(), pyrand(), pyremn(), pyresd(), pyscat(), pyshow(), pysspa(), pystrf(), pytabu(), pytest(), pyupda(), pyx3jt(), pyx4jt(), pyxdif(), pyxkfl(), and pyxtee().

subroutine pymaxi

(

)

Definition at line 4310 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), CLHEP::HepLorentzVector::e(), c2_factory< float_type >::exp(), c2_factory< float_type >::log(), G4Abla::mod(), nmax, pycomp, pydat1, pydat3, pyevwt(), pyklim(), pykmap(), pyofsh(), pysigh(), c2_factory< float_type >::sqrt(), and G4Abla::tau().

Referenced by pyinit().

subroutine pymsin

(

)

Definition at line 24056 of file pythia61.f.

References CLHEP::HepBoost::beta(), c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), HepGeom::Transform3D::dx(), HepGeom::Transform3D::dy(), pyapps(), pycjdc(), pycomp, pydat1, pydat3, pyglui(), pyhext(), pyhggm(), pyinom(), pynjdc(), pysfdc(), pythrg(), pywidt(), HepGeom::BasicVector3D< T >::r(), c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by pyinit().

subroutine pymult

(

MMUL

)

Definition at line 10537 of file pythia61.f.

References c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), c2_factory< float_type >::exp(), int(), c2_factory< float_type >::log(), G4Abla::mod(), n, nmax, HepGeom::BasicVector3D< T >::phi(), pycomp, pydat1, pyerrm(), pyjets, pyklim(), pykmap(), pyr(), pysigh(), c2_factory< float_type >::sin(), c2_factory< float_type >::sqrt(), c2_factory< float_type >::tan(), and G4Abla::tau().

Referenced by pyevnt(), pyinit(), pyrand(), and pythia().

subroutine pyname	(		KF,
		character	CHAU
	)

Definition at line 36252 of file pythia61.f.

References pycomp, and pydat1.

Referenced by jsparr(), pylist(), pystat(), and pytabu().

subroutine pynjdc	(	integer	KFIN,
		double precision, dimension(0:200)	XLAM,
		integer, dimension(200,3)	IDLAM,
		integer	IKNT
	)

Definition at line 28029 of file pythia61.f.

References CLHEP::HepBoost::beta(), c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), G4Abla::mod(), pyalem(), pyalps(), pycomp, pydat1, pygaus(), pylamf(), pyx2xg(), pyx2xh(), pyxxga(), pyxxw5(), pyxxz5(), c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by pymsin().

subroutine pynull

(

ID

)

Definition at line 41816 of file pythia61.f.

References G4Abla::nint().

Referenced by pybook(), and pyhist().

subroutine pyofsh	(		MOFSH,
			KFMO,
			KFD1,
			KFD2,
			PMMO,
			RET1,
			RET2
	)

Definition at line 13992 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), func1(), func2(), int(), c2_factory< float_type >::log(), pycomp, pydat1, pydat3, pyerrm(), pyr(), c2_factory< float_type >::sqrt(), and c2_factory< float_type >::tan().

Referenced by pymaxi(), pyrand(), pyresd(), and pywidt().

subroutine pyonia	(		KFL,
			ECM
	)

Definition at line 41284 of file pythia61.f.

References c2_factory< float_type >::cos(), n, HepGeom::BasicVector3D< T >::phi(), py1ent, py2ent(), py3ent(), pyalps(), pydat1, pyerrm(), pyexec(), pyjets, pylist(), pyprep(), pyr(), pyrobo(), pyshow(), c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by pytest().

subroutine pyoper	(		ID1,
		character, dimension(*)	OPER,
			ID2,
			ID3,
			F1,
			F2
	)

Definition at line 41541 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), G4Abla::nint(), and c2_factory< float_type >::sqrt().

function pyp	(		I,
			J
	)

Definition at line 38097 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), c2_factory< float_type >::log(), n, pyangl(), pychge(), pydat1, pyjets, pymass(), and c2_factory< float_type >::sqrt().

Referenced by bamlun(), hadjase(), hadjck(), hadjet(), hadjse(), hijhrd(), lortrp(), lustrf(), pylist(), pystrf(), and pytest().

subroutine pypdel	(		X,
			Q2,
		dimension(-25:25)	XPEL
	)

Definition at line 21288 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), c2_factory< float_type >::exp(), c2_factory< float_type >::log(), G4Abla::mod(), pdfset(), pyalem(), pydat1, pygamm(), pypdga(), c2_factory< float_type >::sqrt(), structm(), c2_function< float_type >::xmax(), c2_function< float_type >::xmin(), and HepGeom::Transform3D::xx().

Referenced by pypdfu().

subroutine pypdfl	(		KF,
			X,
			Q2,
		dimension(-25:25)	XPQ
	)

Definition at line 21051 of file pythia61.f.

References c2_factory< float_type >::exp(), c2_factory< float_type >::log(), pydat1, pypdfu(), and c2_factory< float_type >::sqrt().

Referenced by pyrand(), pysigh(), and pysspa().

subroutine pypdfu	(		KF,
			X,
			Q2,
		dimension(-25:25)	XPQ
	)

Definition at line 20685 of file pythia61.f.

References G4Abla::mod(), pdfset(), pydat1, pygano(), pyggam(), pygvmd(), pypdel(), pypdga(), pypdpi(), pypdpr(), pyr(), c2_factory< float_type >::sqrt(), structm(), c2_function< float_type >::xmax(), c2_function< float_type >::xmin(), and HepGeom::Transform3D::xx().

Referenced by pypdfl(), pyrand(), pysigh(), and pysspa().

subroutine pypdga	(		X,
			Q2,
		dimension(-6:6)	XPGA
	)

Definition at line 21447 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), c2_factory< float_type >::log(), pydat1, and CLHEP::HepLorentzVector::t().

Referenced by pypdel(), and pypdfu().

subroutine pypdpi	(		X,
			Q2,
		dimension(-6:6)	XPPI
	)

Definition at line 22241 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), c2_factory< float_type >::exp(), c2_factory< float_type >::log(), pydat1, pygamm(), c2_factory< float_type >::sqrt(), and HepGeom::BasicVector3D< T >::y().

Referenced by pypdfu().

subroutine pypdpr	(		X,
			Q2,
		dimension(-6:6)	XPPR
	)

Definition at line 22412 of file pythia61.f.

References pycteq(), pydat1, pygrvd(), pygrvl(), pygrvm(), and c2_factory< float_type >::sqrt().

Referenced by pypdfu().

subroutine pypile

(

MPILE

)

Definition at line 5101 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), G4Abla::nint(), pydat1, and pyr().

Referenced by pyevnt(), and pyinit().

subroutine pyplot

(

ID

)

Definition at line 41663 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), HepGeom::Transform3D::dy(), int(), G4Abla::mod(), G4Abla::nint(), pydat1, pytime(), c2_factory< float_type >::sqrt(), and title().

Referenced by pyhist().

subroutine pypole	(		IHIGGS,
			XMC,
			XMA,
			TANB,
			XMQ,
			XMUR,
			XMDR,
			XMT,
			AT,
			AB,
			XMU,
			XMH,
			XMHP,
			HM,
			HMP,
			AMP,
			SA,
			CA,
			STOP1,
			STOP2,
			SBOT1,
			SBOT2,
			TANBA
	)

Definition at line 25792 of file pythia61.f.

References G4INCL::Random::SeedVector::at(), and pyvacu().

Referenced by pyhggm().

subroutine pyprep

(

IP

)

Definition at line 31692 of file pythia61.f.

References c2_factory< float_type >::cos(), int(), G4Abla::mod(), n, ns, HepGeom::BasicVector3D< T >::phi(), pycomp, pydat1, pydat3, pyerrm(), pyjets, pykfdi(), pymass(), pyr(), pyrobo(), c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by pyeevt(), pyevnt(), pyexec(), pyonia(), and pyreco().

subroutine pyptdi	(		KFL,
			PX,
			PY
	)

Definition at line 34768 of file pythia61.f.

References c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), c2_factory< float_type >::log(), HepGeom::BasicVector3D< T >::phi(), CLHEP::HepLorentzVector::px(), CLHEP::HepLorentzVector::py(), pydat1, pyr(), c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by pyindf(), pyremn(), and pystrf().

subroutine pyqqbh

(

WTQQBH

)

Definition at line 23647 of file pythia61.f.

References c2_factory< float_type >::cos(), HepGeom::BasicVector3D< T >::dot(), HepGeom::Transform3D::dx(), pycomp, pydat1, c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by pysigh().

function pyr

(

IDUMMY

)

Definition at line 36587 of file pythia61.f.

References G4Abla::mod(), and CLHEP::HepLorentzVector::t().

Referenced by gen_delta(), gen_qel(), pdfset(), py4ent(), pycell(), pydecy(), pydiff(), pyeig4(), pyevnt(), pyevwt(), pyindf(), pyjoin(), pykcut(), pykfdi(), pykmap(), pymass(), pymult(), pyofsh(), pyonia(), pypdfu(), pypile(), pyprep(), pyptdi(), pyradk(), pyrand(), pyreco(), pyremn(), pyresd(), pysave(), pyscat(), pyshow(), pysigh(), pysphe(), pyspli(), pysspa(), pystrf(), pytaud(), pytbdy(), pytest(), pythru(), pyupev(), pyx3jt(), pyx4jt(), pyxdif(), pyxjet(), pyxkfl(), pyzdis(), and structm().

subroutine pyradk	(		ECM,
			MK,
			PAK,
			THEK,
			PHIK,
			ALPK
	)

Definition at line 40428 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), c2_factory< float_type >::log(), pyangl(), pydat1, pymass(), pyr(), c2_factory< float_type >::sqrt(), and HepGeom::Transform3D::xx().

Referenced by pyeevt().

subroutine pyrand

(

)

Definition at line 5338 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), CLHEP::HepLorentzVector::e(), c2_factory< float_type >::exp(), int(), c2_factory< float_type >::log(), G4Abla::mod(), pycomp, pydat1, pydat3, pyevwt(), pykcut(), pyklim(), pykmap(), pymass(), pymult(), pyofsh(), pypdfl(), pypdfu(), pyr(), pysave(), pysigh(), pyspli(), pyupev(), sqm2(), c2_factory< float_type >::sqrt(), and thb().

Referenced by pyevnt(), and pythia().

subroutine pyreco	(		IW1,
			IW2,
			NSD1,
			NAFT1
	)

Definition at line 14398 of file pythia61.f.

References c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), c2_factory< float_type >::exp(), c2_factory< float_type >::log(), G4Abla::mod(), n, HepGeom::BasicVector3D< T >::phi(), pydat1, pyjets, pyjoin(), pyprep(), pyr(), pyrobo(), pyshow(), HepGeom::BasicVector3D< T >::r(), c2_factory< float_type >::sin(), c2_factory< float_type >::sqrt(), CLHEP::HepLorentzVector::t(), HepGeom::BasicVector3D< T >::y(), and z.

Referenced by pyresd().

subroutine pyremn	(		IPU1,
			IPU2
	)

Definition at line 11018 of file pythia61.f.

References c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), c2_factory< float_type >::log(), G4Abla::mod(), n, ns, HepGeom::BasicVector3D< T >::phi(), pyangl(), pycomp, pydat1, pyjets, pymass(), pyptdi(), pyr(), pyrobo(), pyspli(), pyzdis(), c2_factory< float_type >::sin(), c2_factory< float_type >::sqrt(), and HepGeom::Transform3D::zz().

Referenced by pyevnt(), and pythia().

subroutine pyresd

(

IRES

)

Definition at line 9154 of file pythia61.f.

References c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), CLHEP::HepLorentzVector::e(), int(), G4Abla::mod(), n, HepGeom::BasicVector3D< T >::phi(), py2ent(), py3ent(), py4ent(), pycomp, pydat1, pydat3, pyerrm(), pyjets, pymass(), pyofsh(), pyr(), pyreco(), pyrobo(), pyshow(), pytbdy(), pywidt(), pyx3jt(), pyx4jt(), pyxdif(), pyxjet(), rm3, and c2_factory< float_type >::sqrt().

Referenced by pyevnt(), pyexec(), and pythia().

subroutine pyrget	(		LFN,
			MOVE
	)

Definition at line 36666 of file pythia61.f.

References pyerrm().

subroutine pyrghm	(		XMC,
			XMA,
			TANB,
			XMQ,
			XMUR,
			XMDL,
			XMT,
			AU,
			AD,
			XMU,
			XMHP,
			HMP,
			SA,
			CA,
			TANBA
	)

Definition at line 26171 of file pythia61.f.

References c2_factory< float_type >::cos(), c2_factory< float_type >::log(), pygfxx(), and c2_factory< float_type >::sin().

Referenced by pyvacu().

function pyrnm3

(

RGUT

)

Definition at line 25237 of file pythia61.f.

References pyalps(), HepGeom::BasicVector3D< T >::r(), and c2_function< float_type >::xmin().

Referenced by pyinom().

function pyrnmq	(		ID,
			DTERM
	)

Definition at line 24618 of file pythia61.f.

References pyalps(), HepGeom::BasicVector3D< T >::r(), and c2_function< float_type >::xmin().

Referenced by pyapps().

function pyrnmt

(

double precision

XMT

)

Definition at line 24702 of file pythia61.f.

References pyalps(), HepGeom::BasicVector3D< T >::r(), and c2_function< float_type >::xmin().

Referenced by pyapps(), pysfdc(), pytbbc(), pytbbn(), and pythrg().

subroutine pyrobo	(		IMI,
			IMA,
			THE,
			PHI,
			BEX,
			BEY,
			BEZ
	)

Definition at line 36748 of file pythia61.f.

References c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), n, HepGeom::BasicVector3D< T >::phi(), pydat1, pyerrm(), pyjets, c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by gen_delta(), gen_qel(), prepola(), pyboei(), pydecy(), pydiff(), pyedit(), pyeevt(), pyfram(), pyindf(), pyinki(), pyonia(), pyprep(), pyreco(), pyremn(), pyresd(), pyscat(), pyshow(), pysspa(), pystrf(), and pythru().

subroutine pyrset	(		LFN,
			MOVE
	)

Definition at line 36706 of file pythia61.f.

References pyerrm().

subroutine pysave	(		ISAVE,
			IGA
	)

Definition at line 5189 of file pythia61.f.

References pyr().

Referenced by pydocu(), pyevnt(), pyinit(), pyrand(), and pystat().

subroutine pyscat

(

)

Definition at line 6281 of file pythia61.f.

References c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), int(), G4Abla::mod(), n, HepGeom::BasicVector3D< T >::phi(), CLHEP::HepLorentzVector::px(), CLHEP::HepLorentzVector::py(), pyangl(), pychge(), pycomp, pydat1, pydat3, pyjets, pymass(), pyr(), pyrobo(), pywidt(), CLHEP::HepLorentzVector::pz(), c2_factory< float_type >::sin(), c2_factory< float_type >::sqrt(), and z.

Referenced by pyevnt(), and pythia().

subroutine pysfdc	(	integer	KFIN,
		double precision, dimension(0:200)	XLAM,
		integer, dimension(200,3)	IDLAM,
		integer	IKNT
	)

Definition at line 26636 of file pythia61.f.

References G4INCL::Random::SeedVector::at(), CLHEP::HepBoost::beta(), c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), G4Abla::mod(), pyalem(), pyalps(), pycomp, pydat1, pylamf(), pyrnmt(), c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by pymsin().

subroutine pyshow	(		IP1,
			IP2,
			QMAX
	)

Definition at line 34922 of file pythia61.f.

References c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), c2_factory< float_type >::exp(), int(), c2_factory< float_type >::log(), G4Abla::mod(), n, ns, HepGeom::BasicVector3D< T >::phi(), pyangl(), pycomp, pydat1, pyerrm(), pyjets, pymass(), pyr(), pyrobo(), c2_factory< float_type >::sin(), c2_factory< float_type >::sqrt(), and z.

Referenced by bamlun(), pyeevt(), pyevnt(), pyexec(), pyonia(), pyreco(), pyresd(), and pysspa().

subroutine pysigh	(		NCHN,
			SIGS
	)

Definition at line 15693 of file pythia61.f.

References HepGeom::BasicVector3D< T >::cross(), HepGeom::Plane3D< T >::d(), G4IT::diff(), c2_factory< float_type >::exp(), int(), jmax, c2_factory< float_type >::log(), G4Abla::mod(), n, pyalem(), pyalps(), pycomp, pydat1, pydat3, pyhfth(), pyi3au(), pyjets, pypdfl(), pypdfu(), pyqqbh(), pyr(), pywaux(), pywidt(), rm3, c2_factory< float_type >::sqrt(), c2_factory< float_type >::tan(), and G4Abla::tau().

Referenced by pymaxi(), pymult(), and pyrand().

function pysimp	(	double precision, dimension(0:n)	Y,
		double precision	X0,
		double precision	X1,
			N
	)

Definition at line 30382 of file pythia61.f.

References n, and HepGeom::BasicVector3D< T >::y().

Referenced by pytbbc(), and pytbbn().

function pyspen	(		XREIN,
			XIMIN,
			IREIM
	)

Definition at line 23551 of file pythia61.f.

References c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), c2_factory< float_type >::log(), pydat1, c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by pyi3au(), and pyspen().

subroutine pysphe	(		SPH,
			APL
	)

Definition at line 38179 of file pythia61.f.

References c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), int(), n, pychge(), pycomp, pydat1, pyerrm(), pyjets, pyr(), smax, and c2_factory< float_type >::sqrt().

subroutine pyspli	(		KF,
			KFLIN,
			KFLCH,
			KFLSP
	)

Definition at line 23217 of file pythia61.f.

References int(), G4Abla::mod(), pykfdi(), and pyr().

Referenced by pydiff(), pyrand(), and pyremn().

subroutine pysspa	(		IPU1,
			IPU2
	)

Definition at line 8445 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), c2_factory< float_type >::exp(), c2_factory< float_type >::log(), G4Abla::mod(), n, ns, pyalps(), pyangl(), pycomp, pydat1, pyerrm(), pyjets, pymass(), pypdfl(), pypdfu(), pyr(), pyrobo(), pyshow(), c2_factory< float_type >::sqrt(), and z.

Referenced by pyevnt(), and pythia().

subroutine pystat

(

MSTAT

)

Definition at line 2565 of file pythia61.f.

References a, G4Abla::mod(), pydat1, pydat3, pyname(), pysave(), and pywidt().

Referenced by pytest().

subroutine pystrf

(

IP

)

Definition at line 32046 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), c2_factory< float_type >::exp(), G4Abla::fd(), int(), iz, c2_factory< float_type >::log(), G4Abla::mod(), n, ns, CLHEP::HepLorentzVector::px(), CLHEP::HepLorentzVector::py(), pycomp, pydat1, pyerrm(), pyjets, pykfdi(), pymass(), pyp(), pyptdi(), pyr(), pyrobo(), pyzdis(), c2_factory< float_type >::sqrt(), and z.

Referenced by pyexec().

subroutine pysubh	(	double precision	XMA,
		double precision	TANB,
		double precision	XMQ,
		double precision	XMUR,
		double precision	XMTOP,
		double precision	AU,
		double precision	AD,
		double precision	XMU,
		double precision	XMH,
		double precision	XHM,
		double precision	XMHCH,
		double precision	SA,
		double precision	CA,
		double precision	TANBA
	)

Definition at line 25565 of file pythia61.f.

References c2_factory< float_type >::log(), pyalem(), pyalps(), pydat1, c2_factory< float_type >::sqrt(), and CLHEP::HepLorentzVector::t().

Referenced by pyhggm().

subroutine pytabu

(

MTABU

)

Definition at line 39363 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), int(), c2_factory< float_type >::log(), G4Abla::mod(), n, HepGeom::BasicVector3D< T >::phi(), pyangl(), pychge(), pycomp, pydat1, pydat3, pyerrm(), pyjets, pymass(), pyname(), and c2_factory< float_type >::sqrt().

Referenced by pytest().

subroutine pytaud	(		ITAU,
			IORIG,
			KFORIG,
			NDECAY
	)

Definition at line 42273 of file pythia61.f.

References n, pydat1, pyjets, and pyr().

Referenced by pydecy().

subroutine pytbbc	(	integer	I,
		integer	NN,
		double precision	XMGLU,
		double precision	GAM
	)

Definition at line 27788 of file pythia61.f.

References a, c2_factory< float_type >::log(), pyalem(), pyalps(), pycomp, pydat1, pylamf(), pyrnmt(), pysimp(), smax, and c2_factory< float_type >::sqrt().

Referenced by pyglui().

subroutine pytbbn	(		I,
		integer	NN,
		double precision	E,
		double precision	XMGLU,
		double precision	GAM
	)

Definition at line 27566 of file pythia61.f.

References CLHEP::HepLorentzVector::e(), c2_factory< float_type >::log(), G4Abla::nint(), pyalem(), pyalps(), pycomp, pydat1, pylamf(), pyrnmt(), pysimp(), smax, and c2_factory< float_type >::sqrt().

Referenced by pyglui().

subroutine pytbdy

(

double precision, dimension(5)

XM

)

Definition at line 30427 of file pythia61.f.

References c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), n, G4StokesVector::p1(), G4StokesVector::p2(), G4StokesVector::p3(), pydat1, pydat3, pyjets, pyr(), HepGeom::BasicVector3D< T >::r(), c2_factory< float_type >::sin(), c2_factory< float_type >::sqrt(), and c2_function< float_type >::xmin().

Referenced by pyresd().

subroutine pytest

(

MTEST

)

Definition at line 1493 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), int(), G4Abla::mod(), n, HepGeom::BasicVector3D< T >::phi(), py1ent, py2ent(), py3ent(), py4ent(), pycomp, pydat1, pydat3, pyeevt(), pyevnt(), pyexec(), pyinit(), pyjets, pylist(), pymass(), pyonia(), pyp(), pyr(), pystat(), pytabu(), c2_factory< float_type >::sqrt(), and HepGeom::BasicVector3D< T >::theta().

subroutine pythrg

(

)

Definition at line 24773 of file pythia61.f.

References CLHEP::HepBoost::beta(), c2_factory< float_type >::cos(), HepGeom::Plane3D< T >::d(), G4IT::diff(), pycomp, pydat1, pyrnmt(), and c2_factory< float_type >::sqrt().

Referenced by pymsin().

subroutine pythru	(		THR,
			OBL
	)

Definition at line 38328 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), int(), n, HepGeom::BasicVector3D< T >::phi(), pyangl(), pychge(), pycomp, pydat1, pyerrm(), pyjets, pyr(), pyrobo(), and c2_factory< float_type >::sqrt().

subroutine pytime

(

integer, dimension(6)

IDATI

)

Definition at line 42306 of file pythia61.f.

Referenced by pylogo(), and pyplot().

subroutine pyupda	(		MUPDA,
			LFN
	)

Definition at line 37601 of file pythia61.f.

References G4VITManager::iterator::end(), pychge(), pycomp, pydat1, pydat3, pyerrm(), pylist(), and pymass().

subroutine pyupev	(		ISUB,
			SIGEV
	)

Definition at line 42160 of file pythia61.f.

References pydat1, and pyr().

Referenced by pyrand().

subroutine pyupin	(		ISUB,
		character*(*)	TITLE,
			SIGMAX
	)

Definition at line 42117 of file pythia61.f.

References pydat1, and title().

subroutine pyvacu	(		IHIGGS,
			XMC,
			XMA,
			TANB,
			XMQ,
			XMUR,
			XMDR,
			XMT,
			AT,
			AB,
			XMU,
			XMH,
			XMHP,
			HM,
			HMP,
			AMP,
			STOP1,
			STOP2,
			SBOT1,
			SBOT2,
			SA,
			CA,
			STOP1W,
			STOP2W,
			TANBA
	)

Definition at line 25814 of file pythia61.f.

References G4INCL::Random::SeedVector::at(), HepGeom::Plane3D< T >::d(), CLHEP::HepAxisAngle::delta(), c2_factory< float_type >::log(), G4StokesVector::p2(), pyfint(), pyrghm(), sqr(), and CLHEP::HepLorentzVector::t().

Referenced by pypole().

subroutine pywaux	(		IAUX,
			EPS,
			WRE,
			WIM
	)

Definition at line 23406 of file pythia61.f.

References c2_factory< float_type >::log(), pydat1, and c2_factory< float_type >::sqrt().

Referenced by pysigh().

subroutine pywidt	(		KFLR,
			SH,
		dimension(0:200)	WDTP,
		dimension(0:200,0:5)	WDTE
	)

Definition at line 12141 of file pythia61.f.

References CLHEP::HepBoost::beta(), HepGeom::Plane3D< T >::d(), CLHEP::HepLorentzVector::et(), iz, jmax, c2_factory< float_type >::log(), G4Abla::mod(), pyalem(), pyalps(), pycomp, pydat1, pydat3, pyhfth(), pyofsh(), c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by pyinre(), pymsin(), pyresd(), pyscat(), pysigh(), and pystat().

double precision function pyx2xg	(	double precision	C1,
		double precision	XM1,
		double precision	XM2,
		double precision	XM3,
		double precision	GL,
		double precision	GR
	)

Definition at line 29673 of file pythia61.f.

References pylamf(), and c2_factory< float_type >::sqrt().

Referenced by pycjdc(), and pynjdc().

double precision function pyx2xh	(	double precision	C1,
		double precision	XM1,
		double precision	XM2,
		double precision	XM3,
		double precision	GL,
		double precision	GR
	)

Definition at line 29701 of file pythia61.f.

References pylamf(), and c2_factory< float_type >::sqrt().

Referenced by pycjdc(), and pynjdc().

subroutine pyx3jt	(		NJET,
			CUT,
			KFL,
			ECM,
			X1,
			X2
	)

Definition at line 40756 of file pythia61.f.

References dilog(), c2_factory< float_type >::exp(), iz, c2_factory< float_type >::log(), G4Abla::mod(), pydat1, pymass(), pyr(), c2_factory< float_type >::sqrt(), HepGeom::Transform3D::zx(), and HepGeom::Transform3D::zy().

Referenced by pyeevt(), and pyresd().

subroutine pyx4jt	(		NJET,
			CUT,
			KFL,
			ECM,
			KFLN,
			X1,
			X2,
			X4,
			X12,
			X14
	)

Definition at line 40922 of file pythia61.f.

References c2_factory< float_type >::cos(), c2_factory< float_type >::exp(), int(), c2_factory< float_type >::log(), pydat1, pymass(), pyr(), and c2_factory< float_type >::sqrt().

Referenced by pyeevt(), and pyresd().

subroutine pyxdif	(		NC,
			NJET,
			KFL,
			ECM,
			CHI,
			THE,
			PHI
	)

Definition at line 41145 of file pythia61.f.

References c2_factory< float_type >::cos(), n, HepGeom::BasicVector3D< T >::phi(), pydat1, pyjets, pymass(), pyr(), c2_factory< float_type >::sin(), c2_factory< float_type >::sqrt(), and CLHEP::HepBoost::xt().

Referenced by pyeevt(), and pyresd().

subroutine pyxjet	(		ECM,
			NJET,
			CUT
	)

Definition at line 40577 of file pythia61.f.

References c2_factory< float_type >::exp(), iz, c2_factory< float_type >::log(), pyalps(), pydat1, pyerrm(), pyr(), and c2_factory< float_type >::sqrt().

Referenced by pyeevt(), and pyresd().

subroutine pyxkfl	(		KFL,
			ECM,
			ECMC,
			KFLC
	)

Definition at line 40504 of file pythia61.f.

References int(), G4Abla::mod(), pydat1, pyerrm(), pymass(), pyr(), and c2_factory< float_type >::sqrt().

Referenced by pyeevt().

subroutine pyxtee	(		KFL,
			ECM,
			XTOT
	)

Definition at line 40266 of file pythia61.f.

References c2_factory< float_type >::exp(), c2_factory< float_type >::log(), G4Abla::mod(), pyalps(), pydat1, pymass(), and c2_factory< float_type >::sqrt().

Referenced by pyeevt().

subroutine pyxtot

(

)

Definition at line 3991 of file pythia61.f.

References HepGeom::Plane3D< T >::d(), HepGeom::BasicVector3D< T >::eta(), c2_factory< float_type >::log(), pydat1, and pyerrm().

Referenced by pyevnt(), and pyinit().

double precision function pyxxga	(	double precision	C0,
		double precision	XM1,
		double precision	XM2,
		double precision	XMTR,
		double precision	XMTL
	)

Definition at line 29650 of file pythia61.f.

References c2_factory< float_type >::log().

Referenced by pynjdc().

double precision function pyxxw5

(

double precision

X

)

Definition at line 29519 of file pythia61.f.

References a, HepGeom::Plane3D< T >::d(), c2_factory< float_type >::log(), pydat1, c2_factory< float_type >::sqrt(), and HepGeom::BasicVector3D< T >::y().

Referenced by pycjdc(), pyglui(), and pynjdc().

double precision function pyxxz2

(

double precision

X

)

Definition at line 29729 of file pythia61.f.

References a, HepGeom::Plane3D< T >::d(), c2_factory< float_type >::log(), pydat1, c2_factory< float_type >::sqrt(), and HepGeom::BasicVector3D< T >::y().

Referenced by pycjdc(), and pyglui().

double precision function pyxxz5

(

double precision

X

)

Definition at line 29392 of file pythia61.f.

References a, c2_factory< float_type >::log(), pydat1, c2_factory< float_type >::sqrt(), and HepGeom::BasicVector3D< T >::y().

Referenced by pycjdc(), pyglui(), and pynjdc().

subroutine pyzdis	(		KFL1,
			KFL2,
			PR,
			Z
	)

Definition at line 34795 of file pythia61.f.

References c2_factory< float_type >::exp(), fexp(), c2_factory< float_type >::log(), G4Abla::mod(), pydat1, pyr(), c2_factory< float_type >::sqrt(), and z.

Referenced by pyindf(), pyremn(), and pystrf().

subroutine structm	(	double precision	XX,
		double precision	QQ,
		double precision	UPV,
		double precision	DNV,
		double precision	USEA,
		double precision	DSEA,
		double precision	STR,
		double precision	CHM,
		double precision	BOT,
		double precision	TOP,
		double precision	GLU
	)

Definition at line 42220 of file pythia61.f.

References pydat1, pyr(), and HepGeom::Transform3D::xx().

Referenced by phkmrs(), pypdel(), and pypdfu().