Import Geant4 3.1.0 source tree

This commit is contained in:
Gabriele Cosmo
2016-06-08 16:03:00 +02:00
parent cfcb558cfe
commit 137e303ecc
2843 changed files with 37082 additions and 38426 deletions
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G3DetTable.cc,v 1.9 2000/03/02 17:54:05 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
#include "globals.hh"
#include "G3DetTable.hh"
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G3DetTableEntry.cc,v 1.3 2000/03/02 17:54:06 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
#include "globals.hh"
#include "G3DetTableEntry.hh"
+42 -4
View File
@@ -5,20 +5,22 @@
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G3Division.cc,v 1.7 2000/11/24 09:50:12 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// $Id: G3Division.cc,v 1.9 2001/03/14 13:27:23 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-01 $
//
// by I.Hrivnacova, V.Berejnoi 13.10.99
#include "G3Division.hh"
#include "G3VolTableEntry.hh"
#include "G3toG4MakeSolid.hh"
#include "G4Para.hh"
#include "G3Pos.hh"
#include "G4LogicalVolume.hh"
#include "G4VPhysicalVolume.hh"
#include "G4PVPlacement.hh"
#include "G4PVReplica.hh"
G3VolTableEntry* G4CreateVTE(G4String vname, G4String shape, G4int nmed,
G4double Rpar[], G4int npar);
@@ -89,7 +91,7 @@ void G3Division::UpdateVTE()
if (envVTE) {
// reset mother <-> daughter
fMVTE->ReplaceDaughter(fVTE, envVTE);
fMVTE->ReplaceDaughter(fVTE, envVTE);
fVTE->ReplaceMother(fMVTE, envVTE);
envVTE->AddDaughter(fVTE);
envVTE->AddMother(fMVTE);
@@ -106,6 +108,26 @@ G4VPhysicalVolume* G3Division::CreatePVReplica()
G4LogicalVolume* lv = fVTE->GetLV();
G4LogicalVolume* mlv = fMVTE->GetLV();
G4String shape = fMVTE->GetShape();
if (shape == "PARA") {
// The para volume cannot be replicated using G4PVReplica.
// (Replicating a volume along a cartesian axis means "slicing" it
// with slices -perpendicular- to that axis.)
// position the replicated elements
for (G4int i=0; i<fNofDivisions; i++) {
G4ThreeVector position = G4ThreeVector();
position[fIAxis-1] = fLowRange + fWidth/2. + i*fWidth;
if (position.y()!=0.)
position.setX(position.y()*((G4Para*)lv->GetSolid())->GetTanAlpha());
new G4PVPlacement(0, position, lv, name, mlv, 0, i);
}
// no G4PVReplica was created - return 0
return 0;
}
G4PVReplica* pvol
= new G4PVReplica(name, lv, mlv, fAxis, fNofDivisions, fWidth, fOffset);
@@ -650,7 +672,23 @@ void G3Division::CreateSolid(G4String shape, G4double par[], G4int npar)
Rpar[0] = fWidth/2./cm;
}
}
else if (shape == "SPHE" || shape == "PARA") {
else if (shape == "PARA") {
if ( fIAxis == 1 ) {
Rpar[0] = fWidth/2./cm;
}
else if ( Rpar[4] == 0. && Rpar[5] == 0. ) {
// only special case for axis 2,3 is supported
if ( fIAxis == 2 ) {
Rpar[1] = fWidth/2./cm;
}
else if ( fIAxis == 3) {
Rpar[2] = fWidth/2./cm;
}
}
else
Exception("CreateSolid", shape);
}
else if (shape == "SPHE") {
Exception("CreateSolid", shape);
}
else if ( shape == "PGON" ) {
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G3EleTable.cc,v 1.9 2000/03/02 17:54:06 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
#include "G4strstreambuf.hh"
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G3MatTable.cc,v 1.12 1999/12/05 17:50:09 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// by I.Hrivnacova, 27 Sep 99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G3MatTableEntry.cc,v 1.2 1999/12/05 17:50:09 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// by I.Hrivnacova, 27 Sep 99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G3MedTable.cc,v 1.10 1999/12/05 17:50:09 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// by I.Hrivnacova, 27 Sep 99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G3MedTableEntry.cc,v 1.2 1999/12/05 17:50:09 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// by I.Hrivnacova, 27 Sep 99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G3NegVolPars.cc,v 1.7 2000/11/24 09:50:12 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// modified by I. Hrivnacova, 13.10.99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G3PartTable.cc,v 1.9 2000/03/02 17:54:06 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
#include "g4std/strstream"
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G3Pos.cc,v 1.7 2000/03/02 17:54:06 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// modified by I.Hrivnacova, 13.10.99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G3RotTable.cc,v 1.12 2000/07/24 11:32:14 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// by I.Hrivnacova, 27 Sep 99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G3RotTableEntry.cc,v 1.2 1999/12/05 17:50:10 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// by I.Hrivnacova, 27 Sep 99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G3VolTable.cc,v 1.19 2000/03/02 17:54:07 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// modified by I.Hrivnacova, 13.10.99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G3VolTableEntry.cc,v 1.6 2000/11/28 12:07:54 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// modified by I.Hrivnacova, 13.10.99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G3fillParams.cc.archive,v 1.1 1999/12/06 19:19:57 lockman Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// extracted from clparse.cc by I. Hrivnacova, 30.7.99
+4 -3
View File
@@ -5,8 +5,8 @@
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G3toG4BuildTree.cc,v 1.12 2000/11/24 09:50:13 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// $Id: G3toG4BuildTree.cc,v 1.13 2001/01/25 17:41:49 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-01 $
//
// modified by I. Hrivnacova, 2.8.99
@@ -98,7 +98,8 @@ void G3toG4BuildTree(G3VolTableEntry* curVTE, G3VolTableEntry* motherVTE)
}
// clear this position
curVTE->ClearG3PosCopy(i);
curVTE->ClearG3PosCopy(i);
i--;
}
}
+3 -3
View File
@@ -5,8 +5,8 @@
// based on the Program) you indicate your acceptance of this statement,
// and all its terms.
//
// $Id: G3toG4MakeSolid.cc,v 1.6 2000/08/01 09:08:41 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// $Id: G3toG4MakeSolid.cc,v 1.7 2001/03/12 09:49:16 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-01 $
//
// modified by I.Hrivnacova, V.Berejnoi 27 Sep 99
@@ -200,7 +200,7 @@ G4VSolid* G3toG4MakeSolid(const G4String& vname, const G4String& shape,
NegVolPars = pRmin<0 || pRmax<0;
if (!(NegVolPars || Deferred)) {
solid = new G4Sphere(vname, pRmin, pRmax, pThe1, pDThe, pPhi1, pDPhi);
solid = new G4Sphere(vname, pRmin, pRmax, pPhi1, pDPhi, pThe1, pDThe);
}
} else if ( shape == "PARA" ) {
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G3toG4RotationMatrix.cc,v 1.2 1999/12/05 17:50:11 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
#include "G3toG4RotationMatrix.hh"
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4BuildGeom.cc,v 1.13 2000/11/24 09:50:13 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// modified by I. Hrivnacova, 13.10.99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4ggclos.cc,v 1.6 1999/12/15 14:49:43 gunter Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
#include "G3toG4.hh"
#include "G3VolTable.hh"
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsatt.cc,v 1.8 2000/03/02 17:54:07 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
#include "g4rw/cstring.h"
#include "G3toG4.hh"
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsdet.cc,v 1.3 1999/12/05 17:50:12 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
#include "globals.hh"
#include "G3toG4.hh"
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsdeta.cc,v 1.4 1999/12/05 17:50:12 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
//
// modified by I.Hrivnacova, 6 Oct 99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsdetd.cc,v 1.4 1999/12/05 17:50:12 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
#include "G3toG4.hh"
#include "G3DetTable.hh"
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsdeth.cc,v 1.4 1999/12/05 17:50:12 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
#include "G3toG4.hh"
#include "G3DetTable.hh"
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsdetu.cc,v 1.3 1999/12/05 17:50:12 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
#include "G3toG4.hh"
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsdetv.cc,v 1.6 1999/12/15 14:49:43 gunter Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
#include "G4ios.hh"
#include "G3toG4.hh"
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsdk.cc,v 1.3 1999/12/05 17:50:13 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
#include "G4Decay.hh"
#include "G3toG4.hh"
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsdvn.cc,v 1.5 1999/12/05 17:50:13 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// by I.Hrivnacova, V.Berejnoi, 29 Oct 99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsdvn2.cc,v 1.6 1999/12/05 17:50:13 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// by I.Hrivnacova, V.Berejnoi, 29 Oct 99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsdvt.cc,v 1.5 1999/12/05 17:50:13 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// by I.Hrivnacova, V.Berejnoi, 29 Oct 99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsdvt2.cc,v 1.5 1999/12/05 17:50:13 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// by I.Hrivnacova, V.Berejnoi, 29 Oct 99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsdvx.cc,v 1.3 1999/12/05 17:50:13 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// by I.Hrivnacova, V.Berejnoi, 27 Sep 99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsmate.cc,v 1.6 1999/12/15 14:49:43 gunter Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// by I.Hrivnacova, 27 Sep 99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsmixt.cc,v 1.7 1999/12/15 14:49:43 gunter Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// by I.Hrivnacova, 27 Sep 99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gspart.cc,v 1.3 1999/12/05 17:50:14 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
#include "G4ProcessManager.hh"
#include "G3toG4.hh"
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gspos.cc,v 1.11 1999/12/05 17:50:14 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// by I.Hrivnacova, 13.10.99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsposp.cc,v 1.13 2000/03/07 10:51:40 stesting Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// by I.Hrivnacova, 13.10.99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsrotm.cc,v 1.8 1999/12/15 14:49:44 gunter Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
#include "G3toG4.hh"
#include "G3RotTable.hh"
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gstmed.cc,v 1.4 1999/12/05 17:50:14 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// The last G4int argument of G4gstmed(..) is used for sending
// info whether the Geant3 tracking medium parameters should
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gstpar.cc,v 1.5 1999/12/15 14:49:44 gunter Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
#include "G3toG4.hh"
#include "G3VolTable.hh"
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: G4gsvolu.cc,v 1.7 1999/12/15 14:49:44 gunter Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// by I.Hrivnacova, 13.10.99
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: clparse.cc,v 1.11 2000/03/07 10:51:41 stesting Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// modified by I.Hrivnacova
// added G3SensVol
+1 -1
View File
@@ -6,7 +6,7 @@
* and all its terms.
*
* $Id: g3routines.F,v 1.3 1999/12/05 17:50:15 gcosmo Exp $
* GEANT4 tag $Name: geant4-03-00 $
* GEANT4 tag $Name: geant4-03-01 $
*
#define CALL_GEANT
+1 -1
View File
@@ -6,7 +6,7 @@
* and all its terms.
*
* $Id: g3test.F.main,v 1.2 1999/12/05 17:50:16 gcosmo Exp $
* GEANT4 tag $Name: geant4-03-00 $
* GEANT4 tag $Name: geant4-03-01 $
*
*
* g3test
+1 -1
View File
@@ -6,7 +6,7 @@
* and all its terms.
*
* $Id: g3tog4.F,v 1.3 1999/12/05 17:50:16 gcosmo Exp $
* GEANT4 tag $Name: geant4-03-00 $
* GEANT4 tag $Name: geant4-03-01 $
*
*
* G3toG4
+1 -1
View File
@@ -6,7 +6,7 @@
// and all its terms.
//
// $Id: g4geom.cc.main,v 1.2 1999/12/05 17:50:17 gcosmo Exp $
// GEANT4 tag $Name: geant4-03-00 $
// GEANT4 tag $Name: geant4-03-01 $
//
// g4geom
//
+1 -1
View File
@@ -6,7 +6,7 @@
* and all its terms.
*
* $Id: jshape.F,v 1.2 1999/12/05 17:50:17 gcosmo Exp $
* GEANT4 tag $Name: geant4-03-00 $
* GEANT4 tag $Name: geant4-03-01 $
*
*
*-- Author : Jouko Vuoskoski, CERN, Jouko.Vuoskoski@cern.ch
+1 -1
View File
@@ -6,7 +6,7 @@
* and all its terms.
*
* $Id: mztog4.F,v 1.2 1999/12/05 17:50:17 gcosmo Exp $
* GEANT4 tag $Name: geant4-03-00 $
* GEANT4 tag $Name: geant4-03-01 $
*
subroutine mztog4
************************************************************************
+1 -1
View File
@@ -6,7 +6,7 @@
* and all its terms.
*
* $Id: rztog4.F,v 1.2 1999/12/05 17:50:17 gcosmo Exp $
* GEANT4 tag $Name: geant4-03-00 $
* GEANT4 tag $Name: geant4-03-01 $
*
program rztog4
************************************************************************
+1 -1
View File
@@ -6,7 +6,7 @@
* and all its terms.
*
* $Id: tog4.F,v 1.3 1999/12/05 17:50:17 gcosmo Exp $
* GEANT4 tag $Name: geant4-03-00 $
* GEANT4 tag $Name: geant4-03-01 $
*
subroutine tog4
************************************************************************