6 ! we simpley use
this as <Z^2/3>
7 real*8 TargetZ1_3rd ! <Z>^(1/3). same reason
real *TargetMassN ! Number weighted average target mass number fixed value real *TargetAtomicN !The same for average Z of the target fixed value real *TargetZ2< Z^2 > of the target ! integer TargetNucleonNo ! target nucleon number at a collision sampled at each collision real *TargetZ2_3rd< Z > Since< Z > is almost same as or ! we simpley use this as< Z^2/3 > real *TargetZ1_3rd< Z > same reason ! integer TargetProtonNo ! target proton number ! real *TargetXs ! inelastic xs for this target common Zair *TargetZ1_3rd TargetXs
! integer SkipPtclGen common Zheavyvc2 SkipPtclGen ! in heavy particle collision
! Parameters used for hadronic cascade shower is generated newline ! For you may give as as or em as(order/case/separator insensitive) is to generate EM-cascade and AS. \newline ! Generate
! constants thru Cosmos real ! if multiplied to deg radian Torad ! light velocity m sec ! infinty ! kg m2 *Togpcm2 g cm2 ! g cm2 *Tokgpm2 kg m2 ! cm *Tom m ! m *Tocm cm ! g cm3 *Tokgpm3 kg m3 ! kg m3 *Togpcm3 g cm3 ! sec *Tonsec nsec ! Tesla m ! Avogadro *A2deninv ! mfp *n * xs
integer maxbin nregion c minsave drx2 ! drawing region real maxdep integer maxpos integer to
real *TargetMassN ! Number weighted average target mass number fixed value real *TargetAtomicN !The same for average Z of the target fixed value real *TargetZ2< Z^2 > of the target ! integer TargetNucleonNo ! target nucleon number at a collision sampled at each collision real *TargetZ2_3rd< Z > Since< Z > is almost same as or ! we simpley use this as< Z^2/3 > real *TargetZ1_3rd< Z > same reason ! integer TargetProtonNo ! target proton number ! real *TargetXs ! inelastic xs for this target common Zair TargetZ2_3rd
real *TargetMassN ! Number weighted average target mass number fixed value real *TargetAtomicN !The same for average Z of the target fixed value real *TargetZ2< Z^2 > of the target ! integer TargetNucleonNo ! target nucleon number at a collision sampled at each collision real *TargetZ2_3rd< Z > Since< Z > is almost same as or ! we simpley use this as< Z^2/3 > real *TargetZ1_3rd< Z > same reason ! integer TargetProtonNo ! target proton number ! real *TargetXs ! inelastic xs for this target common Zair TargetZ2
real *TargetMassN ! Number weighted average target mass number fixed value real *TargetAtomicN !The same for average Z of the target fixed value real *TargetZ2< Z^2 > of the target ! integer TargetNucleonNo ! target nucleon number at a collision sampled at each collision real *TargetZ2_3rd< Z > Since< Z > is almost same as or ! we simpley use this as< Z^2/3 > real *TargetZ1_3rd< Z > same reason ! integer TargetProtonNo ! target proton number ! real *TargetXs ! inelastic xs for this target common Zair *TargetZ1_3rd TargetNucleonNo
real *TargetMassN ! Number weighted average target mass number fixed value real *TargetAtomicN !The same for average Z of the target fixed value real *TargetZ2< Z^2 > of the target ! integer TargetNucleonNo ! target nucleon number at a collision sampled at each collision real *TargetZ2_3rd< Z > Since< Z > is almost same as or ! we simpley use this as< Z^2/3 > real *TargetZ1_3rd< Z > same reason ! integer TargetProtonNo ! target proton number ! real *TargetXs ! inelastic xs for this target common Zair * TargetMassN
*Zfirst p fm *Zfirst p mass
real *TargetMassN ! Number weighted average target mass number fixed value real *TargetAtomicN !The same for average Z of the target fixed value real *TargetZ2< Z^2 > of the target ! integer TargetNucleonNo ! target nucleon number at a collision sampled at each collision real *TargetZ2_3rd< Z > Since< Z > is almost same as or ! we simpley use this as< Z^2/3 > real *TargetZ1_3rd< Z > same reason ! integer TargetProtonNo ! target proton number ! real *TargetXs ! inelastic xs for this target common Zair TargetAtomicN
block data cblkIncident data *Za1ry is