Import Geant4 9.6.0 source tree

This commit is contained in:
Gabriele Cosmo
2016-06-09 17:01:34 +02:00
parent b1eb5424d2
commit e2d2f9810a
10384 changed files with 698580 additions and 628834 deletions
@@ -23,87 +23,96 @@
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
/// \file optical/LXe/src/LXeWLSFiber.cc
/// \brief Implementation of the LXeWLSFiber class
//
//
#include "LXeWLSFiber.hh"
#include "globals.hh"
#include "G4LogicalSkinSurface.hh"
#include "G4LogicalBorderSurface.hh"
#include "G4SystemOfUnits.hh"
G4LogicalVolume* LXeWLSFiber::clad2_log=NULL;
G4LogicalVolume* LXeWLSFiber::fClad2_log=NULL;
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
LXeWLSFiber::LXeWLSFiber(G4RotationMatrix *pRot,
const G4ThreeVector &tlate,
G4LogicalVolume *pMotherLogical,
G4bool pMany,
G4int pCopyNo,
LXeDetectorConstruction* c)
const G4ThreeVector &tlate,
G4LogicalVolume *pMotherLogical,
G4bool pMany,
G4int pCopyNo,
LXeDetectorConstruction* c)
:G4PVPlacement(pRot,tlate,
new G4LogicalVolume(new G4Box("temp",1,1,1),
G4Material::GetMaterial("Vacuum"),
"temp",0,0,0),
"Cladding2",pMotherLogical,pMany,pCopyNo),constructor(c)
new G4LogicalVolume(new G4Box("temp",1,1,1),
G4Material::GetMaterial("Vacuum"),
"temp",0,0,0),
"Cladding2",pMotherLogical,pMany,pCopyNo),fConstructor(c)
{
CopyValues();
if(!clad2_log || updated){
if(!fClad2_log || fUpdated){
// The Fiber
//
G4Tubs* Fiber_tube =
new G4Tubs("Fiber",fiber_rmin,fiber_rmax,fiber_z,fiber_sphi,fiber_ephi);
G4LogicalVolume* Fiber_log =
new G4LogicalVolume(Fiber_tube,G4Material::GetMaterial("PMMA"),
"Fiber",0,0,0);
G4Tubs* fiber_tube =
new G4Tubs("Fiber",fFiber_rmin,fFiber_rmax,fFiber_z,fFiber_sphi,fFiber_ephi);
G4LogicalVolume* fiber_log =
new G4LogicalVolume(fiber_tube,G4Material::GetMaterial("PMMA"),
"Fiber",0,0,0);
// Cladding (first layer)
//
G4Tubs* clad1_tube =
new G4Tubs("Cladding1",clad1_rmin,clad1_rmax,clad1_z,clad1_sphi,
clad1_ephi);
G4LogicalVolume* clad1_log =
new G4LogicalVolume(clad1_tube,G4Material::GetMaterial("Pethylene"),
"Cladding1",0,0,0);
G4Tubs* clad1_tube =
new G4Tubs("Cladding1",fClad1_rmin,fClad1_rmax,fClad1_z,fClad1_sphi,
fClad1_ephi);
G4LogicalVolume* clad1_log =
new G4LogicalVolume(clad1_tube,G4Material::GetMaterial("Pethylene1"),
"Cladding1",0,0,0);
// Cladding (second layer)
//
G4Tubs* clad2_tube =
new G4Tubs("Cladding2",clad2_rmin,clad2_rmax,clad2_z,clad2_sphi,
clad2_ephi);
clad2_log =
new G4LogicalVolume(clad2_tube,G4Material::GetMaterial("fPethylene"),
"Cladding2",0,0,0);
new G4PVPlacement(0,G4ThreeVector(0.,0.,0.),Fiber_log,
"Fiber", clad1_log,false,0);
//
G4Tubs* clad2_tube =
new G4Tubs("Cladding2",fClad2_rmin,fClad2_rmax,fClad2_z,fClad2_sphi,
fClad2_ephi);
fClad2_log =
new G4LogicalVolume(clad2_tube,G4Material::GetMaterial("Pethylene2"),
"Cladding2",0,0,0);
new G4PVPlacement(0,G4ThreeVector(0.,0.,0.),fiber_log,
"Fiber", clad1_log,false,0);
new G4PVPlacement(0,G4ThreeVector(0.,0.,0.),clad1_log,
"Cladding1",clad2_log,false,0);
"Cladding1",fClad2_log,false,0);
}
SetLogicalVolume(clad2_log);
SetLogicalVolume(fClad2_log);
}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
void LXeWLSFiber::CopyValues(){
updated=constructor->GetUpdated();
fUpdated=fConstructor->GetUpdated();
fiber_rmin = 0.00*cm;
fiber_rmax = 0.10*cm;
fiber_z = constructor->GetScintX()/2;
fiber_sphi = 0.00*deg;
fiber_ephi = 360.*deg;
clad1_rmin = 0.;// fiber_rmax;
clad1_rmax = fiber_rmax + 0.015*fiber_rmax;
clad1_z = fiber_z;
clad1_sphi = fiber_sphi;
clad1_ephi = fiber_ephi;
clad2_rmin = 0.;//clad1_rmax;
clad2_rmax = clad1_rmax + 0.015*fiber_rmax;
fFiber_rmin = 0.00*cm;
fFiber_rmax = 0.10*cm;
fFiber_z = fConstructor->GetScintX()/2;
fFiber_sphi = 0.00*deg;
fFiber_ephi = 360.*deg;
clad2_z = fiber_z;
clad2_sphi = fiber_sphi;
clad2_ephi = fiber_ephi;
fClad1_rmin = 0.;// fFiber_rmax;
fClad1_rmax = fFiber_rmax + 0.015*fFiber_rmax;
fClad1_z = fFiber_z;
fClad1_sphi = fFiber_sphi;
fClad1_ephi = fFiber_ephi;
fClad2_rmin = 0.;//fClad1_rmax;
fClad2_rmax = fClad1_rmax + 0.015*fFiber_rmax;
fClad2_z = fFiber_z;
fClad2_sphi = fFiber_sphi;
fClad2_ephi = fFiber_ephi;
}