Warning, /pythia6/pythiaeRHIC/include/pythia.inc is written in an unsupported language. File is not indexed.
0001 C...This file contains an almost complete listing of all PYTHIA
0002 C...commonblocks, and additionally some recommended other
0003 C...declarations. You may copy this to the top of your
0004 C...mina program and then eliminate unnecessary parts.
0005
0006 C-----------------------------------------------------------------
0007
0008 C...All real arithmetic in double precision.
0009 IMPLICIT DOUBLE PRECISION(A-H, O-Z)
0010 C...Three Pythia functions return integers, so need declaring.
0011 INTEGER PYK,PYCHGE,PYCOMP
0012 C...Parameter statement to help give large particle numbers
0013 C...(left- and righthanded SUSY, technicolor, excited fermions,
0014 C...extra dimensions).
0015 PARAMETER (KSUSY1=1000000,KSUSY2=2000000,KTECHN=3000000,
0016 &KEXCIT=4000000,KDIMEN=5000000)
0017
0018 C...EXTERNAL statement links PYDATA on most machines.
0019 EXTERNAL PYDATA
0020
0021 C...Commonblocks.
0022 C...The event record.
0023 COMMON/PYJETS/N,NPAD,K(4000,5),P(4000,5),V(4000,5)
0024 C...Parameters.
0025 COMMON/PYDAT1/MSTU(200),PARU(200),MSTJ(200),PARJ(200)
0026 C...Particle properties + some flavour parameters.
0027 COMMON/PYDAT2/KCHG(500,4),PMAS(500,4),PARF(2000),VCKM(4,4)
0028 C...Decay information.
0029 COMMON/PYDAT3/MDCY(500,3),MDME(8000,2),BRAT(8000),KFDP(8000,5)
0030 C...Particle names
0031 COMMON/PYDAT4/CHAF(500,2)
0032 CHARACTER CHAF*16
0033 C...Random number generator information.
0034 COMMON/PYDATR/MRPY(6),RRPY(100)
0035 C...Selection of hard scattering subprocesses.
0036 COMMON/PYSUBS/MSEL,MSELPD,MSUB(500),KFIN(2,-40:40),CKIN(200)
0037 C...Parameters.
0038 COMMON/PYPARS/MSTP(200),PARP(200),MSTI(200),PARI(200)
0039 C...Internal variables.
0040 COMMON/PYINT1/MINT(400),VINT(400)
0041 C...Process information.
0042 COMMON/PYINT2/ISET(500),KFPR(500,2),COEF(500,20),ICOL(40,4,2)
0043 C...Parton distributions and cross sections.
0044 COMMON/PYINT3/XSFX(2,-40:40),ISIG(1000,3),SIGH(1000)
0045 C...Resonance width and secondary decay treatment.
0046 COMMON/PYINT4/MWID(500),WIDS(500,5)
0047 C...Generation and cross section statistics.
0048 COMMON/PYINT5/NGENPD,NGEN(0:500,3),XSEC(0:500,3)
0049 C...Process names.
0050 COMMON/PYINT6/PROC(0:500)
0051 CHARACTER PROC*28
0052 C...Total cross sections.
0053 COMMON/PYINT7/SIGT(0:6,0:6,0:5)
0054 C...Photon parton distributions: total and valence only.
0055 COMMON/PYINT8/XPVMD(-6:6),XPANL(-6:6),XPANH(-6:6),XPBEH(-6:6),
0056 &XPDIR(-6:6)
0057 COMMON/PYINT9/VXPVMD(-6:6),VXPANL(-6:6),VXPANH(-6:6),VXPDGM(-6:6)
0058 C...Supersymmetry parameters.
0059 COMMON/PYMSSM/IMSS(0:99),RMSS(0:99)
0060 C...Supersymmetry mixing matrices.
0061 COMMON/PYSSMT/ZMIX(4,4),UMIX(2,2),VMIX(2,2),SMZ(4),SMW(2),
0062 &SFMIX(16,4),ZMIXI(4,4),UMIXI(2,2),VMIXI(2,2)
0063 C...R-parity-violating couplings in supersymmetry.
0064 COMMON/PYMSRV/RVLAM(3,3,3), RVLAMP(3,3,3), RVLAMB(3,3,3)
0065 C...Internal parameters for R-parity-violating processes.
0066 COMMON/PYRVNV/AB(2,16,2),RMS(0:3),RES(6,5),IDR,IDR2,DCMASS,KFR(3)
0067 COMMON/PYRVPM/RM(0:3),A(2),B(2),RESM(2),RESW(2),MFLAG
0068 LOGICAL MFLAG
0069 C...Parameters for Gauss integration of supersymmetric widths.
0070 COMMON/PYINTS/XXM(20)
0071 COMMON/PYG2DX/X1
0072 C...Histogram information.
0073 COMMON/PYBINS/IHIST(4),INDX(1000),BIN(20000)
0074 C...HEPEVT commonblock.
0075 PARAMETER (NMXHEP=4000)
0076 COMMON/HEPEVT/NEVHEP,NHEP,ISTHEP(NMXHEP),IDHEP(NMXHEP),
0077 &JMOHEP(2,NMXHEP),JDAHEP(2,NMXHEP),PHEP(5,NMXHEP),VHEP(4,NMXHEP)
0078 DOUBLE PRECISION PHEP,VHEP
0079 C...User process initialization commonblock.
0080 INTEGER MAXPUP
0081 PARAMETER (MAXPUP=100)
0082 INTEGER IDBMUP,PDFGUP,PDFSUP,IDWTUP,NPRUP,LPRUP
0083 DOUBLE PRECISION EBMUP,XSECUP,XERRUP,XMAXUP
0084 COMMON/HEPRUP/IDBMUP(2),EBMUP(2),PDFGUP(2),PDFSUP(2),
0085 &IDWTUP,NPRUP,XSECUP(MAXPUP),XERRUP(MAXPUP),XMAXUP(MAXPUP),
0086 &LPRUP(MAXPUP)
0087 C...User process event common block.
0088 INTEGER MAXNUP
0089 PARAMETER (MAXNUP=500)
0090 INTEGER NUP,IDPRUP,IDUP,ISTUP,MOTHUP,ICOLUP
0091 DOUBLE PRECISION XWGTUP,SCALUP,AQEDUP,AQCDUP,PUP,VTIMUP,SPINUP
0092 COMMON/HEPEUP/NUP,IDPRUP,XWGTUP,SCALUP,AQEDUP,AQCDUP,IDUP(MAXNUP),
0093 &ISTUP(MAXNUP),MOTHUP(2,MAXNUP),ICOLUP(2,MAXNUP),PUP(5,MAXNUP),
0094 &VTIMUP(MAXNUP),SPINUP(MAXNUP)
