38 outFile <<
"G4LETritonInelastic is one of the Low Energy Parameterized\n"
39 <<
"(LEP) models used to implement inelastic triton scattering\n"
40 <<
"from nuclei. It is a re-engineered version of the GHEISHA\n"
41 <<
"code of H. Fesefeldt. It divides the initial collision\n"
42 <<
"products into backward- and forward-going clusters which are\n"
43 <<
"then decayed into final state hadrons. The model does not\n"
44 <<
"conserve energy on an event-by-event basis. It may be\n"
45 <<
"applied to tritons with initial energies between 0 and 25\n"
54 G4bool triton_debug =
false;
55 if (getenv(
"TritonLEDebug")) triton_debug =
true;
58 if (triton_debug)
G4cout <<
"entering LETritonInelastic "
69 G4cout <<
"G4LETritonInelastic::ApplyYourself called" <<
G4endl;
71 G4cout <<
"target material = " << targetMaterial->
GetName() <<
", ";
74 if (triton_debug)
G4cout <<
"running LETritonInelastic 1" <<
G4endl;
85 if (triton_debug)
G4cout <<
"running LETritonInelastic 2" <<
G4endl;
91 massVec[0] = targetNucleus.
AtomicMass( A+3.0, Z+1.0 );
92 massVec[1] = targetNucleus.
AtomicMass( A+2.0, Z+1.0 );
93 massVec[2] = targetNucleus.
AtomicMass( A+2.0, Z );
94 massVec[3] = targetNucleus.
AtomicMass( A+1.0, Z );
95 massVec[4] = theAtomicMass;
96 massVec[5] = massVec[3];
97 if (A > 1.0 && Z > 1.0) massVec[5] = targetNucleus.
AtomicMass(A-1.0, Z-1.0);
98 massVec[6] = targetNucleus.
AtomicMass(A+1.0, Z+1.0);
99 massVec[7] = massVec[3];
100 massVec[8] = massVec[2];
101 if (Z > 1.0) massVec[8] = targetNucleus.
AtomicMass(A+1.0, Z-1.0);
107 if (triton_debug)
G4cout <<
"running LETritonInelastic 3" <<
G4endl;
109 targetNucleus, theAtomicMass, massVec);
110 if (triton_debug)
G4cout <<
"running LETritonInelastic 4" <<
G4endl;
112 G4double p = vec[0]->GetMomentum().mag();
126 for (
G4int i = 1; i < vecLen; ++i) {
136 if (triton_debug)
G4cout <<
"leaving LETritonInelastic" <<
G4endl;