Geant4 Cross Reference

Cross-Referencing   Geant4
Geant4/processes/decay/src/G4Decay.cc

Version: [ ReleaseNotes ] [ 1.0 ] [ 1.1 ] [ 2.0 ] [ 3.0 ] [ 3.1 ] [ 3.2 ] [ 4.0 ] [ 4.0.p1 ] [ 4.0.p2 ] [ 4.1 ] [ 4.1.p1 ] [ 5.0 ] [ 5.0.p1 ] [ 5.1 ] [ 5.1.p1 ] [ 5.2 ] [ 5.2.p1 ] [ 5.2.p2 ] [ 6.0 ] [ 6.0.p1 ] [ 6.1 ] [ 6.2 ] [ 6.2.p1 ] [ 6.2.p2 ] [ 7.0 ] [ 7.0.p1 ] [ 7.1 ] [ 7.1.p1 ] [ 8.0 ] [ 8.0.p1 ] [ 8.1 ] [ 8.1.p1 ] [ 8.1.p2 ] [ 8.2 ] [ 8.2.p1 ] [ 8.3 ] [ 8.3.p1 ] [ 8.3.p2 ] [ 9.0 ] [ 9.0.p1 ] [ 9.0.p2 ] [ 9.1 ] [ 9.1.p1 ] [ 9.1.p2 ] [ 9.1.p3 ] [ 9.2 ] [ 9.2.p1 ] [ 9.2.p2 ] [ 9.2.p3 ] [ 9.2.p4 ] [ 9.3 ] [ 9.3.p1 ] [ 9.3.p2 ] [ 9.4 ] [ 9.4.p1 ] [ 9.4.p2 ] [ 9.4.p3 ] [ 9.4.p4 ] [ 9.5 ] [ 9.5.p1 ] [ 9.5.p2 ] [ 9.6 ] [ 9.6.p1 ] [ 9.6.p2 ] [ 9.6.p3 ] [ 9.6.p4 ] [ 10.0 ] [ 10.0.p1 ] [ 10.0.p2 ] [ 10.0.p3 ] [ 10.0.p4 ] [ 10.1 ] [ 10.1.p1 ] [ 10.1.p2 ] [ 10.1.p3 ] [ 10.2 ] [ 10.2.p1 ] [ 10.2.p2 ] [ 10.2.p3 ] [ 10.3 ] [ 10.3.p1 ] [ 10.3.p2 ] [ 10.3.p3 ] [ 10.4 ] [ 10.4.p1 ] [ 10.4.p2 ] [ 10.4.p3 ] [ 10.5 ] [ 10.5.p1 ] [ 10.6 ] [ 10.6.p1 ] [ 10.6.p2 ] [ 10.6.p3 ] [ 10.7 ] [ 10.7.p1 ] [ 10.7.p2 ] [ 10.7.p3 ] [ 10.7.p4 ] [ 11.0 ] [ 11.0.p1 ] [ 11.0.p2 ] [ 11.0.p3, ] [ 11.0.p4 ] [ 11.1 ] [ 11.1.1 ] [ 11.1.2 ] [ 11.1.3 ] [ 11.2 ] [ 11.2.1 ] [ 11.2.2 ] [ 11.3.0 ]

Diff markup

