Functions/Subroutines
subroutine	lu1ent (IP, KF, PE, THE, PHI)

subroutine	lu2ent (IP, KF1, KF2, PECM)

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

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

subroutine	lujoin (NJOIN, IJOIN)

subroutine	lugive (CHIN)

subroutine	luexec

subroutine	luprep (IP)

subroutine	luindf (IP)

subroutine	ludecy (IP)

subroutine	lukfdi (KFL1, KFL2, KFL3, KF)

subroutine	luptdi (KFL, PX, PY)

subroutine	luzdis (KFL1, KFL2, PR, Z)

subroutine	lushow (IP1, IP2, QMAX)

subroutine	luboei (NSAV)

function	ulmass (KF)

subroutine	luname (KF, CHAU)

function	luchge (KF)

function	lucomp (KF)

subroutine	luerrm (MERR, CHMESS)

function	ulalem (Q2)

function	ulalps (Q2)

function	ulangl (X, Y)

subroutine	rluget (LFN, MOVE)

subroutine	rluset (LFN, MOVE)

subroutine	luedit (MEDIT)

subroutine	lulist (MLIST)

subroutine	lulogo

subroutine	luupda (MUPDA, LFN)

function	klu (I, J)

function	plu (I, J)

subroutine	lusphe (SPH, APL)

subroutine	luthru (THR, OBL)

subroutine	luclus (NJET)

subroutine	lucell (NJET)

subroutine	lujmas (PMH, PML)

subroutine	lufowo (H10, H20, H30, H40)

subroutine	lutabu (MTABU)

subroutine	lueevt (KFL, ECM)

subroutine	luxtot (KFL, ECM, XTOT)

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

subroutine	luxkfl (KFL, ECM, ECMC, KFLC)

subroutine	luxjet (ECM, NJET, CUT)

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

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

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

subroutine	luonia (KFL, ECM)

subroutine	luhepc (MCONV)

subroutine	lutest (MTEST)

subroutine	lutaud (ITAU, IORIG, KFORIG, NDECAY)

Function/Subroutine Documentation

function klu	(	I,
		J
	)

Definition at line 6077 of file jetset74ku.f.

References luchge(), lucomp(), G4Abla::mod(), and n.

Referenced by kkevle(), kkevnu(), kkinc(), and klu().

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

Definition at line 88 of file jetset74ku.f.

References c2_factory< float_type >::cos(), lucomp(), luerrm(), luexec(), lulist(), n, HepGeom::BasicVector3D< T >::phi(), c2_factory< float_type >::sin(), c2_factory< float_type >::sqrt(), and ulmass().

Referenced by lqev(), lueevt(), luonia(), and lutest().

subroutine lu2ent	(	IP,
		KF1,
		KF2,
		PECM
	)

Definition at line 135 of file jetset74ku.f.

References lucomp(), luerrm(), luexec(), lulist(), n, c2_factory< float_type >::sqrt(), and ulmass().

Referenced by lqev(), lueevt(), luonia(), lutest(), and pyresd().

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

Definition at line 219 of file jetset74ku.f.

References CLHEP::HepLorentzVector::e(), lucomp(), luerrm(), luexec(), lulist(), n, c2_factory< float_type >::sqrt(), and ulmass().

Referenced by lqgev(), lqqbev(), lueevt(), luonia(), and lutest().

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

Definition at line 334 of file jetset74ku.f.

References CLHEP::HepLorentzVector::e(), int(), lucomp(), luerrm(), luexec(), lulist(), n, rlu(), c2_factory< float_type >::sqrt(), and ulmass().

Referenced by lueevt(), and lutest().

subroutine luboei ( NSAV )

Definition at line 4328 of file jetset74ku.f.

References CLHEP::HepLorentzVector::e(), c2_factory< float_type >::exp(), luerrm(), n, G4Abla::nint(), c2_factory< float_type >::sqrt(), and ulmass().

Referenced by luexec().

