Geant4 Cross Reference |
1 // 1 // 2 // ******************************************* 2 // ******************************************************************** 3 // * License and Disclaimer 3 // * License and Disclaimer * 4 // * 4 // * * 5 // * The Geant4 software is copyright of th 5 // * The Geant4 software is copyright of the Copyright Holders of * 6 // * the Geant4 Collaboration. It is provided 6 // * the Geant4 Collaboration. It is provided under the terms and * 7 // * conditions of the Geant4 Software License 7 // * conditions of the Geant4 Software License, included in the file * 8 // * LICENSE and available at http://cern.ch/ 8 // * LICENSE and available at http://cern.ch/geant4/license . These * 9 // * include a list of copyright holders. 9 // * include a list of copyright holders. * 10 // * 10 // * * 11 // * Neither the authors of this software syst 11 // * Neither the authors of this software system, nor their employing * 12 // * institutes,nor the agencies providing fin 12 // * institutes,nor the agencies providing financial support for this * 13 // * work make any representation or warran 13 // * work make any representation or warranty, express or implied, * 14 // * regarding this software system or assum 14 // * regarding this software system or assume any liability for its * 15 // * use. Please see the license in the file 15 // * use. Please see the license in the file LICENSE and URL above * 16 // * for the full disclaimer and the limitatio 16 // * for the full disclaimer and the limitation of liability. * 17 // * 17 // * * 18 // * This code implementation is the result 18 // * This code implementation is the result of the scientific and * 19 // * technical work of the GEANT4 collaboratio 19 // * technical work of the GEANT4 collaboration. * 20 // * By using, copying, modifying or distri 20 // * By using, copying, modifying or distributing the software (or * 21 // * any work based on the software) you ag 21 // * any work based on the software) you agree to acknowledge its * 22 // * use in resulting scientific publicati 22 // * use in resulting scientific publications, and indicate your * 23 // * acceptance of all terms of the Geant4 Sof 23 // * acceptance of all terms of the Geant4 Software license. * 24 // ******************************************* 24 // ******************************************************************** 25 // 25 // 26 // << 27 /// \file optical/LXe/src/LXeWLSFiber.cc << 28 /// \brief Implementation of the LXeWLSFiber c << 29 // << 30 // << 31 #include "LXeWLSFiber.hh" 26 #include "LXeWLSFiber.hh" 32 << 33 #include "G4Box.hh" << 34 #include "G4LogicalVolume.hh" << 35 #include "G4Material.hh" << 36 #include "G4SystemOfUnits.hh" << 37 #include "G4Tubs.hh" << 38 #include "globals.hh" 27 #include "globals.hh" >> 28 #include "G4LogicalSkinSurface.hh" >> 29 #include "G4LogicalBorderSurface.hh" 39 30 40 G4LogicalVolume* LXeWLSFiber::fClad2_log = nul << 31 G4LogicalVolume* LXeWLSFiber::clad2_log=NULL; 41 << 42 //....oooOO0OOooo........oooOO0OOooo........oo << 43 32 44 LXeWLSFiber::LXeWLSFiber(G4RotationMatrix* pRo << 33 LXeWLSFiber::LXeWLSFiber(G4RotationMatrix *pRot, 45 G4LogicalVolume* pMot << 34 const G4ThreeVector &tlate, 46 LXeDetectorConstructi << 35 G4LogicalVolume *pMotherLogical, 47 : G4PVPlacement( << 36 G4bool pMany, 48 pRot, tlate, << 37 G4int pCopyNo, 49 new G4LogicalVolume(new G4Box("temp", 1. << 38 LXeDetectorConstruction* c) 50 "Cladding2", pMotherLogical, pMany, pCop << 39 :G4PVPlacement(pRot,tlate, 51 fConstructor(c) << 40 new G4LogicalVolume(new G4Box("temp",1,1,1), >> 41 G4Material::GetMaterial("Vacuum"), >> 42 "temp",0,0,0), >> 43 "Cladding2",pMotherLogical,pMany,pCopyNo),constructor(c) 52 { 44 { 53 CopyValues(); 45 CopyValues(); 54 << 46 55 // The Fiber << 47 if(!clad2_log || updated){ 56 // << 48 // The Fiber 57 auto fiber_tube = << 49 // 58 new G4Tubs("Fiber", fFiber_rmin, fFiber_rm << 50 G4Tubs* Fiber_tube = 59 << 51 new G4Tubs("Fiber",fiber_rmin,fiber_rmax,fiber_z,fiber_sphi,fiber_ephi); 60 auto fiber_log = new G4LogicalVolume(fiber_t << 52 61 << 53 G4LogicalVolume* Fiber_log = 62 // Cladding (first layer) << 54 new G4LogicalVolume(Fiber_tube,G4Material::GetMaterial("PMMA"), 63 // << 55 "Fiber",0,0,0); 64 auto clad1_tube = << 56 65 new G4Tubs("Cladding1", fClad1_rmin, fClad << 57 // Cladding (first layer) 66 << 58 // 67 auto clad1_log = << 59 G4Tubs* clad1_tube = 68 new G4LogicalVolume(clad1_tube, G4Material << 60 new G4Tubs("Cladding1",clad1_rmin,clad1_rmax,clad1_z,clad1_sphi, 69 << 61 clad1_ephi); 70 // Cladding (second layer) << 62 71 // << 63 G4LogicalVolume* clad1_log = 72 auto clad2_tube = << 64 new G4LogicalVolume(clad1_tube,G4Material::GetMaterial("Pethylene"), 73 new G4Tubs("Cladding2", fClad2_rmin, fClad << 65 "Cladding1",0,0,0); 74 << 66 75 fClad2_log = new G4LogicalVolume(clad2_tube, << 67 // Cladding (second layer) 76 << 68 // 77 new G4PVPlacement(nullptr, G4ThreeVector(0., << 69 G4Tubs* clad2_tube = 78 new G4PVPlacement(nullptr, G4ThreeVector(0., << 70 new G4Tubs("Cladding2",clad2_rmin,clad2_rmax,clad2_z,clad2_sphi, 79 0); << 71 clad2_ephi); 80 << 72 81 SetLogicalVolume(fClad2_log); << 73 clad2_log = >> 74 new G4LogicalVolume(clad2_tube,G4Material::GetMaterial("fPethylene"), >> 75 "Cladding2",0,0,0); >> 76 >> 77 new G4PVPlacement(0,G4ThreeVector(0.,0.,0.),Fiber_log, >> 78 "Fiber", clad1_log,false,0); >> 79 new G4PVPlacement(0,G4ThreeVector(0.,0.,0.),clad1_log, >> 80 "Cladding1",clad2_log,false,0); >> 81 } >> 82 >> 83 SetLogicalVolume(clad2_log); 82 } 84 } 83 85 84 //....oooOO0OOooo........oooOO0OOooo........oo << 86 void LXeWLSFiber::CopyValues(){ >> 87 updated=constructor->GetUpdated(); >> 88 >> 89 fiber_rmin = 0.00*cm; >> 90 fiber_rmax = 0.10*cm; >> 91 fiber_z = constructor->GetScintX()/2; >> 92 fiber_sphi = 0.00*deg; >> 93 fiber_ephi = 360.*deg; >> 94 >> 95 clad1_rmin = 0.;// fiber_rmax; >> 96 clad1_rmax = fiber_rmax + 0.015*fiber_rmax; >> 97 >> 98 clad1_z = fiber_z; >> 99 clad1_sphi = fiber_sphi; >> 100 clad1_ephi = fiber_ephi; >> 101 >> 102 clad2_rmin = 0.;//clad1_rmax; >> 103 clad2_rmax = clad1_rmax + 0.015*fiber_rmax; >> 104 >> 105 clad2_z = fiber_z; >> 106 clad2_sphi = fiber_sphi; >> 107 clad2_ephi = fiber_ephi; 85 108 86 void LXeWLSFiber::CopyValues() << 87 { << 88 fFiber_rmin = 0.0 * cm; << 89 fFiber_rmax = 0.1 * cm; << 90 fFiber_z = fConstructor->GetScintX() / 2.; << 91 fFiber_sphi = 0.0 * deg; << 92 fFiber_ephi = 360. * deg; << 93 << 94 fClad1_rmin = 0.; // fFiber_rmax; << 95 fClad1_rmax = fFiber_rmax + 0.015 * fFiber_r << 96 << 97 fClad1_z = fFiber_z; << 98 fClad1_sphi = fFiber_sphi; << 99 fClad1_ephi = fFiber_ephi; << 100 << 101 fClad2_rmin = 0.; // fClad1_rmax; << 102 fClad2_rmax = fClad1_rmax + 0.015 * fFiber_r << 103 << 104 fClad2_z = fFiber_z; << 105 fClad2_sphi = fFiber_sphi; << 106 fClad2_ephi = fFiber_ephi; << 107 } 109 } 108 110