Differences between /processes/decay/src/G4Decay.cc (Version 11.3.0) and /processes/decay/src/G4Decay.cc (Version 9.5.p1)


  1 //                                                  1 //
  2 // *******************************************      2 // ********************************************************************
  3 // * License and Disclaimer                         3 // * License and Disclaimer                                           *
  4 // *                                                4 // *                                                                  *
  5 // * The  Geant4 software  is  copyright of th      5 // * The  Geant4 software  is  copyright of the Copyright Holders  of *
  6 // * the Geant4 Collaboration.  It is provided      6 // * the Geant4 Collaboration.  It is provided  under  the terms  and *
  7 // * conditions of the Geant4 Software License      7 // * conditions of the Geant4 Software License,  included in the file *
  8 // * LICENSE and available at  http://cern.ch/      8 // * LICENSE and available at  http://cern.ch/geant4/license .  These *
  9 // * include a list of copyright holders.           9 // * include a list of copyright holders.                             *
 10 // *                                               10 // *                                                                  *
 11 // * Neither the authors of this software syst     11 // * Neither the authors of this software system, nor their employing *
 12 // * institutes,nor the agencies providing fin     12 // * institutes,nor the agencies providing financial support for this *
 13 // * work  make  any representation or  warran     13 // * work  make  any representation or  warranty, express or implied, *
 14 // * regarding  this  software system or assum     14 // * regarding  this  software system or assume any liability for its *
 15 // * use.  Please see the license in the file      15 // * use.  Please see the license in the file  LICENSE  and URL above *
 16 // * for the full disclaimer and the limitatio     16 // * for the full disclaimer and the limitation of liability.         *
 17 // *                                               17 // *                                                                  *
 18 // * This  code  implementation is the result      18 // * This  code  implementation is the result of  the  scientific and *
 19 // * technical work of the GEANT4 collaboratio     19 // * technical work of the GEANT4 collaboration.                      *
 20 // * By using,  copying,  modifying or  distri     20 // * By using,  copying,  modifying or  distributing the software (or *
 21 // * any work based  on the software)  you  ag     21 // * any work based  on the software)  you  agree  to acknowledge its *
 22 // * use  in  resulting  scientific  publicati     22 // * use  in  resulting  scientific  publications,  and indicate your *
 23 // * acceptance of all terms of the Geant4 Sof     23 // * acceptance of all terms of the Geant4 Software license.          *
 24 // *******************************************     24 // ********************************************************************
 25 //                                                 25 //
 26 //                                                 26 //
                                                   >>  27 // $Id: G4Decay.cc,v 1.32 2010-10-30 06:51:05 kurasige Exp $
                                                   >>  28 // GEANT4 tag $Name: not supported by cvs2svn $
 27 //                                                 29 //
 28 //                                                 30 // 
 29 // -------------------------------------------     31 // --------------------------------------------------------------
 30 //      GEANT 4 class implementation file          32 //      GEANT 4 class implementation file
 31 //                                                 33 //
 32 //      History: first implementation, based o     34 //      History: first implementation, based on object model of
 33 //      2nd December 1995, G.Cosmo                 35 //      2nd December 1995, G.Cosmo
 34 //      7 July 1996 H.Kurashige                    36 //      7 July 1996 H.Kurashige
 35 // -------------------------------------------     37 // ------------------------------------------------------------
 36 //   remove  BuildPhysicsTable()  28 Nov. 1997     38 //   remove  BuildPhysicsTable()  28 Nov. 1997  H.Kurashige
 37 //   change  DBL_EPSIRON to DBL_MIN 14 Dec. 19     39 //   change  DBL_EPSIRON to DBL_MIN 14 Dec. 1997  H.Kurashige
 38 //   modified for new ParticleChange 12 Mar. 1     40 //   modified for new ParticleChange 12 Mar. 1998  H.Kurashige
 39 //   modified for "GoodForTrackingFlag" 19 Jun     41 //   modified for "GoodForTrackingFlag" 19 June 1998  H.Kurashige
 40 //   rename thePhysicsTable to aPhyscisTable 2     42 //   rename thePhysicsTable to aPhyscisTable 2 Aug. 1998 H.Kurashige
 41 //   modified IsApplicable in order to protect     43 //   modified IsApplicable in order to protect the decay from registered 
 42 //   to resonances    12 Dec. 1998   H.Kurashi     44 //   to resonances    12 Dec. 1998   H.Kurashige 
 43 //   remove G4ParticleMomentum  6 Feb. 99 H.Ku     45 //   remove G4ParticleMomentum  6 Feb. 99 H.Kurashige
 44 //   modified  IsApplicable to activate G4Deca     46 //   modified  IsApplicable to activate G4Decay for resonances  1 Mar. 00 H.Kurashige 
 45 //   Add External Decayer         23 Feb. 2001     47 //   Add External Decayer         23 Feb. 2001  H.Kurashige
 46 //   change LowestBinValue,HighestBinValue and     48 //   change LowestBinValue,HighestBinValue and TotBin(200) 9 Feb. 2002
 47 //                                                 49 //
 48                                                    50 
 49 #include "G4Decay.hh"                              51 #include "G4Decay.hh"
 50                                                << 
 51 #include "G4PhysicalConstants.hh"              << 
 52 #include "G4SystemOfUnits.hh"                  << 
 53 #include "G4DynamicParticle.hh"                    52 #include "G4DynamicParticle.hh"
 54 #include "G4DecayProducts.hh"                      53 #include "G4DecayProducts.hh"
 55 #include "G4DecayTable.hh"                         54 #include "G4DecayTable.hh"
 56 #include "G4VDecayChannel.hh"                      55 #include "G4VDecayChannel.hh"
 57 #include "G4PhysicsLogVector.hh"                   56 #include "G4PhysicsLogVector.hh"
 58 #include "G4ParticleChangeForDecay.hh"             57 #include "G4ParticleChangeForDecay.hh"
 59 #include "G4VExtDecayer.hh"                        58 #include "G4VExtDecayer.hh"
 60                                                    59 
 61 // constructor                                     60 // constructor
 62 G4Decay::G4Decay(const G4String& processName)      61 G4Decay::G4Decay(const G4String& processName)
 63                                :G4VRestDiscret     62                                :G4VRestDiscreteProcess(processName, fDecay),
 64         verboseLevel(1),                           63         verboseLevel(1),
 65                                 HighestValue(2     64                                 HighestValue(20.0),
 66         fRemainderLifeTime(-1.0),                  65         fRemainderLifeTime(-1.0),
 67                                 pExtDecayer(nu <<  66                                 pExtDecayer(0)
 68 {                                                  67 {
 69   // set Process Sub Type                          68   // set Process Sub Type
 70   SetProcessSubType(static_cast<int>(DECAY));      69   SetProcessSubType(static_cast<int>(DECAY));
 71                                                    70 
 72 #ifdef G4VERBOSE                                   71 #ifdef G4VERBOSE
 73   if (GetVerboseLevel()>1) {                       72   if (GetVerboseLevel()>1) {
 74     G4cout << "G4Decay  constructor " << "  Na     73     G4cout << "G4Decay  constructor " << "  Name:" << processName << G4endl;
 75   }                                                74   }
 76 #endif                                             75 #endif
 77                                                    76 
 78   pParticleChange = &fParticleChangeForDecay;      77   pParticleChange = &fParticleChangeForDecay;
 79 }                                                  78 }
 80                                                    79 
 81 G4Decay::~G4Decay()                                80 G4Decay::~G4Decay()
 82 {                                                  81 {
 83   if (pExtDecayer != nullptr) {                <<  82   if (pExtDecayer) {
 84     delete pExtDecayer;                            83     delete pExtDecayer;
 85   }                                                84   }
 86 }                                                  85 }
 87                                                    86 
 88 G4bool G4Decay::IsApplicable(const G4ParticleD     87 G4bool G4Decay::IsApplicable(const G4ParticleDefinition& aParticleType)
 89 {                                                  88 {
 90    // check if the particle is stable?             89    // check if the particle is stable?
 91    if (aParticleType.GetPDGLifeTime() <0.0) {      90    if (aParticleType.GetPDGLifeTime() <0.0) {
 92      return false;                                 91      return false;
 93    } else if (aParticleType.GetPDGMass() <= 0.     92    } else if (aParticleType.GetPDGMass() <= 0.0*MeV) {
 94      return false;                                 93      return false;
 95    } else {                                        94    } else {
 96      return true;                                  95      return true; 
 97    }                                               96    }
 98 }                                                  97 }
 99                                                    98 
100 G4double G4Decay::GetMeanLifeTime(const G4Trac     99 G4double G4Decay::GetMeanLifeTime(const G4Track& aTrack  ,
101                                   G4ForceCondi    100                                   G4ForceCondition*)
102 {                                                 101 {
103    // returns the mean free path in GEANT4 int    102    // returns the mean free path in GEANT4 internal units
104    G4double meanlife;                             103    G4double meanlife;
105                                                   104 
106    // get particle                                105    // get particle 
107    const G4DynamicParticle* aParticle = aTrack    106    const G4DynamicParticle* aParticle = aTrack.GetDynamicParticle();
108    const G4ParticleDefinition* aParticleDef =     107    const G4ParticleDefinition* aParticleDef = aParticle->GetDefinition();
109    G4double aLife = aParticleDef->GetPDGLifeTi    108    G4double aLife = aParticleDef->GetPDGLifeTime();
110                                                   109 
111    // check if the particle is stable?            110    // check if the particle is stable?
112    if (aParticleDef->GetPDGStable()) {            111    if (aParticleDef->GetPDGStable()) {
113     //1000000 times the life time of the unive << 112      meanlife = DBL_MAX;
114      meanlife = 1e24 * s;                      << 
115                                                   113     
116    } else {                                       114    } else {
117      meanlife = aLife;                            115      meanlife = aLife;
118    }                                              116    }
119                                                   117 
120 #ifdef G4VERBOSE                                  118 #ifdef G4VERBOSE
121    if (GetVerboseLevel()>1) {                     119    if (GetVerboseLevel()>1) {
122      G4cout << "mean life time: "<< meanlife/n    120      G4cout << "mean life time: "<< meanlife/ns << "[ns]" << G4endl;
123    }                                              121    }
124 #endif                                            122 #endif
125                                                   123 
126    return  meanlife;                              124    return  meanlife;
127 }                                                 125 }
128                                                   126 
129 G4double G4Decay::GetMeanFreePath(const G4Trac    127 G4double G4Decay::GetMeanFreePath(const G4Track& aTrack,G4double, G4ForceCondition*)
130 {                                                 128 {
131    // get particle                                129    // get particle 
132    const G4DynamicParticle* aParticle = aTrack    130    const G4DynamicParticle* aParticle = aTrack.GetDynamicParticle();
133    const G4ParticleDefinition* aParticleDef =     131    const G4ParticleDefinition* aParticleDef = aParticle->GetDefinition();
134    G4double aMass = aParticle->GetMass();         132    G4double aMass = aParticle->GetMass();
135    G4double aLife = aParticleDef->GetPDGLifeTi    133    G4double aLife = aParticleDef->GetPDGLifeTime();
136                                                   134 
137                                                   135 
138     // returns the mean free path in GEANT4 in    136     // returns the mean free path in GEANT4 internal units
139    G4double pathlength;                           137    G4double pathlength;
140    G4double aCtau = c_light * aLife;              138    G4double aCtau = c_light * aLife;
141                                                   139 
142    // check if the particle is stable?            140    // check if the particle is stable?
143    if (aParticleDef->GetPDGStable()) {            141    if (aParticleDef->GetPDGStable()) {
144      pathlength = DBL_MAX;                        142      pathlength = DBL_MAX;
145                                                   143 
146    //check if the particle has very short life    144    //check if the particle has very short life time ?
147    } else if (aCtau < DBL_MIN) {                  145    } else if (aCtau < DBL_MIN) { 
148      pathlength =  DBL_MIN;                       146      pathlength =  DBL_MIN;
149                                                   147  
150    } else {                                       148    } else {
151     //calculate the mean free path                149     //calculate the mean free path 
152     // by using normalized kinetic energy (= E    150     // by using normalized kinetic energy (= Ekin/mass)
153      G4double   rKineticEnergy = aParticle->Ge    151      G4double   rKineticEnergy = aParticle->GetKineticEnergy()/aMass; 
154      if ( rKineticEnergy > HighestValue) {        152      if ( rKineticEnergy > HighestValue) {
155        // gamma >>  1                             153        // gamma >>  1
156        pathlength = ( rKineticEnergy + 1.0)* a    154        pathlength = ( rKineticEnergy + 1.0)* aCtau;
157      } else if ( rKineticEnergy < DBL_MIN ) {     155      } else if ( rKineticEnergy < DBL_MIN ) {
158        // too slow particle                       156        // too slow particle
159 #ifdef G4VERBOSE                                  157 #ifdef G4VERBOSE
160        if (GetVerboseLevel()>1) {                 158        if (GetVerboseLevel()>1) {
161    G4cout << "G4Decay::GetMeanFreePath()   !!p    159    G4cout << "G4Decay::GetMeanFreePath()   !!particle stops!!";
162          G4cout << aParticleDef->GetParticleNa    160          G4cout << aParticleDef->GetParticleName() << G4endl;
163    G4cout << "KineticEnergy:" << aParticle->Ge    161    G4cout << "KineticEnergy:" << aParticle->GetKineticEnergy()/GeV <<"[GeV]";
164        }                                          162        }
165 #endif                                            163 #endif
166        pathlength = DBL_MIN;                      164        pathlength = DBL_MIN;
167      } else {                                     165      } else {
168        // beta <1                                 166        // beta <1 
169        pathlength = (aParticle->GetTotalMoment    167        pathlength = (aParticle->GetTotalMomentum())/aMass*aCtau ;
170      }                                            168      }
171    }                                              169    }
172   return  pathlength;                             170   return  pathlength;
173 }                                                 171 }
174                                                   172 
175 void G4Decay::BuildPhysicsTable(const G4Partic    173 void G4Decay::BuildPhysicsTable(const G4ParticleDefinition&)
176 {                                                 174 {
177   return;                                         175   return;
178 }                                                 176 }
179                                                   177 
180 G4VParticleChange* G4Decay::DecayIt(const G4Tr    178 G4VParticleChange* G4Decay::DecayIt(const G4Track& aTrack, const G4Step& )
181 {                                                 179 {
182   // The DecayIt() method returns by pointer a    180   // The DecayIt() method returns by pointer a particle-change object.
183   // Units are expressed in GEANT4 internal un    181   // Units are expressed in GEANT4 internal units.
184                                                   182 
185   //   Initialize ParticleChange                  183   //   Initialize ParticleChange
186   //     all members of G4VParticleChange are     184   //     all members of G4VParticleChange are set to equal to 
187   //     corresponding member in G4Track          185   //     corresponding member in G4Track
188   fParticleChangeForDecay.Initialize(aTrack);     186   fParticleChangeForDecay.Initialize(aTrack);
189                                                   187 
190   // get particle                                 188   // get particle 
191   const G4DynamicParticle* aParticle = aTrack.    189   const G4DynamicParticle* aParticle = aTrack.GetDynamicParticle();
192   const G4ParticleDefinition* aParticleDef = a    190   const G4ParticleDefinition* aParticleDef = aParticle->GetDefinition();
193                                                   191 
194   // check if  the particle is stable             192   // check if  the particle is stable
195   if (aParticleDef->GetPDGStable()) return &fP    193   if (aParticleDef->GetPDGStable()) return &fParticleChangeForDecay ;
196                                                   194  
197                                                   195 
198   //check if thePreAssignedDecayProducts exist    196   //check if thePreAssignedDecayProducts exists
199   const G4DecayProducts* o_products = (aPartic    197   const G4DecayProducts* o_products = (aParticle->GetPreAssignedDecayProducts());
200   G4bool isPreAssigned = (o_products != nullpt << 198   G4bool isPreAssigned = (o_products != 0);   
201   G4DecayProducts* products = nullptr;         << 199   G4DecayProducts* products = 0;
202                                                   200 
203   // decay table                                  201   // decay table
204   G4DecayTable   *decaytable = aParticleDef->G    202   G4DecayTable   *decaytable = aParticleDef->GetDecayTable();
205                                                   203  
206   // check if external decayer exists             204   // check if external decayer exists
207   G4bool isExtDecayer = (decaytable == nullptr << 205   G4bool isExtDecayer = (decaytable == 0) && (pExtDecayer !=0);
208                                                   206 
209   // Error due to NO Decay Table                  207   // Error due to NO Decay Table 
210   if ( (decaytable == nullptr) && !isExtDecaye << 208   if ( (decaytable == 0) && !isExtDecayer &&!isPreAssigned ){
211     if (GetVerboseLevel()>0) {                    209     if (GetVerboseLevel()>0) {
212       G4cout <<  "G4Decay::DoIt  : decay table    210       G4cout <<  "G4Decay::DoIt  : decay table not defined  for ";
213       G4cout << aParticle->GetDefinition()->Ge    211       G4cout << aParticle->GetDefinition()->GetParticleName()<< G4endl;
214     }                                             212     }
215     G4ExceptionDescription ed;                 << 
216     ed << "For " << aParticle->GetDefinition() << 
217        << " decay probability exist but decay  << 
218        << "- the particle will be killed;\n"   << 
219        << "    isExtDecayer: " << isExtDecayer << 
220        << "; isPreAssigned: " << isPreAssigned << 
221     G4Exception( "G4Decay::DecayIt ",             213     G4Exception( "G4Decay::DecayIt ",
222                  "DECAY101",JustWarning, ed);  << 214                  "DECAY101",JustWarning, 
                                                   >> 215                  "Decay table is not defined");
223                                                   216 
224     fParticleChangeForDecay.SetNumberOfSeconda    217     fParticleChangeForDecay.SetNumberOfSecondaries(0);
225     // Kill the parent particle                   218     // Kill the parent particle
226     fParticleChangeForDecay.ProposeTrackStatus    219     fParticleChangeForDecay.ProposeTrackStatus( fStopAndKill ) ;
227     fParticleChangeForDecay.ProposeLocalEnergy    220     fParticleChangeForDecay.ProposeLocalEnergyDeposit(0.0); 
228                                                   221     
229     ClearNumberOfInteractionLengthLeft();         222     ClearNumberOfInteractionLengthLeft();
230     return &fParticleChangeForDecay ;             223     return &fParticleChangeForDecay ;
231   }                                               224   }
232                                                   225 
233   if (isPreAssigned) {                            226   if (isPreAssigned) {
234     // copy decay products                        227     // copy decay products 
235     products = new G4DecayProducts(*o_products    228     products = new G4DecayProducts(*o_products); 
236   } else if ( isExtDecayer ) {                    229   } else if ( isExtDecayer ) {
237     // decay according to external decayer        230     // decay according to external decayer
238     products = pExtDecayer->ImportDecayProduct    231     products = pExtDecayer->ImportDecayProducts(aTrack);
239   } else {                                        232   } else {
240     // Decay according to decay table.         << 233     // decay acoording to decay table
241     // Keep trying to choose a candidate decay << 234     // choose a decay channel
242     // of the decaying particle is below the s << 235     G4VDecayChannel *decaychannel = decaytable->SelectADecayChannel();
243     // candidate daughter particles.           << 236     if (decaychannel == 0 ){
244     // This is needed because the decay table  << 
245     // the assumption of nominal PDG masses, b << 
246     // a dynamic masses well below its nominal << 
247     // some of its decay channels can be below << 
248     // Note that, for simplicity, we ignore he << 
249     // one or more of the candidate daughter p << 
250     // wide resonance. However, if this is the << 
251     // accepted, then the masses of the resona << 
252     // be sampled by taking into account their << 
253     G4VDecayChannel* decaychannel = nullptr;   << 
254     G4double massParent = aParticle->GetMass() << 
255     decaychannel = decaytable->SelectADecayCha << 
256     if ( decaychannel == nullptr) {            << 
257       // decay channel not found                  237       // decay channel not found
258      G4ExceptionDescription ed;                << 238       G4Exception("G4Decay::DoIt", "DECAY003", FatalException,
259       ed << "Can not determine decay channel f << 239                   " can not determine decay channel ");
260    << aParticleDef->GetParticleName() << G4end << 
261    << "  mass of dynamic particle: "           << 
262    << massParent/GeV << " (GEV)" << G4endl     << 
263    << "  dacay table has " << decaytable->entr << 
264    << " entries" << G4endl;                    << 
265       G4double checkedmass=massParent;         << 
266       if (massParent < 0.) {                   << 
267   checkedmass=aParticleDef->GetPDGMass();      << 
268   ed << "Using PDG mass ("<<checkedmass/GeV    << 
269      << "(GeV)) in IsOKWithParentMass" << G4en << 
270       }                                        << 
271       for (G4int ic =0;ic <decaytable->entries << 
272   G4VDecayChannel * dc= decaytable->GetDecayCh << 
273   ed << ic << ": BR " << dc->GetBR() << ", IsO << 
274      << dc->IsOKWithParentMass(checkedmass)    << 
275      << ", --> ";                              << 
276   G4int ndaughters=dc->GetNumberOfDaughters(); << 
277   for (G4int id=0;id<ndaughters;++id) {        << 
278     if (id>0) ed << " + ";   // seperator, exc << 
279     ed << dc->GetDaughterName(id);             << 
280   }                                            << 
281   ed << G4endl;                                << 
282       }                                        << 
283       G4Exception("G4Decay::DoIt", "DECAY003", << 
284     } else {                                      240     } else {
285       // execute DecayIt()                        241       // execute DecayIt() 
286 #ifdef G4VERBOSE                                  242 #ifdef G4VERBOSE
287       G4int temp = decaychannel->GetVerboseLev    243       G4int temp = decaychannel->GetVerboseLevel();
288       if (GetVerboseLevel()>1) {                  244       if (GetVerboseLevel()>1) {
289   G4cout << "G4Decay::DoIt  : selected decay c << 245   G4cout << "G4Decay::DoIt  : selected decay channel  addr:" << decaychannel <<G4endl;
290          << decaychannel <<G4endl;             << 
291   decaychannel->SetVerboseLevel(GetVerboseLeve    246   decaychannel->SetVerboseLevel(GetVerboseLevel());
292       }                                           247       }
293 #endif                                            248 #endif
294       products = decaychannel->DecayIt(aPartic    249       products = decaychannel->DecayIt(aParticle->GetMass());
295 #ifdef G4VERBOSE                                  250 #ifdef G4VERBOSE
296       if (GetVerboseLevel()>1) {                  251       if (GetVerboseLevel()>1) {
297   decaychannel->SetVerboseLevel(temp);            252   decaychannel->SetVerboseLevel(temp);
298       }                                           253       }
299 #endif                                            254 #endif
300 #ifdef G4VERBOSE                                  255 #ifdef G4VERBOSE
301       if (GetVerboseLevel()>2) {                  256       if (GetVerboseLevel()>2) {
302   if (! products->IsChecked() ) products->Dump    257   if (! products->IsChecked() ) products->DumpInfo();
303       }                                           258       }
304 #endif                                            259 #endif
305     }                                             260     }
306   }                                               261   }
307                                                   262   
308   // get parent particle information .........    263   // get parent particle information ...................................
309   G4double   ParentEnergy  = aParticle->GetTot    264   G4double   ParentEnergy  = aParticle->GetTotalEnergy();
310   G4double   ParentMass    = aParticle->GetMas    265   G4double   ParentMass    = aParticle->GetMass();
311   if (ParentEnergy < ParentMass) {                266   if (ParentEnergy < ParentMass) {
312     G4ExceptionDescription ed;                 << 267     if (GetVerboseLevel()>0) {
313     ed << "Total Energy is less than its mass  << 268       G4cout << "G4Decay::DoIt  : Total Energy is less than its mass" << G4endl;
314        << "\n Particle: " << aParticle->GetDef << 269       G4cout << " Particle: " << aParticle->GetDefinition()->GetParticleName();
315        << "\n Energy:"    << ParentEnergy/MeV  << 270       G4cout << " Energy:"    << ParentEnergy/MeV << "[MeV]";
316        << "\n Mass:"      << ParentMass/MeV << << 271       G4cout << " Mass:"    << ParentMass/MeV << "[MeV]";
                                                   >> 272       G4cout << G4endl;
                                                   >> 273     }
317     G4Exception( "G4Decay::DecayIt ",             274     G4Exception( "G4Decay::DecayIt ",
318                  "DECAY102",JustWarning, ed);  << 275                  "DECAY102",JustWarning, 
                                                   >> 276                  "Total Energy is less than its mass");
319     ParentEnergy = ParentMass;                    277     ParentEnergy = ParentMass;
320   }                                               278   }
321                                                   279 
322   G4ThreeVector ParentDirection(aParticle->Get    280   G4ThreeVector ParentDirection(aParticle->GetMomentumDirection());
323                                                   281 
324   //boost all decay products to laboratory fra    282   //boost all decay products to laboratory frame
325   G4double energyDeposit = 0.0;                   283   G4double energyDeposit = 0.0;
326   G4double finalGlobalTime = aTrack.GetGlobalT    284   G4double finalGlobalTime = aTrack.GetGlobalTime();
327   G4double finalLocalTime = aTrack.GetLocalTim    285   G4double finalLocalTime = aTrack.GetLocalTime();
328   if (aTrack.GetTrackStatus() == fStopButAlive    286   if (aTrack.GetTrackStatus() == fStopButAlive ){
329     // AtRest case                                287     // AtRest case
330     finalGlobalTime += fRemainderLifeTime;        288     finalGlobalTime += fRemainderLifeTime;
331     finalLocalTime += fRemainderLifeTime;         289     finalLocalTime += fRemainderLifeTime;
332     energyDeposit += aParticle->GetKineticEner    290     energyDeposit += aParticle->GetKineticEnergy();
333     if (isPreAssigned) products->Boost( Parent    291     if (isPreAssigned) products->Boost( ParentEnergy, ParentDirection);
334   } else {                                        292   } else {
335     // PostStep case                              293     // PostStep case
336     if (!isExtDecayer) products->Boost( Parent    294     if (!isExtDecayer) products->Boost( ParentEnergy, ParentDirection);
337   }                                               295   }
                                                   >> 296 
338    // set polarization for daughter particles     297    // set polarization for daughter particles
339    DaughterPolarization(aTrack, products);        298    DaughterPolarization(aTrack, products);
340                                                   299 
341                                                   300 
342   //add products in fParticleChangeForDecay       301   //add products in fParticleChangeForDecay
343   G4int numberOfSecondaries = products->entrie    302   G4int numberOfSecondaries = products->entries();
344   fParticleChangeForDecay.SetNumberOfSecondari    303   fParticleChangeForDecay.SetNumberOfSecondaries(numberOfSecondaries);
345 #ifdef G4VERBOSE                                  304 #ifdef G4VERBOSE
346   if (GetVerboseLevel()>1) {                      305   if (GetVerboseLevel()>1) {
347     G4cout << "G4Decay::DoIt  : Decay vertex :    306     G4cout << "G4Decay::DoIt  : Decay vertex :";
348     G4cout << " Time: " << finalGlobalTime/ns     307     G4cout << " Time: " << finalGlobalTime/ns << "[ns]";
349     G4cout << " X:" << (aTrack.GetPosition()).    308     G4cout << " X:" << (aTrack.GetPosition()).x() /cm << "[cm]";
350     G4cout << " Y:" << (aTrack.GetPosition()).    309     G4cout << " Y:" << (aTrack.GetPosition()).y() /cm << "[cm]";
351     G4cout << " Z:" << (aTrack.GetPosition()).    310     G4cout << " Z:" << (aTrack.GetPosition()).z() /cm << "[cm]";
352     G4cout << G4endl;                             311     G4cout << G4endl;
353     G4cout << "G4Decay::DoIt  : decay products    312     G4cout << "G4Decay::DoIt  : decay products in Lab. Frame" << G4endl;
354     products->DumpInfo();                         313     products->DumpInfo();
355   }                                               314   }
356 #endif                                            315 #endif
357   G4int index;                                    316   G4int index;
358   G4ThreeVector currentPosition;                  317   G4ThreeVector currentPosition;
359   const G4TouchableHandle thand = aTrack.GetTo    318   const G4TouchableHandle thand = aTrack.GetTouchableHandle();
360   for (index=0; index < numberOfSecondaries; i << 319   for (index=0; index < numberOfSecondaries; index++)
361     // get current position of the track       << 320   {
362     currentPosition = aTrack.GetPosition();    << 321      // get current position of the track
363     // create a new track object               << 322      currentPosition = aTrack.GetPosition();
364     G4Track* secondary = new G4Track( products << 323      // create a new track object
                                                   >> 324      G4Track* secondary = new G4Track( products->PopProducts(),
365               finalGlobalTime ,                   325               finalGlobalTime ,
366               currentPosition );                  326               currentPosition );
367     // switch on good for tracking flag        << 327      // switch on good for tracking flag
368     secondary->SetGoodForTrackingFlag();       << 328      secondary->SetGoodForTrackingFlag();
369     secondary->SetTouchableHandle(thand);      << 329      secondary->SetTouchableHandle(thand);
370     // add the secondary track in the List     << 330      // add the secondary track in the List
371     fParticleChangeForDecay.AddSecondary(secon << 331      fParticleChangeForDecay.AddSecondary(secondary);
372   }                                               332   }
373   delete products;                                333   delete products;
374                                                << 334 
375   // Kill the parent particle                     335   // Kill the parent particle
376   fParticleChangeForDecay.ProposeTrackStatus(     336   fParticleChangeForDecay.ProposeTrackStatus( fStopAndKill ) ;
377   fParticleChangeForDecay.ProposeLocalEnergyDe    337   fParticleChangeForDecay.ProposeLocalEnergyDeposit(energyDeposit); 
378   fParticleChangeForDecay.ProposeLocalTime( fi    338   fParticleChangeForDecay.ProposeLocalTime( finalLocalTime );
379                                                << 339 
380   // Clear NumberOfInteractionLengthLeft          340   // Clear NumberOfInteractionLengthLeft
381   ClearNumberOfInteractionLengthLeft();           341   ClearNumberOfInteractionLengthLeft();
382                                                << 342 
383   return &fParticleChangeForDecay ;               343   return &fParticleChangeForDecay ;
384 }                                                 344 } 
385                                                   345 
386 void G4Decay::DaughterPolarization(const G4Tra    346 void G4Decay::DaughterPolarization(const G4Track& , G4DecayProducts* )
387 {                                                 347 {
388   // empty implementation                      << 
389 }                                                 348 }
390                                                   349 
391                                                   350 
392                                                   351 
393 void G4Decay::StartTracking(G4Track*)             352 void G4Decay::StartTracking(G4Track*)
394 {                                                 353 {
395   currentInteractionLength = -1.0;                354   currentInteractionLength = -1.0;
396   ResetNumberOfInteractionLengthLeft();           355   ResetNumberOfInteractionLengthLeft();
397                                                   356  
398   fRemainderLifeTime = -1.0;                      357   fRemainderLifeTime = -1.0;
399 }                                                 358 }
400                                                   359 
401 void G4Decay::EndTracking()                       360 void G4Decay::EndTracking()
402 {                                                 361 {
403   // Clear NumberOfInteractionLengthLeft          362   // Clear NumberOfInteractionLengthLeft
404   ClearNumberOfInteractionLengthLeft();           363   ClearNumberOfInteractionLengthLeft();
405                                                   364 
406   currentInteractionLength = -1.0;                365   currentInteractionLength = -1.0;
407 }                                                 366 }
408                                                   367 
409                                                   368 
410 G4double G4Decay::PostStepGetPhysicalInteracti    369 G4double G4Decay::PostStepGetPhysicalInteractionLength(
411                              const G4Track& tr    370                              const G4Track& track,
412                              G4double   previo    371                              G4double   previousStepSize,
413                              G4ForceCondition*    372                              G4ForceCondition* condition
414                             )                     373                             )
415 {                                                 374 {
                                                   >> 375  
416    // condition is set to "Not Forced"            376    // condition is set to "Not Forced"
417   *condition = NotForced;                         377   *condition = NotForced;
418                                                   378 
419    // pre-assigned Decay time                     379    // pre-assigned Decay time
420   G4double pTime = track.GetDynamicParticle()-    380   G4double pTime = track.GetDynamicParticle()->GetPreAssignedDecayProperTime();
421   G4double aLife = track.GetDynamicParticle()-    381   G4double aLife = track.GetDynamicParticle()->GetDefinition()->GetPDGLifeTime();
422                                                   382 
423   if (pTime < 0.) {                               383   if (pTime < 0.) {
424     // normal case                                384     // normal case 
425     if ( previousStepSize > 0.0){                 385     if ( previousStepSize > 0.0){
426       // subtract NumberOfInteractionLengthLef    386       // subtract NumberOfInteractionLengthLeft 
427       SubtractNumberOfInteractionLengthLeft(pr    387       SubtractNumberOfInteractionLengthLeft(previousStepSize);
428       if(theNumberOfInteractionLengthLeft<0.){    388       if(theNumberOfInteractionLengthLeft<0.){
429   theNumberOfInteractionLengthLeft=perMillion;    389   theNumberOfInteractionLengthLeft=perMillion;
430       }                                           390       }
431       fRemainderLifeTime = theNumberOfInteract    391       fRemainderLifeTime = theNumberOfInteractionLengthLeft*aLife;
432     }                                             392     }
433     // get mean free path                         393     // get mean free path
434     currentInteractionLength = GetMeanFreePath    394     currentInteractionLength = GetMeanFreePath(track, previousStepSize, condition);
435                                                   395     
436 #ifdef G4VERBOSE                                  396 #ifdef G4VERBOSE
437     if ((currentInteractionLength <=0.0) || (v    397     if ((currentInteractionLength <=0.0) || (verboseLevel>2)){
438       G4cout << "G4Decay::PostStepGetPhysicalI    398       G4cout << "G4Decay::PostStepGetPhysicalInteractionLength " << G4endl;
439       track.GetDynamicParticle()->DumpInfo();     399       track.GetDynamicParticle()->DumpInfo();
440       G4cout << " in Material  " << track.GetM    400       G4cout << " in Material  " << track.GetMaterial()->GetName() <<G4endl;
441       G4cout << "MeanFreePath = " << currentIn    401       G4cout << "MeanFreePath = " << currentInteractionLength/cm << "[cm]" <<G4endl;
442     }                                             402     }
443 #endif                                            403 #endif
444                                                   404 
445     G4double value;                               405     G4double value;
446     if (currentInteractionLength <DBL_MAX) {      406     if (currentInteractionLength <DBL_MAX) {
447       value = theNumberOfInteractionLengthLeft    407       value = theNumberOfInteractionLengthLeft * currentInteractionLength;
448       //fRemainderLifeTime = theNumberOfIntera << 
449     } else {                                      408     } else {
450       value = DBL_MAX;                            409       value = DBL_MAX;
451     }                                             410     }
452                                                   411 
453     return value;                                 412     return value;
454                                                   413 
455   } else {                                        414   } else {
456     //pre-assigned Decay time case                415     //pre-assigned Decay time case
457     // reminder proper time                       416     // reminder proper time
458     fRemainderLifeTime = pTime - track.GetProp    417     fRemainderLifeTime = pTime - track.GetProperTime();
459     if (fRemainderLifeTime <= 0.0) fRemainderL << 418     if (fRemainderLifeTime <= 0.0) fRemainderLifeTime = DBL_MIN;
460                                                   419     
461     G4double  rvalue=0.0;                         420     G4double  rvalue=0.0; 
462     // use pre-assigned Decay time to determin    421     // use pre-assigned Decay time to determine PIL
463     if (aLife>0.0) {                              422     if (aLife>0.0) {
464       // ordinary particle                        423       // ordinary particle
465       rvalue = (fRemainderLifeTime/aLife)*GetM    424       rvalue = (fRemainderLifeTime/aLife)*GetMeanFreePath(track, previousStepSize, condition);
466     } else {                                      425     } else {
467      // shortlived particle                       426      // shortlived particle
468       rvalue = c_light * fRemainderLifeTime;      427       rvalue = c_light * fRemainderLifeTime;
469      // by using normalized kinetic energy (=     428      // by using normalized kinetic energy (= Ekin/mass)
470      G4double   aMass =  track.GetDynamicParti    429      G4double   aMass =  track.GetDynamicParticle()->GetMass();
471      rvalue *= track.GetDynamicParticle()->Get    430      rvalue *= track.GetDynamicParticle()->GetTotalMomentum()/aMass;
472     }                                             431     }
473     return rvalue;                                432     return rvalue;
474   }                                               433   }
475 }                                                 434 }
476                                                   435 
477 G4double G4Decay::AtRestGetPhysicalInteraction    436 G4double G4Decay::AtRestGetPhysicalInteractionLength(
478                              const G4Track& tr    437                              const G4Track& track,
479                              G4ForceCondition*    438                              G4ForceCondition* condition
480                             )                     439                             )
481 {                                                 440 {
482      // condition is set to "Not Forced"          441      // condition is set to "Not Forced"
483   *condition = NotForced;                         442   *condition = NotForced;
484                                                   443 
485   G4double pTime = track.GetDynamicParticle()-    444   G4double pTime = track.GetDynamicParticle()->GetPreAssignedDecayProperTime();
486   if (pTime >= 0.) {                              445   if (pTime >= 0.) {
487     fRemainderLifeTime = pTime - track.GetProp    446     fRemainderLifeTime = pTime - track.GetProperTime();
488     if (fRemainderLifeTime <= 0.0) fRemainderL    447     if (fRemainderLifeTime <= 0.0) fRemainderLifeTime = DBL_MIN;
489   } else {                                        448   } else {
490     fRemainderLifeTime =                          449     fRemainderLifeTime = 
491       theNumberOfInteractionLengthLeft * GetMe    450       theNumberOfInteractionLengthLeft * GetMeanLifeTime(track, condition);
492   }                                               451   }
493   return fRemainderLifeTime;                      452   return fRemainderLifeTime;
494 }                                                 453 }
495                                                   454 
496                                                   455 
497 void G4Decay::SetExtDecayer(G4VExtDecayer* val    456 void G4Decay::SetExtDecayer(G4VExtDecayer* val)
498 {                                                 457 {
499   pExtDecayer = val;                              458   pExtDecayer = val;
500                                                   459 
501   // set Process Sub Type                         460   // set Process Sub Type
502   if ( pExtDecayer !=0 ) {                        461   if ( pExtDecayer !=0 ) {
503     SetProcessSubType(static_cast<int>(DECAY_E    462     SetProcessSubType(static_cast<int>(DECAY_External));
504   }                                               463   }
505 }                                              << 
506                                                << 
507 G4VParticleChange* G4Decay::PostStepDoIt(      << 
508            const G4Track& aTrack,              << 
509            const G4Step&  aStep                << 
510           )                                    << 
511 {                                              << 
512   if ( (aTrack.GetTrackStatus() == fStopButAli << 
513        (aTrack.GetTrackStatus() == fStopAndKil << 
514     fParticleChangeForDecay.Initialize(aTrack) << 
515     return &fParticleChangeForDecay;           << 
516   } else {                                     << 
517     return DecayIt(aTrack, aStep);             << 
518   }                                            << 
519 }                                              << 
520                                                << 
521 void G4Decay::ProcessDescription(std::ostream& << 
522 {                                              << 
523   outFile << GetProcessName() << ": Decay of p << 
524     << "kinematics of daughters are dertermine << 
525           << " or by PreAssignedDecayProducts\ << 
526 }                                                 464 }
527                                                   465