subroutine lucell ( NJET )

Definition at line 6946 of file jetset74ku.f.

References c2_factory< float_type >::cos(), CLHEP::HepLorentzVector::e(), HepGeom::BasicVector3D< T >::eta(), int(), c2_factory< float_type >::log(), luchge(), lucomp(), luerrm(), n, HepGeom::BasicVector3D< T >::phi(), rlu(), c2_factory< float_type >::sin(), c2_factory< float_type >::sqrt(), and ulangl().

function luchge ( KF )

Definition at line 4723 of file jetset74ku.f.

References lucomp(), and G4Abla::mod().

Referenced by jetmc(), jetta(), jettout(), klu(), lucell(), luchge(), luclus(), luedit(), luexec(), lufowo(), lujmas(), luname(), lusphe(), lutabu(), luthru(), luupda(), plu(), pyresd(), and pyscat().

subroutine luclus ( NJET )

Definition at line 6600 of file jetset74ku.f.

References luchge(), lucomp(), luerrm(), n, and c2_factory< float_type >::sqrt().

function lucomp ( KF )

Definition at line 4756 of file jetset74ku.f.

References lucomp(), and G4Abla::mod().

subroutine ludecy ( IP )

Definition at line 1887 of file jetset74ku.f.

References a, c2_factory< float_type >::cos(), CLHEP::HepLorentzVector::e(), int(), c2_factory< float_type >::log(), lucomp(), luerrm(), lukfdi(), lutaud(), G4Abla::mod(), n, HepGeom::BasicVector3D< T >::phi(), rlu(), c2_factory< float_type >::sin(), c2_factory< float_type >::sqrt(), c2_factory< float_type >::tan(), ulangl(), and ulmass().

Referenced by forced_decay(), and luexec().

subroutine luedit ( MEDIT )

Definition at line 5113 of file jetset74ku.f.

References CLHEP::HepLorentzVector::e(), iz, luchge(), lucomp(), luerrm(), G4Abla::mod(), n, ns, c2_factory< float_type >::sqrt(), and ulangl().

Referenced by __pythia_main.f__(), hijfrg(), hijing(), lmeps(), lshowr(), and pythia().

subroutine lueevt	(	KFL,
		ECM
	)

Definition at line 8136 of file jetset74ku.f.

References c2_factory< float_type >::cos(), lu1ent(), lu2ent(), lu3ent(), lu4ent(), luerrm(), luexec(), lulist(), luprep(), luradk(), lushow(), lux3jt(), lux4jt(), luxdif(), luxjet(), luxkfl(), luxtot(), n, HepGeom::BasicVector3D< T >::phi(), c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by lutest().

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

Definition at line 4872 of file jetset74ku.f.

References a, lulist(), and n.

Referenced by hirobo(), lu1ent(), lu2ent(), lu3ent(), lu4ent(), luboei(), lucell(), luclus(), ludecy(), luedit(), lueevt(), luexec(), lufowo(), lugive(), luhepc(), luindf(), lujmas(), lujoin(), lukfdi(), luonia(), luprep(), lurobo(), lushow(), lusphe(), lustrf(), lutabu(), luthru(), luupda(), luxjet(), luxkfl(), pymult(), pysspa(), pythia(), rluget(), and rluset().

subroutine luexec ( )

Definition at line 955 of file jetset74ku.f.

References luboei(), luchge(), lucomp(), ludecy(), luerrm(), luindf(), lulist(), luprep(), lushow(), lustrf(), G4Abla::mod(), n, and c2_factory< float_type >::sqrt().

Referenced by hijfrg(), jettarun(), lepto(), lu1ent(), lu2ent(), lu3ent(), lu4ent(), lueevt(), luonia(), lutest(), and pythia().

subroutine lufowo	(	H10,
		H20,
		H30,
		H40
	)

Definition at line 7318 of file jetset74ku.f.

References luchge(), lucomp(), luerrm(), n, and c2_factory< float_type >::sqrt().

