source: trunk/source/physics_lists/builders/src/G4QGSPNeutronBuilder.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.9 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: G4QGSPNeutronBuilder.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:   G4QGSPNeutronBuilder
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 "G4QGSPNeutronBuilder.hh"
41#include "G4ParticleDefinition.hh"
42#include "G4ParticleTable.hh"
43#include "G4ProcessManager.hh"
44#include "G4NeutronInelasticCrossSection.hh"
45
46G4QGSPNeutronBuilder::
47G4QGSPNeutronBuilder(G4bool quasiElastic, G4bool projectileDiffraction) 
48{
49  theMin = 12*GeV;
50  theModel = new G4TheoFSGenerator("QGSP");
51
52  theStringModel = new G4QGSModel< G4QGSParticipants >;
53  theStringDecay = new G4ExcitedStringDecay(theQGSM = new G4QGSMFragmentation);
54  theStringModel->SetFragmentationModel(theStringDecay);
55
56  theCascade = new G4GeneratorPrecompoundInterface;
57  thePreEquilib = new G4PreCompoundModel(theHandler = new G4ExcitationHandler);
58  theCascade->SetDeExcitation(thePreEquilib); 
59
60  theModel->SetTransport(theCascade);
61  theModel->SetHighEnergyGenerator(theStringModel);
62  if (quasiElastic)
63  {
64     theQuasiElastic=new G4QuasiElasticChannel;
65     theModel->SetQuasiElasticChannel(theQuasiElastic);
66  } else 
67  {  theQuasiElastic=0;} 
68  if ( projectileDiffraction )
69  {
70     theProjectileDiffraction=new G4ProjectileDiffractiveChannel;
71     theModel->SetProjectileDiffraction(theProjectileDiffraction);
72  } else 
73  {  theProjectileDiffraction=0;}
74}
75
76G4QGSPNeutronBuilder::~G4QGSPNeutronBuilder() 
77{
78  delete theStringDecay;
79  delete theStringModel;
80  delete thePreEquilib;
81  delete theCascade;
82  if ( theQuasiElastic ) delete theQuasiElastic;
83  if ( theProjectileDiffraction ) delete theProjectileDiffraction;
84  delete theModel;
85  delete theQGSM;
86  delete theHandler;
87}
88
89void G4QGSPNeutronBuilder::
90Build(G4HadronElasticProcess * )
91{
92}
93
94void G4QGSPNeutronBuilder::
95Build(G4HadronFissionProcess * )
96{
97}
98
99void G4QGSPNeutronBuilder::
100Build(G4HadronCaptureProcess * )
101{
102}
103
104void G4QGSPNeutronBuilder::
105Build(G4NeutronInelasticProcess * aP)
106{
107  theModel->SetMinEnergy(theMin);
108  theModel->SetMaxEnergy(100*TeV);
109  aP->RegisterMe(theModel);
110  aP->AddDataSet(new G4NeutronInelasticCrossSection); 
111}
112
113// 2002 by J.P. Wellisch
Note: See TracBrowser for help on using the repository browser.