8 #include "GeoModelKernel/GeoPhysVol.h"
9 #include "GeoModelKernel/GeoTransform.h"
10 #include "GeoModelKernel/GeoNameTag.h"
11 #include "GeoModelKernel/GeoIdentifierTag.h"
12 #include "GeoModelKernel/GeoBox.h"
13 #include "GeoModelKernel/GeoTrd.h"
14 #include "GeoModelKernel/GeoTrap.h"
15 #include "GeoModelKernel/GeoPara.h"
16 #include "GeoModelKernel/GeoTube.h"
18 #include "GeoModelKernel/GeoShapeShift.h"
19 #include "GeoModelKernel/GeoShapeSubtraction.h"
20 #include "GeoModelKernel/GeoShapeUnion.h"
21 #include "GaudiKernel/SystemOfUnits.h"
90 const GeoBox* telescopeBox =
new GeoBox(telescopeX/2. + 3*safety, telescopeY/2.+ safety, telescopeZ/2.);
91 const GeoLogVol* telescopeLog =
new GeoLogVol(
"dbmTelescopeLog", telescopeBox, air);
92 GeoPhysVol* telescopePhys =
new GeoPhysVol(telescopeLog);
96 GeoVPhysVol* moduleCagePhys = moduleCage.
Build();
99 double lyRadius = sqrt(layerUnitY*layerUnitY/4 + layerUnitZ*layerUnitZ/4);
100 double lyAngle =
atan(layerUnitY/layerUnitZ);
102 double layerUnitPos_Y = (trapBackY/
cos(
angle) - coolingSidePlateY)*
cos(
angle);
103 double layerUnitPos_Z = coolingSidePlateY*
sin(
angle) + trapBackShortZ + bracketZ - brcktLockZ;
105 GeoTrf::Translation3D layerUnitPos( 0.0, -telescopeY/2. + layerUnitPos_Y + lyRadius *
sin(lyAngle+
angle), -telescopeZ/2. + layerUnitPos_Z + lyRadius *
cos(lyAngle+
angle) + 3*safety);
107 GeoNameTag*
tag =
new GeoNameTag(
"dbm3layers");
108 telescopePhys->add(
tag);
109 telescopePhys->add(xform);
110 telescopePhys->add(moduleCagePhys);
117 const GeoTrap* trapBack =
new GeoTrap(trapBackY/2., trapBack_theta, 90.0*
Gaudi::Units::deg, trapBackShortZ/2., trapBackX/2., trapBackX/2, 0.0, (trapBackShortZ+trapBackY*
tan(
angle))/2., trapBackX/2., trapBackX/2., 0.0);
119 double brWindowPosY = brcktWindow_offset + brcktWindow_centerZ *
tan(
angle) + brcktWindowY/(2 *
cos(
angle));
120 const GeoBox* brWindow =
new GeoBox(brcktWindowX/2., trapBackShortZ, brcktWindowY/2.);
124 const GeoShapeSubtraction& trapBack1 = trapBack->subtract(((*brWindow) << brWindowShift));
132 const static double vol = trapBack1.GeoShape::volume();
134 const GeoLogVol* trapBackLog =
new GeoLogVol(
"bracketLog", &trapBack1, dbmPeek4);
135 GeoPhysVol* trapBackPhys =
new GeoPhysVol(trapBackLog);
138 double trapBackPos_Z = -telescopeZ/2. + bracketZ - brcktLockZ + ( (trapBackShortZ+trapBackY*
tan(
angle))/2. + trapBackY/2.*
sin(trapBack_theta) - trapBackY*
tan(trapBack_theta) );
139 GeoTrf::Translation3D trapBackPos(0.0, -telescopeY/2. + trapBackY/2. + safety, trapBackPos_Z + 3*safety);
141 tag =
new GeoNameTag(
"trapBack");
142 telescopePhys->add(
tag);
143 telescopePhys->add(xform);
144 telescopePhys->add(trapBackPhys);
147 const GeoBox* brcktTopBlock =
new GeoBox(bracketX/2., (bracketY - brcktSideBlockY)/2., brcktTopBlockZ/2.);
149 const GeoLogVol* brcktTopBlockLog =
new GeoLogVol(
"bracketLog", brcktTopBlock, dbmPeekAluminium);
150 GeoPhysVol* brcktTopBlockPhys =
new GeoPhysVol(brcktTopBlockLog);
152 GeoTrf::Translate3D brcktTopBlockPos( 0., -telescopeY/2. + brcktSideBlockY + (bracketY - brcktSideBlockY)/2.+2*safety, -telescopeZ/2. + brcktTopBlockZ/2.);
153 xform =
new GeoTransform(brcktTopBlockPos);
154 tag =
new GeoNameTag(
"brcktTopBlock");
155 telescopePhys->add(
tag);
156 telescopePhys->add(xform);
157 telescopePhys->add(brcktTopBlockPhys);
160 const GeoBox* brcktSideBlock =
new GeoBox(brcktSideBlockX/2., brcktSideBlockY/2., brcktTopBlockZ/2.);
162 const GeoLogVol* brcktSideLog =
new GeoLogVol(
"brcktSideLog", brcktSideBlock, dbmPeek2);
163 GeoPhysVol* brcktSidePhys =
new GeoPhysVol(brcktSideLog);
165 GeoTrf::Translate3D brcktSidePos1( bracketX/2. - brcktSideBlockX/2., -telescopeY/2. + brcktSideBlockY/2.+safety, -telescopeZ/2. + brcktTopBlockZ/2.);
166 xform =
new GeoTransform(brcktSidePos1);
167 tag =
new GeoNameTag(
"brcktSideBlock");
168 telescopePhys->add(
tag);
169 telescopePhys->add(xform);
170 telescopePhys->add(brcktSidePhys);
172 GeoTrf::Translate3D brcktSidePos2( -bracketX/2. + brcktSideBlockX/2., -telescopeY/2. + brcktSideBlockY/2. + safety, -telescopeZ/2. + brcktTopBlockZ/2.);
173 xform =
new GeoTransform(brcktSidePos2);
174 tag =
new GeoNameTag(
"brcktSideBlock");
175 telescopePhys->add(
tag);
176 telescopePhys->add(xform);
177 telescopePhys->add(brcktSidePhys);
180 const GeoBox* brcktLock =
new GeoBox(bracketX/2., brcktLockY/2.-safety, brcktLockZ/2.-safety);
182 const GeoLogVol* brcktLockLog =
new GeoLogVol(
"bracketLog", brcktLock, dbmPeek3);
183 GeoPhysVol* brcktLockPhys =
new GeoPhysVol(brcktLockLog);
185 GeoTrf::Translate3D brcktLockPos( 0., -telescopeY/2. + trapBackY + brcktLockY/2. + 2*safety, -telescopeZ/2. + bracketZ - brcktLockZ/2. + safety);
186 xform =
new GeoTransform(brcktLockPos);
187 tag =
new GeoNameTag(
"brcktLock");
188 telescopePhys->add(
tag);
189 telescopePhys->add(xform);
190 telescopePhys->add(brcktLockPhys);
194 const GeoBox* sidePlate =
new GeoBox(coolingSidePlateX/2., coolingSidePlateY/2., coolingSidePlateZ/2.);
196 const GeoLogVol* sidePlateLog =
new GeoLogVol(
"sidePlateLog", sidePlate, dbmAluminium2);
197 GeoPhysVol* sidePlatePhys =
new GeoPhysVol(sidePlateLog);
200 double spRadius = 1/2. * sqrt(coolingSidePlateZ*coolingSidePlateZ + coolingSidePlateY*coolingSidePlateY);
202 GeoTrf::Translation3D sidePlatePos1( mainPlateX/2. + coolingSidePlateX/2. + 2*safety, - telescopeY/2. + spRadius *
sin(spAngle), -telescopeZ/2. + layerUnitPos_Z - coolingSidePlatePos*
cos(
angle) + spRadius *
cos(spAngle));
204 tag =
new GeoNameTag(
"sidePlate");
205 telescopePhys->add(
tag);
206 telescopePhys->add(xform);
207 telescopePhys->add(sidePlatePhys);
209 GeoTrf::Translation3D sidePlatePos2( -mainPlateX/2. - coolingSidePlateX/2. - 2*safety, - telescopeY/2. + spRadius *
sin(spAngle), -telescopeZ/2. + layerUnitPos_Z - coolingSidePlatePos*
cos(
angle) + spRadius *
cos(spAngle));
211 tag =
new GeoNameTag(
"sidePlate");
212 telescopePhys->add(
tag);
213 telescopePhys->add(xform);
214 telescopePhys->add(sidePlatePhys);
217 const GeoTrap* coolingFin =
new GeoTrap(coolingFinHeight/2., trapBack_theta, 90.0*
Gaudi::Units::deg, (coolingFinLongZ - coolingFinHeight*
tan(
angle))/2., coolingFinThick/2., coolingFinThick/2, 0.0, coolingFinLongZ/2., coolingFinThick/2., coolingFinThick/2., 0.0);
219 const GeoLogVol* finLog =
new GeoLogVol(
"finLog", coolingFin, dbmAluminium3);
220 GeoPhysVol* coolingFinPhys =
new GeoPhysVol(finLog);
222 GeoTrf::Translation3D finPos1( mainPlateX/2. - coolingFinThick/2. + safety, -telescopeY/2. + coolingFinHeight/2. + 4*safety, -telescopeZ/2. + coolingFinPos + 0.05*
Gaudi::Units::mm);
224 tag =
new GeoNameTag(
"finPlate");
225 telescopePhys->add(
tag);
226 telescopePhys->add(xform);
227 telescopePhys->add(coolingFinPhys);
229 GeoTrf::Translation3D finPos2( -mainPlateX/2. + coolingFinThick/2. - safety, -telescopeY/2. + coolingFinHeight/2. + 4*safety, -telescopeZ/2. + coolingFinPos + 0.05*
Gaudi::Units::mm);
231 tag =
new GeoNameTag(
"finPlate");
232 telescopePhys->add(
tag);
233 telescopePhys->add(xform);
234 telescopePhys->add(coolingFinPhys);
237 return telescopePhys;