subroutine lugive ( character, dimension(*) CHIN )

Definition at line 547 of file jetset74ku.f.

References lucomp(), luerrm(), lulist(), and n.

Referenced by hijset(), and linit().

subroutine luhepc ( MCONV )

Definition at line 9400 of file jetset74ku.f.

References lucomp(), luerrm(), G4Abla::mod(), and n.

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

subroutine luindf ( IP )

Definition at line 1424 of file jetset74ku.f.

References CLHEP::HepLorentzVector::e(), int(), iz, lucomp(), luerrm(), lukfdi(), luptdi(), luzdis(), G4Abla::mod(), n, G4StokesVector::p2(), HepGeom::BasicVector3D< T >::phi(), CLHEP::HepEulerAngles::psi(), rlu(), c2_factory< float_type >::sqrt(), ulangl(), ulmass(), and z.

Referenced by luexec().

subroutine lujmas	(	PMH,
		PML
	)

Definition at line 7151 of file jetset74ku.f.

References c2_factory< float_type >::cos(), CLHEP::HepLorentzVector::e(), luchge(), lucomp(), luerrm(), n, smax, and c2_factory< float_type >::sqrt().

subroutine lujoin	(		NJOIN,
		dimension(*)	IJOIN
	)

Definition at line 494 of file jetset74ku.f.

References int(), lucomp(), luerrm(), n, and rlu().

subroutine lukfdi	(	KFL1,
		KFL2,
		KFL3,
		KF
	)

Definition at line 2767 of file jetset74ku.f.

References int(), lucomp(), luerrm(), G4Abla::mod(), rlu(), and c2_factory< float_type >::sqrt().

Referenced by lremh(), ludecy(), luindf(), luprep(), lustrf(), pyspla(), and pyspli().

subroutine lulist ( MLIST )

Definition at line 5388 of file jetset74ku.f.

References lucomp(), lulogo(), luname(), G4Abla::mod(), n, plu(), and ulmass().

Referenced by forced_decay(), hijing(), jettarun(), jettout(), kkevle(), lepto(), lu1ent(), lu2ent(), lu3ent(), lu4ent(), lueevt(), luerrm(), luexec(), lugive(), luonia(), lutest(), lutoge(), luupda(), pyinit(), and pytest().

subroutine lulogo ( )

Definition at line 5661 of file jetset74ku.f.

Referenced by lulist().

subroutine luname	(		KF,
		character	CHAU
	)

Definition at line 4581 of file jetset74ku.f.

References luchge(), lucomp(), and G4Abla::mod().

Referenced by lulist(), lutabu(), and pystat().

subroutine luonia	(	KFL,
		ECM
	)

Definition at line 9248 of file jetset74ku.f.

References c2_factory< float_type >::cos(), lu1ent(), lu2ent(), lu3ent(), luerrm(), luexec(), lulist(), luprep(), lushow(), n, HepGeom::BasicVector3D< T >::phi(), rlu(), c2_factory< float_type >::sin(), c2_factory< float_type >::sqrt(), and ulalps().

Referenced by lutest().

subroutine luprep ( IP )

Definition at line 1075 of file jetset74ku.f.

References c2_factory< float_type >::cos(), int(), lucomp(), luerrm(), lukfdi(), G4Abla::mod(), n, ns, HepGeom::BasicVector3D< T >::phi(), rlu(), c2_factory< float_type >::sin(), c2_factory< float_type >::sqrt(), and ulmass().

Referenced by lepto(), lmeps(), lshowr(), lueevt(), luexec(), luonia(), and pythia().

subroutine luptdi	(	KFL,
		PX,
		PY
	)

Definition at line 3099 of file jetset74ku.f.

References c2_factory< float_type >::cos(), CLHEP::HepLorentzVector::e(), c2_factory< float_type >::log(), HepGeom::BasicVector3D< T >::phi(), CLHEP::HepLorentzVector::px(), CLHEP::HepLorentzVector::py(), rlu(), c2_factory< float_type >::sin(), and c2_factory< float_type >::sqrt().

