Import Geant4 6.2.0 source tree

2016-06-09 10:56:29 +02:00
parent 1d812b78b1
commit e083ffb441
1415 changed files with 111223 additions and 21207 deletions
@@ -0,0 +1,125 @@
+//
+// ********************************************************************
+// * DISCLAIMER                                                       *
+// *                                                                  *
+// * The following disclaimer summarizes all the specific disclaimers *
+// * of contributors to this software. The specific disclaimers,which *
+// * govern, are listed with their locations in:                      *
+// *   http://cern.ch/geant4/license                                  *
+// *                                                                  *
+// * Neither the authors of this software system, nor their employing *
+// * institutes,nor the agencies providing financial support for this *
+// * work  make  any representation or  warranty, express or implied, *
+// * regarding  this  software system or assume any liability for its *
+// * use.                                                             *
+// *                                                                  *
+// * 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: RemSimShieldingDecorator.cc,v 1.5 2004/05/27 08:36:52 guatelli Exp $
+// GEANT4 tag $Name: geant4-06-02 $
+//
+// Code developed by: S.Guatelli, guatelli@ge.infn.it
+//
+#include "RemSimVGeometryComponent.hh"
+#include "RemSimMaterial.hh"
+#include "G4Material.hh"
+#include "G4MaterialTable.hh"
+#include "RemSimShieldingDecorator.hh"
+#include "RemSimDecorator.hh"
+#include "G4Box.hh"
+#include "G4LogicalVolume.hh"
+#include "G4VPhysicalVolume.hh"
+#include "G4PVPlacement.hh"
+#include "G4VisAttributes.hh"
+#include "RemSimSensitiveDetector.hh"
+#include "RemSimROGeometry.hh"
+#include "G4SDManager.hh"
+#include "G4RunManager.hh"
+#include "G4VisAttributes.hh"
+
+RemSimShieldingDecorator::RemSimShieldingDecorator(RemSimVGeometryComponent* comp)
+  : RemSimDecorator(comp)
+{
+ shieldingX = 5.*m;
+ shieldingY = 5.*m;
+ shieldingZ = 10.*cm;  
+ translation = -4.4* m;
+ pMaterial = new RemSimMaterial();
+
+ shieldingVisAtt = 0;
+}
+RemSimShieldingDecorator::~RemSimShieldingDecorator()
+{
+  delete pMaterial;
+}
+void RemSimShieldingDecorator::ConstructComponent(G4VPhysicalVolume* motherVolume)
+{
+  pMaterial -> DefineMaterials();
+  RemSimDecorator::ConstructComponent(motherVolume);
+  ConstructShielding(motherVolume);
+}
+
+void RemSimShieldingDecorator::DestroyComponent()
+{
+ delete shieldingVisAtt;
+ shieldingVisAtt = 0;
+ 
+ delete shieldingPhys; 
+ shieldingPhys = 0;
+
+ delete shieldingLog;
+ shieldingLog = 0;
+
+ delete shielding;
+ shielding = 0;
+}
+void RemSimShieldingDecorator::ConstructShielding(G4VPhysicalVolume* motherVolume)
+{
+  // Geometry definition
+  pMaterial -> DefineMaterials();
+
+  G4Material* water = pMaterial -> GetMaterial("Water");
+  
+  shielding = new G4Box("shielding",shieldingX/2.,shieldingY/2.,shieldingZ/2.);
+
+  shieldingLog = new G4LogicalVolume(shielding, water,
+                                     "shieldingLog",0,0,0);
+  
+  shieldingPhys = new G4PVPlacement(0,
+             G4ThreeVector(0.,0.,translation + shieldingZ/2.),
+            "shieldingPhys", shieldingLog, motherVolume,false,0); 
+
+  //Visualisation attributes
+  G4Colour  red      (1.0,0.0,0.0);
+  shieldingVisAtt = new G4VisAttributes(red);
+  shieldingVisAtt -> SetVisibility(true);
+  shieldingVisAtt -> SetForceSolid(true);
+  shieldingLog -> SetVisAttributes(shieldingVisAtt);  
+  PrintDetectorParameters();
+}
+
+void RemSimShieldingDecorator::ChangeThickness(G4double thick)
+{
+  PrintDetectorParameters();
+  shielding -> SetZHalfLength(thick/2.);
+  shieldingPhys -> SetTranslation(G4ThreeVector 
+                            (0.,0.,translation + thick/2.));
+}
+
+void RemSimShieldingDecorator::PrintDetectorParameters()
+{
+  G4cout << "-----------------------------------------------------------------------"
+         << G4endl
+         << "the shielding is a box whose thickness is: " << G4endl
+         << ((shielding -> GetZHalfLength())*2.)/cm
+         << " cm along the Z axis"
+         << G4endl
+         << "material of the shielding: "
+         << shieldingLog -> GetMaterial() -> GetName() <<G4endl
+         << G4endl;
+}