Import Geant4 0.0.0 source tree

2016-06-01 15:25:35 +02:00
parent 54d6b71f95
commit b97f8d0df7
3237 changed files with 807095 additions and 0 deletions
@@ -0,0 +1,120 @@
+// This code implementation is the intellectual property of
+// the RD44 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: G4KaonZeroShort.cc,v 2.3 1998/09/24 06:09:04 kurasige Exp $
+// GEANT4 tag $Name: geant4-00 $
+//
+// 
+// ----------------------------------------------------------------------
+//      GEANT 4 class implementation file
+//
+//      For information related to this code contact:
+//      CERN, CN Division, ASD Group
+//      History: first implementation, based on object model of
+//      4th April 1996, G.Cosmo
+//                              H.Kurashige   7 Jul 96
+// **********************************************************************
+
+#include <fstream.h>
+#include <iomanip.h>
+
+#include "G4KaonZeroShort.hh"
+
+#include "G4PhaseSpaceDecayChannel.hh"
+#include "G4DecayTable.hh"
+
+// ######################################################################
+// ###                      KAONZEROSHORT                             ###
+// ######################################################################
+
+G4KaonZeroShort::G4KaonZeroShort(
+       const G4String&     aName,        G4double            mass,
+       G4double            width,        G4double            charge,   
+       G4int               iSpin,        G4int               iParity,    
+       G4int               iConjugation, G4int               iIsospin,   
+       G4int               iIsospin3,    G4int               gParity,
+       const G4String&     pType,        G4int               lepton,      
+       G4int               baryon,       G4int               encoding,
+       G4bool              stable,       G4double            lifetime,
+       G4DecayTable        *decaytable )
+ : G4VMeson( aName,mass,width,charge,iSpin,iParity,
+             iConjugation,iIsospin,iIsospin3,gParity,pType,
+             lepton,baryon,encoding,stable,lifetime,decaytable )
+{
+  // Anti-particle of K0Short is K0Short itself  
+  SetAntiPDGEncoding(encoding);
+ 
+  //create Decay Table 
+  G4DecayTable*   table = GetDecayTable();
+  if (table!=NULL) delete table;
+  table = new G4DecayTable();
+
+  // create decay channels
+  G4VDecayChannel** mode = new G4VDecayChannel*[2];
+  // kaon0s -> pi+ + pi-
+  mode[0] = new G4PhaseSpaceDecayChannel("kaon0S",0.686,2,"pi+","pi-");
+  // kaon0s -> pi0 + pi0
+  mode[1] = new G4PhaseSpaceDecayChannel("kaon0S",0.313,2,"pi0","pi0");
+
+  for (G4int index=0; index <2; index++ ) table->Insert(mode[index]);  
+  delete [] mode;
+
+  SetDecayTable(table);
+}
+
+// ......................................................................
+// ...                 static member definitions                      ...
+// ......................................................................
+//     
+//    Arguments for constructor are as follows
+//               name             mass          width         charge
+//             2*spin           parity  C-conjugation
+//          2*Isospin       2*Isospin3       G-parity
+//               type    lepton number  baryon number   PDG encoding
+//             stable         lifetime    decay table 
+
+G4KaonZeroShort G4KaonZeroShort::theKaonZeroShort(
+	     "kaon0S",    0.497672*GeV,       0.0*MeV,         0.0, 
+		    0,              -1,             0,          
+		    1,               0,             0,             
+	      "meson",               0,             0,         310,
+	 	false,      0.08926*ns,          NULL
+);
+
+G4KaonZeroShort* G4KaonZeroShort::KaonZeroShortDefinition(){return &theKaonZeroShort;}
+// initialization for static cut values
+G4double   G4KaonZeroShort::theKaonZeroShortLengthCut = -1.0;
+G4double*  G4KaonZeroShort::theKaonZeroShortKineticEnergyCuts = NULL;
+
+
+// **********************************************************************
+// **************************** SetCuts *********************************
+// **********************************************************************
+//  In this version Input Cut Value is meaning less
+//  theKineticEnergyCuts for all materials are set to LowestEnergy
+
+void G4KaonZeroShort::SetCuts(G4double aCut)
+{
+  theCutInMaxInteractionLength = aCut;
+
+  const G4MaterialTable* materialTable = G4Material::GetMaterialTable();
+  // Create the vector of cuts in energy
+  // corresponding to the stopping range cut
+  if(theKineticEnergyCuts) delete [] theKineticEnergyCuts;
+  theKineticEnergyCuts = new G4double [materialTable->length()];
+
+  // Build range vector for every material, convert cut into energy-cut,
+  // fill theKineticEnergyCuts and delete the range vector
+  for (G4int J=0; J<materialTable->length(); J++)
+  {
+    G4Material* aMaterial = (*materialTable)[J];
+    theKineticEnergyCuts[J] = LowestEnergy;
+  }
+  theKaonZeroShortLengthCut = theCutInMaxInteractionLength;  
+  theKaonZeroShortKineticEnergyCuts = theKineticEnergyCuts;
+}
+