source: trunk/source/physics_lists/builders/src/G4QGSCNeutronBuilder.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.3 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: G4QGSCNeutronBuilder.cc,v 1.5 2009/03/31 11:03:50 vnivanch Exp $
27// GEANT4 tag $Name: geant4-09-04-beta-01 $
28//
29//---------------------------------------------------------------------------
30//
31// ClassName:   G4QGSCNeutronBuilder
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 "G4QGSCNeutronBuilder.hh"
41#include "G4ParticleDefinition.hh"
42#include "G4ParticleTable.hh"
43#include "G4ProcessManager.hh"
44#include "G4NeutronInelasticCrossSection.hh"
45
46G4QGSCNeutronBuilder::
47G4QGSCNeutronBuilder(G4bool quasiElastic) 
48 {
49   theMin = 8*GeV;
50   theModel = new G4TheoFSGenerator("QGSC");
51
52   theStringModel= new G4QGSModel< G4QGSParticipants >;
53   theStringDecay = new G4ExcitedStringDecay(new G4QGSMFragmentation);
54   theStringModel->SetFragmentationModel(theStringDecay);
55
56   theCascade = new G4QStringChipsParticleLevelInterface;
57
58   theModel->SetTransport(theCascade);
59   theModel->SetHighEnergyGenerator(theStringModel);
60   if (quasiElastic)
61   {
62      theQuasiElastic=new G4QuasiElasticChannel;
63      theModel->SetQuasiElasticChannel(theQuasiElastic);
64   } else 
65   {  theQuasiElastic=0;} 
66 }
67
68G4QGSCNeutronBuilder::~G4QGSCNeutronBuilder() 
69 {
70   delete theStringDecay;
71   delete theStringModel;
72   delete theCascade;
73  if ( theQuasiElastic ) delete theQuasiElastic;
74   delete theModel;
75 }
76
77void G4QGSCNeutronBuilder::
78Build(G4NeutronInelasticProcess * aP)
79 {
80   theModel->SetMinEnergy(theMin);
81   theModel->SetMaxEnergy(100*TeV);
82   aP->RegisterMe(theModel);
83   aP->AddDataSet(new G4NeutronInelasticCrossSection); 
84 }
85
86 // 2002 by J.P. Wellisch
Note: See TracBrowser for help on using the repository browser.