Geant4 Cross Reference |
1 // 1 2 // ******************************************* 3 // * License and Disclaimer 4 // * 5 // * The Geant4 software is copyright of th 6 // * the Geant4 Collaboration. It is provided 7 // * conditions of the Geant4 Software License 8 // * LICENSE and available at http://cern.ch/ 9 // * include a list of copyright holders. 10 // * 11 // * Neither the authors of this software syst 12 // * institutes,nor the agencies providing fin 13 // * work make any representation or warran 14 // * regarding this software system or assum 15 // * use. Please see the license in the file 16 // * for the full disclaimer and the limitatio 17 // * 18 // * This code implementation is the result 19 // * technical work of the GEANT4 collaboratio 20 // * By using, copying, modifying or distri 21 // * any work based on the software) you ag 22 // * use in resulting scientific publicati 23 // * acceptance of all terms of the Geant4 Sof 24 // ******************************************* 25 // 26 // 27 //-------------------------------------------- 28 // 29 // ClassName: G4QGSBinaryProtonBuilder 30 // 31 // Author: 2006 G.Folger 32 // 33 // Modified: 34 // 30.03.2009 V.Ivanchenko create cross sectio 35 // 36 //-------------------------------------------- 37 // 38 #include "G4QGSBinaryProtonBuilder.hh" 39 #include "G4SystemOfUnits.hh" 40 #include "G4ParticleDefinition.hh" 41 #include "G4ParticleTable.hh" 42 #include "G4ProcessManager.hh" 43 #include "G4BGGNucleonInelasticXS.hh" 44 #include "G4HadronicParameters.hh" 45 46 G4QGSBinaryProtonBuilder::G4QGSBinaryProtonBui 47 { 48 theMin = G4HadronicParameters::Instance()-> 49 theModel = new G4TheoFSGenerator("QGSB"); 50 51 G4QGSModel< G4QGSParticipants >* theStringM 52 new G4QGSModel< G4QGSParticipants >; 53 G4ExcitedStringDecay* theStringDecay = 54 new G4ExcitedStringDecay(new G4QGSMFragme 55 theStringModel->SetFragmentationModel(theSt 56 57 theModel->SetTransport(new G4BinaryCascade( 58 theModel->SetHighEnergyGenerator(theStringM 59 if (quasiElastic) 60 { 61 theModel->SetQuasiElasticChannel(new G4Qu 62 } 63 } 64 65 void G4QGSBinaryProtonBuilder:: 66 Build(G4HadronInelasticProcess * aP) 67 { 68 aP->AddDataSet(new G4BGGNucleonInelasticXS( 69 theModel->SetMinEnergy(theMin); 70 theModel->SetMaxEnergy( G4HadronicParameter 71 aP->RegisterMe(theModel); 72 } 73 74 G4QGSBinaryProtonBuilder::~G4QGSBinaryProtonBu 75 { 76 } 77