Geant4 Cross Reference

Cross-Referencing   Geant4
Geant4/processes/hadronic/models/inclxx/incl_physics/src/G4INCLCDPP.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/hadronic/models/inclxx/incl_physics/src/G4INCLCDPP.cc (Version 11.3.0) and /processes/hadronic/models/inclxx/incl_physics/src/G4INCLCDPP.cc (Version 9.6.p3)


  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 // INCL++ intra-nuclear cascade model              26 // INCL++ intra-nuclear cascade model
 27 // Alain Boudard, CEA-Saclay, France           <<  27 // Pekka Kaitaniemi, CEA and Helsinki Institute of Physics
 28 // Joseph Cugnon, University of Liege, Belgium <<  28 // Davide Mancusi, CEA
 29 // Jean-Christophe David, CEA-Saclay, France   <<  29 // Alain Boudard, CEA
 30 // Pekka Kaitaniemi, CEA-Saclay, France, and H <<  30 // Sylvie Leray, CEA
 31 // Sylvie Leray, CEA-Saclay, France            <<  31 // Joseph Cugnon, University of Liege
 32 // Davide Mancusi, CEA-Saclay, France          << 
 33 //                                                 32 //
 34 #define INCLXX_IN_GEANT4_MODE 1                    33 #define INCLXX_IN_GEANT4_MODE 1
 35                                                    34 
 36 #include "globals.hh"                              35 #include "globals.hh"
 37                                                    36 
 38 #include "G4INCLCDPP.hh"                           37 #include "G4INCLCDPP.hh"
 39 #include <functional>                          << 
 40 #include <algorithm>                           << 
 41                                                    38 
 42 namespace G4INCL {                                 39 namespace G4INCL {
 43                                                    40 
 44   CDPP::CDPP() :                               <<  41   CDPP::CDPP() {}
 45     Sk(0.0),                                   << 
 46     TbelowTf(0.0),                             << 
 47     thePotential(NULL)                         << 
 48   {}                                           << 
 49                                                    42 
 50   CDPP::~CDPP() {}                                 43   CDPP::~CDPP() {}
 51                                                    44 
 52   G4bool CDPP::isBlocked(ParticleList const &c <<  45   G4bool CDPP::isBlocked(ParticleList const created, Nucleus const * const nucleus) const {
 53     G4double S = nucleus->computeSeparationEne     46     G4double S = nucleus->computeSeparationEnergyBalance();
 54                                                    47 
 55     thePotential = nucleus->getPotential();    <<  48     const G4double Sp = nucleus->getPotential()->getSeparationEnergy(Proton);
                                                   >>  49     const G4double Sn = nucleus->getPotential()->getSeparationEnergy(Neutron);
 56                                                    50 
 57     ParticleList const &remnantParticles = nuc <<  51     ParticleList remnantParticles = nucleus->getStore()->getParticles();
                                                   >>  52     remnantParticles.insert(remnantParticles.end(), created.begin(), created.end());
 58                                                    53 
 59     Sk = 0.0;                                  <<  54     G4double Sk = 0.0;
 60     TbelowTf = 0.0;                            <<  55     G4double TbelowTf = 0.0;
 61                                                <<  56     for(ParticleIter i = remnantParticles.begin(); i != remnantParticles.end();
 62     std::for_each(remnantParticles.begin(), re <<  57         ++i) {
 63                   [this](Particle const * cons <<  58 
 64                   );                           <<  59       if((*i)->isNucleon()) {
 65     std::for_each(created.begin(), created.end <<  60         const G4double Tf = nucleus->getPotential()->getFermiEnergy(*i);
 66                   [this](Particle const * cons <<  61         const G4double T = (*i)->getKineticEnergy();
 67                   );                           <<  62 
 68                                                <<  63         if(T > Tf) {
 69     const G4double Tinitial = nucleus->getInit <<  64           const G4double sep = nucleus->getPotential()->getSeparationEnergy(*i);
 70     const G4double Eblock = TbelowTf - Tinitia <<  65           Sk += sep;
                                                   >>  66         } else {
                                                   >>  67           TbelowTf += T - (*i)->getPotentialEnergy();
                                                   >>  68         }
                                                   >>  69       } else if((*i)->isResonance()) {
                                                   >>  70         const G4double Tf = nucleus->getPotential()->getFermiEnergy(*i);
                                                   >>  71         const G4double T = (*i)->getKineticEnergy();
                                                   >>  72 
                                                   >>  73         if(T > Tf) {
                                                   >>  74           const G4double sep = nucleus->getPotential()->getSeparationEnergy(*i);
                                                   >>  75           Sk += sep;
                                                   >>  76         } else { // Ugly! We should use total energies everywhere!
                                                   >>  77           TbelowTf += (*i)->getEnergy() - ParticleTable::getINCLMass(Proton) - (*i)->getPotentialEnergy();
                                                   >>  78         }
                                                   >>  79       } else if((*i)->getType() == PiPlus)
                                                   >>  80         Sk += Sp - Sn;
                                                   >>  81       else if((*i)->getType() == PiMinus)
                                                   >>  82         Sk += Sn - Sp;
                                                   >>  83 
                                                   >>  84     }
                                                   >>  85     G4double Tinitial = nucleus->getInitialInternalEnergy();
                                                   >>  86     G4double Eblock = TbelowTf - Tinitial - Sk - S;
 71                                                    87 
 72     return (Eblock < 0.0);                         88     return (Eblock < 0.0);
 73   }                                                89   }
 74 }                                                  90 }
 75                                                    91