00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028
00029
00030
00031
00032
00033
00034 #include "G4VPreCompoundFragment.hh"
00035 #include "G4SystemOfUnits.hh"
00036 #include "G4PreCompoundParameters.hh"
00037 #include "G4NucleiProperties.hh"
00038
00039 G4VPreCompoundFragment::G4VPreCompoundFragment(
00040 const G4ParticleDefinition* part, G4VCoulombBarrier* aCoulombBarrier)
00041 : particle(part), theCoulombBarrierPtr(aCoulombBarrier),
00042 theRestNucleusA(0),theRestNucleusZ(0),theBindingEnergy(0.0),
00043 theMaximalKineticEnergy(-MeV),theRestNucleusMass(0.0),
00044 theReducedMass(0.0),theMomentum(0.,0.,0.,0.),
00045 theEmissionProbability(0.0),theCoulombBarrier(0.0),
00046 OPTxs(3),useSICB(false)
00047 {
00048 theA = particle->GetBaryonNumber();
00049 theZ = G4int(particle->GetPDGCharge()/eplus + 0.1);
00050 theMass = particle->GetPDGMass();
00051 theParameters = G4PreCompoundParameters::GetAddress();
00052 g4pow = G4Pow::GetInstance();
00053 theRestNucleusA13 = 0;
00054 }
00055
00056 G4VPreCompoundFragment::~G4VPreCompoundFragment()
00057 {}
00058
00059 std::ostream&
00060 operator << (std::ostream &out, const G4VPreCompoundFragment &theFragment)
00061 {
00062 out << &theFragment;
00063 return out;
00064 }
00065
00066 std::ostream&
00067 operator << (std::ostream &out, const G4VPreCompoundFragment *theFragment)
00068 {
00069 out
00070 << "PreCompoundModel Emitted Fragment: Z= " << theFragment->GetZ()
00071 << " A= " << theFragment->GetA()
00072 << " Mass(GeV)= " << theFragment->GetNuclearMass()/CLHEP::GeV;
00073 return out;
00074 }
00075
00076 void
00077 G4VPreCompoundFragment::Initialize(const G4Fragment & aFragment)
00078 {
00079 theRestNucleusA = aFragment.GetA_asInt() - theA;
00080 theRestNucleusZ = aFragment.GetZ_asInt() - theZ;
00081
00082 if ((theRestNucleusA < theRestNucleusZ) ||
00083 (theRestNucleusA < theA) ||
00084 (theRestNucleusZ < theZ))
00085 {
00086
00087 theMaximalKineticEnergy = 0.0;
00088 return;
00089 }
00090
00091 theRestNucleusA13 = g4pow->Z13(theRestNucleusA);
00092
00093
00094 theCoulombBarrier = theCoulombBarrierPtr->
00095 GetCoulombBarrier(theRestNucleusA,theRestNucleusZ,
00096 aFragment.GetExcitationEnergy());
00097
00098
00099 theRestNucleusMass =
00100 G4NucleiProperties::GetNuclearMass(theRestNucleusA, theRestNucleusZ);
00101 theReducedMass = theRestNucleusMass*theMass/(theRestNucleusMass + theMass);
00102
00103
00104
00105 theBindingEnergy =
00106 theRestNucleusMass + theMass - aFragment.GetGroundStateMass();
00107
00108
00109
00110 G4double Ecm = aFragment.GetMomentum().m();
00111 theMaximalKineticEnergy =
00112 ((Ecm-theRestNucleusMass)*(Ecm+theRestNucleusMass) + theMass*theMass)/(2.0*Ecm)-theMass;
00113 }