1 |
nikolas |
1.1 |
#include "PamVMCDetTofS3.h" |
2 |
|
|
|
3 |
|
|
ClassImp(PamVMCDetTofS3) |
4 |
|
|
|
5 |
|
|
void PamVMCDetTofS3::DefineGeometry(){ |
6 |
|
|
|
7 |
|
|
TGeoMaterial *m=0; |
8 |
|
|
TGeoMixture *x=0; |
9 |
|
|
TString s; |
10 |
|
|
|
11 |
|
|
s = "SCINT"; |
12 |
|
|
x = (TGeoMixture*)GetMat(s); |
13 |
|
|
if(!x){ |
14 |
|
|
x = new TGeoMixture(s,2, 1.03200 ); |
15 |
|
|
x->SetUniqueID( 17); |
16 |
|
|
x->DefineElement(0,12.01,6,0.922427); |
17 |
|
|
x->DefineElement(1,1.01,1,0.7757296E-01); |
18 |
|
|
} |
19 |
|
|
|
20 |
|
|
s = "N2GAS"; |
21 |
|
|
m = GetMat(s); |
22 |
|
|
if (!m){ |
23 |
|
|
m = new TGeoMaterial(s,14.01,7,0.1250000E-02); |
24 |
|
|
m->SetUniqueID( 19); |
25 |
|
|
} |
26 |
|
|
|
27 |
|
|
s = "MYLAR"; |
28 |
|
|
x = (TGeoMixture*)GetMat(s); |
29 |
|
|
if(!x){ |
30 |
|
|
x = new TGeoMixture(s,3, 1.39000 ); |
31 |
|
|
x->SetUniqueID( 29); |
32 |
|
|
x->DefineElement(0,12.011,6,0.6250159); |
33 |
|
|
x->DefineElement(1,1.00794,1,0.4196011E-01); |
34 |
|
|
x->DefineElement(2,15.9994,8,0.3330241); |
35 |
|
|
} |
36 |
|
|
|
37 |
|
|
|
38 |
|
|
TGeoMedium *n=0; |
39 |
|
|
|
40 |
|
|
|
41 |
|
|
s = "N2 GAS"; |
42 |
|
|
n = (GetMed(s))?GetMed(s): new TGeoMedium(s,3,19,-1,1,40,1,0.5000000E-01,0.5000000E-01,0.1000000E-02,0.5000000E-03); |
43 |
|
|
|
44 |
|
|
s = "SCINTILLATOR"; |
45 |
|
|
n = (GetMed(s))?GetMed(s): new TGeoMedium(s,10,17,1,1,40,1,0.5000000E-01,0.5000000E-01,0.1000000E-01,0.5000000E-03); |
46 |
|
|
|
47 |
|
|
s = "MYLAR"; |
48 |
|
|
n = (GetMed(s))?GetMed(s): new TGeoMedium(s,19,29,-1,1,40,1,100,0.5000000E-01,0.2300000E-04,0.5000000E-03); |
49 |
|
|
|
50 |
|
|
|
51 |
|
|
TGeoVolume *v=0; |
52 |
|
|
s = "S3"; |
53 |
|
|
v = (GetVol(s))?GetVol(s): gGeoManager->MakeBox("S3",GetMed("N2 GAS"),9.0069,7.5069,0.7819); |
54 |
|
|
s = "S31M"; |
55 |
|
|
v = (GetVol(s))?GetVol(s): gGeoManager->MakeBox("S31M",GetMed("MYLAR"),3.0023,7.5,0.35345); |
56 |
|
|
s= "S32M"; |
57 |
|
|
v = (GetVol(s))?GetVol(s): gGeoManager->MakeBox("S32M",GetMed("MYLAR"),9.,2.5023,0.35345); |
58 |
|
|
s = "S31Y"; |
59 |
|
|
v = (GetVol(s))?GetVol(s): gGeoManager->MakeBox("S31Y",GetMed("SCINTILLATOR"),3.,7.5,0.35); |
60 |
|
|
s = "S32X"; |
61 |
|
|
v = (GetVol(s))?GetVol(s): gGeoManager->MakeBox("S32X",GetMed("SCINTILLATOR"),9.,2.5,0.35); |
62 |
|
|
|
63 |
|
|
GetVol("S3")->AddNode(GetVol("S32M"),1,new TGeoTranslation(0.,-5.0046,-0.42845)); |
64 |
|
|
GetVol("S32M")->AddNode(GetVol("S32X"),1,new TGeoTranslation(0.,0.,-0.115E-02)); |
65 |
|
|
GetVol("S3")->AddNode(GetVol("S32M"),2,new TGeoTranslation(0.,0.,-0.42845)); |
66 |
|
|
GetVol("S3")->AddNode(GetVol("S32M"),3,new TGeoTranslation(0.,5.0046,-0.42845)); |
67 |
|
|
GetVol("S3")->AddNode(GetVol("S31M"),1,new TGeoTranslation(-6.0046,0.,0.42845)); |
68 |
|
|
GetVol("S31M")->AddNode(GetVol("S31Y"),1,new TGeoTranslation(0.,0.,-0.115E-02)); |
69 |
|
|
GetVol("S3")->AddNode(GetVol("S31M"),2,new TGeoTranslation(0.,0.,0.42845)); |
70 |
|
|
GetVol("S3")->AddNode(GetVol("S31M"),3,new TGeoTranslation(6.0046,0.,0.42845)); |
71 |
|
|
|
72 |
|
|
|
73 |
|
|
|
74 |
|
|
SetMotherProp(GetVol("S3"),1,new TGeoTranslation(0.,0.,25.3159)); |
75 |
|
|
|
76 |
|
|
|
77 |
|
|
|
78 |
|
|
} |
79 |
|
|
|
80 |
|
|
void PamVMCDetTofS3::DefineCuts(){ |
81 |
|
|
|
82 |
|
|
TString s ="N2 GAS"; |
83 |
|
|
if (GetMed(s) && !GetCC(s)) |
84 |
|
|
SetCC(s, new pCutControl(GetMedID(s), 0.0001, 0.001, 0.0001, 0.0001, 0.0001, 0.0001, 0.0001, 0.0001, |
85 |
|
|
0.001, 0.01, 1., 1., 1., 0., 0., 1., 1., 4., 1., 1., 2., 1.)); |
86 |
|
|
s ="SCINTILLATOR";// default GPAMELA parameters |
87 |
|
|
if (GetMed(s) && !GetCC(s)) |
88 |
|
|
SetCC(s, new pCutControl(GetMedID(s), 0.0001, 0.001, 0.0001, 0.0001, 0.0001, 0.0001, 0.0001, 0.0001, |
89 |
|
|
0.001, 0.01, 1., 1., 1., 0., 1., 1., 1., 4., 1., 1., 1., 1.)); |
90 |
|
|
s ="MYLAR"; |
91 |
|
|
if (GetMed(s) && !GetCC(s)) |
92 |
|
|
SetCC(s, new pCutControl(GetMedID(s), 0.0001, 0.001, 0.0001, 0.0001, 0.0001, 0.0001, 0.0001, 0.0001, |
93 |
|
|
0.001, 0.01, 1., 1., 1., 0., 1., 1., 1., 4., 1., 1., 1., 1.)); |
94 |
|
|
} |
95 |
|
|
|