source: trunk/source/physics_lists/builders/src/G4FTFPNeutronBuilder.cc @ 1347

Last change on this file since 1347 was 1337, checked in by garnier, 14 years ago

tag geant4.9.4 beta 1 + modifs locales

File size: 3.7 KB
Line 
1//
2// ********************************************************************
3// * License and Disclaimer                                           *
4// *                                                                  *
5// * The  Geant4 software  is  copyright of the Copyright Holders  of *
6// * the Geant4 Collaboration.  It is provided  under  the terms  and *
7// * conditions of the Geant4 Software License,  included in the file *
8// * LICENSE and available at  http://cern.ch/geant4/license .  These *
9// * include a list of copyright holders.                             *
10// *                                                                  *
11// * Neither the authors of this software system, nor their employing *
12// * institutes,nor the agencies providing financial support for this *
13// * work  make  any representation or  warranty, express or implied, *
14// * regarding  this  software system or assume any liability for its *
15// * use.  Please see the license in the file  LICENSE  and URL above *
16// * for the full disclaimer and the limitation of liability.         *
17// *                                                                  *
18// * This  code  implementation is the result of  the  scientific and *
19// * technical work of the GEANT4 collaboration.                      *
20// * By using,  copying,  modifying or  distributing the software (or *
21// * any work based  on the software)  you  agree  to acknowledge its *
22// * use  in  resulting  scientific  publications,  and indicate your *
23// * acceptance of all terms of the Geant4 Software license.          *
24// ********************************************************************
25//
26// $Id: G4FTFPNeutronBuilder.cc,v 1.6 2010/06/15 11:03:35 vnivanch Exp $
27// GEANT4 tag $Name: geant4-09-04-beta-01 $
28//
29//---------------------------------------------------------------------------
30//
31// ClassName:   G4FTFPNeutronBuilder
32//
33// Author: 2002 J.P. Wellisch
34//
35// Modified:
36// 30.03.2009 V.Ivanchenko create cross section by new
37//
38//----------------------------------------------------------------------------
39//
40#include "G4FTFPNeutronBuilder.hh"
41#include "G4ParticleDefinition.hh"
42#include "G4ParticleTable.hh"
43#include "G4ProcessManager.hh"
44#include "G4NeutronInelasticCrossSection.hh"
45
46G4FTFPNeutronBuilder::
47G4FTFPNeutronBuilder(G4bool quasiElastic) 
48{
49  theMin =   4*GeV;
50  theMax = 100*TeV;
51  theModel = new G4TheoFSGenerator("FTFP");
52
53  theStringModel = new G4FTFModel;
54  theStringDecay = new G4ExcitedStringDecay(theLund = new G4LundStringFragmentation);
55  theStringModel->SetFragmentationModel(theStringDecay);
56
57  theCascade = new G4GeneratorPrecompoundInterface;
58  thePreEquilib = new G4PreCompoundModel(theHandler = new G4ExcitationHandler);
59  theCascade->SetDeExcitation(thePreEquilib); 
60
61  theModel->SetTransport(theCascade);
62
63  theModel->SetHighEnergyGenerator(theStringModel);
64  if (quasiElastic)
65  {
66     theQuasiElastic=new G4QuasiElasticChannel;
67     theModel->SetQuasiElasticChannel(theQuasiElastic);
68  } else 
69  {  theQuasiElastic=0;} 
70
71  theModel->SetMinEnergy(theMin);
72  theModel->SetMaxEnergy(100*TeV);
73}
74
75G4FTFPNeutronBuilder::
76~G4FTFPNeutronBuilder() 
77{
78  delete theStringDecay;
79  delete theStringModel;
80  delete thePreEquilib;
81  delete theCascade;
82  if ( theQuasiElastic ) delete theQuasiElastic;
83  delete theHandler;
84  delete theLund;
85}
86
87void G4FTFPNeutronBuilder::
88Build(G4HadronElasticProcess * )
89{
90}
91
92void G4FTFPNeutronBuilder::
93Build(G4HadronFissionProcess * )
94{
95}
96
97void G4FTFPNeutronBuilder::
98Build(G4HadronCaptureProcess * )
99{
100}
101
102void G4FTFPNeutronBuilder::
103Build(G4NeutronInelasticProcess * aP)
104{
105  theModel->SetMinEnergy(theMin);
106  theModel->SetMaxEnergy(theMax);
107  aP->RegisterMe(theModel);
108  aP->AddDataSet(new G4NeutronInelasticCrossSection); 
109}
110
111 // 2002 by J.P. Wellisch
Note: See TracBrowser for help on using the repository browser.