| 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