Geant4.10
 All Data Structures Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Groups Pages
WLSDetectorConstruction.cc
Go to the documentation of this file.
1 //
2 // ********************************************************************
3 // * License and Disclaimer *
4 // * *
5 // * The Geant4 software is copyright of the Copyright Holders of *
6 // * the Geant4 Collaboration. It is provided under the terms and *
7 // * conditions of the Geant4 Software License, included in the file *
8 // * LICENSE and available at http://cern.ch/geant4/license . These *
9 // * include a list of copyright holders. *
10 // * *
11 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file LICENSE and URL above *
16 // * for the full disclaimer and the limitation of liability. *
17 // * *
18 // * This code implementation is the result of the scientific and *
19 // * technical work of the GEANT4 collaboration. *
20 // * By using, copying, modifying or distributing the software (or *
21 // * any work based on the software) you agree to acknowledge its *
22 // * use in resulting scientific publications, and indicate your *
23 // * acceptance of all terms of the Geant4 Software license. *
24 // ********************************************************************
25 //
26 // $Id: WLSDetectorConstruction.cc 78066 2013-12-03 11:08:36Z gcosmo $
27 //
28 /// \file optical/wls/src/WLSDetectorConstruction.cc
29 /// \brief Implementation of the WLSDetectorConstruction class
30 //
31 //
32 #include "G4ios.hh"
33 #include "globals.hh"
34 
35 #include "G4Box.hh"
36 #include "G4Tubs.hh"
37 #include "G4EllipticalTube.hh"
38 
39 #include "G4LogicalVolume.hh"
40 #include "G4PVPlacement.hh"
41 
42 #include "G4OpBoundaryProcess.hh"
43 #include "G4LogicalSkinSurface.hh"
44 #include "G4LogicalBorderSurface.hh"
45 
46 #include "G4Material.hh"
47 #include "G4NistManager.hh"
48 
49 #include "G4GeometryManager.hh"
50 #include "G4SolidStore.hh"
51 #include "G4LogicalVolumeStore.hh"
52 #include "G4PhysicalVolumeStore.hh"
53 
54 #include "G4RunManager.hh"
55 
56 #include "WLSDetectorConstruction.hh"
57 #include "WLSDetectorMessenger.hh"
58 #include "WLSMaterials.hh"
59 #include "WLSPhotonDetSD.hh"
60 
61 #include "G4UserLimits.hh"
62 #include "G4PhysicalConstants.hh"
63 #include "G4SystemOfUnits.hh"
64 
65 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
66 
67 WLSDetectorConstruction::WLSDetectorConstruction()
68  : fMaterials(NULL), fLogicHole(NULL), fLogicWorld(NULL),
69  fPhysiWorld(NULL), fPhysiHole(NULL)
70 {
71  fDetectorMessenger = new WLSDetectorMessenger(this);
72 
73  fNumOfCladLayers = 0;
74 
75  fSurfaceRoughness = 1;
76 
77  fMirrorToggle = true;
78  fMirrorPolish = 1.;
79  fMirrorReflectivity = 1.;
80 
81  fMPPCPolish = 1.;
82  fMPPCReflectivity = 0.;
83 
84  fExtrusionPolish = 1.;
85  fExtrusionReflectivity = 1.;
86 
87  fXYRatio = 1.0;
88 
89  fWLSfiberZ = 1.*m;
90  fWLSfiberRY = 0.5*mm;
91  fWLSfiberOrigin = 0.0;
92 
93  fMPPCShape = "Circle";
94  fMPPCHalfL = fWLSfiberRY;
95  fMPPCDist = 0.00*mm;
96  fMPPCTheta = 0.0*deg;
97  fMPPCZ = 0.05*mm;
98 
99  fClrfiberZ = fMPPCZ + 10.*nm;
100  fMirrorZ = 0.1*mm;
101 
102  fBarLength = 1.*m;
103  fBarBase = 9.6*mm;
104  fHoleRadius = 0.9*mm;
105  fHoleLength = fBarLength;
106  fCoatingThickness = 0.25*mm;
107  fCoatingRadius = 1.875*mm;
108 }
109 
110 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
111 
112 WLSDetectorConstruction::~WLSDetectorConstruction()
113 {
114  if (fDetectorMessenger) delete fDetectorMessenger;
115  if (fMaterials) delete fMaterials;
116 }
117 
118 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
119 
120 G4VPhysicalVolume* WLSDetectorConstruction::Construct()
121 {
122  if (fPhysiWorld) {
123  G4GeometryManager::GetInstance()->OpenGeometry();
124  G4PhysicalVolumeStore::GetInstance()->Clean();
125  G4LogicalVolumeStore::GetInstance()->Clean();
126  G4SolidStore::GetInstance()->Clean();
127  G4LogicalSkinSurface::CleanSurfaceTable();
128  G4LogicalBorderSurface::CleanSurfaceTable();
129  }
130 
131  fMaterials = WLSMaterials::GetInstance();
132 
133  UpdateGeometryParameters();
134 
135  return ConstructDetector();
136 }
137 
138 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
139 
140 G4VPhysicalVolume* WLSDetectorConstruction::ConstructDetector()
141 {
142  //--------------------------------------------------
143  // World
144  //--------------------------------------------------
145 
146  G4VSolid* solidWorld =
147  new G4Box("World", fWorldSizeX, fWorldSizeY, fWorldSizeZ);
148 
149  fLogicWorld = new G4LogicalVolume(solidWorld,
150  FindMaterial("G4_AIR"),
151  "World");
152 
153  fPhysiWorld = new G4PVPlacement(0,
154  G4ThreeVector(),
155  fLogicWorld,
156  "World",
157  0,
158  false,
159  0);
160 
161  //--------------------------------------------------
162  // Extrusion
163  //--------------------------------------------------
164 
165  G4VSolid* solidExtrusion =
166  new G4Box("Extrusion",GetBarBase()/2,GetBarBase()/2,GetBarLength()/2);
167 
168  G4LogicalVolume* logicExtrusion =
169  new G4LogicalVolume(solidExtrusion,
170  FindMaterial("Coating"),
171  "Extrusion");
172 
173  G4OpticalSurface* TiO2Surface = new G4OpticalSurface("TiO2Surface",
174  glisur,
175  ground,
176  dielectric_metal,
177  fExtrusionPolish);
178 
179  G4MaterialPropertiesTable* TiO2SurfaceProperty =
180  new G4MaterialPropertiesTable();
181 
182  G4double p_TiO2[2] = {2.00*eV, 3.47*eV};
183  G4double refl_TiO2[2] = {fExtrusionReflectivity,fExtrusionReflectivity};
184  G4double effi_TiO2[2] = {0, 0};
185 
186  TiO2SurfaceProperty -> AddProperty("REFLECTIVITY",p_TiO2,refl_TiO2,2);
187  TiO2SurfaceProperty -> AddProperty("EFFICIENCY",p_TiO2,effi_TiO2,2);
188 
189  TiO2Surface -> SetMaterialPropertiesTable(TiO2SurfaceProperty);
190 
191  new G4PVPlacement(0,
192  G4ThreeVector(),
193  logicExtrusion,
194  "Extrusion",
195  fLogicWorld,
196  false,
197  0);
198 
199  new G4LogicalSkinSurface("TiO2Surface",logicExtrusion,TiO2Surface);
200 
201  //--------------------------------------------------
202  // Scintillator
203  //--------------------------------------------------
204 
205  G4VSolid* solidScintillator = new G4Box("Scintillator",
206  GetBarBase()/2-GetCoatingThickness()
207  -GetCoatingRadius(),
208  GetBarBase()/2-GetCoatingThickness()
209  -GetCoatingRadius(),
210  GetBarLength()/2);
211 
212  G4LogicalVolume* logicScintillator =
213  new G4LogicalVolume(solidScintillator,
214  FindMaterial("Polystyrene"),
215  "Scintillator");
216 
217  new G4PVPlacement(0,
218  G4ThreeVector(),
219  logicScintillator,
220  "Scintillator",
221  logicExtrusion,
222  false,
223  0);
224 
225  if (GetCoatingRadius() > 0.*mm) {
226  G4VSolid* solidScintside = new G4Box("SideOfBar",
227  GetBarBase()/2-GetCoatingThickness()
228  -GetCoatingRadius(),
229  GetCoatingRadius()/2,
230  GetBarLength()/2);
231  G4VSolid* solidScintcrnr = new G4Tubs("CrnrOfBar",
232  0.0*cm,
233  GetCoatingRadius(),
234  GetBarLength()/2,
235  0.*deg,
236  90.*deg);
237  G4LogicalVolume* logicScintSide =
238  new G4LogicalVolume(solidScintside,
239  FindMaterial("Polystyrene"),
240  "SideOfBar");
241 
242  G4LogicalVolume* logicScintCrnr =
243  new G4LogicalVolume(solidScintcrnr,
244  FindMaterial("Polystyrene"),
245  "CrnrOfBar");
246 
247  G4double x = GetBarBase()/2-GetCoatingThickness()-GetCoatingRadius()/2;
248  G4double y = GetBarBase()/2-GetCoatingThickness()-GetCoatingRadius()/2;
249 
250  new G4PVPlacement(0,
251  G4ThreeVector(0,-y,0),
252  logicScintSide,
253  "SideOfBar",
254  logicExtrusion,
255  false,
256  0);
257  new G4PVPlacement(0,
258  G4ThreeVector(0, y,0),
259  logicScintSide,
260  "SideOfBar",
261  logicExtrusion,
262  false,
263  1);
264 
265  G4RotationMatrix* g4rot = new G4RotationMatrix();
266  *g4rot = StringToRotationMatrix("Z90");
267  *g4rot = g4rot->inverse();
268  if (*g4rot == G4RotationMatrix()) g4rot = NULL;
269 
270  new G4PVPlacement(g4rot,
271  G4ThreeVector(x,0,0),
272  logicScintSide,
273  "SideOfBar",
274  logicExtrusion,
275  false,
276  2);
277  new G4PVPlacement(g4rot,
278  G4ThreeVector(-x,0,0),
279  logicScintSide,
280  "SideOfBar",
281  logicExtrusion,
282  false,
283  3);
284 
285  x = GetBarBase()/2-GetCoatingThickness()-GetCoatingRadius();
286  y = GetBarBase()/2-GetCoatingThickness()-GetCoatingRadius();
287 
288  new G4PVPlacement(0,
289  G4ThreeVector(x,y,0),
290  logicScintCrnr,
291  "CrnrOfBar",
292  logicExtrusion,
293  false,
294  0);
295 
296  new G4PVPlacement(g4rot,
297  G4ThreeVector(-x,y,0),
298  logicScintCrnr,
299  "CrnrOfBar",
300  logicExtrusion,
301  false,
302  1);
303 
304  g4rot = new G4RotationMatrix();
305  *g4rot = StringToRotationMatrix("Z180");
306  *g4rot = g4rot->inverse();
307  if (*g4rot == G4RotationMatrix()) g4rot = NULL;
308 
309  new G4PVPlacement(g4rot,
310  G4ThreeVector(-x,-y,0),
311  logicScintCrnr,
312  "CrnrOfBar",
313  logicExtrusion,
314  false,
315  2);
316 
317  g4rot = new G4RotationMatrix();
318  *g4rot = StringToRotationMatrix("Z270");
319  *g4rot = g4rot->inverse();
320  if (*g4rot == G4RotationMatrix()) g4rot = NULL;
321 
322  new G4PVPlacement(g4rot,
323  G4ThreeVector(x,-y,0),
324  logicScintCrnr,
325  "CrnrOfBar",
326  logicExtrusion,
327  false,
328  3);
329 
330  }
331 
332  if (GetFiberRadius()<GetHoleRadius()) {
333 
334  G4VSolid* solidHole = new G4Tubs("Hole",
335  0.0*cm,
336  GetHoleRadius(),
337  GetHoleLength()/2,
338  0.*deg,
339  360.*deg);
340  fLogicHole = new G4LogicalVolume(solidHole,
341  FindMaterial("G4_AIR"),
342  "Hole");
343 
344  fPhysiHole = new G4PVPlacement(0,
345  G4ThreeVector(),
346  fLogicHole,
347  "Hole",
348  logicScintillator,
349  false,
350  0);
351  }
352 
353  //--------------------------------------------------
354  // Fiber
355  //--------------------------------------------------
356 
357  ConstructFiber();
358 
359  //--------------------------------------------------
360  // End of Construction
361  //--------------------------------------------------
362 
363  return fPhysiWorld;
364 }
365 
366 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
367 
368 void WLSDetectorConstruction::ConstructFiber()
369 {
370  if (!(fLogicHole) || !(fPhysiHole) ) {
371  std::ostringstream o;
372  o << "The Fiber Hole has not been constructed";
373  G4Exception("WLSDetectorConstruction::ConstructFiber","",
374  FatalException,o.str().c_str());
375  }
376 
377  // Pointers to the most recently constructed volume
378  G4LogicalVolume* logicPlacement = fLogicHole;
379  G4VPhysicalVolume* physiPlacement = fPhysiHole;
380 
381  //--------------------------------------------------
382  // Fiber Construction
383  //--------------------------------------------------
384 
385  // Boundary Surface Properties
386  G4OpticalSurface* opSurface = NULL;
387 
388  if (fSurfaceRoughness < 1.)
389  opSurface = new G4OpticalSurface("RoughSurface", // Surface Name
390  glisur, // SetModel
391  ground, // SetFinish
392  dielectric_dielectric, // SetType
393  fSurfaceRoughness); // SetPolish
394 
395  G4LogicalVolume *logicClad1, *logicClad2;
396  G4VPhysicalVolume *physiClad1, *physiClad2;
397 
398  // Determine the number of cladding layers to be built
399  switch ( fNumOfCladLayers ) {
400 
401  case 2:
402 
403  //--------------------------------------------------
404  // Cladding 2
405  //--------------------------------------------------
406 
407  G4VSolid* solidClad2;
408 
409  if (fXYRatio == 1.)
410  solidClad2 = new G4Tubs("Clad2",0.,fClad2RX,fClad2Z,0.0*rad,twopi*rad);
411  else
412  solidClad2 = new G4EllipticalTube("Clad2",fClad2RX,fClad2RY,fClad2Z);
413 
414  logicClad2 = new G4LogicalVolume(solidClad2,
415  FindMaterial("FPethylene"),
416  "Clad2");
417 
418  physiClad2 = new G4PVPlacement(0,
419  G4ThreeVector(0.0,0.0,fWLSfiberOrigin),
420  logicClad2,
421  "Clad2",
422  logicPlacement,
423  false,
424  0);
425 
426  // Place the rough surface only if needed
427  if (opSurface) {
428  new G4LogicalBorderSurface("surfaceClad2Out",
429  physiClad2,
430  physiPlacement,
431  opSurface);
432  new G4LogicalBorderSurface("surfaceClad2In",
433  physiPlacement,
434  physiClad2,
435  opSurface);
436  }
437 
438  logicPlacement = logicClad2;
439  physiPlacement = physiClad2;
440 
441  case 1:
442 
443  //--------------------------------------------------
444  // Cladding 1
445  //--------------------------------------------------
446 
447  G4VSolid* solidClad1;
448 
449  if (fXYRatio == 1.)
450  solidClad1 = new G4Tubs("Clad1",0.,fClad1RX,fClad1Z,0.0*rad,twopi*rad);
451  else
452  solidClad1 = new G4EllipticalTube("Clad1",fClad1RX,fClad1RY,fClad1Z);
453 
454  logicClad1 = new G4LogicalVolume(solidClad1,
455  FindMaterial("Pethylene"),
456  "Clad1");
457 
458  physiClad1 = new G4PVPlacement(0,
459  G4ThreeVector(0.0,0.0,fWLSfiberOrigin),
460  logicClad1,
461  "Clad1",
462  logicPlacement,
463  false,
464  0);
465 
466  // Place the rough surface only if needed
467  if (opSurface) {
468  new G4LogicalBorderSurface("surfaceClad1Out",
469  physiClad1,
470  physiPlacement,
471  opSurface);
472  new G4LogicalBorderSurface("surfaceClad1In",
473  physiPlacement,
474  physiClad1,
475  opSurface);
476  }
477 
478  logicPlacement = logicClad1;
479  physiPlacement = physiClad1;
480 
481  default:
482 
483  //--------------------------------------------------
484  // WLS Fiber
485  //--------------------------------------------------
486 
487  G4VSolid* solidWLSfiber;
488 
489  if (fXYRatio == 1.)
490  solidWLSfiber =
491  new G4Tubs("WLSFiber",0.,fWLSfiberRX,fWLSfiberZ,0.0*rad,twopi*rad);
492  else
493  solidWLSfiber =
494  new G4EllipticalTube("WLSFiber",fWLSfiberRX,fWLSfiberRY,fWLSfiberZ);
495 
496  G4LogicalVolume* logicWLSfiber =
497  new G4LogicalVolume(solidWLSfiber,
498  FindMaterial("PMMA"),
499  "WLSFiber");
500 
501  logicWLSfiber->SetUserLimits(new G4UserLimits(DBL_MAX,DBL_MAX,10*ms));
502 
503  G4VPhysicalVolume* physiWLSfiber = new G4PVPlacement(0,
504  G4ThreeVector(0.0,0.0,fWLSfiberOrigin),
505  logicWLSfiber,
506  "WLSFiber",
507  logicPlacement,
508  false,
509  0);
510 
511  // Place the rough surface only if needed
512  if (opSurface) {
513  new G4LogicalBorderSurface("surfaceWLSOut",
514  physiWLSfiber,
515  physiPlacement,
516  opSurface);
517  new G4LogicalBorderSurface("surfaceWLSIn",
518  physiPlacement,
519  physiWLSfiber,
520  opSurface);
521  }
522  }
523 
524  //--------------------------------------------------
525  // Mirror for reflection at one of the end
526  //--------------------------------------------------
527 
528  // Place the mirror only if the user wants the mirror
529  if (fMirrorToggle) {
530 
531  G4VSolid* solidMirror = new G4Box("Mirror",
532  fMirrorRmax,
533  fMirrorRmax,
534  fMirrorZ);
535 
536  G4LogicalVolume* logicMirror = new G4LogicalVolume(solidMirror,
537  FindMaterial("G4_Al"),
538  "Mirror");
539 
540  G4OpticalSurface* mirrorSurface = new G4OpticalSurface("MirrorSurface",
541  glisur,
542  ground,
543  dielectric_metal,
544  fMirrorPolish);
545 
546  G4MaterialPropertiesTable* mirrorSurfaceProperty =
547  new G4MaterialPropertiesTable();
548 
549  G4double p_mirror[2] = {2.00*eV, 3.47*eV};
550  G4double refl_mirror[2] = {fMirrorReflectivity,fMirrorReflectivity};
551  G4double effi_mirror[2] = {0, 0};
552 
553  mirrorSurfaceProperty->AddProperty("REFLECTIVITY",p_mirror,refl_mirror,2);
554  mirrorSurfaceProperty->AddProperty("EFFICIENCY",p_mirror,effi_mirror,2);
555 
556  mirrorSurface -> SetMaterialPropertiesTable(mirrorSurfaceProperty);
557 
558  new G4PVPlacement(0,
559  G4ThreeVector(0.0,0.0,fMirrorOrigin),
560  logicMirror,
561  "Mirror",
562  fLogicWorld,
563  false,
564  0);
565 
566  new G4LogicalSkinSurface("MirrorSurface",logicMirror,mirrorSurface);
567  }
568 
569  //--------------------------------------------------
570  // Coupling at the read-out end
571  //--------------------------------------------------
572 
573  // Clear Fiber (Coupling Layer)
574  G4VSolid* solidCouple = new G4Box("Couple",fCoupleRX,fCoupleRY,fCoupleZ);
575 
576  G4LogicalVolume* logicCouple = new G4LogicalVolume(solidCouple,
577  FindMaterial("G4_AIR"),
578  "Couple");
579 
580  new G4PVPlacement(0,
581  G4ThreeVector(0.0,0.0,fCoupleOrigin),
582  logicCouple,
583  "Couple",
584  fLogicWorld,
585  false,
586  0);
587 
588  //--------------------------------------------------
589  // A logical layer in front of PhotonDet
590  //--------------------------------------------------
591 
592  // Purpose: Preventing direct dielectric to metal contact
593 
594  // Check for valid placement of PhotonDet
595  if (fMPPCTheta > std::atan(fMPPCDist / fMPPCHalfL)) {
596 
597  fMPPCTheta = 0;
598  fMPPCOriginX = std::sin(fMPPCTheta) * (fMPPCDist + fClrfiberZ);
599  fMPPCOriginZ = -fCoupleZ+std::cos(fMPPCTheta)*(fMPPCDist+fClrfiberZ);
600  G4cerr << "Invalid alignment. Alignment Reset to 0" << G4endl;
601  }
602 
603  // Clear Fiber (Coupling Layer)
604  G4VSolid* solidClrfiber;
605 
606  if ( fMPPCShape == "Square" )
607  solidClrfiber =
608  new G4Box("ClearFiber",fClrfiberHalfL,fClrfiberHalfL,fClrfiberZ);
609  else
610  solidClrfiber =
611  new G4Tubs("ClearFiber",0.,fClrfiberHalfL,fClrfiberZ,0.0*rad,twopi*rad);
612 
613  G4LogicalVolume* logicClrfiber =
614  new G4LogicalVolume(solidClrfiber,
615  FindMaterial("G4_AIR"),
616  "ClearFiber");
617 
618  new G4PVPlacement(new G4RotationMatrix(CLHEP::HepRotationY(-fMPPCTheta)),
619  G4ThreeVector(fMPPCOriginX,0.0,fMPPCOriginZ),
620  logicClrfiber,
621  "ClearFiber",
622  logicCouple,
623  false,
624  0);
625 
626  //--------------------------------------------------
627  // PhotonDet (Sensitive Detector)
628  //--------------------------------------------------
629 
630  // Physical Construction
631  G4VSolid* solidPhotonDet;
632 
633  if ( fMPPCShape == "Square" )
634  solidPhotonDet = new G4Box("PhotonDet",fMPPCHalfL,fMPPCHalfL,fMPPCZ);
635  else
636  solidPhotonDet =
637  new G4Tubs("PhotonDet",0.,fMPPCHalfL,fMPPCZ,0.0*rad,twopi*rad);
638 
639  G4LogicalVolume* logicPhotonDet =
640  new G4LogicalVolume(solidPhotonDet,
641  FindMaterial("G4_Al"),
642  "PhotonDet_LV");
643 
644  new G4PVPlacement(0,
645  G4ThreeVector(0.0,0.0,0.0),
646  logicPhotonDet,
647  "PhotonDet",
648  logicClrfiber,
649  false,
650  0);
651 
652  // PhotonDet Surface Properties
653  G4OpticalSurface* photonDetSurface = new G4OpticalSurface("PhotonDetSurface",
654  glisur,
655  ground,
656  dielectric_metal,
657  fMPPCPolish);
658 
659  G4MaterialPropertiesTable* photonDetSurfaceProperty =
660  new G4MaterialPropertiesTable();
661 
662  G4double p_mppc[2] = {2.00*eV, 3.47*eV};
663  G4double refl_mppc[2] = {fMPPCReflectivity,fMPPCReflectivity};
664  G4double effi_mppc[2] = {1, 1};
665 
666  photonDetSurfaceProperty -> AddProperty("REFLECTIVITY",p_mppc,refl_mppc,2);
667  photonDetSurfaceProperty -> AddProperty("EFFICIENCY",p_mppc,effi_mppc,2);
668 
669  photonDetSurface -> SetMaterialPropertiesTable(photonDetSurfaceProperty);
670 
671 
672  new G4LogicalSkinSurface("PhotonDetSurface",logicPhotonDet,photonDetSurface);
673 }
674 
675 
676 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
677 
678 void WLSDetectorConstruction::ConstructSDandField()
679 {
680  if (!fmppcSD.Get()) {
681  G4String mppcSDName = "WLS/PhotonDet";
682  WLSPhotonDetSD* mppcSD = new WLSPhotonDetSD(mppcSDName);
683  fmppcSD.Put(mppcSD);
684  }
685  SetSensitiveDetector("PhotonDet_LV", fmppcSD.Get(), true);
686 
687 }
688 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
689 
690 void WLSDetectorConstruction::UpdateGeometryParameters()
691 {
692  fWLSfiberRX = fXYRatio * fWLSfiberRY;
693 
694  fClad1RX = fWLSfiberRX + 0.03*fWLSfiberRX;
695  fClad1RY = fWLSfiberRY + 0.03*fWLSfiberRY;
696  fClad1Z = fWLSfiberZ;
697 
698  fClad2RX = fClad1RX + 0.03*fWLSfiberRX;
699  fClad2RY = fClad1RY + 0.03*fWLSfiberRY;
700  fClad2Z = fWLSfiberZ;
701 
702  fWorldSizeX = fClad2RX + fMPPCDist + fMPPCHalfL + 1.*cm;
703  fWorldSizeY = fClad2RY + fMPPCDist + fMPPCHalfL + 1.*cm;
704  fWorldSizeZ = fWLSfiberZ + fMPPCDist + fMPPCHalfL + 1.*cm;
705 
706  fCoupleRX = fWorldSizeX;
707  fCoupleRY = fWorldSizeY;
708  fCoupleZ = (fWorldSizeZ - fWLSfiberZ) / 2;
709 
710  fClrfiberHalfL = fMPPCHalfL;
711 
712  fMirrorRmax = fClad2RY;
713 
714  fCoupleOrigin = fWLSfiberOrigin + fWLSfiberZ + fCoupleZ;
715  fMirrorOrigin = fWLSfiberOrigin - fWLSfiberZ - fMirrorZ;
716  fMPPCOriginX = std::sin(fMPPCTheta) * (fMPPCDist + fClrfiberZ);
717  fMPPCOriginZ = -fCoupleZ + std::cos(fMPPCTheta) * (fMPPCDist + fClrfiberZ);
718 }
719 
720 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
721 
722 G4RotationMatrix
723  WLSDetectorConstruction::StringToRotationMatrix(G4String rotation)
724 {
725  // We apply successive rotations OF THE OBJECT around the FIXED
726  // axes of the parent's local coordinates; rotations are applied
727  // left-to-right (rotation="r1,r2,r3" => r1 then r2 then r3).
728 
729  G4RotationMatrix rot;
730 
731  unsigned int place = 0;
732 
733  while (place < rotation.size()) {
734 
735  G4double angle;
736  char* p;
737 
738  const G4String tmpstring=rotation.substr(place+1);
739 
740  angle = strtod(tmpstring.c_str(),&p) * deg;
741 
742  if (!p || (*p != (char)',' && *p != (char)'\0')) {
743  G4cerr << "Invalid rotation specification: " <<
744  rotation.c_str() << G4endl;
745  return rot;
746  }
747 
748  G4RotationMatrix thisRotation;
749 
750  switch(rotation.substr(place,1).c_str()[0]) {
751  case 'X': case 'x':
752  thisRotation = G4RotationMatrix(CLHEP::HepRotationX(angle));
753  break;
754  case 'Y': case 'y':
755  thisRotation = G4RotationMatrix(CLHEP::HepRotationY(angle));
756  break;
757  case 'Z': case 'z':
758  thisRotation = G4RotationMatrix(CLHEP::HepRotationZ(angle));
759  break;
760  default:
761  G4cerr << " Invalid rotation specification: "
762  << rotation << G4endl;
763  return rot;
764  }
765 
766  rot = thisRotation * rot;
767  place = rotation.find(',',place);
768  if (place > rotation.size()) break;
769  ++place;
770  }
771 
772  return rot;
773 
774 }
775 
776 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
777 
778 void WLSDetectorConstruction::SetPhotonDetGeometry (G4String shape)
779 // Set the Geometry of the PhotonDet detector
780 // Pre: shape must be either "Circle" and "Square"
781 {
782  if (shape == "Circle" || shape == "Square" ) fMPPCShape = shape;
783  G4RunManager::GetRunManager()->ReinitializeGeometry();
784 }
785 
786 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
787 
788 void WLSDetectorConstruction::SetNumberOfCladding(G4int num)
789 // Set the number of claddings
790 // Pre: 0 <= num <= 2
791 {
792  fNumOfCladLayers = num;
793  G4RunManager::GetRunManager()->ReinitializeGeometry();
794 }
795 
796 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
797 
798 void WLSDetectorConstruction::SetWLSLength (G4double length)
799 // Set the TOTAL length of the WLS fiber
800 {
801  fWLSfiberZ = length;
802  G4RunManager::GetRunManager()->ReinitializeGeometry();
803 }
804 
805 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
806 
807 void WLSDetectorConstruction::SetWLSRadius (G4double radius)
808 // Set the Y radius of WLS fiber
809 {
810  fWLSfiberRY = radius;
811  G4RunManager::GetRunManager()->ReinitializeGeometry();
812 }
813 
814 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
815 
816 void WLSDetectorConstruction::SetClad1Radius (G4double radius)
817 // Set the Y radius of Cladding 1
818 {
819  fClad1RY = radius;
820  G4RunManager::GetRunManager()->ReinitializeGeometry();
821 }
822 
823 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
824 
825 void WLSDetectorConstruction::SetClad2Radius (G4double radius)
826 // Set the Y radius of Cladding 2
827 {
828  fClad2RY = radius;
829  G4RunManager::GetRunManager()->ReinitializeGeometry();
830 }
831 
832 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
833 
834 void WLSDetectorConstruction::SetPhotonDetHalfLength(G4double halfL)
835 // Set the half length of the PhotonDet detector
836 // The half length will be the radius if PhotonDet is circular
837 {
838  fMPPCHalfL = halfL;
839  G4RunManager::GetRunManager()->ReinitializeGeometry();
840 }
841 
842 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
843 
844 void WLSDetectorConstruction::SetGap (G4double gap)
845 // Set the distance between fiber end and PhotonDet
846 {
847  fMPPCDist = gap;
848  G4RunManager::GetRunManager()->ReinitializeGeometry();
849 }
850 
851 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
852 
853 void WLSDetectorConstruction::SetPhotonDetAlignment(G4double theta)
854 // Set the Aligment of PhotonDet with respect to the z axis
855 // If theta is 0 deg, then the detector is perfectly aligned
856 // PhotonDet will be deviated by theta from z axis
857 // facing towards the center of the fiber
858 {
859  fMPPCTheta = theta;
860  G4RunManager::GetRunManager()->ReinitializeGeometry();
861 }
862 
863 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
864 
865 void WLSDetectorConstruction::SetSurfaceRoughness(G4double roughness)
866 // Set the Surface Roughness between Cladding 1 and WLS fiber
867 // Pre: 0 < roughness <= 1
868 {
869  fSurfaceRoughness = roughness;
870  G4RunManager::GetRunManager()->ReinitializeGeometry();
871 }
872 
873 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
874 
875 void WLSDetectorConstruction::SetMirrorPolish(G4double polish)
876 // Set the Polish of the mirror, polish of 1 is a perfect mirror surface
877 // Pre: 0 < polish <= 1
878 {
879  fMirrorPolish = polish;
880  G4RunManager::GetRunManager()->ReinitializeGeometry();
881 }
882 
883 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
884 
885 void WLSDetectorConstruction::SetMirrorReflectivity(G4double reflectivity)
886 // Set the Reflectivity of the mirror, reflectivity of 1 is a perfect mirror
887 // Pre: 0 < reflectivity <= 1
888 {
889  fMirrorReflectivity = reflectivity;
890  G4RunManager::GetRunManager()->ReinitializeGeometry();
891 }
892 
893 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
894 
895 void WLSDetectorConstruction::SetPhotonDetPolish(G4double polish)
896 // Set the Polish of the PhotonDet, polish of 1 is a perfect mirror surface
897 // Pre: 0 < polish <= 1
898 {
899  fMPPCPolish = polish;
900  G4RunManager::GetRunManager()->ReinitializeGeometry();
901 }
902 
903 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
904 
905 void WLSDetectorConstruction::SetPhotonDetReflectivity(G4double reflectivity)
906 // Set the Reflectivity of the PhotonDet, reflectivity of 1 is a perfect mirror
907 // Pre: 0 < reflectivity <= 1
908 {
909  fMPPCReflectivity = reflectivity;
910  G4RunManager::GetRunManager()->ReinitializeGeometry();
911 }
912 
913 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
914 
915 void WLSDetectorConstruction::SetMirror(G4bool flag)
916 // Toggle to place the mirror or not at one end (-z end) of the fiber
917 // True means place the mirror, false means otherwise
918 {
919  fMirrorToggle = flag;
920  G4RunManager::GetRunManager()->ReinitializeGeometry();
921 }
922 
923 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
924 
925 void WLSDetectorConstruction::SetXYRatio(G4double r)
926 // Set the ratio of the x and y radius of the ellipse (x/y)
927 // a ratio of 1 would produce a circle
928 {
929  fXYRatio = r;
930  G4RunManager::GetRunManager()->ReinitializeGeometry();
931 }
932 
933 
934 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
935 
936 void WLSDetectorConstruction::SetBarLength (G4double length)
937 // Set the length of the scintillator bar
938 {
939  fBarLength = length;
940  G4RunManager::GetRunManager()->ReinitializeGeometry();
941 }
942 
943 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
944 
945 void WLSDetectorConstruction::SetBarBase (G4double side)
946 // Set the side of the scintillator bar
947 {
948  fBarBase = side;
949  G4RunManager::GetRunManager()->ReinitializeGeometry();
950 }
951 
952 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
953 
954 void WLSDetectorConstruction::SetHoleRadius (G4double radius)
955 // Set the radius of the fiber hole
956 {
957  fHoleRadius = radius;
958  G4RunManager::GetRunManager()->ReinitializeGeometry();
959 }
960 
961 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
962 
963 void WLSDetectorConstruction::SetCoatingThickness (G4double thick)
964 // Set thickness of the coating on the bars
965 {
966  fCoatingThickness = thick;
967  G4RunManager::GetRunManager()->ReinitializeGeometry();
968 }
969 
970 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
971 
972 void WLSDetectorConstruction::SetCoatingRadius (G4double radius)
973 // Set inner radius of the corner bar coating
974 {
975  fCoatingRadius = radius;
976  G4RunManager::GetRunManager()->ReinitializeGeometry();
977 }
978 
979 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
980 
981 G4double WLSDetectorConstruction::GetWLSFiberLength() { return fWLSfiberZ; }
982 
983 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
984 
985 G4double WLSDetectorConstruction::GetBarLength() { return fBarLength; }
986 
987 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
988 
989 G4double WLSDetectorConstruction::GetBarBase() { return fBarBase; }
990 
991 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
992 
993 G4double WLSDetectorConstruction::GetHoleRadius() { return fHoleRadius; }
994 
995 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
996 
997 G4double WLSDetectorConstruction::GetHoleLength() { return fHoleLength; }
998 
999 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
1000 
1001 G4double WLSDetectorConstruction::GetFiberRadius() { return GetWLSFiberRMax(); }
1002 
1003 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
1004 
1005 G4double WLSDetectorConstruction::GetCoatingThickness()
1006  { return fCoatingThickness; }
1007 
1008 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
1009 
1010 G4double WLSDetectorConstruction::GetCoatingRadius() { return fCoatingRadius; }
1011 
1012 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
1013 
1014 G4double WLSDetectorConstruction::GetWLSFiberEnd()
1015 {
1016  return fWLSfiberOrigin + fWLSfiberZ;
1017 }
1018 
1019 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
1020 
1021 G4double WLSDetectorConstruction::GetWLSFiberRMax()
1022 {
1023  if (fNumOfCladLayers == 2) return fClad2RY;
1024  if (fNumOfCladLayers == 1) return fClad1RY;
1025  return fWLSfiberRY;
1026 }
1027 
1028 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
1029 
1030 G4double WLSDetectorConstruction::GetSurfaceRoughness()
1031 {
1032  return fSurfaceRoughness;
1033 }
1034 
1035 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
1036 
1037 // Return True if the fiber construction is ideal
1038 G4bool WLSDetectorConstruction::IsPerfectFiber()
1039 {
1040  return fSurfaceRoughness == 1. && fXYRatio == 1.
1041  && (!fMirrorToggle ||
1042  (fMirrorPolish == 1. && fMirrorReflectivity == 1.));
1043 }
1044 
1045 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
1046 
1047 G4Material* WLSDetectorConstruction::FindMaterial(G4String name) {
1048  G4Material* material = G4Material::GetMaterial(name,true);
1049  return material;
1050 }
WLSDetectorConstruction::Construct
virtual G4VPhysicalVolume * Construct()
Definition: WLSDetectorConstruction.cc:120
glisur
Definition: G4OpticalSurface.hh:101
G4LogicalSkinSurface.hh
G4ThreeVector
CLHEP::Hep3Vector G4ThreeVector
Definition: G4ThreeVector.hh:42
G4RunManager.hh
G4RotationMatrix
CLHEP::HepRotation G4RotationMatrix
Definition: G4RotationMatrix.hh:43
G4OpBoundaryProcess.hh
G4Material::GetMaterial
static G4Material * GetMaterial(const G4String &name, G4bool warning=true)
Definition: G4Material.cc:578
G4LogicalBorderSurface.hh
G4Box
Definition: G4Box.hh:63
dielectric_metal
Definition: G4SurfaceProperty.hh:67
G4NistManager.hh
p
const char * p
Definition: xmltok.h:285
G4LogicalVolume::SetUserLimits
void SetUserLimits(G4UserLimits *pULimits)
G4Cache::Get
value_type & Get() const
Definition: G4Cache.hh:253
G4Tubs
Definition: G4Tubs.hh:84
G4SolidStore::Clean
static void Clean()
Definition: G4SolidStore.cc:79
WLSMaterials.hh
Definition of the WLSMaterials class.
G4Box.hh
name
const XML_Char * name
Definition: include/expat.h:151
G4int
int G4int
Definition: G4Types.hh:78
WLSDetectorConstruction.hh
Definition of the WLSDetectorConstruction class.
G4MaterialPropertiesTable::AddProperty
G4MaterialPropertyVector * AddProperty(const char *key, G4double *PhotonEnergies, G4double *PropertyValues, G4int NumEntries)
CLHEP::HepRotation::inverse
HepRotation inverse() const
WLSDetectorConstruction::StringToRotationMatrix
static G4RotationMatrix StringToRotationMatrix(G4String rotation)
Definition: WLSDetectorConstruction.cc:723
G4PhysicalVolumeStore::GetInstance
static G4PhysicalVolumeStore * GetInstance()
Definition: G4PhysicalVolumeStore.cc:187
G4SolidStore.hh
eplot.material
string material
Definition: eplot.py:19
G4Tubs.hh
G4bool
bool G4bool
Definition: G4Types.hh:79
G4Material.hh
G4LogicalVolumeStore::GetInstance
static G4LogicalVolumeStore * GetInstance()
Definition: G4LogicalVolumeStore.cc:181
G4SolidStore::GetInstance
static G4SolidStore * GetInstance()
Definition: G4SolidStore.cc:185
G4GeometryManager::GetInstance
static G4GeometryManager * GetInstance()
Definition: G4GeometryManager.cc:135
G4VUserDetectorConstruction::SetSensitiveDetector
void SetSensitiveDetector(const G4String &logVolName, G4VSensitiveDetector *aSD, G4bool multi=false)
Definition: G4VUserDetectorConstruction.cc:204
G4RunManager::ReinitializeGeometry
void ReinitializeGeometry(G4bool destroyFirst=false, G4bool prop=true)
Definition: G4RunManager.cc:844
G4Exception
void G4Exception(const char *originOfException, const char *exceptionCode, G4ExceptionSeverity severity, const char *comments)
Definition: G4Exception.cc:41
G4PhysicalConstants.hh
G4RunManager::GetRunManager
static G4RunManager * GetRunManager()
Definition: G4RunManager.cc:74
G4LogicalVolume.hh
G4PhysicalVolumeStore.hh
G4ios.hh
FatalException
Definition: G4ExceptionSeverity.hh:60
WLSPhotonDetSD.hh
Definition of the WLSPhotonDetSD class.
G4endl
#define G4endl
Definition: G4ios.hh:61
G4GeometryManager::OpenGeometry
void OpenGeometry(G4VPhysicalVolume *vol=0)
Definition: G4GeometryManager.cc:105
WLSDetectorConstruction::FindMaterial
G4Material * FindMaterial(G4String)
Definition: WLSDetectorConstruction.cc:1047
ground
Definition: G4OpticalSurface.hh:67
G4LogicalVolumeStore.hh
G4double
double G4double
Definition: G4Types.hh:76
WLSDetectorMessenger.hh
Definition of the WLSDetectorMessenger class.
G4SystemOfUnits.hh
WLSMaterials::GetInstance
static WLSMaterials * GetInstance()
Definition: WLSMaterials.cc:62
G4PVPlacement.hh
DBL_MAX
#define DBL_MAX
Definition: templates.hh:83
G4Cache::Put
void Put(const value_type &val) const
Definition: G4Cache.hh:257
G4UserLimits.hh
G4EllipticalTube.hh
G4cerr
G4GLOB_DLL std::ostream G4cerr
dielectric_dielectric
Definition: G4SurfaceProperty.hh:68
G4GeometryManager.hh
WLSDetectorConstruction::ConstructDetector
G4VPhysicalVolume * ConstructDetector()
Definition: WLSDetectorConstruction.cc:140
Generated on Wed Apr 30 2014 15:55:32 for Geant4.10 by   doxygen 1.8.7