Referenced by luindf(), lustrf(), and pyremn().

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

Definition at line 8442 of file jetset74ku.f.

References CLHEP::HepLorentzVector::e(), c2_factory< float_type >::log(), rlu(), c2_factory< float_type >::sqrt(), ulangl(), ulmass(), and HepGeom::Transform3D::xx().

Referenced by lueevt().

subroutine lushow	(	IP1,
		IP2,
		QMAX
	)

Definition at line 3240 of file jetset74ku.f.

References c2_factory< float_type >::cos(), CLHEP::HepLorentzVector::e(), c2_factory< float_type >::exp(), int(), c2_factory< float_type >::log(), lucomp(), luerrm(), G4Abla::mod(), n, ns, HepGeom::BasicVector3D< T >::phi(), rlu(), c2_factory< float_type >::sin(), c2_factory< float_type >::sqrt(), ulangl(), ulmass(), and z.

Referenced by lmeps(), lshowr(), lueevt(), luexec(), luonia(), pyresd(), pysspa(), pysspb(), and pythia().

subroutine lusphe	(	SPH,
		APL
	)

Definition at line 6280 of file jetset74ku.f.

References c2_factory< float_type >::cos(), CLHEP::HepLorentzVector::e(), int(), luchge(), lucomp(), luerrm(), n, rlu(), smax, and c2_factory< float_type >::sqrt().

subroutine lutabu ( MTABU )

Definition at line 7396 of file jetset74ku.f.

References CLHEP::HepLorentzVector::e(), int(), c2_factory< float_type >::log(), luchge(), lucomp(), luerrm(), luname(), G4Abla::mod(), n, HepGeom::BasicVector3D< T >::phi(), c2_factory< float_type >::sqrt(), ulangl(), and ulmass().

Referenced by lutest().

subroutine lutaud	(	ITAU,
		IORIG,
		KFORIG,
		NDECAY
	)

Definition at line 10216 of file jetset74ku.f.

References n, and rlu().

Referenced by ludecy().

subroutine lutest ( MTEST )

Definition at line 9550 of file jetset74ku.f.

References CLHEP::HepLorentzVector::e(), int(), lu1ent(), lu2ent(), lu3ent(), lu4ent(), lucomp(), lueevt(), luexec(), lulist(), luonia(), lutabu(), G4Abla::mod(), n, HepGeom::BasicVector3D< T >::phi(), plu(), rlu(), HepGeom::BasicVector3D< T >::theta(), and ulmass().

subroutine luthru	(	THR,
		OBL
	)

Definition at line 6420 of file jetset74ku.f.

References CLHEP::HepLorentzVector::e(), int(), luchge(), lucomp(), luerrm(), n, HepGeom::BasicVector3D< T >::phi(), rlu(), c2_factory< float_type >::sqrt(), and ulangl().

subroutine luupda	(	MUPDA,
		LFN
	)

Definition at line 5828 of file jetset74ku.f.

References G4VITManager::iterator::end(), luchge(), lucomp(), luerrm(), lulist(), and ulmass().

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

Definition at line 8751 of file jetset74ku.f.

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

Referenced by lueevt().

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

Definition at line 8909 of file jetset74ku.f.

References c2_factory< float_type >::cos(), c2_factory< float_type >::exp(), int(), c2_factory< float_type >::log(), rlu(), c2_factory< float_type >::sqrt(), and ulmass().

Referenced by lueevt().

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

Definition at line 9117 of file jetset74ku.f.

References c2_factory< float_type >::cos(), n, HepGeom::BasicVector3D< T >::phi(), rlu(), c2_factory< float_type >::sin(), c2_factory< float_type >::sqrt(), ulmass(), and CLHEP::HepBoost::xt().

Referenced by lueevt().

subroutine luxjet	(	ECM,
		NJET,
		CUT
	)

