Hadr06/src/DetectorConstruction.cc

0001 //
0002 // ********************************************************************
0003 // * License and Disclaimer                                           *
0004 // *                                                                  *
0005 // * The  Geant4 software  is  copyright of the Copyright Holders  of *
0006 // * the Geant4 Collaboration.  It is provided  under  the terms  and *
0007 // * conditions of the Geant4 Software License,  included in the file *
0008 // * LICENSE and available at  http://cern.ch/geant4/license .  These *
0009 // * include a list of copyright holders.                             *
0010 // *                                                                  *
0011 // * Neither the authors of this software system, nor their employing *
0012 // * institutes,nor the agencies providing financial support for this *
0013 // * work  make  any representation or  warranty, express or implied, *
0014 // * regarding  this  software system or assume any liability for its *
0015 // * use.  Please see the license in the file  LICENSE  and URL above *
0016 // * for the full disclaimer and the limitation of liability.         *
0017 // *                                                                  *
0018 // * This  code  implementation is the result of  the  scientific and *
0019 // * technical work of the GEANT4 collaboration.                      *
0020 // * By using,  copying,  modifying or  distributing the software (or *
0021 // * any work based  on the software)  you  agree  to acknowledge its *
0022 // * use  in  resulting  scientific  publications,  and indicate your *
0023 // * acceptance of all terms of the Geant4 Software license.          *
0024 // ********************************************************************
0025 //
0026 /// \file DetectorConstruction.cc
0027 /// \brief Implementation of the DetectorConstruction class
0028 //
0029 //
0030 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
0031 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
0032
0033 #include "DetectorConstruction.hh"
0034
0035 #include "DetectorMessenger.hh"
0036
0037 #include "G4Box.hh"
0038 #include "G4GeometryManager.hh"
0039 #include "G4LogicalVolume.hh"
0040 #include "G4LogicalVolumeStore.hh"
0041 #include "G4Material.hh"
0042 #include "G4NistManager.hh"
0043 #include "G4PVPlacement.hh"
0044 #include "G4PhysicalConstants.hh"
0045 #include "G4PhysicalVolumeStore.hh"
0046 #include "G4RunManager.hh"
0047 #include "G4SolidStore.hh"
0048 #include "G4Sphere.hh"
0049 #include "G4SystemOfUnits.hh"
0050 #include "G4UnitsTable.hh"
0051
0052 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
0053
0054 DetectorConstruction::DetectorConstruction()
0055 {
0056   fRadius = 30 * cm;
0057   fWorldSize = 1.1 * fRadius;
0058   DefineMaterials();
0059   SetMaterial("Water_ts");
0060   fDetectorMessenger = new DetectorMessenger(this);
0061 }
0062
0063 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
0064
0065 DetectorConstruction::~DetectorConstruction()
0066 {
0067   delete fDetectorMessenger;
0068 }
0069
0070 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
0071
0072 G4VPhysicalVolume* DetectorConstruction::Construct()
0073 {
0074   return ConstructVolumes();
0075 }
0076
0077 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
0078
0079 void DetectorConstruction::DefineMaterials()
0080 {
0081   // specific element name for thermal neutronHP
0082   // (see G4ParticleHPThermalScatteringNames.cc)
0083
0084   G4int ncomponents, natoms;
0085
0086   // pressurized water
0087   G4Element* H = new G4Element("TS_H_of_Water", "H", 1., 1.0079 * g / mole);
0088   G4Element* O = new G4Element("Oxygen", "O", 8., 16.00 * g / mole);
0089   G4Material* H2O = new G4Material("Water_ts", 1.000 * g / cm3, ncomponents = 2, kStateLiquid,
0090                                    593 * kelvin, 150 * bar);
0091   H2O->AddElement(H, natoms = 2);
0092   H2O->AddElement(O, natoms = 1);
0093   H2O->GetIonisation()->SetMeanExcitationEnergy(78.0 * eV);
0094
0095   // heavy water
0096   G4Isotope* H2 = new G4Isotope("H2", 1, 2);
0097   G4Element* D = new G4Element("TS_D_of_Heavy_Water", "D", 1);
0098   D->AddIsotope(H2, 100 * perCent);
0099   G4Material* D2O = new G4Material("HeavyWater", 1.11 * g / cm3, ncomponents = 2, kStateLiquid,
0100                                    293.15 * kelvin, 1 * atmosphere);
0101   D2O->AddElement(D, natoms = 2);
0102   D2O->AddElement(O, natoms = 1);
0103
0104   // graphite
0105   G4Isotope* C12 = new G4Isotope("C12", 6, 12);
0106   G4Element* C = new G4Element("TS_C_of_Graphite", "C", ncomponents = 1);
0107   C->AddIsotope(C12, 100. * perCent);
0108   G4Material* graphite = new G4Material("graphite", 2.27 * g / cm3, ncomponents = 1, kStateSolid,
0109                                         293 * kelvin, 1 * atmosphere);
0110   graphite->AddElement(C, natoms = 1);
0111
0112   // NE213
0113   G4Material* ne213 = new G4Material("NE213", 0.874 * g / cm3, ncomponents = 2);
0114   ne213->AddElement(H, 9.2 * perCent);
0115   ne213->AddElement(C, 90.8 * perCent);
0116
0117   // example of vacuum
0118   fWorldMat = new G4Material("Galactic", 1, 1.01 * g / mole, universe_mean_density, kStateGas,
0119                              2.73 * kelvin, 3.e-18 * pascal);
0120
0121   /// G4cout << *(G4Material::GetMaterialTable()) << G4endl;
0122 }
0123
0124 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
0125
0126 G4Material* DetectorConstruction::MaterialWithSingleIsotope(G4String name, G4String symbol,
0127                                                             G4double density, G4int Z, G4int A)
0128 {
0129   // define a material from an isotope
0130   //
0131   G4int ncomponents;
0132   G4double abundance, massfraction;
0133
0134   G4Isotope* isotope = new G4Isotope(symbol, Z, A);
0135
0136   G4Element* element = new G4Element(name, symbol, ncomponents = 1);
0137   element->AddIsotope(isotope, abundance = 100. * perCent);
0138
0139   G4Material* material = new G4Material(name, density, ncomponents = 1);
0140   material->AddElement(element, massfraction = 100. * perCent);
0141
0142   return material;
0143 }
0144
0145 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
0146
0147 G4VPhysicalVolume* DetectorConstruction::ConstructVolumes()
0148 {
0149   // Cleanup old geometry
0150   G4GeometryManager::GetInstance()->OpenGeometry();
0151   G4PhysicalVolumeStore::GetInstance()->Clean();
0152   G4LogicalVolumeStore::GetInstance()->Clean();
0153   G4SolidStore::GetInstance()->Clean();
0154
0155   // World
0156   //
0157   G4Box* sWorld = new G4Box("World",  // name
0158                             fWorldSize, fWorldSize, fWorldSize);  // dimensions
0159
0160   G4LogicalVolume* lWorld = new G4LogicalVolume(sWorld,  // shape
0161                                                 fWorldMat,  // material
0162                                                 "World");  // name
0163
0164   fPWorld = new G4PVPlacement(0,  // no rotation
0165                               G4ThreeVector(),  // at (0,0,0)
0166                               lWorld,  // logical volume
0167                               "World",  // name
0168                               0,  // mother volume
0169                               false,  // no boolean operation
0170                               0);  // copy number
0171
0172   // Absorber
0173   //
0174   G4Sphere* sAbsor = new G4Sphere("Absorber",  // name
0175                                   0., fRadius, 0., twopi, 0., pi);  // dimensions
0176
0177   fLAbsor = new G4LogicalVolume(sAbsor,  // shape
0178                                 fMaterial,  // material
0179                                 fMaterial->GetName());  // name
0180
0181   new G4PVPlacement(0,  // no rotation
0182                     G4ThreeVector(),  // at (0,0,0)
0183                     fLAbsor,  // logical volume
0184                     fMaterial->GetName(),  // name
0185                     lWorld,  // mother  volume
0186                     false,  // no boolean operation
0187                     0);  // copy number
0188   PrintParameters();
0189
0190   // always return the root volume
0191   //
0192   return fPWorld;
0193 }
0194
0195 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
0196
0197 void DetectorConstruction::PrintParameters()
0198 {
0199   G4cout << "\n The Absorber is " << G4BestUnit(fRadius, "Length") << " of " << fMaterial->GetName()
0200          << "\n \n"
0201          << fMaterial << G4endl;
0202 }
0203
0204 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
0205
0206 void DetectorConstruction::SetMaterial(G4String materialChoice)
0207 {
0208   // search the material by its name
0209   G4Material* pttoMaterial = G4NistManager::Instance()->FindOrBuildMaterial(materialChoice);
0210
0211   if (pttoMaterial) {
0212     fMaterial = pttoMaterial;
0213     if (fLAbsor) {
0214       fLAbsor->SetMaterial(fMaterial);
0215     }
0216     G4RunManager::GetRunManager()->PhysicsHasBeenModified();
0217   }
0218   else {
0219     G4cout << "\n--> warning from DetectorConstruction::SetMaterial : " << materialChoice
0220            << " not found" << G4endl;
0221   }
0222 }
0223
0224 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
0225
0226 void DetectorConstruction::SetRadius(G4double value)
0227 {
0228   fRadius = value;
0229   fWorldSize = 1.1 * fRadius;
0230   G4RunManager::GetRunManager()->ReinitializeGeometry();
0231 }
0232
0233 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......