Import Geant4 1.0.0 source tree

2016-06-08 15:28:20 +02:00
parent aaa409b6ee
commit ca1c8cb059
2995 changed files with 106830 additions and 299600 deletions
@@ -0,0 +1,196 @@
+// This code implementation is the intellectual property of
+// the GEANT4 collaboration.
+//
+// By copying, distributing or modifying the Program (or any work
+// based on the Program) you indicate your acceptance of this statement,
+// and all its terms.
+//
+// $Id: PersEx02PhysicsList.cc,v 1.3 1999/11/29 18:33:28 morita Exp $
+// GEANT4 tag $Name: geant4-01-00 $
+//
+
+#include "globals.hh"
+#include "PersEx02PhysicsList.hh"
+#include "G4ParticleDefinition.hh"
+#include "G4ParticleWithCuts.hh"
+#include "G4ProcessManager.hh"
+#include "G4ProcessVector.hh"
+#include "G4ParticleTypes.hh"
+#include "G4ParticleTable.hh"
+#include "G4BosonConstructor.hh"
+#include "G4LeptonConstructor.hh"
+#include "G4MesonConstructor.hh"
+#include "G4BaryonConstructor.hh"
+#include "G4IonConstructor.hh"
+#include "G4Material.hh"
+#include "G4MaterialTable.hh"
+#include "G4ios.hh"
+#include <iomanip.h>                
+
+
+PersEx02PhysicsList::PersEx02PhysicsList():  G4VUserPhysicsList()
+{
+  SetVerboseLevel(1);
+}
+
+PersEx02PhysicsList::~PersEx02PhysicsList()
+{
+}
+
+void PersEx02PhysicsList::ConstructParticle()
+{
+  // In this method, static member functions should be called
+  // for all particles which you want to use.
+  // This ensures that objects of these particle types will be
+  // created in the program. 
+
+  ConstructBosons();
+  ConstructLeptons();
+  ConstructMesons();
+  ConstructBaryons();
+
+}
+
+void PersEx02PhysicsList::ConstructBosons()
+{
+  // Construct all bosons
+  G4BosonConstructor pConstructor;
+  pConstructor.ConstructParticle();
+}
+
+void PersEx02PhysicsList::ConstructLeptons()
+{
+  // Construct all leptons
+  G4LeptonConstructor pConstructor;
+  pConstructor.ConstructParticle();
+}
+
+void PersEx02PhysicsList::ConstructMesons()
+{
+  //  Construct all mesons
+  G4MesonConstructor pConstructor;
+  pConstructor.ConstructParticle();
+}
+
+void PersEx02PhysicsList::ConstructBaryons()
+{
+  //  Construct all baryons
+  G4BaryonConstructor pConstructor;
+  pConstructor.ConstructParticle();
+}
+
+void PersEx02PhysicsList::ConstructIons()
+{
+  //  Construct light ions
+  G4IonConstructor pConstructor;
+  pConstructor.ConstructParticle();  
+}
+
+
+void PersEx02PhysicsList::ConstructProcess()
+{
+  AddTransportation();
+  ConstructEM();
+  ConstructLeptHad();
+  ConstructHad();
+  ConstructGeneral();
+}
+
+#include "G4ComptonScattering.hh"
+#include "G4GammaConversion.hh"
+#include "G4PhotoElectricEffect.hh"
+
+#include "G4MultipleScattering.hh"
+
+#include "G4eIonisation.hh"
+#include "G4eBremsstrahlung.hh"
+#include "G4eplusAnnihilation.hh"
+
+#include "G4MuIonisation.hh"
+#include "G4MuBremsstrahlung.hh"
+#include "G4MuPairProduction.hh"
+
+#include "G4hIonisation.hh"
+void PersEx02PhysicsList::ConstructEM()
+{
+  theParticleIterator->reset();
+  while( (*theParticleIterator)() ){
+    G4ParticleDefinition* particle = theParticleIterator->value();
+    G4ProcessManager* pmanager = particle->GetProcessManager();
+    G4String particleName = particle->GetParticleName();
+     
+    if (particleName == "gamma") {
+    // gamma
+      // Construct processes for gamma
+      pmanager->AddDiscreteProcess(new G4GammaConversion());
+      pmanager->AddDiscreteProcess(new G4ComptonScattering());      
+      pmanager->AddDiscreteProcess(new G4PhotoElectricEffect());
+
+    } else if (particleName == "e-") {
+    //electron
+      // Construct processes for electron
+      pmanager->AddProcess(new G4MultipleScattering(),-1,1,1);
+      pmanager->AddProcess(new G4eIonisation(),-1,2,2);
+      pmanager->AddProcess(new G4eBremsstrahlung(),-1,-1,3);
+  
+    } else if (particleName == "e+") {
+    //positron
+      // Construct processes for positron
+     pmanager->AddProcess(new G4MultipleScattering(),-1,1,1);
+     
+     pmanager->AddProcess(new G4eIonisation(),-1,2,2);
+     pmanager->AddProcess(new G4eBremsstrahlung(),-1,-1,3);      
+     pmanager->AddProcess(new G4eplusAnnihilation(),0,-1,4);
+  
+    } else if( particleName == "mu+" || 
+               particleName == "mu-"    ) {
+    //muon  
+     // Construct processes for muon+
+     pmanager->AddProcess(new G4MultipleScattering(),-1,1,1);
+     pmanager->AddProcess(new G4MuIonisation(),-1,2,2);
+     pmanager->AddProcess(new G4MuBremsstrahlung(),-1,-1,3);
+     pmanager->AddProcess(new G4MuPairProduction(),-1,-1,4);       
+     
+    } else { 
+      if ((particle->GetPDGCharge() != 0.0) && 
+          (particle->GetParticleName() != "chargedgeantino")) {
+     // all others charged particles except geantino
+       pmanager->AddProcess(new G4MultipleScattering(),-1,1,1);
+       pmanager->AddProcess(new G4hIonisation(),-1,2,2);       
+     }
+    }
+  }
+}
+
+void PersEx02PhysicsList::ConstructHad()
+{;}
+
+void PersEx02PhysicsList::ConstructLeptHad()
+{;}
+
+#include "G4Decay.hh"
+void PersEx02PhysicsList::ConstructGeneral()
+{
+  G4Decay* theDecayProcess = new G4Decay();
+  theParticleIterator->reset();
+  while( (*theParticleIterator)() ){
+    G4ParticleDefinition* particle = theParticleIterator->value();
+    G4ProcessManager* pmanager = particle->GetProcessManager();
+    if (theDecayProcess->IsApplicable(*particle)) { 
+      pmanager->AddProcess(theDecayProcess, INT_MAX, -1, INT_MAX); 
+    }
+  }
+}
+
+void PersEx02PhysicsList::SetCuts()
+{
+  if (verboseLevel >0){
+    G4cout << "PersEx02PhysicsList::SetCuts:";
+    G4cout << "CutLength : " << defaultCutValue/mm << " (mm)" << endl;
+  }  
+
+  //  " G4VUserPhysicsList::SetCutsWithDefault" method sets 
+  //   the default cut value for all particle types 
+  SetCutsWithDefault();   
+}
+