Definition at line 8578 of file jetset74ku.f.

References c2_factory< float_type >::exp(), iz, c2_factory< float_type >::log(), luerrm(), rlu(), c2_factory< float_type >::sqrt(), and ulalps().

Referenced by lueevt().

subroutine luxkfl	(	KFL,
		ECM,
		ECMC,
		KFLC
	)

Definition at line 8512 of file jetset74ku.f.

References int(), luerrm(), G4Abla::mod(), rlu(), c2_factory< float_type >::sqrt(), and ulmass().

Referenced by lueevt().

subroutine luxtot	(	KFL,
		ECM,
		XTOT
	)

Definition at line 8286 of file jetset74ku.f.

References c2_factory< float_type >::exp(), c2_factory< float_type >::log(), G4Abla::mod(), c2_factory< float_type >::sqrt(), ulalps(), and ulmass().

Referenced by lueevt().

subroutine luzdis	(	KFL1,
		KFL2,
		PR,
		Z
	)

Definition at line 3120 of file jetset74ku.f.

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

Referenced by luindf(), and lustrf().

function plu	(	I,
		J
	)

Definition at line 6207 of file jetset74ku.f.

References CLHEP::HepLorentzVector::e(), c2_factory< float_type >::log(), luchge(), n, c2_factory< float_type >::sqrt(), ulangl(), and ulmass().

Referenced by kkevle(), kkevnu(), kkinc(), lepto(), lframe(), lkinem(), lulist(), lutest(), plu(), and pytest().

subroutine rluget	(	LFN,
		MOVE
	)

Definition at line 5042 of file jetset74ku.f.

References luerrm().

subroutine rluset	(	LFN,
		MOVE
	)

Definition at line 5075 of file jetset74ku.f.

References luerrm().

function ulalem ( Q2 )

Definition at line 4921 of file jetset74ku.f.

References CLHEP::HepLorentzVector::e(), and c2_factory< float_type >::log().

Referenced by leptox().

function ulalps ( Q2 )

Definition at line 4957 of file jetset74ku.f.

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

Referenced by flintg(), fltabl(), lepto(), lprwts(), luonia(), luxjet(), luxtot(), lweits(), pyinre(), pysigh(), pysspa(), pywidt(), and ulalps().

function ulangl	(	X,
		Y
	)

Definition at line 5015 of file jetset74ku.f.

References CLHEP::HepLorentzVector::e(), HepGeom::BasicVector3D< T >::r(), c2_factory< float_type >::sqrt(), and HepGeom::BasicVector3D< T >::y().

Referenced by arorie(), attrad(), hijsft(), lepto(), linit(), lmeps(), lqev(), lshowr(), lucell(), ludecy(), luedit(), luindf(), luradk(), lushow(), lutabu(), luthru(), plu(), pyinki(), pyremm(), pyremn(), pyscat(), pysspa(), pysspb(), pythia(), quench(), and ulangl().

function ulmass ( KF )

Definition at line 4491 of file jetset74ku.f.

References CLHEP::HepLorentzVector::e(), lucomp(), G4Abla::mod(), rlu(), c2_factory< float_type >::sqrt(), and c2_factory< float_type >::tan().

Referenced by dsigma(), forced_decay(), hijhrd(), hijini(), hijsft(), lepto(), linit(), lkinem(), lqev(), lqgev(), lqqbev(), lremh(), lshowr(), lu1ent(), lu2ent(), lu3ent(), lu4ent(), luboei(), ludecy(), luindf(), lulist(), luprep(), luradk(), lushow(), lustrf(), lutabu(), lutest(), luupda(), lux3jt(), lux4jt(), luxdif(), luxkfl(), luxtot(), plu(), pydiff(), pyinki(), pyrand(), pyremm(), pyremn(), pyscat(), pysspa(), pysspb(), pytest(), test(), and ulmass().

Functions/Subroutines

Function/Subroutine Documentation