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: G4FTFPProtonBuilder 30 // 31 // Author: 2002 J.P. Wellisch 32 // 33 // Modified: 34 // 18.11.2010 G.Folger, use G4CrossSectionPair 35 // section at high energies. 36 // 30.03.2009 V.Ivanchenko create cross sectio 37 // 38 //-------------------------------------------- 39 // 40 #include "G4FTFPProtonBuilder.hh" 41 #include "G4SystemOfUnits.hh" 42 #include "G4ParticleDefinition.hh" 43 #include "G4ParticleTable.hh" 44 #include "G4ProcessManager.hh" 45 #include "G4BGGNucleonInelasticXS.hh" 46 #include "G4HadronicParameters.hh" 47 48 49 G4FTFPProtonBuilder:: 50 G4FTFPProtonBuilder(G4bool quasiElastic) 51 { 52 theMin = G4HadronicParameters::Instance()->G 53 theMax = G4HadronicParameters::Instance()->G 54 theModel = new G4TheoFSGenerator("FTFP"); 55 56 G4FTFModel* theStringModel = new G4FTFModel( 57 theStringModel->SetFragmentationModel(new G4 58 59 G4GeneratorPrecompoundInterface* theCascade 60 new G4GeneratorPrecompoundInterface(); 61 62 theModel->SetHighEnergyGenerator(theStringMo 63 if (quasiElastic) { 64 theModel->SetQuasiElasticChannel(new G4Qu 65 } 66 67 theModel->SetTransport(theCascade); 68 theModel->SetMinEnergy(theMin); 69 theModel->SetMaxEnergy(theMax); 70 } 71 72 void G4FTFPProtonBuilder:: 73 Build(G4HadronInelasticProcess * aP) 74 { 75 theModel->SetMinEnergy(theMin); 76 theModel->SetMaxEnergy(theMax); 77 aP->RegisterMe(theModel); 78 79 aP->AddDataSet(new G4BGGNucleonInelasticXS 80 } 81 82 G4FTFPProtonBuilder:: 83 ~G4FTFPProtonBuilder() 84 { 85 } 86 87