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,95 @@
+// 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: G4DecayTable.cc,v 2.2 1998/10/13 11:25:40 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
+//      2nd December 1995, G.Cosmo
+//      27 July 1996 H.Kurashige
+// ------------------------------------------------------------
+
+#include "G4DecayTable.hh"
+#include "Randomize.hh"
+
+G4DecayTable::G4DecayTable():parent(NULL)
+{
+  channels =  new G4VDecayChannelVector;
+}
+
+G4DecayTable::~G4DecayTable()
+{
+  channels->clearAndDestroy();
+  delete channels;
+}    
+
+void G4DecayTable::Insert( G4VDecayChannel * aChannel){
+  if (parent == NULL) { parent = aChannel->GetParent(); }
+  if (parent != aChannel->GetParent()) {
+#ifdef G4VERBOSE
+    G4cerr << " G4DecayTable::Insert :: bad   G4VDecayChannel (mismatch parent) ";
+    G4cerr << "       " << parent->GetParticleName();
+    G4cerr << " input:" << aChannel->GetParent()->GetParticleName() << endl;
+#endif
+  } else {
+    channels->insert(aChannel);
+  }
+}
+
+G4VDecayChannel *G4DecayTable::SelectADecayChannel()
+{
+  // make cumlative table for branching ratio
+  G4double sumBR = 0.0;
+  G4int index;
+  G4int    numberofchannels = channels->entries();
+  G4double *cumBR = new G4double[numberofchannels];
+  for (index=numberofchannels-1; index >=0 ; index--) {
+    sumBR += ((*channels)(index))->GetBR();
+    cumBR[index] = sumBR;
+  }
+
+  // select decay channel
+  G4double r = sumBR* G4UniformRand();
+  G4VDecayChannel *channel;
+  for (index= numberofchannels-1; index >=0 ; index--) {
+    if (r < cumBR[index]) {
+      channel = (*channels)(index);
+      break;
+    }
+  }
+  delete [] cumBR;
+  return channel;
+}
+
+void G4DecayTable::DumpInfo() const
+{
+  G4cout << "G4DecayTable:  " << parent->GetParticleName() << endl;
+  G4int numberofchannels = channels->entries();
+  for (G4int index= numberofchannels -1; index >=0 ; index -=1)
+  {
+    G4cout << index << ": ";
+    ((*channels)(index))->DumpInfo();
+  }
+  G4cout << endl;
+}
+
+
+
+
+
+
+
+
+
+
+