correct mask for V0 charge decoding in STU payload
[u/mrichter/AliRoot.git] / STRUCT / AliPIPEv4.cxx
CommitLineData
820b4d9e 1
2/**************************************************************************
3 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
4 * *
5 * Author: The ALICE Off-line Project. *
6 * Contributors are mentioned in the code where appropriate. *
7 * *
8 * Permission to use, copy, modify and distribute this software and its *
9 * documentation strictly for non-commercial purposes is hereby granted *
10 * without fee, provided that the above copyright notice appears in all *
11 * copies and that both the copyright notice and this permission notice *
12 * appear in the supporting documentation. The authors make no claims *
13 * about the suitability of this software for any purpose. It is *
14 * provided "as is" without express or implied warranty. *
15 **************************************************************************/
16
17/* $Id$ */
18
19//-------------------------------------------------------------------------
20// Beam pipe class
21// This version uses TGeo
22// Author: A.Morsch
23//-------------------------------------------------------------------------
24
25
26#include <Riostream.h>
27
28#include <TSystem.h>
29#include <TVirtualMC.h>
30#include <TGeoManager.h>
31#include <TGeoMatrix.h>
32#include <TGeoVolume.h>
33#include <TGeoTorus.h>
34#include <TGeoTube.h>
35#include <TGeoCone.h>
36#include <TGeoPcon.h>
37#include <TGeoBBox.h>
38#include <TGeoXtru.h>
39#include <TGeoCompositeShape.h>
40#include <TGeoGlobalMagField.h>
41
42#include "AliConst.h"
43#include "AliMagF.h"
44#include "AliPIPEv4.h"
45#include "AliRun.h"
46#include "AliLog.h"
47
48ClassImp(AliPIPEv4)
49
50//_____________________________________________________________________________
51AliPIPEv4::AliPIPEv4():
52 ftheta_cone(6.00), // angle of conical beam pipe, if angle < 3 --> cylindrical beam pipe
53 frmin1(2.00), // internal radius of Be beam pipe
54 fepaisseur(0.08), // width of Be beam pipe
55 fsigmaz(8.00), // dispersion of z location (1 sigma) of beam impact position
56 fz_chambre(-40.0), // first pixel chamber location, closest to the IP
57 fzdebut1(50.), // beginning of beam pipe z location (A side)
58 fzfin4(-82.) // end of beamp pipe z location (C side)
59{
60 // Constructor
61}
62
63//_____________________________________________________________________________
64AliPIPEv4::AliPIPEv4(const char *name, const char *title)
65 : AliPIPE(name,title),
66 ftheta_cone(6.00), // angle of conical beam pipe, if angle < 3 --> cylindrical beam pipe
67 frmin1(2.00), // internal radius of Be beam pipe
68 fepaisseur(0.08), // width of Be beam pipe
69 fsigmaz(8.00), // dispersion of z location (1 sigma) of beam impact position
70 fz_chambre(-40.0), // first pixel chamber location, closest to the IP
71 fzdebut1(50.), // beginning of beam pipe z location (A side)
72 fzfin4(-82.) // end of beamp pipe z location (C side)
73{
74 // Constructor
75}
76
77
78//_____________________________________________________________________________
79AliPIPEv4::AliPIPEv4(const char *name, const char *title, const Float_t theta_cone, const Float_t rmin1, const Float_t epaisseur,
80 const Float_t sigmaz, const Float_t z_chambre)
81 : AliPIPE(name,title),
82 ftheta_cone(theta_cone), // angle of conical beam pipe, if angle < 3 --> cylindrical beam pipe
83 frmin1(rmin1), // internal radius of Be beam pipe
84 fepaisseur(epaisseur), // width of Be beam pipe
85 fsigmaz(sigmaz), // dispersion of z location (1 sigma) of beam impact position
86 fz_chambre(z_chambre), // first pixel chamber location, closest to the IP
87 fzdebut1(50.), // beginning of beam pipe z location (A side)
88 fzfin4(-82.) // end of beamp pipe z location (C side)
89{
90 // Constructor
91
92}
93
94
95//___________________________________________
96void AliPIPEv4::CreateGeometry()
97{
98 AliDebug(1,"Create PIPEv4 geometry");
99 //
100 // Class describing the beam pipe geometry
101 //
102 Float_t lolo = 0.9; //1.3 minimum pour que le premier anneau soit dans l'acceptance du spectro
103 Float_t dz, z, zsh, z0;
104 //
105 // Rotation Matrices
106 //
107 const Float_t kDegRad = TMath::Pi() / 180.;
108 // Rotation by 180 deg
109 TGeoRotation* rot180 = new TGeoRotation("rot180", 90., 180., 90., 90., 180., 0.);
110 TGeoRotation* rotyz = new TGeoRotation("rotyz", 90., 180., 0., 180., 90., 90.);
111 TGeoRotation* rotxz = new TGeoRotation("rotxz", 0., 0., 90., 90., 90., 180.);
112 TGeoRotation* rot045 = new TGeoRotation("rot045", 90., 45., 90., 135., 0., 0.);
113 TGeoRotation* rot135 = new TGeoRotation("rot135", 90. ,135., 90., 225., 0., 0.);
114 TGeoRotation* rot225 = new TGeoRotation("rot225", 90. ,225., 90., 315., 0., 0.);
115 TGeoRotation* rot315 = new TGeoRotation("rot315", 90. ,315., 90., 45., 0., 0.);
116 //
117 // Media
118 const TGeoMedium* kMedAir = gGeoManager->GetMedium("PIPE_AIR");
119 const TGeoMedium* kMedAirHigh = gGeoManager->GetMedium("PIPE_AIR_HIGH");
120 const TGeoMedium* kMedVac = gGeoManager->GetMedium("PIPE_VACUUM");
121 const TGeoMedium* kMedInsu = gGeoManager->GetMedium("PIPE_INS_C0");
122 const TGeoMedium* kMedSteel = gGeoManager->GetMedium("PIPE_INOX");
123 const TGeoMedium* kMedBe = gGeoManager->GetMedium("PIPE_BE");
124 const TGeoMedium* kMedCu = gGeoManager->GetMedium("PIPE_CU");
125 //const TGeoMedium* kMedKapton = gGeoManager->GetMedium("PIPE_KAPTON");
126 const TGeoMedium* kMedAco = gGeoManager->GetMedium("PIPE_ANTICORODAL");
127 //const TGeoMedium* kMedNEG = gGeoManager->GetMedium("PIPE_NEG COATING");
128
129 // Top volume
130 TGeoVolume* top = gGeoManager->GetVolume("ALIC");
131 //
132 //
133 ////////////////////////////////////////////////////////////////////////////////
134 // //
135 // The Central Vacuum system //
136 // //
137 ////////////////////////////////////////////////////////////////////////////////
138 //
139 //
140 // The ALICE central beam-pipe according to drawing LHCVC2C_0001
141 // Drawings of sub-elements:
142 //
143 // Pos 7 - Minimised Flange: LHCVFX_P0025
144 // Pos 6 - Standard Flange: STDVFUHV0009
145 // Pos 8 - Bellow: LHCVBX__0001
146 //
147 // Absolute z-coordinates -82.0 - 400.0 cm
148 // Total length: 482.0 cm
149 // It consists of 3 main parts:
150 // CP/2 The flange on the non-absorber side: 36.5 cm
151 // CP/1 The central Be pipe: 405.0 cm
152 // CP/3 The double-bellow and flange on the absorber side: 40.5 cm
153 //
154 //
155
156 //
157 //
158 // Starting position in z
159 const Float_t kCPz0 = -400.0;
160 // Length of the CP/1 section
161 const Float_t kCP1Length = 405.0;
162 // Length of the CP/2 section
163 const Float_t kCP2Length = 36.5;
164 // Length of the CP/3 section
165 const Float_t kCP3Length = 40.5;
166 // Position of the CP/2 section
167 // const Float_t kCP2pos = kCPz0 + kCP2Length / 2.;
168 // Position of the CP/3 section
169 const Float_t kCP3pos = kCPz0 + kCP2Length + kCP1Length + kCP3Length/2.;
170
171
172
173 ///////////////////////////////// NEW GEOMETRY /////////////////////////////////////////////
174
175 Float_t zfin1= fsigmaz - frmin1/TMath::Tan(ftheta_cone/ 180. * TMath::Pi());
176 Float_t zdebut2=zfin1;
177 Float_t rmax2= TMath::Tan(ftheta_cone/ 180. * TMath::Pi())*(fsigmaz+TMath::Abs(fz_chambre));
178 Float_t zfin2=-(TMath::Abs(fz_chambre)-1);
179 Float_t zdebut3=zfin2;
180 Float_t zfin3=zfin2+(-fepaisseur);
181 Float_t zdebut4=zfin3;
182 //---------------- Conical beam pipe ---------------
183 if(ftheta_cone>3){
184 TGeoPcon* CONE_VIDE = new TGeoPcon(0., 360., 8);
185 CONE_VIDE->DefineSection(0,fzdebut1, 0.,frmin1);
186 CONE_VIDE->DefineSection(1,zfin1, 0.,frmin1);
187 CONE_VIDE->DefineSection(2,zdebut2, 0.,frmin1);
188 CONE_VIDE->DefineSection(3,zfin2, 0.,rmax2);
189 CONE_VIDE->DefineSection(4,zdebut3, 0.,frmin1);
190 CONE_VIDE->DefineSection(5,zfin3, 0.,frmin1);
191 CONE_VIDE->DefineSection(6,zdebut4, 0.,frmin1);
192 CONE_VIDE->DefineSection(7,fzfin4, 0.,frmin1);
193 TGeoVolume* voCONE_VIDE = new TGeoVolume("CONE_VIDE",CONE_VIDE,kMedVac);
194 voCONE_VIDE->SetLineColor(kOrange);
195 top->AddNode(voCONE_VIDE,1,new TGeoTranslation(0., 0., 0.));
196
197 TGeoPcon* CONE_BE = new TGeoPcon(0., 360., 8);
198 CONE_BE->DefineSection(0,fzdebut1,frmin1,frmin1+fepaisseur);
199 CONE_BE->DefineSection(1,zfin1,frmin1,frmin1+fepaisseur);
200 CONE_BE->DefineSection(2,zdebut2,frmin1,frmin1+fepaisseur);
201 CONE_BE->DefineSection(3,zfin2,rmax2,rmax2+fepaisseur);
202 CONE_BE->DefineSection(4,zdebut3,frmin1,rmax2+fepaisseur);
203 CONE_BE->DefineSection(5,zfin3,frmin1,rmax2+fepaisseur);
204 CONE_BE->DefineSection(6,zdebut4,frmin1,frmin1+fepaisseur);
205 CONE_BE->DefineSection(7,fzfin4,frmin1,frmin1+fepaisseur);
206 TGeoVolume* voCONE_BE = new TGeoVolume("CONE_BE",CONE_BE,kMedBe);
207 voCONE_BE->SetLineColor(kRed);
208 }
209 //--------------- Cylindrical beam pipe -------------
210 if(ftheta_cone<3){
211 TGeoPcon* TUBE_VIDE = new TGeoPcon(0., 360., 2);
212 TUBE_VIDE->DefineSection(0,fzdebut1, 0.,frmin1);
213 TUBE_VIDE->DefineSection(1,fzfin4, 0.,frmin1);
214 TGeoVolume* voTUBE_VIDE = new TGeoVolume("TUBE_VIDE",TUBE_VIDE,kMedVac);
215 voTUBE_VIDE->SetLineColor(kOrange);
216 top->AddNode(voTUBE_VIDE,1,new TGeoTranslation(0., 0., 0.));
217
218 TGeoPcon* TUBE_BE = new TGeoPcon(0., 360., 2);
219 TUBE_BE->DefineSection(0,fzdebut1,frmin1,frmin1+fepaisseur);
220 TUBE_BE->DefineSection(1,fzfin4,frmin1,frmin1+fepaisseur);
221 TGeoVolume* voTUBE_BE = new TGeoVolume("TUBE_BE",TUBE_BE,kMedBe);
222 voTUBE_BE->SetLineColor(kRed);
223 top->AddNode(voTUBE_BE,1,new TGeoTranslation(0., 0., 0.));
224 }
225
226 /////////////////////// END NEW GEOMETRY /////////////////////////////
227
228
229
230 //
231 ///////////////////
232 // CP/2 //
233 ///////////////////
234 //
235 // Fixed Point tube [Pos 5]
236 //
237 // Inner and outer radii of the Stainless Steel pipe
238 const Float_t kCP2StRi = 2.90-lolo;
239 const Float_t kCP2StRo = 2.98-lolo;
240 //
241 // Transition to central Be-pipe (Bulge)
242 // Length
243 const Float_t kCP2BulgeLength = 0.80;
244 //
245 // Bulge outer radius
246 const Float_t kCP2BulgeRo = 3.05-lolo;
247 //
248 // Fixed Point at z = 391.7 (IP)
249 //
250 // Position of fixed point
251 const Float_t kCP2FixedPointZ = 8.30;
252 //
253 // Outer radius of fixed point
254 const Float_t kCP2FixedPointRo = 3.50-lolo;
255 //
256 // Length of fixed point
257 const Float_t kCP2FixedPointLength = 0.60;
258 //
259 // Fixed Flange [Pos 6]
260 //
261 // Fixed flange outer radius
262 const Float_t kCP2FixedFlangeRo = 7.60;
263 //
264 // Fixed flange inner radius
265 const Float_t kCP2FixedFlangeRi = 3.00;
266 // Fixed flange inner radius bulge
267 const Float_t kCP2FixedFlangeBulgeRi = 2.90;
268 // Fixed flange lengths of sections at inner radius
269 const Float_t kCP2FixedFlangeRecessLengths[3] ={1., 0.08, 0.9};
270 // Fixed flange length
271 const Float_t kCP2FixedFlangeLength = 1.98;
272 //
273 // Fixed flange bulge
274 // Outer radius
275 const Float_t kCP2FixedFlangeBulgeRo = 3.00-lolo;
276 //
277 // Length
278 const Float_t kCP2FixedFlangeBulgeLength = 2.00;
279
280 //
281 // CP/2 Mother Volume
282 //
283 TGeoPcon* shCp2Mo = new TGeoPcon(0., 360., 14);
284 // Flange
285 z = - kCP2Length / 2.;
286 shCp2Mo->DefineSection( 0, z, kCP2FixedFlangeRi, kCP2FixedFlangeRo);
287 z += kCP2FixedFlangeRecessLengths[0];
288 shCp2Mo->DefineSection( 1, z, kCP2FixedFlangeRi, kCP2FixedFlangeRo);
289 shCp2Mo->DefineSection( 2, z, 0., kCP2FixedFlangeRo);
290 z += (kCP2FixedFlangeRecessLengths[1] + kCP2FixedFlangeRecessLengths[2]) ;
291 shCp2Mo->DefineSection( 3, z, 0., kCP2FixedFlangeRo);
292 // Straight section between Flange and Fixed Point
293 shCp2Mo->DefineSection( 4, z, 0., kCP2FixedFlangeBulgeRo);
294 z += kCP2FixedFlangeBulgeLength;
295 shCp2Mo->DefineSection( 5, z, 0., kCP2FixedFlangeBulgeRo);
296 shCp2Mo->DefineSection( 6, z, 0., kCP2StRo);
297 z = - kCP2Length / 2 + kCP2FixedPointZ - kCP2FixedPointLength / 2.;
298 shCp2Mo->DefineSection( 7, z, 0., kCP2StRo);
299 // Fixed Point
300 shCp2Mo->DefineSection( 8, z, 0., kCP2FixedPointRo);
301 z += kCP2FixedPointLength;
302 shCp2Mo->DefineSection( 9, z, 0., kCP2FixedPointRo);
303 // Straight section between Fixed Point and transition bulge
304 shCp2Mo->DefineSection(10, z, 0., kCP2StRo);
305 z = kCP2Length / 2. - kCP2BulgeLength;
306 shCp2Mo->DefineSection(11, z, 0., kCP2StRo);
307 shCp2Mo->DefineSection(12, z, 0., kCP2BulgeRo);
308 z = kCP2Length / 2.;
309 shCp2Mo->DefineSection(13, z, 0., kCP2BulgeRo);
310
311 TGeoVolume* voCp2Mo = new TGeoVolume("CP2MO", shCp2Mo, kMedAir);
312 voCp2Mo->SetVisibility(0);
313 //
314 // CP/1 Vacuum
315 TGeoTube* shCp2Va = new TGeoTube(0., kCP2StRi, (kCP2Length - kCP2FixedFlangeRecessLengths[0])/2.);
316 TGeoVolume* voCp2Va = new TGeoVolume("CP2VA", shCp2Va, kMedVac);
317
318 voCp2Mo->AddNode(voCp2Va, 1, new TGeoTranslation(0., 0., kCP2FixedFlangeRecessLengths[0]/2.));
319
320 /////////////////////////////////////////////
321 // CP/2 Fixed Flange [Pos 6] //
322 /////////////////////////////////////////////
323
324 TGeoPcon* shCp2Fl = new TGeoPcon(0., 360., 6);
325 z = - kCP2FixedFlangeLength / 2.;
326 shCp2Fl->DefineSection(0, z, kCP2FixedFlangeRi, kCP2FixedFlangeRo);
327 z += kCP2FixedFlangeRecessLengths[0];
328 shCp2Fl->DefineSection(1, z, kCP2FixedFlangeRi, kCP2FixedFlangeRo);
329 shCp2Fl->DefineSection(2, z, kCP2FixedFlangeBulgeRi, kCP2FixedFlangeRo);
330 z += kCP2FixedFlangeRecessLengths[1];
331 shCp2Fl->DefineSection(3, z, kCP2FixedFlangeBulgeRi, kCP2FixedFlangeRo);
332 shCp2Fl->DefineSection(4, z, kCP2FixedFlangeRi, kCP2FixedFlangeRo);
333 z = kCP2FixedFlangeLength / 2.;
334 shCp2Fl->DefineSection(5, z, kCP2FixedFlangeRi, kCP2FixedFlangeRo);
335 TGeoVolume* voCp2Fl = new TGeoVolume("CP2FL", shCp2Fl, kMedSteel);
336 //
337 dz = - kCP2Length / 2. + kCP2FixedFlangeLength / 2.;
338 voCp2Mo->AddNode(voCp2Fl, 1, new TGeoTranslation(0., 0., dz));
339
340
341 /////////////////////////////////////////////////////////////
342 // CP/2 Beam pipe with fixed point and transition bulges //
343 /////////////////////////////////////////////////////////////
344 TGeoPcon* shCp2Pi = new TGeoPcon(0., 360., 10);
345 // Bulge at transition to flange
346 z = - (kCP2Length - kCP2FixedFlangeRecessLengths[0] - kCP2FixedFlangeRecessLengths[1]) / 2.;
347 z0 = z;
348 shCp2Pi->DefineSection(0, z, kCP2StRi, kCP2FixedFlangeBulgeRo);
349 z += kCP2FixedFlangeBulgeLength;
350 shCp2Pi->DefineSection(1, z, kCP2StRi, kCP2FixedFlangeBulgeRo);
351 // Straight section between Bulge and Fixed Point
352 shCp2Pi->DefineSection(2, z, kCP2StRi, kCP2StRo);
353 z += (kCP2FixedPointZ - kCP2FixedPointLength / 2. - kCP2FixedFlangeRecessLengths[0]
354 - kCP2FixedFlangeRecessLengths[1] -
355 kCP2FixedFlangeBulgeLength);
356 shCp2Pi->DefineSection(3, z, kCP2StRi, kCP2StRo);
357 // Fixed Point
358 shCp2Pi->DefineSection(4, z, kCP2StRi, kCP2FixedPointRo);
359 z += kCP2FixedPointLength;
360 shCp2Pi->DefineSection(5, z, kCP2StRi, kCP2FixedPointRo);
361 // Straight section between Fixed Point and transition bulge
362 shCp2Pi->DefineSection(6, z, kCP2StRi, kCP2StRo);
363 z = - shCp2Pi->GetZ(0) - kCP2BulgeLength;
364 shCp2Pi->DefineSection(7, z, kCP2StRi, kCP2StRo);
365 // Bulge at transition to Be pipe
366 shCp2Pi->DefineSection(8, z, kCP2StRi, kCP2BulgeRo);
367 z = - shCp2Pi->GetZ(0);
368 shCp2Pi->DefineSection(9, z, kCP2StRi, kCP2BulgeRo);
369
370 TGeoVolume* voCp2Pi = new TGeoVolume("CP2PI", shCp2Pi, kMedSteel);
371 dz = (kCP2FixedFlangeRecessLengths[0] + kCP2FixedFlangeRecessLengths[1]) / 2.;
372 voCp2Mo->AddNode(voCp2Pi, 1, new TGeoTranslation(0., 0., dz));
373
374 //
375 // Central beam pipe support collars
376 // LHCVC2C_0019
377 // Position at z = -46., 40., 150.
378 //TGeoVolume* voCpSupC = new TGeoVolume("CpSupC", new TGeoTube(3.051, 4.00, 0.35), kMedAco);
379 //voCp1->AddNode(voCpSupC, 1, new TGeoTranslation(0., 0., kCP1Length / 2. - 98.2));
380 //voCp1->AddNode(voCpSupC, 2, new TGeoTranslation(0., 0., kCP1Length / 2.- 191.5));
381
382 TGeoVolume* voCpSupClolo = new TGeoVolume("CpSupC", new TGeoTube(3.051-lolo, 4.0-lolo, 0.35), kMedAco);
383 // Beam Pipe Protection Tube
384 //
385 // ALIFWDA_0025
386 //
387 // Plaque de Centrage ALIFWDA_0019
388 const Float_t kFwdaBPPTXL = 3.;
389 TGeoXtru* shFwdaBPPTX = new TGeoXtru(2);
390 Double_t xBPPTX[8] = {12.5, 7.5, -7.5, -12.5, -12.5, -7.5, 7.5, 12.5};
391 Double_t yBPPTX[8] = { 7.0, 12.0, 12.0, 7.0, -7.0, -12.0, -12.0, -7.0};
392 shFwdaBPPTX->DefinePolygon(8, xBPPTX, yBPPTX);
393 shFwdaBPPTX->DefineSection(0, 0., 0., 0., 1.);
394 shFwdaBPPTX->DefineSection(1, kFwdaBPPTXL, 0., 0., 1.);
395 shFwdaBPPTX->SetName("FwdaBPPTX");
396 TGeoTube* shFwdaBPPTY = new TGeoTube(0., 8.5, 3.2);
397 shFwdaBPPTY->SetName("FwdaBPPTY");
398 TGeoCompositeShape* shFwdaBPPTPC = new TGeoCompositeShape("shFwdaBPPTPC", "FwdaBPPTX-FwdaBPPTY");
399 TGeoVolume* voFwdaBPPTPC = new TGeoVolume("FwdaBPPTPC", shFwdaBPPTPC, kMedAco);
400 //
401 // Tube ALIFWDA_0020
402 // const Float_t kFwdaBPPTTL = 48.;
403 const Float_t kFwdaBPPTTL = 35.;
404 TGeoVolume* voFwdaBPPTT = new TGeoVolume("FwdaBPPTT", new TGeoTube(8.85, 9.0, kFwdaBPPTTL/2.), kMedAco);
405 TGeoVolumeAssembly* voFwdaBPPT = new TGeoVolumeAssembly("FwdaBPPT");
406 voFwdaBPPT->AddNode(voFwdaBPPTPC, 1, gGeoIdentity);
407 voFwdaBPPT->AddNode(voFwdaBPPTT, 1, new TGeoTranslation(0., 0., kFwdaBPPTTL/2. + kFwdaBPPTXL));
408
409
410 // BeamPipe and T0A Support
411 //
412 // ALIFWDA_0033
413 //
414 // Support Plate ALIFWDA_0026
415 const Float_t kFwdaBPSPL = 4.0;
416 TGeoXtru* shFwdaBPSPX = new TGeoXtru(2);
417 Double_t xBPSPX[8] = {10.0, 6.0 , -6.0, -10.0, -10.0, -6.0, 6.0, 10.0};
418 Double_t yBPSPX[8] = { 6.0, 10.0, 10.0, 6.0, - 6.0, -10.0, -10.0, -6.0};
419 shFwdaBPSPX->DefinePolygon(8, xBPSPX, yBPSPX);
420 shFwdaBPSPX->DefineSection(0, 0., 0., 0., 1.);
421 shFwdaBPSPX->DefineSection(1, kFwdaBPSPL, 0., 0., 1.);
422 shFwdaBPSPX->SetName("FwdaBPSPX");
423 TGeoPcon* shFwdaBPSPY = new TGeoPcon(0., 360., 6);
424 shFwdaBPSPY->DefineSection(0, -1.00, 0., 5.5);
425 shFwdaBPSPY->DefineSection(1, 3.50, 0., 5.5);
426 shFwdaBPSPY->DefineSection(2, 3.50, 0., 5.0);
427 shFwdaBPSPY->DefineSection(3, 3.86, 0., 5.0);
428 shFwdaBPSPY->DefineSection(4, 3.86, 0., 5.5);
429 shFwdaBPSPY->DefineSection(5, 5.00, 0., 5.5);
430 shFwdaBPSPY->SetName("FwdaBPSPY");
431 TGeoCompositeShape* shFwdaBPSP = new TGeoCompositeShape("shFwdaBPSP", "FwdaBPSPX-FwdaBPSPY");
432 TGeoVolume* voFwdaBPSP = new TGeoVolume("FwdaBPSP", shFwdaBPSP, kMedAco);
433 //
434 // Flasque ALIFWDA_00027
435
436
437 const Float_t kFwdaBPSTTRi = 7.6/2.;
438 const Float_t kFwdaBPSTTRo1 = 13.9/2.;
439 const Float_t kFwdaBPSTTRo2 = 8.2/2.;
440 const Float_t kFwdaBPSTTRo3 = 9.4/2.;
441
442 TGeoPcon* shFwdaBPSFL = new TGeoPcon(0., 360., 8);
443 z = 0.,
444 shFwdaBPSFL->DefineSection(0, z, kFwdaBPSTTRi, kFwdaBPSTTRo1);
445 z += 0.64;
446 shFwdaBPSFL->DefineSection(1, z, kFwdaBPSTTRi, kFwdaBPSTTRo1);
447 shFwdaBPSFL->DefineSection(2, z, kFwdaBPSTTRi, kFwdaBPSTTRo2);
448 z += 2.55;
449 shFwdaBPSFL->DefineSection(3, z, kFwdaBPSTTRi, kFwdaBPSTTRo2);
450 shFwdaBPSFL->DefineSection(4, z, kFwdaBPSTTRi, kFwdaBPSTTRo3);
451 z += 0.4;
452 shFwdaBPSFL->DefineSection(5, z, kFwdaBPSTTRi, kFwdaBPSTTRo3);
453 shFwdaBPSFL->DefineSection(6, z, kFwdaBPSTTRi, kFwdaBPSTTRo2);
454 z += 1.2;
455 shFwdaBPSFL->DefineSection(7, z, kFwdaBPSTTRi, kFwdaBPSTTRo2);
456
457 TGeoVolume* voFwdaBPSFL = new TGeoVolume("FwdaBPSFL", shFwdaBPSFL, kMedAco);
458
459
460 //
461 // Cable support
462 TGeoBBox* shFwdaBPSCSa = new TGeoBBox(3.0, 8.75, 0.5);
463 shFwdaBPSCSa->SetName("FwdaBPSCSa");
464 TGeoBBox* shFwdaBPSCSb = new TGeoBBox(1.25, 4.00, 1.0);
465 shFwdaBPSCSb->SetName("FwdaBPSCSb");
466 TGeoTranslation* tFwdaBPSCSb = new TGeoTranslation(0., 5.25 - 8.75, 0.);
467 tFwdaBPSCSb->SetName("tFwdaBPSCSb");
468 tFwdaBPSCSb->RegisterYourself();
469 TGeoBBox* shFwdaBPSCSc = new TGeoBBox(3.0, 0.50, 0.70);
470 shFwdaBPSCSc->SetName("FwdaBPSCSc");
471 TGeoTranslation* tFwdaBPSCSc = new TGeoTranslation(0., 0.5 - 8.75, 1.2);
472 tFwdaBPSCSc->SetName("tFwdaBPSCSc");
473 tFwdaBPSCSc->RegisterYourself();
474 TGeoCompositeShape* shFwdaBPSCS = new TGeoCompositeShape("shFwdaBPSCS", "(FwdaBPSCSa-FwdaBPSCSb:tFwdaBPSCSb)+FwdaBPSCSc:tFwdaBPSCSc");
475 TGeoVolume* voFwdaBPSCS = new TGeoVolume("FwdaBPSCS", shFwdaBPSCS, kMedAco);
476
477
478 // Assembling the beam pipe support
479 TGeoVolumeAssembly* voFwdaBPS = new TGeoVolumeAssembly("FwdaBPS");
480 voFwdaBPS->AddNode(voFwdaBPSP, 1, new TGeoCombiTrans(0., 0., 0., rot045));
481 voFwdaBPS->AddNode(voFwdaBPSFL, 1, new TGeoTranslation(0., 0., kFwdaBPSPL));
482 const Float_t kFwdaBPSCSdy = 18.75/TMath::Sqrt(2.);
483
484 voFwdaBPS->AddNode(voFwdaBPSCS, 1, new TGeoCombiTrans(- kFwdaBPSCSdy, kFwdaBPSCSdy, 2., rot045));
485 voFwdaBPS->AddNode(voFwdaBPSCS, 2, new TGeoCombiTrans(- kFwdaBPSCSdy, - kFwdaBPSCSdy, 2., rot135));
486 voFwdaBPS->AddNode(voFwdaBPSCS, 3, new TGeoCombiTrans( kFwdaBPSCSdy, - kFwdaBPSCSdy, 2., rot225));
487 voFwdaBPS->AddNode(voFwdaBPSCS, 4, new TGeoCombiTrans( kFwdaBPSCSdy, kFwdaBPSCSdy, 2., rot315));
488
489 TGeoVolumeAssembly* voCp2 = new TGeoVolumeAssembly("CP2");
490 voCp2->AddNode(voCp2Mo, 1, gGeoIdentity);
491 voCp2->AddNode(voFwdaBPPT, 1, new TGeoTranslation(0., 0., -kCP2Length / 2. + 13.8));
492 voCp2->AddNode(voFwdaBPS, 1, new TGeoTranslation(0., 0., -kCP2Length / 2. + 5.1));
493
494 //
495 ///////////////////
496 // CP/3 //
497 ///////////////////
498 //
499 // Adaptor tube [Pos 4]
500 //
501 // Adaptor tube length
502 const Float_t kCP3AdaptorTubeLength = 5.50;
503 //
504 // Inner and outer radii
505 const Float_t kCP3AdaptorTubeRi = 2.92-lolo;
506 const Float_t kCP3AdaptorTubeRo = 3.00-lolo;
507 //
508 // Bulge at transition point
509 // Inner and outer radii
510 const Float_t kCP3AdaptorTubeBulgeRi = 2.90-lolo;
511 const Float_t kCP3AdaptorTubeBulgeRo = 3.05-lolo;
512 //
513 // Length of bulge
514 const Float_t kCP3AdaptorTubeBulgeLength = 0.80;
515 //
516 // Bellow [Pos 8]
517 //
518 // Total length
519 const Float_t kCP3BellowLength = 13.00;
520 // Outer Radius
521 const Float_t kCP3BellowRo = 3.6-lolo; //-1?
522 // Inner Radius
523 const Float_t kCP3BellowRi = 2.8-lolo;
524 // Number of plies
525 const Int_t kCP3NumberOfPlies = 18;
526 // Length of undulated region
527 const Float_t kCP3BellowUndulatedLength = 8.30;
528 // Plie thickness
529 const Float_t kCP3PlieThickness = 0.02;
530 // Connection Plie radies (at transition been undulated region and beam pipe)
531 const Float_t kCP3ConnectionPlieR = 0.21;
532 // Plie radius
533 // const Float_t kCP3PlieR = 0.118286;
534 const Float_t kCP3PlieR =
535 (kCP3BellowUndulatedLength - 4. * kCP3ConnectionPlieR + 2. * kCP3PlieThickness +
536 (2. * kCP3NumberOfPlies - 2.) * kCP3PlieThickness) / (4. * kCP3NumberOfPlies - 2.);
537 // Length of connection pipe
538 const Float_t kCP3BellowConnectionLength = 2.35;
539 //
540 // Tube between bellows [Pos 3]
541 //
542 // Length of tube
543 const Float_t kCP3TubeLength = 4.00;
544 //
545 // Minimised fixed flange [Pos 7]
546 //
547 // Length of flange connection tube
548 const Float_t kCP3FlangeConnectorLength = 5.0 - 1.4;
549 // Length of Flange
550 const Float_t kCP3FlangeLength = 1.40;
551 // Outer radius
552 const Float_t kCP3FlangeRo = 4.30-lolo-1.;
553
554 //
555 // CP/3 Mother volume
556 //
557 TGeoPcon* shCp3Mo = new TGeoPcon(0., 360., 12);
558 // From transition to first bellow
559 z = - kCP3Length / 2.;
560 shCp3Mo->DefineSection( 0, z, 0., kCP3AdaptorTubeBulgeRo);
561 z += kCP3BellowConnectionLength + kCP3AdaptorTubeLength;
562 shCp3Mo->DefineSection( 1, z, 0., kCP3AdaptorTubeBulgeRo);
563 // First Bellow
564 shCp3Mo->DefineSection( 2, z, 0., kCP3BellowRo);
565 z += kCP3BellowUndulatedLength;
566 shCp3Mo->DefineSection( 3, z, 0., kCP3BellowRo);
567 // Connection between the two bellows
568 shCp3Mo->DefineSection( 4, z, 0., kCP3AdaptorTubeBulgeRo);
569 z += 2. * kCP3BellowConnectionLength + kCP3TubeLength;
570 shCp3Mo->DefineSection( 5, z, 0., kCP3AdaptorTubeBulgeRo);
571 // Second bellow
572 shCp3Mo->DefineSection( 6, z, 0., kCP3BellowRo);
573 z += kCP3BellowUndulatedLength;
574 shCp3Mo->DefineSection( 7, z, 0., kCP3BellowRo);
575 // Pipe between second Bellow and Flange
576 shCp3Mo->DefineSection( 8, z, 0., kCP3AdaptorTubeBulgeRo);
577 z += kCP3BellowConnectionLength + kCP3FlangeConnectorLength;
578 shCp3Mo->DefineSection( 9, z, 0., kCP3AdaptorTubeBulgeRo);
579 // Flange
580 shCp3Mo->DefineSection(10, z, 0., kCP3FlangeRo);
581 z = -shCp3Mo->GetZ(0);
582 shCp3Mo->DefineSection(11, z, 0., kCP3FlangeRo);
583 //
584 TGeoVolume* voCp3Mo = new TGeoVolume("CP3MO", shCp3Mo, kMedAir);
585 voCp3Mo->SetVisibility(0);
586 TGeoVolumeAssembly* voCp3 = new TGeoVolumeAssembly("Cp3");
587 voCp3->AddNode(voCp3Mo, 1, gGeoIdentity);
588 // voCp3->AddNode(voCpSupC, 3, new TGeoTranslation(0., 0., - kCP3Length / 2. + 4.6));
589 voCp3->AddNode(voCpSupClolo, 3, new TGeoTranslation(0., 0., - kCP3Length / 2. + 4.6));
590 dz = kCP3pos;
591
592 //////////////////////////////////////////////
593 // CP/3 Adaptor tube //
594 //////////////////////////////////////////////
595 TGeoPcon* shCp3AtV = new TGeoPcon(0., 360., 4);
596 // Bulge at transition
597 z = - kCP3AdaptorTubeLength / 2.;
598 shCp3AtV->DefineSection(0, z, 0., kCP3AdaptorTubeBulgeRo);
599 z += kCP3AdaptorTubeBulgeLength;
600 shCp3AtV->DefineSection(1, z, 0., kCP3AdaptorTubeBulgeRo);
601 // Tube
602 shCp3AtV->DefineSection(2, z, 0., kCP3AdaptorTubeRo);
603 z = + kCP3AdaptorTubeLength / 2.;
604 shCp3AtV->DefineSection(3, z, 0., kCP3AdaptorTubeRo);
605
606 TGeoVolume* voCp3AtV = new TGeoVolume("CP3ATV", shCp3AtV, kMedVac);
607
608 TGeoPcon* shCp3AtS = new TGeoPcon(0., 360., 4);
609 // Bulge at transition
610 shCp3AtS->DefineSection(0, shCp3AtV->GetZ(0), kCP3AdaptorTubeBulgeRi, kCP3AdaptorTubeBulgeRo);
611 shCp3AtS->DefineSection(1, shCp3AtV->GetZ(1), kCP3AdaptorTubeBulgeRi, kCP3AdaptorTubeBulgeRo);
612 // Tube
613 shCp3AtS->DefineSection(2, shCp3AtV->GetZ(2), kCP3AdaptorTubeRi, kCP3AdaptorTubeRo);
614 shCp3AtS->DefineSection(3, shCp3AtV->GetZ(3), kCP3AdaptorTubeRi , kCP3AdaptorTubeRo);
615 TGeoVolume* voCp3AtS = new TGeoVolume("CP3ATS", shCp3AtS, kMedSteel);
616
617 voCp3AtV->AddNode(voCp3AtS, 1, gGeoIdentity);
618 dz = - kCP3Length / 2. + kCP3AdaptorTubeLength / 2.;
619 voCp3Mo->AddNode(voCp3AtV, 1, new TGeoTranslation(0., 0., dz));
620
621 /////////////////////////////////
622 // CP/3 Bellow section //
623 /////////////////////////////////
624
625 //
626 // Upper part of the undulation
627 TGeoTorus* plieTorusUO = new TGeoTorus(kCP3BellowRo - kCP3PlieR, 0. , kCP3PlieR);
628 plieTorusUO->SetName("TorusUO");
629 TGeoTorus* plieTorusUI = new TGeoTorus(kCP3BellowRo - kCP3PlieR, kCP3PlieR - kCP3PlieThickness, kCP3PlieR);
630 plieTorusUI->SetName("TorusUI");
631 TGeoTube* plieTubeU = new TGeoTube (kCP3BellowRo - kCP3PlieR, kCP3BellowRo, kCP3PlieR);
632 plieTubeU->SetName("TubeU");
633
634 TGeoCompositeShape* shUpperPlieO = new TGeoCompositeShape("upperPlieO", "TorusUO*TubeU");
635 TGeoCompositeShape* shUpperPlieI = new TGeoCompositeShape("upperPlieI", "TorusUI*TubeU");
636
637 TGeoVolume* voWiggleUO = new TGeoVolume("CP3WUO", shUpperPlieO, kMedVac);
638 TGeoVolume* voWiggleUI = new TGeoVolume("CP3WUI", shUpperPlieI, kMedSteel);
639 voWiggleUO->AddNode(voWiggleUI, 1, gGeoIdentity);
640 //
641 // Lower part of the undulation
642 TGeoTorus* plieTorusLO = new TGeoTorus(kCP3BellowRi + kCP3PlieR, 0. , kCP3PlieR);
643 plieTorusLO->SetName("TorusLO");
644 TGeoTorus* plieTorusLI = new TGeoTorus(kCP3BellowRi + kCP3PlieR, kCP3PlieR - kCP3PlieThickness, kCP3PlieR);
645 plieTorusLI->SetName("TorusLI");
646 TGeoTube* plieTubeL = new TGeoTube (kCP3BellowRi, kCP3BellowRi + kCP3PlieR, kCP3PlieR);
647 plieTubeL->SetName("TubeL");
648
649 TGeoCompositeShape* shLowerPlieO = new TGeoCompositeShape("lowerPlieO", "TorusLO*TubeL");
650 TGeoCompositeShape* shLowerPlieI = new TGeoCompositeShape("lowerPlieI", "TorusLI*TubeL");
651
652 TGeoVolume* voWiggleLO = new TGeoVolume("CP3WLO", shLowerPlieO, kMedVac);
653 TGeoVolume* voWiggleLI = new TGeoVolume("CP3WLI", shLowerPlieI, kMedSteel);
654 voWiggleLO->AddNode(voWiggleLI, 1, gGeoIdentity);
655
656 //
657 // Connection between upper and lower part of undulation
658 TGeoVolume* voWiggleC1 = new TGeoVolume("Q3WCO1",
659 new TGeoTube(kCP3BellowRi + kCP3PlieR, kCP3BellowRo - kCP3PlieR, kCP3PlieThickness / 2.),
660 kMedSteel);
661 TGeoVolume* voWiggleC2 = new TGeoVolume("Q3WCO2",
662 new TGeoTube(kCP3BellowRi + kCP3ConnectionPlieR, kCP3BellowRo - kCP3PlieR, kCP3PlieThickness / 2.),
663 kMedSteel);
664 //
665 // Conncetion between undulated section and beam pipe
666 TGeoTorus* plieTorusCO = new TGeoTorus(kCP3BellowRi + kCP3ConnectionPlieR, 0. , kCP3ConnectionPlieR);
667 plieTorusCO->SetName("TorusCO");
668 TGeoTorus* plieTorusCI = new TGeoTorus(kCP3BellowRi + kCP3ConnectionPlieR, kCP3ConnectionPlieR - kCP3PlieThickness, kCP3ConnectionPlieR);
669 plieTorusCI->SetName("TorusCI");
670 TGeoTube* plieTubeC = new TGeoTube (kCP3BellowRi, kCP3BellowRi + kCP3ConnectionPlieR, kCP3ConnectionPlieR);
671 plieTubeC->SetName("TubeC");
672
673 TGeoCompositeShape* shConnectionPlieO = new TGeoCompositeShape("connectionPlieO", "TorusCO*TubeC");
674 TGeoCompositeShape* shConnectionPlieI = new TGeoCompositeShape("connectionPlieI", "TorusCI*TubeC");
675
676 TGeoVolume* voConnectionPO = new TGeoVolume("CP3CPO", shConnectionPlieO, kMedVac);
677 TGeoVolume* voConnectionPI = new TGeoVolume("CP3CPI", shConnectionPlieI, kMedSteel);
678 voConnectionPO->AddNode(voConnectionPI, 1, gGeoIdentity);
679 //
680 // Connecting pipes
681 TGeoVolume* voConnectionPipeO = new TGeoVolume("CP3BECO",
682 new TGeoTube(0., kCP3AdaptorTubeRo, kCP3BellowConnectionLength / 2.),
683 kMedVac);
684 TGeoVolume* voConnectionPipeI = new TGeoVolume("CP3BECI",
685 new TGeoTube(kCP3AdaptorTubeRi, kCP3AdaptorTubeRo, kCP3BellowConnectionLength / 2.),
686 kMedSteel);
687
688 voConnectionPipeO->AddNode(voConnectionPipeI, 1, gGeoIdentity);
689
690 //
691 // Bellow mother
692 TGeoPcon* shBellowMotherPC = new TGeoPcon(0., 360., 6);
693 dz = - kCP3BellowLength / 2;
694 shBellowMotherPC->DefineSection(0, dz, 0., kCP3AdaptorTubeRo);
695 dz += kCP3BellowConnectionLength;
696 shBellowMotherPC->DefineSection(1, dz, 0., kCP3AdaptorTubeRo);
697 shBellowMotherPC->DefineSection(2, dz, 0., kCP3BellowRo);
698 dz = kCP3BellowLength /2. - kCP3BellowConnectionLength;;
699 shBellowMotherPC->DefineSection(3, dz, 0., kCP3BellowRo);
700 shBellowMotherPC->DefineSection(4, dz, 0., kCP3AdaptorTubeRo);
701 dz += kCP3BellowConnectionLength;
702 shBellowMotherPC->DefineSection(5, dz, 0., kCP3AdaptorTubeRo);
703
704 TGeoVolume* voBellowMother = new TGeoVolume("CP3BeMO", shBellowMotherPC, kMedVac);
705 voBellowMother->SetVisibility(0);
706
707 //
708 // Add undulations
709 z0 = - kCP3BellowLength / 2. + kCP3BellowConnectionLength + 2. * kCP3ConnectionPlieR - kCP3PlieThickness;
710 zsh = 4. * kCP3PlieR - 2. * kCP3PlieThickness;
711 for (Int_t iw = 0; iw < 18; iw++) {
712 Float_t zpos = z0 + iw * zsh;
713 if (iw > 0)
714 voBellowMother->AddNode(voWiggleC1, iw + 1 , new TGeoTranslation(0., 0., zpos + kCP3PlieThickness / 2.));
715 else
716 voBellowMother->AddNode(voWiggleC2, iw + 1 , new TGeoTranslation(0., 0., zpos + kCP3PlieThickness / 2.));
717
718 zpos += kCP3PlieR;
719 voBellowMother->AddNode(voWiggleUO, iw + 1, new TGeoTranslation(0., 0., zpos));
720
721 zpos += kCP3PlieR;
722 if (iw < 17)
723 voBellowMother->AddNode(voWiggleC1, iw + 19, new TGeoTranslation(0., 0., zpos - kCP3PlieThickness / 2.));
724 else
725 voBellowMother->AddNode(voWiggleC2, iw + 19, new TGeoTranslation(0., 0., zpos - kCP3PlieThickness / 2.));
726
727 if (iw < 17) {
728 zpos += kCP3PlieR;
729 voBellowMother->AddNode(voWiggleLO, iw + 1, new TGeoTranslation(0., 0., zpos - kCP3PlieThickness));
730 }
731 }
732 //
733 // Add connecting undulation between bellow and connecting pipe
734 dz = - kCP3BellowUndulatedLength / 2. + kCP3ConnectionPlieR;
735 voBellowMother->AddNode(voConnectionPO, 1, new TGeoTranslation(0., 0., dz));
736 voBellowMother->AddNode(voConnectionPO, 2, new TGeoTranslation(0., 0., -dz));
737 //
738 // Add connecting pipe
739 dz = - kCP3BellowLength / 2. + kCP3BellowConnectionLength / 2.;
740 voBellowMother->AddNode(voConnectionPipeO, 1, new TGeoTranslation(0., 0., dz));
741 voBellowMother->AddNode(voConnectionPipeO, 2, new TGeoTranslation(0., 0., -dz));
742 //
743 // Add bellow to CP/3 mother
744 dz = - kCP3Length / 2. + kCP3AdaptorTubeLength + kCP3BellowLength / 2.;
745 voCp3Mo->AddNode(voBellowMother, 1, new TGeoTranslation(0., 0., dz));
746 dz += (kCP3BellowLength + kCP3TubeLength);
747 voCp3Mo->AddNode(voBellowMother, 2, new TGeoTranslation(0., 0., dz));
748
749
750 ///////////////////////////////////////////
751 // Beam pipe section between bellows //
752 ///////////////////////////////////////////
753
754 TGeoVolume* voCp3Bco = new TGeoVolume("CP3BCO",
755 new TGeoTube(0., kCP3AdaptorTubeRo, kCP3TubeLength / 2.),
756 kMedVac);
757
758 TGeoVolume* voCp3Bci = new TGeoVolume("CP3BCI",
759 new TGeoTube(kCP3AdaptorTubeRi, kCP3AdaptorTubeRo, kCP3TubeLength / 2.),
760 kMedSteel);
761
762 voCp3Bco->AddNode(voCp3Bci, 1, gGeoIdentity);
763 dz = - kCP3Length / 2. + kCP3AdaptorTubeLength + kCP3BellowLength + kCP3TubeLength / 2.;
764 voCp3Mo->AddNode(voCp3Bco, 1, new TGeoTranslation(0., 0., dz));
765
766
767 ///////////////////////////////////////////
768 // CP3 Minimised Flange //
769 ///////////////////////////////////////////
770
771 TGeoPcon* shCp3mfo = new TGeoPcon(0., 360., 4);
772 z = - (kCP3FlangeConnectorLength + kCP3FlangeLength) / 2.;
773 // Connection Tube
774 shCp3mfo->DefineSection(0, z, 0., kCP3AdaptorTubeRo);
775 z += kCP3FlangeConnectorLength;
776 shCp3mfo->DefineSection(1, z, 0., kCP3AdaptorTubeRo);
777 // Flange
778 shCp3mfo->DefineSection(2, z, 0., kCP3FlangeRo);
779 z = - shCp3mfo->GetZ(0);
780 shCp3mfo->DefineSection(3, z, 0., kCP3FlangeRo);
781
782 TGeoVolume* voCp3mfo = new TGeoVolume("CP3MFO", shCp3mfo, kMedVac);
783
784
785 TGeoPcon* shCp3mfi = new TGeoPcon(0., 360., 4);
786 // Connection Tube
787 shCp3mfi->DefineSection(0, shCp3mfo->GetZ(0), kCP3AdaptorTubeRi, kCP3AdaptorTubeRo);
788 shCp3mfi->DefineSection(1, shCp3mfo->GetZ(1), kCP3AdaptorTubeRi, kCP3AdaptorTubeRo);
789 // Flange
790 shCp3mfi->DefineSection(2, shCp3mfo->GetZ(2), kCP3AdaptorTubeRi, kCP3FlangeRo);
791 shCp3mfi->DefineSection(3, shCp3mfo->GetZ(3), kCP3AdaptorTubeRi, kCP3FlangeRo);
792
793 TGeoVolume* voCp3mfi = new TGeoVolume("CP3MFI", shCp3mfi, kMedSteel);
794
795 voCp3mfo->AddNode(voCp3mfi, 1, gGeoIdentity);
796 dz = kCP3Length / 2. - (kCP3FlangeConnectorLength + kCP3FlangeLength) / 2.;
797 voCp3Mo->AddNode(voCp3mfo, 1, new TGeoTranslation(0., 0., dz));
798
799
800 /*
801 //
802 // Assemble the central beam pipe
803 //
804 TGeoVolumeAssembly* asCP = new TGeoVolumeAssembly("CP");
805 z = 0.;
806 // asCP->AddNode(voCp2, 1, gGeoIdentity);
807 z += kCP2Length / 2. + kCP1Length / 2.;
808 //asCP->AddNode(voCp1, 1, new TGeoTranslation(0., 0., z));
809
810 asCP->AddNode(voCp1, 1, new TGeoTranslation(0., 0., 0.));
811
812 z += kCP1Length / 2. + kCP3Length / 2.;
813 // asCP->AddNode(voCp3, 1, new TGeoTranslation(0., 0., z));
814 top->AddNode(asCP, 1, new TGeoCombiTrans(0., 0., 400. - kCP2Length / 2, rot180));
815
816 */
817
818
819 ////////////////////////////////////////////////////////////////////////////////
820 // //
821 // RB24/1 //
822 // //
823 ////////////////////////////////////////////////////////////////////////////////
824 //
825 //
826 // Drawing LHCVC2U_0001
827 // Copper Tube RB24/1 393.5 cm
828 // Warm module VMACA 18.0 cm
829 // Annular Ion Pump 35.0 cm
830 // Valve 7.5 cm
831 // Warm module VMABC 28.0 cm
832 // ================================
833 // 462.0 cm
834 //
835
836
837 // Copper Tube RB24/1
838 const Float_t kRB24CuTubeL = 393.5;
839 const Float_t kRB24CuTubeRi = 8.0/2.;
840 const Float_t kRB24CuTubeRo = 8.4/2.;
841 const Float_t kRB24CuTubeFRo = 7.6;
842 const Float_t kRB24CuTubeFL = 1.86;
843
844 TGeoVolume* voRB24CuTubeM = new TGeoVolume("voRB24CuTubeM",
845 new TGeoTube(0., kRB24CuTubeRo, kRB24CuTubeL/2.), kMedVac);
846 voRB24CuTubeM->SetVisibility(0);
847 TGeoVolume* voRB24CuTube = new TGeoVolume("voRB24CuTube",
848 new TGeoTube(kRB24CuTubeRi, kRB24CuTubeRo, kRB24CuTubeL/2.), kMedCu);
849 voRB24CuTubeM->AddNode(voRB24CuTube, 1, gGeoIdentity);
850 // Air outside tube with higher transport cuts
851 TGeoVolume* voRB24CuTubeA = new TGeoVolume("voRB24CuTubeA",
852 new TGeoTube(25., 100., kRB24CuTubeL/2.), kMedAirHigh);
853 voRB24CuTubeA->SetVisibility(0);
854 // Simplified DN 100 Flange
855 TGeoVolume* voRB24CuTubeF = new TGeoVolume("voRB24CuTubeF",
856 new TGeoTube(kRB24CuTubeRo, kRB24CuTubeFRo, kRB24CuTubeFL/2.), kMedSteel);
857
858 // Warm Module Type VMACA
859 // LHCVMACA_0002
860 //
861 // Pos 1 Warm Bellows DN100 LHCVBU__0012
862 // Pos 2 RF Contact D80 LHCVSR__0005
863 // Pos 3 Trans. Tube Flange LHCVSR__0065
864 // [Pos 4 Hex. Countersunk Screw Bossard BN4719]
865 // [Pos 5 Tension spring LHCVSR__0011]
866 //
867 //
868 //
869 // Pos1 Warm Bellows DN100
870 // Pos1.1 Bellows LHCVBU__0006
871 //
872 //
873 // Connection Tubes
874 // Connection tube inner r
875 const Float_t kRB24B1ConTubeRin = 10.0/2.;
876 // Connection tube outer r
877 const Float_t kRB24B1ConTubeRou = 10.3/2.;
878 // Connection tube length
879 const Float_t kRB24B1ConTubeL = 2.5;
880 //
881 const Float_t kRB24B1CompL = 16.00; // Length of the compensator
882 const Float_t kRB24B1BellowRi = 10.25/2.; // Bellow inner radius
883 const Float_t kRB24B1BellowRo = 11.40/2.; // Bellow outer radius
884 const Int_t kRB24B1NumberOfPlies = 27; // Number of plies
885 const Float_t kRB24B1BellowUndL = 11.00; // Length of undulated region
886 const Float_t kRB24B1PlieThickness = 0.015; // Plie thickness
887
888 const Float_t kRB24B1PlieRadius =
889 (kRB24B1BellowUndL + (2. * kRB24B1NumberOfPlies - 2.) * kRB24B1PlieThickness) / (4. * kRB24B1NumberOfPlies);
890
891 const Float_t kRB24B1ProtTubeThickness = 0.02; // Thickness of the protection tube
892 const Float_t kRB24B1ProtTubeLength = 4.2; // Length of the protection tube
893
894 const Float_t kRB24B1RFlangeL = 1.86; // Length of the flanges
895 const Float_t kRB24B1RFlangeLO = 0.26; // Flange overlap
896 const Float_t kRB24B1RFlangeRO = 11.18/2; // Inner radius at Flange overlap
897 const Float_t kRB24B1RFlangeRou = 15.20/2.; // Outer radius of flange
898 const Float_t kRB24B1RFlangeRecess = 0.98; // Flange recess
899 const Float_t kRB24B1L = kRB24B1CompL + 2. * (kRB24B1RFlangeL - kRB24B1RFlangeRecess);
900
901 ///
902 //
903 // Bellow mother volume
904 TGeoPcon* shRB24B1BellowM = new TGeoPcon(0., 360., 14);
905 // Connection Tube and Flange
906 z = 0.;
907 shRB24B1BellowM->DefineSection( 0, z, 0., kRB24B1RFlangeRou);
908 z += kRB24B1RFlangeLO;
909 shRB24B1BellowM->DefineSection( 1, z, 0., kRB24B1RFlangeRou);
910 shRB24B1BellowM->DefineSection( 2, z, 0., kRB24B1RFlangeRou);
911 z = kRB24B1RFlangeL;
912 shRB24B1BellowM->DefineSection( 3, z, 0., kRB24B1RFlangeRou);
913 shRB24B1BellowM->DefineSection( 4, z, 0., kRB24B1ConTubeRou);
914 z = kRB24B1ConTubeL + kRB24B1RFlangeL - kRB24B1RFlangeRecess;
915 shRB24B1BellowM->DefineSection( 5, z, 0., kRB24B1ConTubeRou);
916 // Plie
917 shRB24B1BellowM->DefineSection( 6, z, 0., kRB24B1BellowRo + kRB24B1ProtTubeThickness);
918 z += kRB24B1BellowUndL;
919 shRB24B1BellowM->DefineSection( 7, z, 0., kRB24B1BellowRo + kRB24B1ProtTubeThickness);
920 shRB24B1BellowM->DefineSection( 8, z, 0., kRB24B1ConTubeRou);
921 // Connection Tube and Flange
922 z = kRB24B1L - shRB24B1BellowM->GetZ(3);
923 shRB24B1BellowM->DefineSection( 9, z, 0., kRB24B1ConTubeRou);
924 shRB24B1BellowM->DefineSection(10, z, 0., kRB24B1RFlangeRou);
925 z = kRB24B1L - shRB24B1BellowM->GetZ(1);
926 shRB24B1BellowM->DefineSection(11, z, 0., kRB24B1RFlangeRou);
927 shRB24B1BellowM->DefineSection(12, z, 0., kRB24B1RFlangeRou);
928 z = kRB24B1L - shRB24B1BellowM->GetZ(0);
929 shRB24B1BellowM->DefineSection(13, z, 0., kRB24B1RFlangeRou);
930
931 TGeoVolume* voRB24B1BellowM = new TGeoVolume("RB24B1BellowM", shRB24B1BellowM, kMedVac);
932 voRB24B1BellowM->SetVisibility(0);
933 //
934 // Bellow Section
935 TGeoVolume* voRB24B1Bellow
936 = MakeBellow("RB24B1", kRB24B1NumberOfPlies, kRB24B1BellowRi, kRB24B1BellowRo,
937 kRB24B1BellowUndL, kRB24B1PlieRadius ,kRB24B1PlieThickness);
938 voRB24B1Bellow->SetVisibility(0);
939
940 //
941 // End Parts (connection tube)
942 TGeoVolume* voRB24B1CT = new TGeoVolume("RB24B1CT", new TGeoTube(kRB24B1ConTubeRin, kRB24B1ConTubeRou, kRB24B1ConTubeL/2.), kMedSteel);
943 //
944 // Protection Tube
945 TGeoVolume* voRB24B1PT = new TGeoVolume("RB24B1PT", new TGeoTube(kRB24B1BellowRo, kRB24B1BellowRo + kRB24B1ProtTubeThickness,
946 kRB24B1ProtTubeLength / 2.), kMedSteel);
947
948 z = kRB24B1ConTubeL/2. + (kRB24B1RFlangeL - kRB24B1RFlangeRecess);
949
950 voRB24B1BellowM->AddNode(voRB24B1CT, 1, new TGeoTranslation(0., 0., z));
951 z += (kRB24B1ConTubeL/2.+ kRB24B1BellowUndL/2.);
952 voRB24B1BellowM->AddNode(voRB24B1Bellow, 1, new TGeoTranslation(0., 0., z));
953 z += (kRB24B1BellowUndL/2. + kRB24B1ConTubeL/2);
954 voRB24B1BellowM->AddNode(voRB24B1CT, 2, new TGeoTranslation(0., 0., z));
955 z = kRB24B1ConTubeL + kRB24B1ProtTubeLength / 2. + 1. + kRB24B1RFlangeLO;
956 voRB24B1BellowM->AddNode(voRB24B1PT, 1, new TGeoTranslation(0., 0., z));
957 z += kRB24B1ProtTubeLength + 0.6;
958 voRB24B1BellowM->AddNode(voRB24B1PT, 2, new TGeoTranslation(0., 0., z));
959
960
961
962 // Pos 1/2 Rotatable Flange LHCVBU__0013
963 // Pos 1/3 Flange DN100/103 LHCVBU__0018
964 // The two flanges can be represented by the same volume
965 // Outer Radius (including the outer movable ring).
966 // The inner ring has a diameter of 12.04 cm
967
968
969 TGeoPcon* shRB24B1RFlange = new TGeoPcon(0., 360., 10);
970 z = 0.;
971 shRB24B1RFlange->DefineSection(0, z, 10.30/2., kRB24B1RFlangeRou);
972 z += 0.55; // 5.5 mm added for outer ring
973 z += 0.43;
974 shRB24B1RFlange->DefineSection(1, z, 10.30/2., kRB24B1RFlangeRou);
975 shRB24B1RFlange->DefineSection(2, z, 10.06/2., kRB24B1RFlangeRou);
976 z += 0.15;
977 shRB24B1RFlange->DefineSection(3, z, 10.06/2., kRB24B1RFlangeRou);
978 // In reality this part is rounded
979 shRB24B1RFlange->DefineSection(4, z, 10.91/2., kRB24B1RFlangeRou);
980 z += 0.15;
981 shRB24B1RFlange->DefineSection(5, z, 10.91/2., kRB24B1RFlangeRou);
982 shRB24B1RFlange->DefineSection(6, z, 10.06/2., kRB24B1RFlangeRou);
983 z += 0.32;
984 shRB24B1RFlange->DefineSection(7, z, 10.06/2., kRB24B1RFlangeRou);
985 shRB24B1RFlange->DefineSection(8, z, kRB24B1RFlangeRO, kRB24B1RFlangeRou);
986 z += kRB24B1RFlangeLO;
987 shRB24B1RFlange->DefineSection(9, z, kRB24B1RFlangeRO, kRB24B1RFlangeRou);
988
989 TGeoVolume* voRB24B1RFlange = new TGeoVolume("RB24B1RFlange", shRB24B1RFlange, kMedSteel);
990
991
992 z = kRB24B1L - kRB24B1RFlangeL;
993 voRB24B1BellowM->AddNode(voRB24B1RFlange, 1, new TGeoTranslation(0., 0., z));
994 z = kRB24B1RFlangeL;
995 voRB24B1BellowM->AddNode(voRB24B1RFlange, 2, new TGeoCombiTrans(0., 0., z, rot180));
996 //
997 // Pos 2 RF Contact D80 LHCVSR__0005
998 //
999 // Pos 2.1 RF Contact Flange LHCVSR__0003
1000 //
1001 TGeoPcon* shRB24B1RCTFlange = new TGeoPcon(0., 360., 6);
1002 const Float_t kRB24B1RCTFlangeRin = 8.06/2. + 0.05; // Inner radius
1003 const Float_t kRB24B1RCTFlangeL = 1.45; // Length
1004
1005 z = 0.;
1006 shRB24B1RCTFlange->DefineSection(0, z, kRB24B1RCTFlangeRin, 8.20/2.);
1007 z += 0.15;
1008 shRB24B1RCTFlange->DefineSection(1, z, kRB24B1RCTFlangeRin, 8.20/2.);
1009 shRB24B1RCTFlange->DefineSection(2, z, kRB24B1RCTFlangeRin, 8.60/2.);
1010 z += 1.05;
1011 shRB24B1RCTFlange->DefineSection(3, z, kRB24B1RCTFlangeRin, 8.60/2.);
1012 shRB24B1RCTFlange->DefineSection(4, z, kRB24B1RCTFlangeRin, 11.16/2.);
1013 z += 0.25;
1014 shRB24B1RCTFlange->DefineSection(5, z, kRB24B1RCTFlangeRin, 11.16/2.);
1015 TGeoVolume* voRB24B1RCTFlange = new TGeoVolume("RB24B1RCTFlange", shRB24B1RCTFlange, kMedCu);
1016 z = kRB24B1L - kRB24B1RCTFlangeL;
1017
1018 voRB24B1BellowM->AddNode(voRB24B1RCTFlange, 1, new TGeoTranslation(0., 0., z));
1019 //
1020 // Pos 2.2 RF-Contact LHCVSR__0004
1021 //
1022 TGeoPcon* shRB24B1RCT = new TGeoPcon(0., 360., 3);
1023 const Float_t kRB24B1RCTRin = 8.00/2.; // Inner radius
1024 const Float_t kRB24B1RCTCRin = 8.99/2.; // Max. inner radius conical section
1025 const Float_t kRB24B1RCTL = 11.78; // Length
1026 const Float_t kRB24B1RCTSL = 10.48; // Length of straight section
1027 const Float_t kRB24B1RCTd = 0.03; // Thickness
1028
1029 z = 0;
1030 shRB24B1RCT->DefineSection(0, z, kRB24B1RCTCRin, kRB24B1RCTCRin + kRB24B1RCTd);
1031 z = kRB24B1RCTL - kRB24B1RCTSL;
1032 // In the (VSR0004) this section is straight in (LHCVC2U_0001) it is conical ????
1033 shRB24B1RCT->DefineSection(1, z, kRB24B1RCTRin + 0.35, kRB24B1RCTRin + 0.35 + kRB24B1RCTd);
1034 z = kRB24B1RCTL - 0.03;
1035 shRB24B1RCT->DefineSection(2, z, kRB24B1RCTRin, kRB24B1RCTRin + kRB24B1RCTd);
1036
1037 TGeoVolume* voRB24B1RCT = new TGeoVolume("RB24B1RCT", shRB24B1RCT, kMedCu);
1038 z = kRB24B1L - kRB24B1RCTL - 0.45;
1039 voRB24B1BellowM->AddNode(voRB24B1RCT, 1, new TGeoTranslation(0., 0., z));
1040
1041 //
1042 // Pos 3 Trans. Tube Flange LHCVSR__0065
1043 //
1044 // Pos 3.1 Transition Tube D53 LHCVSR__0064
1045 // Pos 3.2 Transition Flange LHCVSR__0060
1046 // Pos 3.3 Transition Tube LHCVSR__0058
1047 TGeoPcon* shRB24B1TTF = new TGeoPcon(0., 360., 7);
1048 // Flange
1049 z = 0.;
1050 shRB24B1TTF->DefineSection(0, z, 6.30/2., 11.16/2.);
1051 z += 0.25;
1052 shRB24B1TTF->DefineSection(1, z, 6.30/2., 11.16/2.);
1053 shRB24B1TTF->DefineSection(2, z, 6.30/2., 9.3/2.);
1054 z += 0.55;
1055 shRB24B1TTF->DefineSection(3, z, 6.30/2., 9.3/2.);
1056 // Tube
1057 shRB24B1TTF->DefineSection(4, z, 6.30/2., 6.7/2.);
1058 z += 5.80;
1059 shRB24B1TTF->DefineSection(5, z, 6.30/2., 6.7/2.);
1060 // Transition Tube
1061 z += 3.75;
1062 shRB24B1TTF->DefineSection(6, z, 8.05/2., 8.45/2.);
1063 TGeoVolume* voRB24B1TTF = new TGeoVolume("RB24B1TTF", shRB24B1TTF, kMedSteel);
1064 z = 0.;
1065 voRB24B1BellowM->AddNode(voRB24B1TTF, 1, new TGeoTranslation(0., 0., z));
1066
1067 // Annular Ion Pump
1068 // LHCVC2U_0003
1069 //
1070 // Pos 1 Rotable Flange LHCVFX__0031
1071 // Pos 2 RF Screen Tube LHCVC2U_0005
1072 // Pos 3 Shell LHCVC2U_0007
1073 // Pos 4 Extruded Shell LHCVC2U_0006
1074 // Pos 5 Feedthrough Tube LHCVC2U_0004
1075 // Pos 6 Tubulated Flange STDVFUHV0021
1076 // Pos 7 Fixed Flange LHCVFX__0032
1077 // Pos 8 Pumping Elements
1078
1079 //
1080 // Pos 1 Rotable Flange LHCVFX__0031
1081 // pos 7 Fixed Flange LHCVFX__0032
1082 //
1083 // Mother volume
1084 const Float_t kRB24AIpML = 35.;
1085
1086 TGeoVolume* voRB24AIpM = new TGeoVolume("voRB24AIpM", new TGeoTube(0., 10., kRB24AIpML/2.), kMedAir);
1087 voRB24AIpM->SetVisibility(0);
1088
1089 //
1090 // Length 35 cm
1091 // Flange 2 x 1.98 = 3.96
1092 // Tube = 32.84
1093 //==========================
1094 // 36.80
1095 // Overlap 2 * 0.90 = 1.80
1096
1097 const Float_t kRB24IpRFD1 = 0.68; // Length of section 1
1098 const Float_t kRB24IpRFD2 = 0.30; // Length of section 2
1099 const Float_t kRB24IpRFD3 = 0.10; // Length of section 3
1100 const Float_t kRB24IpRFD4 = 0.35; // Length of section 4
1101 const Float_t kRB24IpRFD5 = 0.55; // Length of section 5
1102
1103 const Float_t kRB24IpRFRo = 15.20/2.; // Flange outer radius
1104 const Float_t kRB24IpRFRi1 = 6.30/2.; // Flange inner radius section 1
1105 const Float_t kRB24IpRFRi2 = 6.00/2.; // Flange inner radius section 2
1106 const Float_t kRB24IpRFRi3 = 5.84/2.; // Flange inner radius section 3
1107 const Float_t kRB24IpRFRi4 = 6.00/2.; // Flange inner radius section 1
1108 const Float_t kRB24IpRFRi5 = 10.50/2.; // Flange inner radius section 2
1109
1110 TGeoPcon* shRB24IpRF = new TGeoPcon(0., 360., 9);
1111 z0 = 0.;
1112 shRB24IpRF->DefineSection(0, z0, kRB24IpRFRi1, kRB24IpRFRo);
1113 z0 += kRB24IpRFD1;
1114 shRB24IpRF->DefineSection(1, z0, kRB24IpRFRi2, kRB24IpRFRo);
1115 z0 += kRB24IpRFD2;
1116 shRB24IpRF->DefineSection(2, z0, kRB24IpRFRi2, kRB24IpRFRo);
1117 shRB24IpRF->DefineSection(3, z0, kRB24IpRFRi3, kRB24IpRFRo);
1118 z0 += kRB24IpRFD3;
1119 shRB24IpRF->DefineSection(4, z0, kRB24IpRFRi3, kRB24IpRFRo);
1120 shRB24IpRF->DefineSection(5, z0, kRB24IpRFRi4, kRB24IpRFRo);
1121 z0 += kRB24IpRFD4;
1122 shRB24IpRF->DefineSection(6, z0, kRB24IpRFRi4, kRB24IpRFRo);
1123 shRB24IpRF->DefineSection(7, z0, kRB24IpRFRi5, kRB24IpRFRo);
1124 z0 += kRB24IpRFD5;
1125 shRB24IpRF->DefineSection(8, z0, kRB24IpRFRi5, kRB24IpRFRo);
1126
1127 TGeoVolume* voRB24IpRF = new TGeoVolume("RB24IpRF", shRB24IpRF, kMedSteel);
1128
1129 //
1130 // Pos 2 RF Screen Tube LHCVC2U_0005
1131 //
1132
1133 //
1134 // Tube
1135 Float_t kRB24IpSTTL = 32.84; // Total length of the tube
1136 Float_t kRB24IpSTTRi = 5.80/2.; // Inner Radius
1137 Float_t kRB24IpSTTRo = 6.00/2.; // Outer Radius
1138 TGeoVolume* voRB24IpSTT = new TGeoVolume("RB24IpSTT", new TGeoTube(kRB24IpSTTRi, kRB24IpSTTRo, kRB24IpSTTL/2.), kMedSteel);
1139 // Screen
1140 Float_t kRB24IpSTCL = 0.4; // Lenth of the crochet detail
1141 // Length of the screen
1142 Float_t kRB24IpSTSL = 9.00 - 2. * kRB24IpSTCL;
1143 // Rel. position of the screen
1144 Float_t kRB24IpSTSZ = 7.00 + kRB24IpSTCL;
1145 TGeoVolume* voRB24IpSTS = new TGeoVolume("RB24IpSTS", new TGeoTube(kRB24IpSTTRi, kRB24IpSTTRo, kRB24IpSTSL/2.), kMedSteel);
1146 // Vacuum
1147 TGeoVolume* voRB24IpSTV = new TGeoVolume("RB24IpSTV", new TGeoTube(0., kRB24IpSTTRi, kRB24AIpML/2.), kMedVac);
1148 //
1149 voRB24IpSTT->AddNode(voRB24IpSTS, 1, new TGeoTranslation(0., 0., kRB24IpSTSZ - kRB24IpSTTL/2. + kRB24IpSTSL/2.));
1150
1151 // Crochets
1152 // Inner radius
1153 Float_t kRB24IpSTCRi = kRB24IpSTTRo + 0.25;
1154 // Outer radius
1155 Float_t kRB24IpSTCRo = kRB24IpSTTRo + 0.35;
1156 // Length of 1stsection
1157 Float_t kRB24IpSTCL1 = 0.15;
1158 // Length of 2nd section
1159 Float_t kRB24IpSTCL2 = 0.15;
1160 // Length of 3rd section
1161 Float_t kRB24IpSTCL3 = 0.10;
1162 // Rel. position of 1st Crochet
1163
1164
1165 TGeoPcon* shRB24IpSTC = new TGeoPcon(0., 360., 5);
1166 z0 = 0;
1167 shRB24IpSTC->DefineSection(0, z0, kRB24IpSTCRi, kRB24IpSTCRo);
1168 z0 += kRB24IpSTCL1;
1169 shRB24IpSTC->DefineSection(1, z0, kRB24IpSTCRi, kRB24IpSTCRo);
1170 shRB24IpSTC->DefineSection(2, z0, kRB24IpSTTRo, kRB24IpSTCRo);
1171 z0 += kRB24IpSTCL2;
1172 shRB24IpSTC->DefineSection(3, z0, kRB24IpSTTRo, kRB24IpSTCRo);
1173 z0 += kRB24IpSTCL3;
1174 shRB24IpSTC->DefineSection(4, z0, kRB24IpSTTRo, kRB24IpSTTRo + 0.001);
1175 TGeoVolume* voRB24IpSTC = new TGeoVolume("RB24IpSTC", shRB24IpSTC, kMedSteel);
1176
1177 // Pos 3 Shell LHCVC2U_0007
1178 // Pos 4 Extruded Shell LHCVC2U_0006
1179 Float_t kRB24IpShellL = 4.45; // Length of the Shell
1180 Float_t kRB24IpShellD = 0.10; // Wall thickness of the shell
1181 Float_t kRB24IpShellCTRi = 6.70/2.; // Inner radius of the connection tube
1182 Float_t kRB24IpShellCTL = 1.56; // Length of the connection tube
1183 Float_t kRB24IpShellCARi = 17.80/2.; // Inner radius of the cavity
1184 Float_t kRB24IpShellCCRo = 18.20/2.; // Inner radius at the centre
1185
1186 TGeoPcon* shRB24IpShell = new TGeoPcon(0., 360., 7);
1187 z0 = 0;
1188 shRB24IpShell->DefineSection(0, z0, kRB24IpShellCTRi, kRB24IpShellCTRi + kRB24IpShellD);
1189 z0 += kRB24IpShellCTL;
1190 shRB24IpShell->DefineSection(1, z0, kRB24IpShellCTRi, kRB24IpShellCTRi + kRB24IpShellD);
1191 shRB24IpShell->DefineSection(2, z0, kRB24IpShellCTRi, kRB24IpShellCARi + kRB24IpShellD);
1192 z0 += kRB24IpShellD;
1193 shRB24IpShell->DefineSection(3, z0, kRB24IpShellCARi, kRB24IpShellCARi + kRB24IpShellD);
1194 z0 = kRB24IpShellL - kRB24IpShellD;
1195 shRB24IpShell->DefineSection(4, z0, kRB24IpShellCARi, kRB24IpShellCARi + kRB24IpShellD);
1196 shRB24IpShell->DefineSection(5, z0, kRB24IpShellCARi, kRB24IpShellCCRo);
1197 z0 = kRB24IpShellL;
1198 shRB24IpShell->DefineSection(6, z0, kRB24IpShellCARi, kRB24IpShellCCRo);
1199 TGeoVolume* voRB24IpShell = new TGeoVolume("RB24IpShell", shRB24IpShell, kMedSteel);
1200
1201 TGeoPcon* shRB24IpShellM = MakeMotherFromTemplate(shRB24IpShell, 0, 6, kRB24IpShellCTRi , 13);
1202
1203
1204 for (Int_t i = 0; i < 6; i++) {
1205 z = 2. * kRB24IpShellL - shRB24IpShellM->GetZ(5-i);
1206 Float_t rmin = shRB24IpShellM->GetRmin(5-i);
1207 Float_t rmax = shRB24IpShellM->GetRmax(5-i);
1208 shRB24IpShellM->DefineSection(7+i, z, rmin, rmax);
1209 }
1210
1211 TGeoVolume* voRB24IpShellM = new TGeoVolume("RB24IpShellM", shRB24IpShellM, kMedVac);
1212 voRB24IpShellM->SetVisibility(0);
1213 voRB24IpShellM->AddNode(voRB24IpShell, 1, gGeoIdentity);
1214 voRB24IpShellM->AddNode(voRB24IpShell, 2, new TGeoCombiTrans(0., 0., 2. * kRB24IpShellL, rot180));
1215 //
1216 // Pos 8 Pumping Elements
1217 //
1218 // Anode array
1219 TGeoVolume* voRB24IpPE = new TGeoVolume("voRB24IpPE", new TGeoTube(0.9, 1., 2.54/2.), kMedSteel);
1220 Float_t kRB24IpPEAR = 5.5;
1221
1222 for (Int_t i = 0; i < 15; i++) {
1223 Float_t phi = Float_t(i) * 24.;
1224 Float_t x = kRB24IpPEAR * TMath::Cos(kDegRad * phi);
1225 Float_t y = kRB24IpPEAR * TMath::Sin(kDegRad * phi);
1226 voRB24IpShellM->AddNode(voRB24IpPE, i+1, new TGeoTranslation(x, y, kRB24IpShellL));
1227 }
1228
1229
1230 //
1231 // Cathodes
1232 //
1233 // Here we could add some Ti strips
1234
1235 // Postioning of elements
1236 voRB24AIpM->AddNode(voRB24IpRF, 1, new TGeoTranslation(0., 0., -kRB24AIpML/2.));
1237 voRB24AIpM->AddNode(voRB24IpRF, 2, new TGeoCombiTrans (0., 0., +kRB24AIpML/2., rot180));
1238 voRB24AIpM->AddNode(voRB24IpSTT, 1, new TGeoTranslation(0., 0., 0.));
1239 voRB24AIpM->AddNode(voRB24IpSTV, 1, new TGeoTranslation(0., 0., 0.));
1240 voRB24AIpM->AddNode(voRB24IpShellM, 1, new TGeoTranslation(0., 0., -kRB24AIpML/2. + 8.13));
1241 voRB24AIpM->AddNode(voRB24IpSTC, 1, new TGeoTranslation(0., 0., 8.13 - kRB24AIpML/2.));
1242 voRB24AIpM->AddNode(voRB24IpSTC, 2, new TGeoCombiTrans (0., 0., 8.14 + 8.9 - kRB24AIpML/2., rot180));
1243
1244 //
1245 // Valve
1246 // VAC Series 47 DN 63 with manual actuator
1247 //
1248 const Float_t kRB24ValveWz = 7.5;
1249 const Float_t kRB24ValveDN = 10.0/2.;
1250 //
1251 // Body containing the valve plate
1252 //
1253 const Float_t kRB24ValveBoWx = 15.6;
1254 const Float_t kRB24ValveBoWy = (21.5 + 23.1 - 5.);
1255 const Float_t kRB24ValveBoWz = 4.6;
1256 const Float_t kRB24ValveBoD = 0.5;
1257
1258 TGeoVolume* voRB24ValveBoM =
1259 new TGeoVolume("RB24ValveBoM",
1260 new TGeoBBox( kRB24ValveBoWx/2., kRB24ValveBoWy/2., kRB24ValveBoWz/2.), kMedAir);
1261 voRB24ValveBoM->SetVisibility(0);
1262 TGeoVolume* voRB24ValveBo =
1263 new TGeoVolume("RB24ValveBo",
1264 new TGeoBBox( kRB24ValveBoWx/2., kRB24ValveBoWy/2., kRB24ValveBoWz/2.), kMedSteel);
1265 voRB24ValveBoM->AddNode(voRB24ValveBo, 1, gGeoIdentity);
1266 //
1267 // Inner volume
1268 //
1269 TGeoVolume* voRB24ValveBoI = new TGeoVolume("RB24ValveBoI",
1270 new TGeoBBox( kRB24ValveBoWx/2. - kRB24ValveBoD,
1271 kRB24ValveBoWy/2. - kRB24ValveBoD/2.,
1272 kRB24ValveBoWz/2. - kRB24ValveBoD),
1273 kMedVac);
1274 voRB24ValveBo->AddNode(voRB24ValveBoI, 1, new TGeoTranslation(0., kRB24ValveBoD/2., 0.));
1275 //
1276 // Opening and Flanges
1277 const Float_t kRB24ValveFlRo = 18./2.;
1278 const Float_t kRB24ValveFlD = 1.45;
1279 TGeoVolume* voRB24ValveBoA = new TGeoVolume("RB24ValveBoA",
1280 new TGeoTube(0., kRB24ValveDN/2., kRB24ValveBoD/2.), kMedVac);
1281 voRB24ValveBo->AddNode(voRB24ValveBoA, 1, new TGeoTranslation(0., - kRB24ValveBoWy/2. + 21.5, -kRB24ValveBoWz/2. + kRB24ValveBoD/2.));
1282 voRB24ValveBo->AddNode(voRB24ValveBoA, 2, new TGeoTranslation(0., - kRB24ValveBoWy/2. + 21.5, +kRB24ValveBoWz/2. - kRB24ValveBoD/2.));
1283
1284 TGeoVolume* voRB24ValveFl = new TGeoVolume("RB24ValveFl", new TGeoTube(kRB24ValveDN/2., kRB24ValveFlRo, kRB24ValveFlD/2.), kMedSteel);
1285 TGeoVolume* voRB24ValveFlI = new TGeoVolume("RB24ValveFlI", new TGeoTube(0., kRB24ValveFlRo, kRB24ValveFlD/2.), kMedVac);
1286 voRB24ValveFlI->AddNode(voRB24ValveFl, 1, gGeoIdentity);
1287
1288 //
1289 // Actuator Flange
1290 const Float_t kRB24ValveAFlWx = 18.9;
1291 const Float_t kRB24ValveAFlWy = 5.0;
1292 const Float_t kRB24ValveAFlWz = 7.7;
1293 TGeoVolume* voRB24ValveAFl = new TGeoVolume("RB24ValveAFl", new TGeoBBox(kRB24ValveAFlWx/2., kRB24ValveAFlWy/2., kRB24ValveAFlWz/2.), kMedSteel);
1294 //
1295 // Actuator Tube
1296 const Float_t kRB24ValveATRo = 9.7/2.;
1297 const Float_t kRB24ValveATH = 16.6;
1298 TGeoVolume* voRB24ValveAT = new TGeoVolume("RB24ValveAT", new TGeoTube(kRB24ValveATRo - 2. * kRB24ValveBoD,kRB24ValveATRo, kRB24ValveATH/2.),
1299 kMedSteel);
1300 //
1301 // Manual Actuator (my best guess)
1302 TGeoVolume* voRB24ValveMA1 = new TGeoVolume("RB24ValveMA1", new TGeoCone(2.5/2., 0., 0.5, 4.5, 5.), kMedSteel);
1303 TGeoVolume* voRB24ValveMA2 = new TGeoVolume("RB24ValveMA2", new TGeoTorus(5., 0., 1.25), kMedSteel);
1304 TGeoVolume* voRB24ValveMA3 = new TGeoVolume("RB24ValveMA3", new TGeoTube (0., 1.25, 2.5), kMedSteel);
1305
1306
1307 //
1308 // Position all volumes
1309 Float_t y0;
1310 TGeoVolumeAssembly* voRB24ValveMo = new TGeoVolumeAssembly("RB24ValveMo");
1311 voRB24ValveMo->AddNode(voRB24ValveFl, 1, new TGeoTranslation(0., 0., - 7.5/2. + kRB24ValveFlD/2.));
1312 voRB24ValveMo->AddNode(voRB24ValveFl, 2, new TGeoTranslation(0., 0., + 7.5/2. - kRB24ValveFlD/2.));
1313 y0 = -21.5;
1314 voRB24ValveMo->AddNode(voRB24ValveBoM, 1, new TGeoTranslation(0., y0 + kRB24ValveBoWy/2., 0.));
1315 y0 += kRB24ValveBoWy;
1316 voRB24ValveMo->AddNode(voRB24ValveAFl, 1, new TGeoTranslation(0., y0 + kRB24ValveAFlWy/2., 0.));
1317 y0 += kRB24ValveAFlWy;
1318 voRB24ValveMo->AddNode(voRB24ValveAT, 1, new TGeoCombiTrans(0., y0 + kRB24ValveATH/2., 0., rotyz));
1319 y0 += kRB24ValveATH;
1320 voRB24ValveMo->AddNode(voRB24ValveMA1, 1, new TGeoCombiTrans(0., y0 + 2.5/2., 0., rotyz));
1321 y0 += 2.5;
1322 voRB24ValveMo->AddNode(voRB24ValveMA2, 1, new TGeoCombiTrans(0., y0 + 2.5/2., 0., rotyz));
1323 y0 += 2.5;
1324 voRB24ValveMo->AddNode(voRB24ValveMA3, 1, new TGeoCombiTrans(5./TMath::Sqrt(2.), y0 + 5.0/2., 5./TMath::Sqrt(2.), rotyz));
1325 //
1326 // Warm Module Type VMABC
1327 // LHCVMABC_0002
1328 //
1329 //
1330 //
1331 // Flange 1.00
1332 // Central Piece 11.50
1333 // Bellow 14.50
1334 // End Flange 1.00
1335 //===================================
1336 // Total 28.00
1337 //
1338 // Pos 1 Warm Bellows DN100 LHCVBU__0016
1339 // Pos 2 Trans. Tube Flange LHCVSR__0062
1340 // Pos 3 RF Contact D63 LHCVSR__0057
1341 // [Pos 4 Hex. Countersunk Screw Bossard BN4719]
1342 // [Pos 5 Tension spring LHCVSR__00239]
1343 //
1344
1345 // Pos 1 Warm Bellows DN100 LHCVBU__0016
1346 // Pos 1.1 Right Body 2 Ports with Support LHCVBU__0014
1347 //
1348 // Tube 1
1349 const Float_t kRB24VMABCRBT1Ri = 10.0/2.;
1350 const Float_t kRB24VMABCRBT1Ro = 10.3/2.;
1351 const Float_t kRB24VMABCRBT1L = 11.5;
1352 const Float_t kRB24VMABCRBT1L2 = 8.;
1353 const Float_t kRB24VMABCL = 28.;
1354
1355 TGeoTube* shRB24VMABCRBT1 = new TGeoTube(kRB24VMABCRBT1Ri, kRB24VMABCRBT1Ro, kRB24VMABCRBT1L/2.);
1356 shRB24VMABCRBT1->SetName("RB24VMABCRBT1");
1357 TGeoTube* shRB24VMABCRBT1o = new TGeoTube(0., kRB24VMABCRBT1Ro, kRB24VMABCRBT1L/2.);
1358 shRB24VMABCRBT1o->SetName("RB24VMABCRBT1o");
1359 TGeoTube* shRB24VMABCRBT1o2 = new TGeoTube(0., kRB24VMABCRBT1Ro + 0.3, kRB24VMABCRBT1L/2.);
1360 shRB24VMABCRBT1o2->SetName("RB24VMABCRBT1o2");
1361 // Lower inforcement
1362 TGeoVolume* voRB24VMABCRBT12 = new TGeoVolume("RB24VMABCRBT12",
1363 new TGeoTubeSeg(kRB24VMABCRBT1Ro, kRB24VMABCRBT1Ro + 0.3, kRB24VMABCRBT1L2/2., 220., 320.)
1364 , kMedSteel);
1365 //
1366 // Tube 2
1367 const Float_t kRB24VMABCRBT2Ri = 6.0/2.;
1368 const Float_t kRB24VMABCRBT2Ro = 6.3/2.;
1369 const Float_t kRB24VMABCRBF2Ro = 11.4/2.;
1370 const Float_t kRB24VMABCRBT2L = 5.95 + 2.; // 2. cm added for welding
1371 const Float_t kRB24VMABCRBF2L = 1.75;
1372 TGeoTube* shRB24VMABCRBT2 = new TGeoTube(kRB24VMABCRBT2Ri, kRB24VMABCRBT2Ro, kRB24VMABCRBT2L/2.);
1373 shRB24VMABCRBT2->SetName("RB24VMABCRBT2");
1374 TGeoTube* shRB24VMABCRBT2i = new TGeoTube(0., kRB24VMABCRBT2Ri, kRB24VMABCRBT2L/2. + 2.);
1375 shRB24VMABCRBT2i->SetName("RB24VMABCRBT2i");
1376 TGeoCombiTrans* tRBT2 = new TGeoCombiTrans(-11.5 + kRB24VMABCRBT2L/2., 0., 7.2 - kRB24VMABCRBT1L/2. , rotxz);
1377 tRBT2->SetName("tRBT2");
1378 tRBT2->RegisterYourself();
1379 TGeoCompositeShape* shRB24VMABCRBT2c = new TGeoCompositeShape("shRB24VMABCRBT2c","RB24VMABCRBT2:tRBT2-RB24VMABCRBT1o");
1380 TGeoVolume* voRB24VMABCRBT2 = new TGeoVolume("shRB24VMABCRBT2", shRB24VMABCRBT2c, kMedSteel);
1381 // Flange
1382 // Pos 1.4 Flange DN63 LHCVBU__0008
1383 TGeoVolume* voRB24VMABCRBF2 = new TGeoVolume("RB24VMABCRBF2",
1384 new TGeoTube(kRB24VMABCRBT2Ro, kRB24VMABCRBF2Ro, kRB24VMABCRBF2L/2.), kMedSteel);
1385 // DN63 Blank Flange (my best guess)
1386 TGeoVolume* voRB24VMABCRBF2B = new TGeoVolume("RB24VMABCRBF2B",
1387 new TGeoTube(0., kRB24VMABCRBF2Ro, kRB24VMABCRBF2L/2.), kMedSteel);
1388 //
1389 // Tube 3
1390 const Float_t kRB24VMABCRBT3Ri = 3.5/2.;
1391 const Float_t kRB24VMABCRBT3Ro = 3.8/2.;
1392 const Float_t kRB24VMABCRBF3Ro = 7.0/2.;
1393 const Float_t kRB24VMABCRBT3L = 4.95 + 2.; // 2. cm added for welding
1394 const Float_t kRB24VMABCRBF3L = 1.27;
1395 TGeoTube* shRB24VMABCRBT3 = new TGeoTube(kRB24VMABCRBT3Ri, kRB24VMABCRBT3Ro, kRB24VMABCRBT3L/2);
1396 shRB24VMABCRBT3->SetName("RB24VMABCRBT3");
1397 TGeoTube* shRB24VMABCRBT3i = new TGeoTube(0., kRB24VMABCRBT3Ri, kRB24VMABCRBT3L/2. + 2.);
1398 shRB24VMABCRBT3i->SetName("RB24VMABCRBT3i");
1399 TGeoCombiTrans* tRBT3 = new TGeoCombiTrans(0., 10.5 - kRB24VMABCRBT3L/2., 7.2 - kRB24VMABCRBT1L/2. , rotyz);
1400 tRBT3->SetName("tRBT3");
1401 tRBT3->RegisterYourself();
1402 TGeoCompositeShape* shRB24VMABCRBT3c = new TGeoCompositeShape("shRB24VMABCRBT3c","RB24VMABCRBT3:tRBT3-RB24VMABCRBT1o");
1403 TGeoVolume* voRB24VMABCRBT3 = new TGeoVolume("shRB24VMABCRBT3", shRB24VMABCRBT3c, kMedSteel);
1404 // Flange
1405 // Pos 1.4 Flange DN35 LHCVBU__0007
1406 TGeoVolume* voRB24VMABCRBF3 = new TGeoVolume("RB24VMABCRBF3",
1407 new TGeoTube(kRB24VMABCRBT3Ro, kRB24VMABCRBF3Ro, kRB24VMABCRBF3L/2.), kMedSteel);
1408 //
1409 // Tube 4
1410 const Float_t kRB24VMABCRBT4Ri = 6.0/2.;
1411 const Float_t kRB24VMABCRBT4Ro = 6.4/2.;
1412 const Float_t kRB24VMABCRBT4L = 6.6;
1413 TGeoTube* shRB24VMABCRBT4 = new TGeoTube(kRB24VMABCRBT4Ri, kRB24VMABCRBT4Ro, kRB24VMABCRBT4L/2.);
1414 shRB24VMABCRBT4->SetName("RB24VMABCRBT4");
1415 TGeoCombiTrans* tRBT4 = new TGeoCombiTrans(0.,-11.+kRB24VMABCRBT4L/2., 7.2 - kRB24VMABCRBT1L/2. , rotyz);
1416 tRBT4->SetName("tRBT4");
1417 tRBT4->RegisterYourself();
1418 TGeoCompositeShape* shRB24VMABCRBT4c = new TGeoCompositeShape("shRB24VMABCRBT4c","RB24VMABCRBT4:tRBT4-RB24VMABCRBT1o2");
1419 TGeoVolume* voRB24VMABCRBT4 = new TGeoVolume("shRB24VMABCRBT4", shRB24VMABCRBT4c, kMedSteel);
1420 TGeoCompositeShape* shRB24VMABCRB = new TGeoCompositeShape("shRB24VMABCRB", "RB24VMABCRBT1-(RB24VMABCRBT2i:tRBT2+RB24VMABCRBT3i:tRBT3)");
1421 TGeoVolume* voRB24VMABCRBI = new TGeoVolume("RB24VMABCRBI", shRB24VMABCRB, kMedSteel);
1422 //
1423 // Plate
1424 const Float_t kRB24VMABCRBBx = 16.0;
1425 const Float_t kRB24VMABCRBBy = 1.5;
1426 const Float_t kRB24VMABCRBBz = 15.0;
1427
1428 // Relative position of tubes
1429 const Float_t kRB24VMABCTz = 7.2;
1430 // Relative position of plate
1431 const Float_t kRB24VMABCPz = 3.6;
1432 const Float_t kRB24VMABCPy = -12.5;
1433
1434 TGeoVolume* voRB24VMABCRBP = new TGeoVolume("RB24VMABCRBP", new TGeoBBox(kRB24VMABCRBBx/2., kRB24VMABCRBBy/2., kRB24VMABCRBBz/2.), kMedSteel);
1435 //
1436 // Pirani Gauge (my best guess)
1437 //
1438 TGeoPcon* shRB24VMABCPirani = new TGeoPcon(0., 360., 15);
1439 // DN35/16 Coupling
1440 z = 0;
1441 shRB24VMABCPirani->DefineSection( 0, z, 0.8 , kRB24VMABCRBF3Ro);
1442 z += kRB24VMABCRBF3L; // 1.3
1443 shRB24VMABCPirani->DefineSection( 1, z, 0.8 , kRB24VMABCRBF3Ro);
1444 shRB24VMABCPirani->DefineSection( 2, z, 0.8 , 1.0);
1445 // Pipe
1446 z += 2.8;
1447 shRB24VMABCPirani->DefineSection( 3, z, 0.8 , 1.0);
1448 // Flange
1449 shRB24VMABCPirani->DefineSection( 4, z, 0.8 , 1.75);
1450 z += 1.6;
1451 shRB24VMABCPirani->DefineSection( 5, z, 0.8 , 1.75);
1452 shRB24VMABCPirani->DefineSection( 6, z, 0.8 , 1.0);
1453 z += 5.2;
1454 shRB24VMABCPirani->DefineSection( 7, z, 0.8 , 1.0);
1455 shRB24VMABCPirani->DefineSection( 8, z, 0.8 , 2.5);
1456 z += 2.0;
1457 shRB24VMABCPirani->DefineSection( 9, z, 0.80, 2.50);
1458 shRB24VMABCPirani->DefineSection(10, z, 1.55, 1.75);
1459 z += 5.7;
1460 shRB24VMABCPirani->DefineSection(11, z, 1.55, 1.75);
1461 shRB24VMABCPirani->DefineSection(11, z, 0.00, 1.75);
1462 z += 0.2;
1463 shRB24VMABCPirani->DefineSection(12, z, 0.00, 1.75);
1464 shRB24VMABCPirani->DefineSection(13, z, 0.00, 0.75);
1465 z += 0.5;
1466 shRB24VMABCPirani->DefineSection(14, z, 0.00, 0.75);
1467 TGeoVolume* voRB24VMABCPirani = new TGeoVolume("RB24VMABCPirani", shRB24VMABCPirani, kMedSteel);
1468 //
1469 //
1470 //
1471
1472
1473 //
1474 // Positioning of elements
1475 TGeoVolumeAssembly* voRB24VMABCRB = new TGeoVolumeAssembly("RB24VMABCRB");
1476 //
1477 voRB24VMABCRB->AddNode(voRB24VMABCRBI, 1, gGeoIdentity);
1478 // Plate
1479 voRB24VMABCRB->AddNode(voRB24VMABCRBP, 1, new TGeoTranslation(0., kRB24VMABCPy + kRB24VMABCRBBy /2.,
1480 kRB24VMABCRBBz/2. - kRB24VMABCRBT1L/2. + kRB24VMABCPz));
1481 // Tube 2
1482 voRB24VMABCRB->AddNode(voRB24VMABCRBT2, 1, gGeoIdentity);
1483 // Flange Tube 2
1484 voRB24VMABCRB->AddNode(voRB24VMABCRBF2, 1, new TGeoCombiTrans(kRB24VMABCPy + kRB24VMABCRBF2L/2., 0., kRB24VMABCTz - kRB24VMABCRBT1L/2., rotxz));
1485 // Blank Flange Tube 2
1486 voRB24VMABCRB->AddNode(voRB24VMABCRBF2B, 1, new TGeoCombiTrans(kRB24VMABCPy- kRB24VMABCRBF2L/2., 0., kRB24VMABCTz - kRB24VMABCRBT1L/2., rotxz));
1487 // Tube 3
1488 voRB24VMABCRB->AddNode(voRB24VMABCRBT3, 1, gGeoIdentity);
1489 // Flange Tube 3
1490 voRB24VMABCRB->AddNode(voRB24VMABCRBF3, 1, new TGeoCombiTrans(0., 11.2 - kRB24VMABCRBF3L/2., kRB24VMABCTz - kRB24VMABCRBT1L/2., rotyz));
1491 // Pirani Gauge
1492 voRB24VMABCRB->AddNode(voRB24VMABCPirani, 1, new TGeoCombiTrans(0., 11.2, kRB24VMABCTz - kRB24VMABCRBT1L/2., rotyz));
1493 // Tube 4
1494 voRB24VMABCRB->AddNode(voRB24VMABCRBT4, 1, gGeoIdentity);
1495 // Inforcement
1496 voRB24VMABCRB->AddNode(voRB24VMABCRBT12, 1, new TGeoTranslation(0., 0., kRB24VMABCRBT1L2/2. - kRB24VMABCRBT1L/2. + 2.8));
1497
1498
1499 // Pos 1.3 Bellows with end part LHCVBU__0002
1500 //
1501 // Connection Tube
1502 // Connection tube inner r
1503 const Float_t kRB24VMABBEConTubeRin = 10.0/2.;
1504 // Connection tube outer r
1505 const Float_t kRB24VMABBEConTubeRou = 10.3/2.;
1506 // Connection tube length
1507 const Float_t kRB24VMABBEConTubeL1 = 0.9;
1508 const Float_t kRB24VMABBEConTubeL2 = 2.6;
1509 // const Float_t RB24VMABBEBellowL = kRB24VMABBEConTubeL1 + kRB24VMABBEConTubeL2 + kRB24B1BellowUndL;
1510
1511 // Mother volume
1512 TGeoPcon* shRB24VMABBEBellowM = new TGeoPcon(0., 360., 6);
1513 // Connection Tube and Flange
1514 z = 0.;
1515 shRB24VMABBEBellowM->DefineSection( 0, z, kRB24VMABBEConTubeRin, kRB24VMABBEConTubeRou);
1516 z += kRB24VMABBEConTubeL1;
1517 shRB24VMABBEBellowM->DefineSection( 1, z, kRB24VMABBEConTubeRin, kRB24VMABBEConTubeRou);
1518 shRB24VMABBEBellowM->DefineSection( 2, z, kRB24B1BellowRi, kRB24B1BellowRo + kRB24B1ProtTubeThickness);
1519 z += kRB24B1BellowUndL;
1520 shRB24VMABBEBellowM->DefineSection( 3, z, kRB24B1BellowRi, kRB24B1BellowRo + kRB24B1ProtTubeThickness);
1521 shRB24VMABBEBellowM->DefineSection( 4, z, kRB24VMABBEConTubeRin, kRB24VMABBEConTubeRou);
1522 z += kRB24VMABBEConTubeL2;
1523 shRB24VMABBEBellowM->DefineSection( 5, z, kRB24VMABBEConTubeRin, kRB24VMABBEConTubeRou);
1524 TGeoVolume* voRB24VMABBEBellowM = new TGeoVolume("RB24VMABBEBellowM", shRB24VMABBEBellowM, kMedVac);
1525 voRB24VMABBEBellowM->SetVisibility(0);
1526
1527 // Connection tube left
1528 TGeoVolume* voRB24VMABBECT1 = new TGeoVolume("RB24VMABBECT1",
1529 new TGeoTube(kRB24VMABBEConTubeRin, kRB24VMABBEConTubeRou,kRB24VMABBEConTubeL1/2.),
1530 kMedSteel);
1531 // Connection tube right
1532 TGeoVolume* voRB24VMABBECT2 = new TGeoVolume("RB24VMABBECT2",
1533 new TGeoTube(kRB24VMABBEConTubeRin, kRB24VMABBEConTubeRou,kRB24VMABBEConTubeL2/2.),
1534 kMedSteel);
1535 z = kRB24VMABBEConTubeL1/2.;
1536 voRB24VMABBEBellowM->AddNode(voRB24VMABBECT1, 1, new TGeoTranslation(0., 0., z));
1537 z += kRB24VMABBEConTubeL1/2.;
1538 z += kRB24B1BellowUndL/2.;
1539 voRB24VMABBEBellowM->AddNode(voRB24B1Bellow, 2, new TGeoTranslation(0., 0., z));
1540 z += kRB24B1BellowUndL/2.;
1541 z += kRB24VMABBEConTubeL2/2.;
1542 voRB24VMABBEBellowM->AddNode(voRB24VMABBECT2, 1, new TGeoTranslation(0., 0., z));
1543 z += kRB24VMABBEConTubeL2/2.;
1544
1545 voRB24VMABCRB->AddNode(voRB24VMABBEBellowM, 1, new TGeoTranslation(0., 0., kRB24VMABCRBT1L/2.));
1546
1547 // Pos 1.2 Rotable flange LHCVBU__0013[*]
1548 // Front
1549 voRB24VMABCRB->AddNode(voRB24B1RFlange, 3, new TGeoCombiTrans(0., 0., - kRB24VMABCRBT1L/2. + 0.86, rot180));
1550 // End
1551 z = kRB24VMABCRBT1L/2. + kRB24B1BellowUndL +kRB24VMABBEConTubeL1 + kRB24VMABBEConTubeL2;
1552 voRB24VMABCRB->AddNode(voRB24B1RFlange, 4, new TGeoTranslation(0., 0., z - 0.86));
1553
1554
1555 // Pos 2 Trans. Tube Flange LHCVSR__0062
1556 // Pos 2.1 Transition Tube LHCVSR__0063
1557 // Pos 2.2 Transition Flange LHCVSR__0060
1558 //
1559 // Transition Tube with Flange
1560 TGeoPcon* shRB24VMABCTT = new TGeoPcon(0., 360., 7);
1561 z = 0.;
1562 shRB24VMABCTT->DefineSection(0, z, 6.3/2., 11.16/2.);
1563 z += 0.25;
1564 shRB24VMABCTT->DefineSection(1, z, 6.3/2., 11.16/2.);
1565 shRB24VMABCTT->DefineSection(2, z, 6.3/2., 9.30/2.);
1566 z += 0.25;
1567 shRB24VMABCTT->DefineSection(3, z, 6.3/2., 9.30/2.);
1568 shRB24VMABCTT->DefineSection(4, z, 6.3/2., 6.70/2.);
1569 z += (20.35 - 0.63);
1570 shRB24VMABCTT->DefineSection(5, z, 6.3/2., 6.7/2.);
1571 z += 0.63;
1572 shRB24VMABCTT->DefineSection(6, z, 6.3/2., 6.7/2.);
1573 TGeoVolume* voRB24VMABCTT = new TGeoVolume("RB24VMABCTT", shRB24VMABCTT, kMedSteel);
1574 voRB24VMABCRB->AddNode(voRB24VMABCTT, 1, new TGeoTranslation(0., 0., - kRB24VMABCRBT1L/2.-1.));
1575
1576 // Pos 3 RF Contact D63 LHCVSR__0057
1577 // Pos 3.1 RF Contact Flange LHCVSR__0017
1578 //
1579 TGeoPcon* shRB24VMABCCTFlange = new TGeoPcon(0., 360., 6);
1580 const Float_t kRB24VMABCCTFlangeRin = 6.36/2.; // Inner radius
1581 const Float_t kRB24VMABCCTFlangeL = 1.30; // Length
1582
1583 z = 0.;
1584 shRB24VMABCCTFlange->DefineSection(0, z, kRB24VMABCCTFlangeRin, 6.5/2.);
1585 z += 0.15;
1586 shRB24VMABCCTFlange->DefineSection(1, z, kRB24VMABCCTFlangeRin, 6.5/2.);
1587 shRB24VMABCCTFlange->DefineSection(2, z, kRB24VMABCCTFlangeRin, 6.9/2.);
1588 z += 0.9;
1589 shRB24VMABCCTFlange->DefineSection(3, z, kRB24VMABCCTFlangeRin, 6.9/2.);
1590 shRB24VMABCCTFlange->DefineSection(4, z, kRB24VMABCCTFlangeRin, 11.16/2.);
1591 z += 0.25;
1592 shRB24VMABCCTFlange->DefineSection(5, z, kRB24VMABCCTFlangeRin, 11.16/2.);
1593 TGeoVolume* voRB24VMABCCTFlange = new TGeoVolume("RB24VMABCCTFlange", shRB24VMABCCTFlange, kMedCu);
1594 //
1595 // Pos 3.2 RF-Contact LHCVSR__0056
1596 //
1597 TGeoPcon* shRB24VMABCCT = new TGeoPcon(0., 360., 4);
1598 const Float_t kRB24VMABCCTRin = 6.30/2.; // Inner radius
1599 const Float_t kRB24VMABCCTCRin = 7.29/2.; // Max. inner radius conical section
1600 const Float_t kRB24VMABCCTL = 11.88; // Length
1601 const Float_t kRB24VMABCCTSL = 10.48; // Length of straight section
1602 const Float_t kRB24VMABCCTd = 0.03; // Thickness
1603 z = 0;
1604 shRB24VMABCCT->DefineSection(0, z, kRB24VMABCCTCRin, kRB24VMABCCTCRin + kRB24VMABCCTd);
1605 z = kRB24VMABCCTL - kRB24VMABCCTSL;
1606 shRB24VMABCCT->DefineSection(1, z, kRB24VMABCCTRin + 0.35, kRB24VMABCCTRin + 0.35 + kRB24VMABCCTd);
1607 z = kRB24VMABCCTL - kRB24VMABCCTFlangeL;
1608 shRB24VMABCCT->DefineSection(2, z, kRB24VMABCCTRin, kRB24VMABCCTRin + kRB24VMABCCTd);
1609 z = kRB24VMABCCTL;
1610 shRB24VMABCCT->DefineSection(3, z, kRB24VMABCCTRin, kRB24VMABCCTRin + kRB24VMABCCTd);
1611
1612 TGeoVolume* voRB24VMABCCT = new TGeoVolume("RB24VMABCCT", shRB24VMABCCT, kMedCu);
1613
1614 TGeoVolumeAssembly* voRB24VMABRFCT = new TGeoVolumeAssembly("RB24VMABRFCT");
1615 voRB24VMABRFCT->AddNode(voRB24VMABCCT, 1, gGeoIdentity);
1616 voRB24VMABRFCT->AddNode( voRB24VMABCCTFlange, 1, new TGeoTranslation(0., 0., kRB24VMABCCTL - kRB24VMABCCTFlangeL));
1617
1618 z = kRB24VMABCRBT1L/2. + kRB24B1BellowUndL + kRB24VMABBEConTubeL1 + kRB24VMABBEConTubeL2 - kRB24VMABCCTL + 1.;
1619 voRB24VMABCRB->AddNode(voRB24VMABRFCT, 1, new TGeoTranslation(0., 0., z));
1620
1621
1622 //
1623 // Assembling RB24/1
1624 //
1625 TGeoVolumeAssembly* voRB24 = new TGeoVolumeAssembly("RB24");
1626 // Cu Tube with two simplified flanges
1627 voRB24->AddNode(voRB24CuTubeM, 1, gGeoIdentity);
1628 voRB24->AddNode(voRB24CuTubeA, 1, gGeoIdentity);
1629 z = - kRB24CuTubeL/2 + kRB24CuTubeFL/2.;
1630 voRB24->AddNode(voRB24CuTubeF, 1, new TGeoTranslation(0., 0., z));
1631 z = + kRB24CuTubeL/2 - kRB24CuTubeFL/2.;
1632 voRB24->AddNode(voRB24CuTubeF, 2, new TGeoTranslation(0., 0., z));
1633 // VMABC close to compensator magnet
1634 z = - kRB24CuTubeL/2. - (kRB24VMABCL - kRB24VMABCRBT1L/2) + 1.;
1635
1636 voRB24->AddNode(voRB24VMABCRB, 2, new TGeoTranslation(0., 0., z));
1637 // Bellow
1638 z = kRB24CuTubeL/2;
1639 voRB24->AddNode(voRB24B1BellowM, 1, new TGeoTranslation(0., 0., z));
1640 z += (kRB24B1L + kRB24AIpML/2.);
1641 // Annular ion pump
1642 voRB24->AddNode(voRB24AIpM, 1, new TGeoTranslation(0., 0., z));
1643 z += (kRB24AIpML/2. + kRB24ValveWz/2.);
1644 // Valve
1645 voRB24->AddNode(voRB24ValveMo, 1, new TGeoTranslation(0., 0., z));
1646 z += (kRB24ValveWz/2.+ kRB24VMABCRBT1L/2. + 1.);
1647 // VMABC close to forward detectors
1648 voRB24->AddNode(voRB24VMABCRB, 3, new TGeoTranslation(0., 0., z));
1649 //
1650 // RB24/2
1651 //
1652 // Copper Tube RB24/2
1653 const Float_t kRB242CuTubeL = 330.0;
1654
1655 TGeoVolume* voRB242CuTubeM = new TGeoVolume("voRB242CuTubeM",
1656 new TGeoTube(0., kRB24CuTubeRo, kRB242CuTubeL/2.), kMedVac);
1657 voRB24CuTubeM->SetVisibility(0);
1658 TGeoVolume* voRB242CuTube = new TGeoVolume("voRB242CuTube",
1659 new TGeoTube(kRB24CuTubeRi, kRB24CuTubeRo, kRB242CuTubeL/2.), kMedCu);
1660 voRB242CuTubeM->AddNode(voRB242CuTube, 1, gGeoIdentity);
1661
1662
1663 TGeoVolumeAssembly* voRB242 = new TGeoVolumeAssembly("RB242");
1664 voRB242->AddNode(voRB242CuTube, 1, gGeoIdentity);
1665 z = - kRB242CuTubeL/2 + kRB24CuTubeFL/2.;
1666 voRB242->AddNode(voRB24CuTubeF, 3, new TGeoTranslation(0., 0., z));
1667 z = + kRB242CuTubeL/2 - kRB24CuTubeFL/2.;
1668 voRB242->AddNode(voRB24CuTubeF, 4, new TGeoTranslation(0., 0., z));
1669 z = - kRB24CuTubeL/2 - kRB24VMABCL - kRB242CuTubeL/2.;
1670 voRB24->AddNode(voRB242, 1, new TGeoTranslation(0., 0., z));
1671 //
1672 // RB24/3
1673 //
1674 // Copper Tube RB24/3
1675 const Float_t kRB243CuTubeL = 303.35;
1676
1677 TGeoVolume* voRB243CuTubeM = new TGeoVolume("voRB243CuTubeM",
1678 new TGeoTube(0., kRB24CuTubeRo, kRB243CuTubeL/2.), kMedVac);
1679 voRB24CuTubeM->SetVisibility(0);
1680 TGeoVolume* voRB243CuTube = new TGeoVolume("voRB243CuTube",
1681 new TGeoTube(kRB24CuTubeRi, kRB24CuTubeRo, kRB243CuTubeL/2.), kMedCu);
1682 voRB243CuTubeM->AddNode(voRB243CuTube, 1, gGeoIdentity);
1683
1684
1685 TGeoVolumeAssembly* voRB243 = new TGeoVolumeAssembly("RB243");
1686 TGeoVolumeAssembly* voRB243A = new TGeoVolumeAssembly("RB243A");
1687
1688 voRB243A->AddNode(voRB243CuTube, 1, gGeoIdentity);
1689 z = - kRB243CuTubeL/2 + kRB24CuTubeFL/2.;
1690 voRB243A->AddNode(voRB24CuTubeF, 5, new TGeoTranslation(0., 0., z));
1691 z = + kRB243CuTubeL/2 - kRB24CuTubeFL/2.;
1692 voRB243A->AddNode(voRB24CuTubeF, 6, new TGeoTranslation(0., 0., z));
1693 z = + kRB243CuTubeL/2;
1694 voRB243A->AddNode(voRB24B1BellowM, 2, new TGeoTranslation(0., 0., z));
1695
1696 z = - kRB243CuTubeL/2. - kRB24B1L;
1697 voRB243->AddNode(voRB243A, 1, new TGeoTranslation(0., 0., z));
1698 z = - (1.5 * kRB243CuTubeL + 2. * kRB24B1L);
1699 voRB243->AddNode(voRB243A, 2, new TGeoTranslation(0., 0., z));
1700
1701 z = - 2. * (kRB243CuTubeL + kRB24B1L) - (kRB24VMABCL - kRB24VMABCRBT1L/2) + 1.;
1702 voRB243->AddNode(voRB24VMABCRB, 3, new TGeoTranslation(0., 0., z));
1703
1704 z = - kRB24CuTubeL/2 - kRB24VMABCL - kRB242CuTubeL;
1705 voRB24->AddNode(voRB243, 1, new TGeoTranslation(0., 0., z));
1706
1707
1708 //
1709 //
1710 top->AddNode(voRB24, 1, new TGeoCombiTrans(0., 0., kRB24CuTubeL/2 + 88.5 + 400., rot180));
1711
1712
1713 //
1714 ////////////////////////////////////////////////////////////////////////////////
1715 // //
1716 // The Absorber Vacuum system //
1717 // //
1718 ////////////////////////////////////////////////////////////////////////////////
1719 //
1720 // Rotable Flange starts at: 82.00 cm from IP
1721 // Length of rotable flange section: 10.68 cm
1722 // Weld 0.08 cm
1723 // Length of straight section 207.21 cm
1724 // =======================================================================
1725 // 299.97 cm [0.03 cm missing ?]
1726 // Length of opening cone 252.09 cm
1727 // Weld 0.15 cm
1728 // Length of compensator 30.54 cm
1729 // Weld 0.15 cm
1730 // Length of fixed flange 2.13 - 0.97 1.16 cm
1731 // =======================================================================
1732 // 584.06 cm [584.80 installed] [0.74 cm missing]
1733 // RB26/3
1734 // Length of split flange 2.13 - 1.2 0.93 cm
1735 // Weld 0.15 cm
1736 // Length of fixed point section 16.07 cm
1737 // Weld 0.15 cm
1738 // Length of opening cone 629.20 cm
1739 // Weld 0.30 cm
1740 // Kength of the compensator 41.70 cm
1741 // Weld 0.30 cm
1742 // Length of fixed flange 2.99 - 1.72 1.27 cm
1743 // =================================================
1744 // Length of RB26/3 690.07 cm [689.20 installed] [0.87 cm too much]
1745 //
1746 // RB26/4-5
1747 // Length of split flange 2.13 - 1.2 0.93 cm
1748 // Weld 0.15 cm
1749 // Length of fixed point section 16.07 cm
1750 // Weld 0.15 cm
1751 // Length of opening cone 629.20 cm
1752 // Weld 0.30 cm
1753 // Length of closing cone
1754 // Weld
1755 // Lenth of straight section
1756 // Kength of the compensator 41.70 cm
1757 // Weld 0.30 cm
1758 // Length of fixed flange 2.99 - 1.72 1.27 cm
1759 // =================================================
1760 // Length of RB26/3 690.07 cm [689.20 installed] [0.87 cm too much]
1761
1762 ///////////////////////////////////////////
1763 // //
1764 // RB26/1-2 //
1765 // Drawing LHCV2a_0050 [as installed] //
1766 // Drawing LHCV2a_0008 //
1767 // Drawing LHCV2a_0001 //
1768 ///////////////////////////////////////////
1769 // Pos1 Vacuum Tubes LHCVC2A__0010
1770 // Pos2 Compensator LHCVC2A__0064
1771 // Pos3 Rotable Flange LHCVFX___0016
1772 // Pos4 Fixed Flange LHCVFX___0006
1773 // Pos5 Bellow Tooling LHCVFX___0003
1774 //
1775 //
1776 //
1777 ///////////////////////////////////
1778 // RB26/1-2 Vacuum Tubes //
1779 // Drawing LHCVC2a_0010 //
1780 ///////////////////////////////////
1781 const Float_t kRB26s12TubeL = 459.45; // 0.15 cm added for welding
1782 //
1783 // Add 1 cm on outer diameter for insulation
1784 //
1785 TGeoPcon* shRB26s12Tube = new TGeoPcon(0., 360., 5);
1786 // Section 1: straight section
1787 shRB26s12Tube->DefineSection(0, 0.00, 5.84/2., 6.00/2.);
1788 shRB26s12Tube->DefineSection(1, 207.21, 5.84/2., 6.00/2.);
1789 // Section 2: 0.72 deg opening cone
1790 shRB26s12Tube->DefineSection(2, 207.21, 5.84/2., 6.14/2.);
1791 shRB26s12Tube->DefineSection(3, 452.30, 12.00/2., 12.30/2.);
1792 shRB26s12Tube->DefineSection(4, kRB26s12TubeL, 12.00/2., 12.30/2.);
1793 TGeoVolume* voRB26s12Tube = new TGeoVolume("RB26s12Tube", shRB26s12Tube, kMedSteel);
1794 // Add the insulation layer
1795 TGeoVolume* voRB26s12TubeIns = new TGeoVolume("RB26s12TubeIns", MakeInsulationFromTemplate(shRB26s12Tube), kMedInsu);
1796 voRB26s12Tube->AddNode(voRB26s12TubeIns, 1, gGeoIdentity);
1797
1798
1799 TGeoVolume* voRB26s12TubeM = new TGeoVolume("RB26s12TubeM", MakeMotherFromTemplate(shRB26s12Tube), kMedVac);
1800 voRB26s12TubeM->AddNode(voRB26s12Tube, 1, gGeoIdentity);
1801
1802
1803
1804 ///////////////////////////////////
1805 // RB26/2 Axial Compensator //
1806 // Drawing LHCVC2a_0064 //
1807 ///////////////////////////////////
1808 const Float_t kRB26s2CompL = 30.65; // Length of the compensator
1809 const Float_t kRB26s2BellowRo = 14.38/2.; // Bellow outer radius [Pos 1]
1810 const Float_t kRB26s2BellowRi = 12.12/2.; // Bellow inner radius [Pos 1]
1811 const Int_t kRB26s2NumberOfPlies = 14; // Number of plies [Pos 1]
1812 const Float_t kRB26s2BellowUndL = 10.00; // Length of undulated region [Pos 1] [+10 mm installed including pretension ?]
1813 const Float_t kRB26s2PlieThickness = 0.025; // Plie thickness [Pos 1]
1814 const Float_t kRB26s2ConnectionPlieR = 0.21; // Connection plie radius [Pos 1]
1815 // Plie radius
1816 const Float_t kRB26s2PlieR =
1817 (kRB26s2BellowUndL - 4. * kRB26s2ConnectionPlieR + 2. * kRB26s2PlieThickness +
1818 (2. * kRB26s2NumberOfPlies - 2.) * kRB26s2PlieThickness) / (4. * kRB26s2NumberOfPlies - 2.);
1819 const Float_t kRB26s2CompTubeInnerR = 12.00/2.; // Connection tubes inner radius [Pos 2 + 3]
1820 const Float_t kRB26s2CompTubeOuterR = 12.30/2.; // Connection tubes outer radius [Pos 2 + 3]
1821 const Float_t kRB26s2WeldingTubeLeftL = 9.00/2.; // Left connection tube half length [Pos 2]
1822 const Float_t kRB26s2WeldingTubeRightL = 11.65/2.; // Right connection tube half length [Pos 3] [+ 0.15 cm for welding]
1823 const Float_t kRB26s2RingOuterR = 18.10/2.; // Ring inner radius [Pos 4]
1824 const Float_t kRB26s2RingL = 0.40/2.; // Ring half length [Pos 4]
1825 const Float_t kRB26s2RingZ = 6.50 ; // Ring z-position [Pos 4]
1826 const Float_t kRB26s2ProtOuterR = 18.20/2.; // Protection tube outer radius [Pos 5]
1827 const Float_t kRB26s2ProtL = 15.00/2.; // Protection tube half length [Pos 5]
1828 const Float_t kRB26s2ProtZ = 6.70 ; // Protection tube z-position [Pos 5]
1829
1830
1831 // Mother volume
1832 //
1833 TGeoPcon* shRB26s2Compensator = new TGeoPcon(0., 360., 6);
1834 shRB26s2Compensator->DefineSection( 0, 0.0, 0., kRB26s2CompTubeOuterR);
1835 shRB26s2Compensator->DefineSection( 1, kRB26s2RingZ, 0., kRB26s2CompTubeOuterR);
1836 shRB26s2Compensator->DefineSection( 2, kRB26s2RingZ, 0., kRB26s2ProtOuterR);
1837 shRB26s2Compensator->DefineSection( 3, kRB26s2ProtZ + 2. * kRB26s2ProtL, 0., kRB26s2ProtOuterR);
1838 shRB26s2Compensator->DefineSection( 4, kRB26s2ProtZ + 2. * kRB26s2ProtL, 0., kRB26s2CompTubeOuterR);
1839 shRB26s2Compensator->DefineSection( 5, kRB26s2CompL , 0., kRB26s2CompTubeOuterR);
1840 TGeoVolume* voRB26s2Compensator = new TGeoVolume("RB26s2Compensator", shRB26s2Compensator, kMedVac);
1841
1842 //
1843 // [Pos 1] Bellow
1844 //
1845 //
1846 TGeoVolume* voRB26s2Bellow = new TGeoVolume("RB26s2Bellow", new TGeoTube(kRB26s2BellowRi, kRB26s2BellowRo, kRB26s2BellowUndL/2.), kMedVac);
1847 //
1848 // Upper part of the undulation
1849 //
1850 TGeoTorus* shRB26s2PlieTorusU = new TGeoTorus(kRB26s2BellowRo - kRB26s2PlieR, kRB26s2PlieR - kRB26s2PlieThickness, kRB26s2PlieR);
1851 shRB26s2PlieTorusU->SetName("RB26s2TorusU");
1852 TGeoTube* shRB26s2PlieTubeU = new TGeoTube (kRB26s2BellowRo - kRB26s2PlieR, kRB26s2BellowRo, kRB26s2PlieR);
1853 shRB26s2PlieTubeU->SetName("RB26s2TubeU");
1854 TGeoCompositeShape* shRB26s2UpperPlie = new TGeoCompositeShape("RB26s2UpperPlie", "RB26s2TorusU*RB26s2TubeU");
1855
1856 TGeoVolume* voRB26s2WiggleU = new TGeoVolume("RB26s2UpperPlie", shRB26s2UpperPlie, kMedSteel);
1857 //
1858 // Lower part of the undulation
1859 TGeoTorus* shRB26s2PlieTorusL = new TGeoTorus(kRB26s2BellowRi + kRB26s2PlieR, kRB26s2PlieR - kRB26s2PlieThickness, kRB26s2PlieR);
1860 shRB26s2PlieTorusL->SetName("RB26s2TorusL");
1861 TGeoTube* shRB26s2PlieTubeL = new TGeoTube (kRB26s2BellowRi, kRB26s2BellowRi + kRB26s2PlieR, kRB26s2PlieR);
1862 shRB26s2PlieTubeL->SetName("RB26s2TubeL");
1863 TGeoCompositeShape* shRB26s2LowerPlie = new TGeoCompositeShape("RB26s2LowerPlie", "RB26s2TorusL*RB26s2TubeL");
1864
1865 TGeoVolume* voRB26s2WiggleL = new TGeoVolume("RB26s2LowerPlie", shRB26s2LowerPlie, kMedSteel);
1866
1867 //
1868 // Connection between upper and lower part of undulation
1869 TGeoVolume* voRB26s2WiggleC1 = new TGeoVolume("RB26s2PlieConn1",
1870 new TGeoTube(kRB26s2BellowRi + kRB26s2PlieR,
1871 kRB26s2BellowRo - kRB26s2PlieR, kRB26s2PlieThickness / 2.), kMedSteel);
1872 //
1873 // One wiggle
1874 TGeoVolumeAssembly* voRB26s2Wiggle = new TGeoVolumeAssembly("RB26s2Wiggle");
1875 z0 = - kRB26s2PlieThickness / 2.;
1876 voRB26s2Wiggle->AddNode(voRB26s2WiggleC1, 1 , new TGeoTranslation(0., 0., z0));
1877 z0 += kRB26s2PlieR - kRB26s2PlieThickness / 2.;
1878 voRB26s2Wiggle->AddNode(voRB26s2WiggleU, 1 , new TGeoTranslation(0., 0., z0));
1879 z0 += kRB26s2PlieR - kRB26s2PlieThickness / 2.;
1880 voRB26s2Wiggle->AddNode(voRB26s2WiggleC1, 2 , new TGeoTranslation(0., 0., z0));
1881 z0 += kRB26s2PlieR - kRB26s2PlieThickness;
1882 voRB26s2Wiggle->AddNode(voRB26s2WiggleL , 1 , new TGeoTranslation(0., 0., z0));
1883 // Positioning of the volumes
1884 z0 = - kRB26s2BellowUndL/2.+ kRB26s2ConnectionPlieR;
1885 voRB26s2Bellow->AddNode(voRB26s2WiggleL, 1, new TGeoTranslation(0., 0., z0));
1886 z0 += kRB26s2ConnectionPlieR;
1887 zsh = 4. * kRB26s2PlieR - 2. * kRB26s2PlieThickness;
1888 for (Int_t iw = 0; iw < kRB26s2NumberOfPlies; iw++) {
1889 Float_t zpos = z0 + iw * zsh;
1890 voRB26s2Bellow->AddNode(voRB26s2Wiggle, iw + 1, new TGeoTranslation(0., 0., zpos - kRB26s2PlieThickness));
1891 }
1892
1893 voRB26s2Compensator->AddNode(voRB26s2Bellow, 1, new TGeoTranslation(0., 0., 2. * kRB26s2WeldingTubeLeftL + kRB26s2BellowUndL/2.));
1894
1895 //
1896 // [Pos 2] Left Welding Tube
1897 //
1898 TGeoTube* shRB26s2CompLeftTube = new TGeoTube(kRB26s2CompTubeInnerR, kRB26s2CompTubeOuterR, kRB26s2WeldingTubeLeftL);
1899 TGeoVolume* voRB26s2CompLeftTube = new TGeoVolume("RB26s2CompLeftTube", shRB26s2CompLeftTube, kMedSteel);
1900 voRB26s2Compensator->AddNode(voRB26s2CompLeftTube, 1, new TGeoTranslation(0., 0., kRB26s2WeldingTubeLeftL));
1901 //
1902 // [Pos 3] Right Welding Tube
1903 //
1904 TGeoTube* shRB26s2CompRightTube = new TGeoTube(kRB26s2CompTubeInnerR, kRB26s2CompTubeOuterR, kRB26s2WeldingTubeRightL);
1905 TGeoVolume* voRB26s2CompRightTube = new TGeoVolume("RB26s2CompRightTube", shRB26s2CompRightTube, kMedSteel);
1906 voRB26s2Compensator->AddNode(voRB26s2CompRightTube, 1, new TGeoTranslation(0., 0., kRB26s2CompL - kRB26s2WeldingTubeRightL));
1907 //
1908 // [Pos 4] Ring
1909 //
1910 TGeoTube* shRB26s2CompRing = new TGeoTube(kRB26s2CompTubeOuterR, kRB26s2RingOuterR, kRB26s2RingL);
1911 TGeoVolume* voRB26s2CompRing = new TGeoVolume("RB26s2CompRing", shRB26s2CompRing, kMedSteel);
1912 voRB26s2Compensator->AddNode(voRB26s2CompRing, 1, new TGeoTranslation(0., 0., kRB26s2RingZ + kRB26s2RingL));
1913
1914 //
1915 // [Pos 5] Outer Protecting Tube
1916 //
1917 TGeoTube* shRB26s2CompProtTube = new TGeoTube(kRB26s2RingOuterR, kRB26s2ProtOuterR, kRB26s2ProtL);
1918 TGeoVolume* voRB26s2CompProtTube = new TGeoVolume("RB26s2CompProtTube", shRB26s2CompProtTube, kMedSteel);
1919 voRB26s2Compensator->AddNode(voRB26s2CompProtTube, 1, new TGeoTranslation(0., 0., kRB26s2ProtZ + kRB26s2ProtL));
1920
1921 ///////////////////////////////////
1922 // Rotable Flange //
1923 // Drawing LHCVFX_0016 //
1924 ///////////////////////////////////
1925 const Float_t kRB26s1RFlangeTubeRi = 5.84/2.-lolo ; // Tube inner radius
1926 const Float_t kRB26s1RFlangeTubeRo = 6.00/2.-lolo ; // Tube outer radius
1927
1928 // Pos 1 Clamp Ring LHCVFX__0015
1929 const Float_t kRB26s1RFlangeCrL = 1.40 ; // Lenth of the clamp ring
1930 const Float_t kRB26s1RFlangeCrRi1 = 6.72/2.-lolo-1. ; // Ring inner radius section 1
1931 const Float_t kRB26s1RFlangeCrRi2 = 6.06/2.-lolo-1. ; // Ring inner radius section 2
1932 const Float_t kRB26s1RFlangeCrRo = 8.60/2.-lolo-1. ; // Ring outer radius
1933 const Float_t kRB26s1RFlangeCrD = 0.800 ; // Width section 1
1934
1935 TGeoPcon* shRB26s1RFlangeCr = new TGeoPcon(0., 360., 4);
1936 z0 = 0.;
1937 shRB26s1RFlangeCr->DefineSection(0, z0, kRB26s1RFlangeCrRi1, kRB26s1RFlangeCrRo);
1938 z0 += kRB26s1RFlangeCrD;
1939 shRB26s1RFlangeCr->DefineSection(1, z0, kRB26s1RFlangeCrRi1, kRB26s1RFlangeCrRo);
1940 shRB26s1RFlangeCr->DefineSection(2, z0, kRB26s1RFlangeCrRi2, kRB26s1RFlangeCrRo);
1941 z0 = kRB26s1RFlangeCrL;
1942 shRB26s1RFlangeCr->DefineSection(3, z0, kRB26s1RFlangeCrRi2, kRB26s1RFlangeCrRo);
1943 TGeoVolume* voRB26s1RFlangeCr =
1944 new TGeoVolume("RB26s1RFlangeCr", shRB26s1RFlangeCr, kMedSteel);
1945
1946 // Pos 2 Insert LHCVFX__0015
1947 const Float_t kRB26s1RFlangeIsL = 4.88 ; // Lenth of the insert
1948 const Float_t kRB26s1RFlangeIsR = 6.70/2.-lolo ; // Ring radius
1949 const Float_t kRB26s1RFlangeIsD = 0.80 ; // Ring Width
1950
1951 TGeoPcon* shRB26s1RFlangeIs = new TGeoPcon(0., 360., 4);
1952 z0 = 0.;
1953 shRB26s1RFlangeIs->DefineSection(0, z0, kRB26s1RFlangeTubeRi, kRB26s1RFlangeIsR);
1954 z0 += kRB26s1RFlangeIsD;
1955 shRB26s1RFlangeIs->DefineSection(1, z0, kRB26s1RFlangeTubeRi, kRB26s1RFlangeIsR);
1956 shRB26s1RFlangeIs->DefineSection(2, z0, kRB26s1RFlangeTubeRi, kRB26s1RFlangeTubeRo);
1957 z0 = kRB26s1RFlangeIsL;
1958 shRB26s1RFlangeIs->DefineSection(3, z0, kRB26s1RFlangeTubeRi, kRB26s1RFlangeTubeRo);
1959 TGeoVolume* voRB26s1RFlangeIs =
1960 new TGeoVolume("RB26s1RFlangeIs", shRB26s1RFlangeIs, kMedSteel);
1961 // 4.88 + 3.7 = 8.58 (8.7 to avoid overlap)
1962 // Pos 3 Fixed Point Section LHCVC2A_0021
1963 const Float_t kRB26s1RFlangeFpL = 5.88 ; // Length of the fixed point section (0.08 cm added for welding)
1964 const Float_t kRB26s1RFlangeFpZ = 3.82 ; // Position of the ring
1965 const Float_t kRB26s1RFlangeFpD = 0.59 ; // Width of the ring
1966 const Float_t kRB26s1RFlangeFpR = 7.00/2.-lolo ; // Radius of the ring
1967
1968 TGeoPcon* shRB26s1RFlangeFp = new TGeoPcon(0., 360., 6);
1969 z0 = 0.;
1970 shRB26s1RFlangeFp->DefineSection(0, z0, kRB26s1RFlangeTubeRi, kRB26s1RFlangeTubeRo);
1971 z0 += kRB26s1RFlangeFpZ;
1972 shRB26s1RFlangeFp->DefineSection(1, z0, kRB26s1RFlangeTubeRi, kRB26s1RFlangeTubeRo);
1973 shRB26s1RFlangeFp->DefineSection(2, z0, kRB26s1RFlangeTubeRi, kRB26s1RFlangeFpR);
1974 z0 += kRB26s1RFlangeFpD;
1975 shRB26s1RFlangeFp->DefineSection(3, z0, kRB26s1RFlangeTubeRi, kRB26s1RFlangeFpR);
1976 shRB26s1RFlangeFp->DefineSection(4, z0, kRB26s1RFlangeTubeRi, kRB26s1RFlangeTubeRo);
1977 z0 = kRB26s1RFlangeFpL;
1978 shRB26s1RFlangeFp->DefineSection(5, z0, kRB26s1RFlangeTubeRi, kRB26s1RFlangeTubeRo);
1979 TGeoVolume* voRB26s1RFlangeFp = new TGeoVolume("RB26s1RFlangeFp", shRB26s1RFlangeFp, kMedSteel);
1980
1981 // Put everything in a mother volume
1982 TGeoPcon* shRB26s1RFlange = new TGeoPcon(0., 360., 8);
1983 z0 = 0.;
1984 shRB26s1RFlange->DefineSection(0, z0, 0., kRB26s1RFlangeCrRo);
1985 z0 += kRB26s1RFlangeCrL;
1986 shRB26s1RFlange->DefineSection(1, z0, 0., kRB26s1RFlangeCrRo);
1987 shRB26s1RFlange->DefineSection(2, z0, 0., kRB26s1RFlangeTubeRo);
1988 z0 = kRB26s1RFlangeIsL + kRB26s1RFlangeFpZ;
1989 shRB26s1RFlange->DefineSection(3, z0, 0., kRB26s1RFlangeTubeRo);
1990 shRB26s1RFlange->DefineSection(4, z0, 0., kRB26s1RFlangeFpR);
1991 z0 += kRB26s1RFlangeFpD;
1992 shRB26s1RFlange->DefineSection(5, z0, 0., kRB26s1RFlangeFpR);
1993 shRB26s1RFlange->DefineSection(6, z0, 0., kRB26s1RFlangeTubeRo);
1994 z0 = kRB26s1RFlangeIsL + kRB26s1RFlangeFpL;
1995 shRB26s1RFlange->DefineSection(7, z0, 0., kRB26s1RFlangeTubeRo);
1996 TGeoVolume* voRB26s1RFlange = new TGeoVolume("RB26s1RFlange", shRB26s1RFlange, kMedVac);
1997
1998 voRB26s1RFlange->AddNode(voRB26s1RFlangeIs, 1, gGeoIdentity);
1999 voRB26s1RFlange->AddNode(voRB26s1RFlangeCr, 1, gGeoIdentity);
2000 voRB26s1RFlange->AddNode(voRB26s1RFlangeFp, 1, new TGeoTranslation(0., 0., kRB26s1RFlangeIsL));
2001
2002 ///////////////////////////////////
2003 // Fixed Flange //
2004 // Drawing LHCVFX_0006 //
2005 ///////////////////////////////////
2006 const Float_t kRB26s2FFlangeL = 2.13; // Length of the flange
2007 const Float_t kRB26s2FFlangeD1 = 0.97; // Length of section 1
2008 const Float_t kRB26s2FFlangeD2 = 0.29; // Length of section 2
2009 const Float_t kRB26s2FFlangeD3 = 0.87; // Length of section 3
2010 const Float_t kRB26s2FFlangeRo = 17.15/2.; // Flange outer radius
2011 const Float_t kRB26s2FFlangeRi1 = 12.30/2.; // Flange inner radius section 1
2012 const Float_t kRB26s2FFlangeRi2 = 12.00/2.; // Flange inner radius section 2
2013 const Float_t kRB26s2FFlangeRi3 = 12.30/2.; // Flange inner radius section 3
2014 z0 = 0;
2015 TGeoPcon* shRB26s2FFlange = new TGeoPcon(0., 360., 6);
2016 z0 = 0.;
2017 shRB26s2FFlange->DefineSection(0, z0, kRB26s2FFlangeRi1, kRB26s2FFlangeRo);
2018 z0 += kRB26s2FFlangeD1;
2019 shRB26s2FFlange->DefineSection(1, z0, kRB26s2FFlangeRi1, kRB26s2FFlangeRo);
2020 shRB26s2FFlange->DefineSection(2, z0, kRB26s2FFlangeRi2, kRB26s2FFlangeRo);
2021 z0 += kRB26s2FFlangeD2;
2022 shRB26s2FFlange->DefineSection(3, z0, kRB26s2FFlangeRi2, kRB26s2FFlangeRo);
2023 shRB26s2FFlange->DefineSection(4, z0, kRB26s2FFlangeRi3, kRB26s2FFlangeRo);
2024 z0 += kRB26s2FFlangeD3;
2025 shRB26s2FFlange->DefineSection(5, z0, kRB26s2FFlangeRi3, kRB26s2FFlangeRo);
2026 TGeoVolume* voRB26s2FFlange = new TGeoVolume("RB26s2FFlange", shRB26s2FFlange, kMedSteel);
2027
2028 TGeoVolume* voRB26s2FFlangeM = new TGeoVolume("RB26s2FFlangeM", MakeMotherFromTemplate(shRB26s2FFlange, 2, 5), kMedVac);
2029 voRB26s2FFlangeM->AddNode(voRB26s2FFlange, 1, gGeoIdentity);
2030
2031
2032
2033 ////////////////////////////////////////
2034 // //
2035 // RB26/3 //
2036 // Drawing LHCV2a_0048 //
2037 // Drawing LHCV2a_0002 //
2038 ////////////////////////////////////////
2039 //
2040 // Pos 1 Vacuum Tubes LHCVC2A__0003
2041 // Pos 2 Fixed Point LHCVFX___0005
2042 // Pos 3 Split Flange LHCVFX___0007
2043 // Pos 4 Fixed Flange LHCVFX___0004
2044 // Pos 5 Axial Compensator LHCVC2A__0065
2045 //
2046 //
2047 //
2048 //
2049 ///////////////////////////////////
2050 // Vacuum Tube //
2051 // Drawing LHCVC2A_0003 //
2052 ///////////////////////////////////
2053 const Float_t kRB26s3TubeL = 629.35 + 0.3; // 0.3 cm added for welding
2054 const Float_t kRB26s3TubeR1 = 12./2.;
2055 const Float_t kRB26s3TubeR2 = kRB26s3TubeR1 + 215.8 * TMath::Tan(0.829 / 180. * TMath::Pi());
2056
2057
2058 TGeoPcon* shRB26s3Tube = new TGeoPcon(0., 360., 7);
2059 // Section 1: straight section
2060 shRB26s3Tube->DefineSection(0, 0.00, kRB26s3TubeR1, kRB26s3TubeR1 + 0.15);
2061 shRB26s3Tube->DefineSection(1, 2.00, kRB26s3TubeR1, kRB26s3TubeR1 + 0.15);
2062 // Section 2: 0.829 deg opening cone
2063 shRB26s3Tube->DefineSection(2, 2.00, kRB26s3TubeR1, kRB26s3TubeR1 + 0.20);
2064
2065 shRB26s3Tube->DefineSection(3, 217.80, kRB26s3TubeR2, kRB26s3TubeR2 + 0.20);
2066 shRB26s3Tube->DefineSection(4, 217.80, kRB26s3TubeR2, kRB26s3TubeR2 + 0.30);
2067
2068 shRB26s3Tube->DefineSection(5, 622.20, 30.00/2., 30.60/2.);
2069 shRB26s3Tube->DefineSection(6, kRB26s3TubeL, 30.00/2., 30.60/2.);
2070
2071 TGeoVolume* voRB26s3Tube = new TGeoVolume("RB26s3Tube", shRB26s3Tube, kMedSteel);
2072 // Add the insulation layer
2073 TGeoVolume* voRB26s3TubeIns = new TGeoVolume("RB26s3TubeIns", MakeInsulationFromTemplate(shRB26s3Tube), kMedInsu);
2074 voRB26s3Tube->AddNode(voRB26s3TubeIns, 1, gGeoIdentity);
2075
2076 TGeoVolume* voRB26s3TubeM = new TGeoVolume("RB26s3TubeM", MakeMotherFromTemplate(shRB26s3Tube), kMedVac);
2077 voRB26s3TubeM->AddNode(voRB26s3Tube, 1, gGeoIdentity);
2078
2079
2080
2081 ///////////////////////////////////
2082 // Fixed Point //
2083 // Drawing LHCVFX_0005 //
2084 ///////////////////////////////////
2085 const Float_t kRB26s3FixedPointL = 16.37 ; // Length of the fixed point section (0.3 cm added for welding)
2086 const Float_t kRB26s3FixedPointZ = 9.72 ; // Position of the ring (0.15 cm added for welding)
2087 const Float_t kRB26s3FixedPointD = 0.595 ; // Width of the ring
2088 const Float_t kRB26s3FixedPointR = 13.30/2. ; // Radius of the ring
2089 const Float_t kRB26s3FixedPointRi = 12.00/2. ; // Inner radius of the tube
2090 const Float_t kRB26s3FixedPointRo1 = 12.30/2. ; // Outer radius of the tube (in)
2091 const Float_t kRB26s3FixedPointRo2 = 12.40/2. ; // Outer radius of the tube (out)
2092 const Float_t kRB26s3FixedPointDs = 1.5 ; // Width of straight section behind ring
2093 const Float_t kRB26s3FixedPointDc = 3.15 ; // Width of conical section behind ring (0.15 cm added for welding)
2094
2095 TGeoPcon* shRB26s3FixedPoint = new TGeoPcon(0., 360., 8);
2096 z0 = 0.;
2097 shRB26s3FixedPoint->DefineSection(0, z0, kRB26s3FixedPointRi, kRB26s3FixedPointRo1);
2098 z0 += kRB26s3FixedPointZ;
2099 shRB26s3FixedPoint->DefineSection(1, z0, kRB26s3FixedPointRi, kRB26s3FixedPointRo1);
2100 shRB26s3FixedPoint->DefineSection(2, z0, kRB26s3FixedPointRi, kRB26s3FixedPointR);
2101 z0 += kRB26s3FixedPointD;
2102 shRB26s3FixedPoint->DefineSection(3, z0, kRB26s3FixedPointRi, kRB26s3FixedPointR);
2103 shRB26s3FixedPoint->DefineSection(4, z0, kRB26s3FixedPointRi, kRB26s3FixedPointRo1);
2104 z0 += kRB26s3FixedPointDs;
2105 shRB26s3FixedPoint->DefineSection(5, z0, kRB26s3FixedPointRi, kRB26s3FixedPointRo1);
2106 z0 += kRB26s3FixedPointDc;
2107 shRB26s3FixedPoint->DefineSection(6, z0, kRB26s3FixedPointRi, kRB26s3FixedPointRo2);
2108 z0 = kRB26s3FixedPointL;
2109 shRB26s3FixedPoint->DefineSection(7, z0, kRB26s3FixedPointRi, kRB26s3FixedPointRo2);
2110 TGeoVolume* voRB26s3FixedPoint = new TGeoVolume("RB26s3FixedPoint", shRB26s3FixedPoint, kMedSteel);
2111
2112 TGeoVolume* voRB26s3FixedPointM = new TGeoVolume("RB26s3FixedPointM", MakeMotherFromTemplate(shRB26s3FixedPoint), kMedVac);
2113 voRB26s3FixedPointM->AddNode(voRB26s3FixedPoint, 1, gGeoIdentity);
2114
2115 ///////////////////////////////////
2116 // Split Flange //
2117 // Drawing LHCVFX_0005 //
2118 ///////////////////////////////////
2119 const Float_t kRB26s3SFlangeL = 2.13; // Length of the flange
2120 const Float_t kRB26s3SFlangeD1 = 0.57; // Length of section 1
2121 const Float_t kRB26s3SFlangeD2 = 0.36; // Length of section 2
2122 const Float_t kRB26s3SFlangeD3 = 0.50 + 0.70; // Length of section 3
2123 const Float_t kRB26s3SFlangeRo = 17.15/2.; // Flange outer radius
2124 const Float_t kRB26s3SFlangeRi1 = 12.30/2.; // Flange inner radius section 1
2125 const Float_t kRB26s3SFlangeRi2 = 12.00/2.; // Flange inner radius section 2
2126 const Float_t kRB26s3SFlangeRi3 = 12.30/2.; // Flange inner radius section 3
2127 z0 = 0;
2128 TGeoPcon* shRB26s3SFlange = new TGeoPcon(0., 360., 6);
2129 z0 = 0.;
2130 shRB26s3SFlange->DefineSection(0, z0, kRB26s3SFlangeRi1, kRB26s3SFlangeRo);
2131 z0 += kRB26s3SFlangeD1;
2132 shRB26s3SFlange->DefineSection(1, z0, kRB26s3SFlangeRi1, kRB26s3SFlangeRo);
2133 shRB26s3SFlange->DefineSection(2, z0, kRB26s3SFlangeRi2, kRB26s3SFlangeRo);
2134 z0 += kRB26s3SFlangeD2;
2135 shRB26s3SFlange->DefineSection(3, z0, kRB26s3SFlangeRi2, kRB26s3SFlangeRo);
2136 shRB26s3SFlange->DefineSection(4, z0, kRB26s3SFlangeRi3, kRB26s3SFlangeRo);
2137 z0 += kRB26s3SFlangeD3;
2138 shRB26s3SFlange->DefineSection(5, z0, kRB26s3SFlangeRi3, kRB26s3SFlangeRo);
2139 TGeoVolume* voRB26s3SFlange = new TGeoVolume("RB26s3SFlange", shRB26s3SFlange, kMedSteel);
2140
2141 TGeoVolume* voRB26s3SFlangeM = new TGeoVolume("RB26s3SFlangeM", MakeMotherFromTemplate(shRB26s3SFlange, 0, 3), kMedVac);
2142 voRB26s3SFlangeM->AddNode(voRB26s3SFlange, 1, gGeoIdentity);
2143
2144 ///////////////////////////////////
2145 // RB26/3 Fixed Flange //
2146 // Drawing LHCVFX___0004 //
2147 ///////////////////////////////////
2148 const Float_t kRB26s3FFlangeL = 2.99; // Length of the flange
2149 const Float_t kRB26s3FFlangeD1 = 1.72; // Length of section 1
2150 const Float_t kRB26s3FFlangeD2 = 0.30; // Length of section 2
2151 const Float_t kRB26s3FFlangeD3 = 0.97; // Length of section 3
2152 const Float_t kRB26s3FFlangeRo = 36.20/2.; // Flange outer radius
2153 const Float_t kRB26s3FFlangeRi1 = 30.60/2.; // Flange inner radius section 1
2154 const Float_t kRB26s3FFlangeRi2 = 30.00/2.; // Flange inner radius section 2
2155 const Float_t kRB26s3FFlangeRi3 = 30.60/2.; // Flange inner radius section 3
2156 z0 = 0;
2157 TGeoPcon* shRB26s3FFlange = new TGeoPcon(0., 360., 6);
2158 z0 = 0.;
2159 shRB26s3FFlange->DefineSection(0, z0, kRB26s3FFlangeRi1, kRB26s3FFlangeRo);
2160 z0 += kRB26s3FFlangeD1;
2161 shRB26s3FFlange->DefineSection(1, z0, kRB26s3FFlangeRi1, kRB26s3FFlangeRo);
2162 shRB26s3FFlange->DefineSection(2, z0, kRB26s3FFlangeRi2, kRB26s3FFlangeRo);
2163 z0 += kRB26s3FFlangeD2;
2164 shRB26s3FFlange->DefineSection(3, z0, kRB26s3FFlangeRi2, kRB26s3FFlangeRo);
2165 shRB26s3FFlange->DefineSection(4, z0, kRB26s3FFlangeRi3, kRB26s3FFlangeRo);
2166 z0 += kRB26s3FFlangeD3;
2167 shRB26s3FFlange->DefineSection(5, z0, kRB26s3FFlangeRi3, kRB26s3FFlangeRo);
2168 TGeoVolume* voRB26s3FFlange = new TGeoVolume("RB26s3FFlange", shRB26s3FFlange, kMedSteel);
2169
2170 TGeoVolume* voRB26s3FFlangeM = new TGeoVolume("RB26s3FFlangeM", MakeMotherFromTemplate(shRB26s3FFlange, 2, 5), kMedVac);
2171 voRB26s3FFlangeM->AddNode(voRB26s3FFlange, 1, gGeoIdentity);
2172
2173
2174
2175 ///////////////////////////////////
2176 // RB26/3 Axial Compensator //
2177 // Drawing LHCVC2a_0065 //
2178 ///////////////////////////////////
2179 const Float_t kRB26s3CompL = 42.0; // Length of the compensator (0.3 cm added for welding)
2180 const Float_t kRB26s3BellowRo = 34.00/2.; // Bellow outer radius [Pos 1]
2181 const Float_t kRB26s3BellowRi = 30.10/2.; // Bellow inner radius [Pos 1]
2182 const Int_t kRB26s3NumberOfPlies = 13; // Number of plies [Pos 1]
2183 const Float_t kRB26s3BellowUndL = 17.70; // Length of undulated region [Pos 1]
2184 const Float_t kRB26s3PlieThickness = 0.06; // Plie thickness [Pos 1]
2185 const Float_t kRB26s3ConnectionPlieR = 0.21; // Connection plie radius [Pos 1]
2186 // Plie radius
2187 const Float_t kRB26s3PlieR =
2188 (kRB26s3BellowUndL - 4. * kRB26s3ConnectionPlieR + 2. * kRB26s3PlieThickness +
2189 (2. * kRB26s3NumberOfPlies - 2.) * kRB26s3PlieThickness) / (4. * kRB26s3NumberOfPlies - 2.);
2190
2191 //
2192 // The welding tubes have 3 sections with different radii and 2 transition regions.
2193 // Section 1: connection to the outside
2194 // Section 2: commection to the bellow
2195 // Section 3: between 1 and 2
2196 const Float_t kRB26s3CompTubeInnerR1 = 30.0/2.; // Outer Connection tubes inner radius [Pos 4 + 3]
2197 const Float_t kRB26s3CompTubeOuterR1 = 30.6/2.; // Outer Connection tubes outer radius [Pos 4 + 3]
2198 const Float_t kRB26s3CompTubeInnerR2 = 29.4/2.; // Connection tubes inner radius [Pos 4 + 3]
2199 const Float_t kRB26s3CompTubeOuterR2 = 30.0/2.; // Connection tubes outer radius [Pos 4 + 3]
2200 const Float_t kRB26s3CompTubeInnerR3 = 30.6/2.; // Connection tubes inner radius at bellow [Pos 4 + 3]
2201 const Float_t kRB26s3CompTubeOuterR3 = 32.2/2.; // Connection tubes outer radius at bellow [Pos 4 + 3]
2202
2203 const Float_t kRB26s3WeldingTubeLeftL1 = 2.0; // Left connection tube length [Pos 4]
2204 const Float_t kRB26s3WeldingTubeLeftL2 = 3.4; // Left connection tube length [Pos 4]
2205 const Float_t kRB26s3WeldingTubeLeftL = 7.0; // Left connection tube total length [Pos 4]
2206 const Float_t kRB26s3WeldingTubeRightL1 = 2.3; // Right connection tube length [Pos 3] (0.3 cm added for welding)
2207 const Float_t kRB26s3WeldingTubeRightL2 = 13.4; // Right connection tube length [Pos 3]
2208
2209 const Float_t kRB26s3WeldingTubeT1 = 0.6; // Length of first r-transition [Pos 4 + 3]
2210 const Float_t kRB26s3WeldingTubeT2 = 1.0; // Length of 2nd r-transition [Pos 4 + 3]
2211
2212
2213
2214 const Float_t kRB26s3RingOuterR = 36.1/2.; // Ring inner radius [Pos 4]
2215 const Float_t kRB26s3RingL = 0.8/2.; // Ring half length [Pos 4]
2216 const Float_t kRB26s3RingZ = 3.7 ; // Ring z-position [Pos 4]
2217 const Float_t kRB26s3ProtOuterR = 36.2/2.; // Protection tube outer radius [Pos 2]
2218 const Float_t kRB26s3ProtL = 27.0/2.; // Protection tube half length [Pos 2]
2219 const Float_t kRB26s3ProtZ = 4.0 ; // Protection tube z-position [Pos 2]
2220
2221
2222 // Mother volume
2223 //
2224 TGeoPcon* shRB26s3Compensator = new TGeoPcon(0., 360., 6);
2225 shRB26s3Compensator->DefineSection( 0, 0.0, 0., kRB26s3CompTubeOuterR1);
2226 shRB26s3Compensator->DefineSection( 1, kRB26s3RingZ, 0., kRB26s3CompTubeOuterR1);
2227 shRB26s3Compensator->DefineSection( 2, kRB26s3RingZ, 0., kRB26s3ProtOuterR);
2228 shRB26s3Compensator->DefineSection( 3, kRB26s3ProtZ + 2. * kRB26s3ProtL, 0., kRB26s3ProtOuterR);
2229 shRB26s3Compensator->DefineSection( 4, kRB26s3ProtZ + 2. * kRB26s3ProtL, 0., kRB26s3CompTubeOuterR1);
2230 shRB26s3Compensator->DefineSection( 5, kRB26s3CompL , 0., kRB26s3CompTubeOuterR1);
2231 TGeoVolume* voRB26s3Compensator =
2232 new TGeoVolume("RB26s3Compensator", shRB26s3Compensator, kMedVac);
2233
2234 //
2235 // [Pos 1] Bellow
2236 //
2237 //
2238 TGeoVolume* voRB26s3Bellow = new TGeoVolume("RB26s3Bellow",
2239 new TGeoTube(kRB26s3BellowRi, kRB26s3BellowRo, kRB26s3BellowUndL/2.), kMedVac);
2240 //
2241 // Upper part of the undulation
2242 //
2243 TGeoTorus* shRB26s3PlieTorusU = new TGeoTorus(kRB26s3BellowRo - kRB26s3PlieR, kRB26s3PlieR - kRB26s3PlieThickness, kRB26s3PlieR);
2244 shRB26s3PlieTorusU->SetName("RB26s3TorusU");
2245 TGeoTube* shRB26s3PlieTubeU = new TGeoTube (kRB26s3BellowRo - kRB26s3PlieR, kRB26s3BellowRo, kRB26s3PlieR);
2246 shRB26s3PlieTubeU->SetName("RB26s3TubeU");
2247 TGeoCompositeShape* shRB26s3UpperPlie = new TGeoCompositeShape("RB26s3UpperPlie", "RB26s3TorusU*RB26s3TubeU");
2248
2249 TGeoVolume* voRB26s3WiggleU = new TGeoVolume("RB26s3UpperPlie", shRB26s3UpperPlie, kMedSteel);
2250 //
2251 // Lower part of the undulation
2252 TGeoTorus* shRB26s3PlieTorusL = new TGeoTorus(kRB26s3BellowRi + kRB26s3PlieR, kRB26s3PlieR - kRB26s3PlieThickness, kRB26s3PlieR);
2253 shRB26s3PlieTorusL->SetName("RB26s3TorusL");
2254 TGeoTube* shRB26s3PlieTubeL = new TGeoTube (kRB26s3BellowRi, kRB26s3BellowRi + kRB26s3PlieR, kRB26s3PlieR);
2255 shRB26s3PlieTubeL->SetName("RB26s3TubeL");
2256 TGeoCompositeShape* shRB26s3LowerPlie = new TGeoCompositeShape("RB26s3LowerPlie", "RB26s3TorusL*RB26s3TubeL");
2257
2258 TGeoVolume* voRB26s3WiggleL = new TGeoVolume("RB26s3LowerPlie", shRB26s3LowerPlie, kMedSteel);
2259
2260 //
2261 // Connection between upper and lower part of undulation
2262 TGeoVolume* voRB26s3WiggleC1 = new TGeoVolume("RB26s3PlieConn1",
2263 new TGeoTube(kRB26s3BellowRi + kRB26s3PlieR,
2264 kRB26s3BellowRo - kRB26s3PlieR, kRB26s3PlieThickness / 2.), kMedSteel);
2265 //
2266 // One wiggle
2267 TGeoVolumeAssembly* voRB26s3Wiggle = new TGeoVolumeAssembly("RB26s3Wiggle");
2268 z0 = - kRB26s3PlieThickness / 2.;
2269 voRB26s3Wiggle->AddNode(voRB26s3WiggleC1, 1 , new TGeoTranslation(0., 0., z0));
2270 z0 += kRB26s3PlieR - kRB26s3PlieThickness / 2.;
2271 voRB26s3Wiggle->AddNode(voRB26s3WiggleU, 1 , new TGeoTranslation(0., 0., z0));
2272 z0 += kRB26s3PlieR - kRB26s3PlieThickness / 2.;
2273 voRB26s3Wiggle->AddNode(voRB26s3WiggleC1, 2 , new TGeoTranslation(0., 0., z0));
2274 z0 += kRB26s3PlieR - kRB26s3PlieThickness;
2275 voRB26s3Wiggle->AddNode(voRB26s3WiggleL, 1 , new TGeoTranslation(0., 0., z0));
2276 // Positioning of the volumes
2277 z0 = - kRB26s3BellowUndL/2.+ kRB26s3ConnectionPlieR;
2278 voRB26s3Bellow->AddNode(voRB26s3WiggleL, 1, new TGeoTranslation(0., 0., z0));
2279 z0 += kRB26s3ConnectionPlieR;
2280 zsh = 4. * kRB26s3PlieR - 2. * kRB26s3PlieThickness;
2281 for (Int_t iw = 0; iw < kRB26s3NumberOfPlies; iw++) {
2282 Float_t zpos = z0 + iw * zsh;
2283 voRB26s3Bellow->AddNode(voRB26s3Wiggle, iw + 1, new TGeoTranslation(0., 0., zpos - kRB26s3PlieThickness));
2284 }
2285
2286 voRB26s3Compensator->AddNode(voRB26s3Bellow, 1, new TGeoTranslation(0., 0., kRB26s3WeldingTubeLeftL + kRB26s3BellowUndL/2.));
2287
2288
2289 //
2290 // [Pos 2] Outer Protecting Tube
2291 //
2292 TGeoTube* shRB26s3CompProtTube = new TGeoTube(kRB26s3RingOuterR, kRB26s3ProtOuterR, kRB26s3ProtL);
2293 TGeoVolume* voRB26s3CompProtTube =
2294 new TGeoVolume("RB26s3CompProtTube", shRB26s3CompProtTube, kMedSteel);
2295 voRB26s3Compensator->AddNode(voRB26s3CompProtTube, 1, new TGeoTranslation(0., 0., kRB26s3ProtZ + kRB26s3ProtL));
2296
2297
2298 //
2299 // [Pos 3] Right Welding Tube
2300 //
2301 TGeoPcon* shRB26s3CompRightTube = new TGeoPcon(0., 360., 5);
2302 z0 = 0.;
2303 shRB26s3CompRightTube->DefineSection(0, z0, kRB26s3CompTubeInnerR3, kRB26s3CompTubeOuterR3);
2304 z0 += kRB26s3WeldingTubeT2;
2305 shRB26s3CompRightTube->DefineSection(1, z0, kRB26s3CompTubeInnerR2, kRB26s3CompTubeOuterR2);
2306 z0 += kRB26s3WeldingTubeRightL2;
2307 shRB26s3CompRightTube->DefineSection(2, z0, kRB26s3CompTubeInnerR2, kRB26s3CompTubeOuterR2);
2308 z0 += kRB26s3WeldingTubeT1;
2309 shRB26s3CompRightTube->DefineSection(3, z0, kRB26s3CompTubeInnerR1, kRB26s3CompTubeOuterR1);
2310 z0 += kRB26s3WeldingTubeRightL1;
2311 shRB26s3CompRightTube->DefineSection(4, z0, kRB26s3CompTubeInnerR1, kRB26s3CompTubeOuterR1);
2312
2313 TGeoVolume* voRB26s3CompRightTube =
2314 new TGeoVolume("RB26s3CompRightTube", shRB26s3CompRightTube, kMedSteel);
2315 voRB26s3Compensator->AddNode(voRB26s3CompRightTube, 1, new TGeoTranslation(0., 0., kRB26s3CompL - z0));
2316
2317 //
2318 // [Pos 4] Left Welding Tube
2319 //
2320 TGeoPcon* shRB26s3CompLeftTube = new TGeoPcon(0., 360., 5);
2321 z0 = 0.;
2322 shRB26s3CompLeftTube->DefineSection(0, z0, kRB26s3CompTubeInnerR1, kRB26s3CompTubeOuterR1);
2323 z0 += kRB26s3WeldingTubeLeftL1;
2324 shRB26s3CompLeftTube->DefineSection(1, z0, kRB26s3CompTubeInnerR1, kRB26s3CompTubeOuterR1);
2325 z0 += kRB26s3WeldingTubeT1;
2326 shRB26s3CompLeftTube->DefineSection(2, z0, kRB26s3CompTubeInnerR2, kRB26s3CompTubeOuterR2);
2327 z0 += kRB26s3WeldingTubeLeftL2;
2328 shRB26s3CompLeftTube->DefineSection(3, z0, kRB26s3CompTubeInnerR2, kRB26s3CompTubeOuterR2);
2329 z0 += kRB26s3WeldingTubeT2;
2330 shRB26s3CompLeftTube->DefineSection(4, z0, kRB26s3CompTubeInnerR3, kRB26s3CompTubeOuterR3);
2331
2332 TGeoVolume* voRB26s3CompLeftTube =
2333 new TGeoVolume("RB26s3CompLeftTube", shRB26s3CompLeftTube, kMedSteel);
2334 voRB26s3Compensator->AddNode(voRB26s3CompLeftTube, 1, gGeoIdentity);
2335 //
2336 // [Pos 5] Ring
2337 //
2338 TGeoTube* shRB26s3CompRing = new TGeoTube(kRB26s3CompTubeOuterR2, kRB26s3RingOuterR, kRB26s3RingL);
2339 TGeoVolume* voRB26s3CompRing =
2340 new TGeoVolume("RB26s3CompRing", shRB26s3CompRing, kMedSteel);
2341 voRB26s3Compensator->AddNode(voRB26s3CompRing, 1, new TGeoTranslation(0., 0., kRB26s3RingZ + kRB26s3RingL));
2342
2343
2344
2345 ///////////////////////////////////////////
2346 // //
2347 // RB26/4-5 //
2348 // Drawing LHCV2a_0012 [as installed] //
2349 ////////////////////////////////////////////
2350 // Pos1 Vacuum Tubes LHCVC2A__0014
2351 // Pos2 Compensator LHCVC2A__0066
2352 // Pos3 Fixed Point Section LHCVC2A__0016
2353 // Pos4 Split Flange LHCVFX___0005
2354 // Pos5 RotableFlange LHCVFX___0009
2355 ////////////////////////////////////////////
2356
2357 ///////////////////////////////////
2358 // RB26/4-5 Vacuum Tubes //
2359 // Drawing LHCVC2a_0014 //
2360 ///////////////////////////////////
2361 const Float_t kRB26s45TubeL = 593.12 + 0.3; // 0.3 cm added for welding
2362
2363 TGeoPcon* shRB26s45Tube = new TGeoPcon(0., 360., 11);
2364 // Section 1: straight section
2365 shRB26s45Tube->DefineSection( 0, 0.00, 30.00/2., 30.60/2.);
2366 shRB26s45Tube->DefineSection( 1, 1.20, 30.00/2., 30.60/2.);
2367 shRB26s45Tube->DefineSection( 2, 1.20, 30.00/2., 30.80/2.);
2368 shRB26s45Tube->DefineSection( 3, 25.10, 30.00/2., 30.80/2.);
2369 // Section 2: 0.932 deg opening cone
2370 shRB26s45Tube->DefineSection( 4, 486.10, 45.00/2., 45.80/2.);
2371 // Section 3: straight section 4 mm
2372 shRB26s45Tube->DefineSection( 5, 512.10, 45.00/2., 45.80/2.);
2373 // Section 4: straight section 3 mm
2374 shRB26s45Tube->DefineSection( 6, 512.10, 45.00/2., 45.60/2.);
2375 shRB26s45Tube->DefineSection( 7, 527.70, 45.00/2., 45.60/2.);
2376 // Section 4: closing cone
2377 shRB26s45Tube->DefineSection( 8, 591.30, 10.00/2., 10.60/2.);
2378 shRB26s45Tube->DefineSection( 9, 591.89, 10.00/2., 10.30/2.);
2379
2380 shRB26s45Tube->DefineSection(10, kRB26s45TubeL, 10.00/2., 10.30/2.);
2381 TGeoVolume* voRB26s45Tube =
2382 new TGeoVolume("RB26s45Tube", shRB26s45Tube, kMedSteel);
2383
2384 TGeoVolume* voRB26s45TubeM = new TGeoVolume("RB26s45TubeM", MakeMotherFromTemplate(shRB26s45Tube), kMedVac);
2385 voRB26s45TubeM->AddNode(voRB26s45Tube, 1, gGeoIdentity);
2386
2387
2388
2389 ///////////////////////////////////
2390 // RB26/5 Axial Compensator //
2391 // Drawing LHCVC2a_0066 //
2392 ///////////////////////////////////
2393 const Float_t kRB26s5CompL = 27.60; // Length of the compensator (0.30 cm added for welding)
2394 const Float_t kRB26s5BellowRo = 12.48/2.; // Bellow outer radius [Pos 1]
2395 const Float_t kRB26s5BellowRi = 10.32/2.; // Bellow inner radius [Pos 1]
2396 const Int_t kRB26s5NumberOfPlies = 15; // Number of plies [Pos 1]
2397 const Float_t kRB26s5BellowUndL = 10.50; // Length of undulated region [Pos 1]
2398 const Float_t kRB26s5PlieThickness = 0.025; // Plie thickness [Pos 1]
2399 const Float_t kRB26s5ConnectionPlieR = 0.21; // Connection plie radius [Pos 1]
2400 const Float_t kRB26s5ConnectionR = 11.2/2.; // Bellow connection radius [Pos 1]
2401 // Plie radius
2402 const Float_t kRB26s5PlieR =
2403 (kRB26s5BellowUndL - 4. * kRB26s5ConnectionPlieR + 2. * kRB26s5PlieThickness +
2404 (2. * kRB26s5NumberOfPlies - 2.) * kRB26s5PlieThickness) / (4. * kRB26s5NumberOfPlies - 2.);
2405 const Float_t kRB26s5CompTubeInnerR = 10.00/2.; // Connection tubes inner radius [Pos 2 + 3]
2406 const Float_t kRB26s5CompTubeOuterR = 10.30/2.; // Connection tubes outer radius [Pos 2 + 3]
2407 const Float_t kRB26s5WeldingTubeLeftL = 3.70/2.; // Left connection tube half length [Pos 2]
2408 const Float_t kRB26s5WeldingTubeRightL = 13.40/2.; // Right connection tube half length [Pos 3] (0.3 cm added for welding)
2409 const Float_t kRB26s5RingInnerR = 11.2/2.; // Ring inner radius [Pos 4]
2410 const Float_t kRB26s5RingOuterR = 16.0/2.; // Ring inner radius [Pos 4]
2411 const Float_t kRB26s5RingL = 0.4/2.; // Ring half length [Pos 4]
2412 const Float_t kRB26s5RingZ = 14.97; // Ring z-position [Pos 4]
2413 const Float_t kRB26s5ProtOuterR = 16.2/2.; // Protection tube outer radius [Pos 5]
2414 const Float_t kRB26s5ProtL = 13.0/2.; // Protection tube half length [Pos 5]
2415 const Float_t kRB26s5ProtZ = 2.17; // Protection tube z-position [Pos 5]
2416 const Float_t kRB26s5DetailZR = 11.3/2.; // Detail Z max radius
2417
2418
2419 // Mother volume
2420 //
2421 TGeoPcon* shRB26s5Compensator = new TGeoPcon(0., 360., 8);
2422 shRB26s5Compensator->DefineSection( 0, 0.0, 0., kRB26s5CompTubeOuterR);
2423 shRB26s5Compensator->DefineSection( 1, kRB26s5ProtZ, 0., kRB26s5CompTubeOuterR);
2424 shRB26s5Compensator->DefineSection( 2, kRB26s5ProtZ, 0., kRB26s5ProtOuterR);
2425 shRB26s5Compensator->DefineSection( 3, kRB26s5ProtZ + 2. * kRB26s5ProtL + 2. * kRB26s5RingL, 0., kRB26s5ProtOuterR);
2426 shRB26s5Compensator->DefineSection( 4, kRB26s5ProtZ + 2. * kRB26s5ProtL + 2. * kRB26s5RingL, 0., kRB26s5DetailZR);
2427 shRB26s5Compensator->DefineSection( 5, kRB26s5CompL - 8., 0., kRB26s5DetailZR);
2428 shRB26s5Compensator->DefineSection( 6, kRB26s5CompL - 8., 0., kRB26s5CompTubeOuterR);
2429 shRB26s5Compensator->DefineSection( 7, kRB26s5CompL, 0., kRB26s5CompTubeOuterR);
2430 TGeoVolume* voRB26s5Compensator = new TGeoVolume("RB26s5Compensator", shRB26s5Compensator, kMedVac);
2431
2432 //
2433 // [Pos 1] Bellow
2434 //
2435 //
2436 TGeoVolume* voRB26s5Bellow = new TGeoVolume("RB26s5Bellow",
2437 new TGeoTube(kRB26s5BellowRi, kRB26s5BellowRo, kRB26s5BellowUndL/2.), kMedVac);
2438 //
2439 // Upper part of the undulation
2440 //
2441 TGeoTorus* shRB26s5PlieTorusU = new TGeoTorus(kRB26s5BellowRo - kRB26s5PlieR, kRB26s5PlieR - kRB26s5PlieThickness, kRB26s5PlieR);
2442 shRB26s5PlieTorusU->SetName("RB26s5TorusU");
2443 TGeoTube* shRB26s5PlieTubeU = new TGeoTube (kRB26s5BellowRo - kRB26s5PlieR, kRB26s5BellowRo, kRB26s5PlieR);
2444 shRB26s5PlieTubeU->SetName("RB26s5TubeU");
2445 TGeoCompositeShape* shRB26s5UpperPlie = new TGeoCompositeShape("RB26s5UpperPlie", "RB26s5TorusU*RB26s5TubeU");
2446
2447 TGeoVolume* voRB26s5WiggleU = new TGeoVolume("RB26s5UpperPlie", shRB26s5UpperPlie, kMedSteel);
2448 //
2449 // Lower part of the undulation
2450 TGeoTorus* shRB26s5PlieTorusL = new TGeoTorus(kRB26s5BellowRi + kRB26s5PlieR, kRB26s5PlieR - kRB26s5PlieThickness, kRB26s5PlieR);
2451 shRB26s5PlieTorusL->SetName("RB26s5TorusL");
2452 TGeoTube* shRB26s5PlieTubeL = new TGeoTube (kRB26s5BellowRi, kRB26s5BellowRi + kRB26s5PlieR, kRB26s5PlieR);
2453 shRB26s5PlieTubeL->SetName("RB26s5TubeL");
2454 TGeoCompositeShape* shRB26s5LowerPlie = new TGeoCompositeShape("RB26s5LowerPlie", "RB26s5TorusL*RB26s5TubeL");
2455
2456 TGeoVolume* voRB26s5WiggleL = new TGeoVolume("RB26s5LowerPlie", shRB26s5LowerPlie, kMedSteel);
2457
2458 //
2459 // Connection between upper and lower part of undulation
2460 TGeoVolume* voRB26s5WiggleC1 = new TGeoVolume("RB26s5PlieConn1",
2461 new TGeoTube(kRB26s5BellowRi + kRB26s5PlieR,
2462 kRB26s5BellowRo - kRB26s5PlieR, kRB26s5PlieThickness / 2.), kMedSteel);
2463 //
2464 // One wiggle
2465 TGeoVolumeAssembly* voRB26s5Wiggle = new TGeoVolumeAssembly("RB26s5Wiggle");
2466 z0 = - kRB26s5PlieThickness / 2.;
2467 voRB26s5Wiggle->AddNode(voRB26s5WiggleC1, 1 , new TGeoTranslation(0., 0., z0));
2468 z0 += kRB26s5PlieR - kRB26s5PlieThickness / 2.;
2469 voRB26s5Wiggle->AddNode(voRB26s5WiggleU, 1 , new TGeoTranslation(0., 0., z0));
2470 z0 += kRB26s5PlieR - kRB26s5PlieThickness / 2.;
2471 voRB26s5Wiggle->AddNode(voRB26s5WiggleC1, 2 , new TGeoTranslation(0., 0., z0));
2472 z0 += kRB26s5PlieR - kRB26s5PlieThickness;
2473 voRB26s5Wiggle->AddNode(voRB26s5WiggleL , 1 , new TGeoTranslation(0., 0., z0));
2474 // Positioning of the volumes
2475 z0 = - kRB26s5BellowUndL/2.+ kRB26s5ConnectionPlieR;
2476 voRB26s5Bellow->AddNode(voRB26s5WiggleL, 1, new TGeoTranslation(0., 0., z0));
2477 z0 += kRB26s5ConnectionPlieR;
2478 zsh = 4. * kRB26s5PlieR - 2. * kRB26s5PlieThickness;
2479 for (Int_t iw = 0; iw < kRB26s5NumberOfPlies; iw++) {
2480 Float_t zpos = z0 + iw * zsh;
2481 voRB26s5Bellow->AddNode(voRB26s5Wiggle, iw + 1, new TGeoTranslation(0., 0., zpos - kRB26s5PlieThickness));
2482 }
2483
2484 voRB26s5Compensator->AddNode(voRB26s5Bellow, 1, new TGeoTranslation(0., 0., 2. * kRB26s5WeldingTubeLeftL + kRB26s5BellowUndL/2.));
2485
2486 //
2487 // [Pos 2] Left Welding Tube
2488 //
2489 TGeoPcon* shRB26s5CompLeftTube = new TGeoPcon(0., 360., 3);
2490 z0 = 0;
2491 shRB26s5CompLeftTube->DefineSection(0, z0, kRB26s5CompTubeInnerR, kRB26s5CompTubeOuterR);
2492 z0 += 2 * kRB26s5WeldingTubeLeftL - ( kRB26s5ConnectionR - kRB26s5CompTubeOuterR);
2493 shRB26s5CompLeftTube->DefineSection(1, z0, kRB26s5CompTubeInnerR, kRB26s5CompTubeOuterR);
2494 z0 += ( kRB26s5ConnectionR - kRB26s5CompTubeOuterR);
2495 shRB26s5CompLeftTube->DefineSection(2, z0, kRB26s5ConnectionR - 0.15, kRB26s5ConnectionR);
2496 TGeoVolume* voRB26s5CompLeftTube = new TGeoVolume("RB26s5CompLeftTube", shRB26s5CompLeftTube, kMedSteel);
2497 voRB26s5Compensator->AddNode(voRB26s5CompLeftTube, 1, gGeoIdentity);
2498 //
2499 // [Pos 3] Right Welding Tube
2500 //
2501 TGeoPcon* shRB26s5CompRightTube = new TGeoPcon(0., 360., 11);
2502 // Detail Z
2503 shRB26s5CompRightTube->DefineSection( 0, 0. , kRB26s5CompTubeInnerR + 0.22, 11.2/2.);
2504 shRB26s5CompRightTube->DefineSection( 1, 0.05, kRB26s5CompTubeInnerR + 0.18, 11.2/2.);
2505 shRB26s5CompRightTube->DefineSection( 2, 0.22, kRB26s5CompTubeInnerR , 11.2/2. - 0.22);
2506 shRB26s5CompRightTube->DefineSection( 3, 0.44, kRB26s5CompTubeInnerR , 11.2/2.);
2507 shRB26s5CompRightTube->DefineSection( 4, 1.70, kRB26s5CompTubeInnerR , 11.2/2.);
2508 shRB26s5CompRightTube->DefineSection( 5, 2.10, kRB26s5CompTubeInnerR , kRB26s5CompTubeOuterR);
2509 shRB26s5CompRightTube->DefineSection( 6, 2.80, kRB26s5CompTubeInnerR , kRB26s5CompTubeOuterR);
2510 shRB26s5CompRightTube->DefineSection( 7, 2.80, kRB26s5CompTubeInnerR , 11.3/2.);
2511 shRB26s5CompRightTube->DefineSection( 8, 3.40, kRB26s5CompTubeInnerR , 11.3/2.);
2512 // Normal pipe
2513 shRB26s5CompRightTube->DefineSection( 9, 3.50, kRB26s5CompTubeInnerR , kRB26s5CompTubeOuterR);
2514 shRB26s5CompRightTube->DefineSection(10, 2. * kRB26s5WeldingTubeRightL, kRB26s5CompTubeInnerR, kRB26s5CompTubeOuterR);
2515
2516 TGeoVolume* voRB26s5CompRightTube =
2517 new TGeoVolume("RB26s5CompRightTube", shRB26s5CompRightTube, kMedSteel);
2518 voRB26s5Compensator->AddNode(voRB26s5CompRightTube, 1,
2519 new TGeoTranslation(0., 0., kRB26s5CompL - 2. * kRB26s5WeldingTubeRightL));
2520 //
2521 // [Pos 4] Ring
2522 //
2523 TGeoTube* shRB26s5CompRing = new TGeoTube(kRB26s5RingInnerR, kRB26s5RingOuterR, kRB26s5RingL);
2524 TGeoVolume* voRB26s5CompRing =
2525 new TGeoVolume("RB26s5CompRing", shRB26s5CompRing, kMedSteel);
2526 voRB26s5Compensator->AddNode(voRB26s5CompRing, 1, new TGeoTranslation(0., 0., kRB26s5RingZ + kRB26s5RingL));
2527
2528 //
2529 // [Pos 5] Outer Protecting Tube
2530 //
2531 TGeoTube* shRB26s5CompProtTube = new TGeoTube(kRB26s5RingOuterR, kRB26s5ProtOuterR, kRB26s5ProtL);
2532 TGeoVolume* voRB26s5CompProtTube =
2533 new TGeoVolume("RB26s5CompProtTube", shRB26s5CompProtTube, kMedSteel);
2534 voRB26s5Compensator->AddNode(voRB26s5CompProtTube, 1, new TGeoTranslation(0., 0., kRB26s5ProtZ + kRB26s5ProtL));
2535
2536 ///////////////////////////////////////
2537 // RB26/4 Fixed Point Section //
2538 // Drawing LHCVC2a_0016 //
2539 ///////////////////////////////////////
2540 const Float_t kRB26s4TubeRi = 30.30/2. ; // Tube inner radius (0.3 cm added for welding)
2541 const Float_t kRB26s4TubeRo = 30.60/2. ; // Tube outer radius
2542 const Float_t kRB26s4FixedPointL = 12.63 ; // Length of the fixed point section
2543 const Float_t kRB26s4FixedPointZ = 10.53 ; // Position of the ring (0.15 added for welding)
2544 const Float_t kRB26s4FixedPointD = 0.595 ; // Width of the ring
2545 const Float_t kRB26s4FixedPointR = 31.60/2. ; // Radius of the ring
2546
2547 TGeoPcon* shRB26s4FixedPoint = new TGeoPcon(0., 360., 6);
2548 z0 = 0.;
2549 shRB26s4FixedPoint->DefineSection(0, z0, kRB26s4TubeRi, kRB26s4TubeRo);
2550 z0 += kRB26s4FixedPointZ;
2551 shRB26s4FixedPoint->DefineSection(1, z0, kRB26s4TubeRi, kRB26s4TubeRo);
2552 shRB26s4FixedPoint->DefineSection(2, z0, kRB26s4TubeRi, kRB26s4FixedPointR);
2553 z0 += kRB26s4FixedPointD;
2554 shRB26s4FixedPoint->DefineSection(3, z0, kRB26s4TubeRi, kRB26s4FixedPointR);
2555 shRB26s4FixedPoint->DefineSection(4, z0, kRB26s4TubeRi, kRB26s4TubeRo);
2556 z0 = kRB26s4FixedPointL;
2557 shRB26s4FixedPoint->DefineSection(5, z0, kRB26s4TubeRi, kRB26s4TubeRo);
2558 TGeoVolume* voRB26s4FixedPoint = new TGeoVolume("RB26s4FixedPoint", shRB26s4FixedPoint, kMedSteel);
2559
2560 TGeoVolume* voRB26s4FixedPointM = new TGeoVolume("RB26s4FixedPointM", MakeMotherFromTemplate(shRB26s4FixedPoint), kMedVac);
2561 voRB26s4FixedPointM->AddNode(voRB26s4FixedPoint, 1, gGeoIdentity);
2562
2563
2564 ///////////////////////////////////////
2565 // RB26/4 Split Flange //
2566 // Drawing LHCVFX__0005 //
2567 ///////////////////////////////////////
2568 const Float_t kRB26s4SFlangeL = 2.99; // Length of the flange
2569 const Float_t kRB26s4SFlangeD1 = 0.85; // Length of section 1
2570 const Float_t kRB26s4SFlangeD2 = 0.36; // Length of section 2
2571 const Float_t kRB26s4SFlangeD3 = 0.73 + 1.05; // Length of section 3
2572 const Float_t kRB26s4SFlangeRo = 36.20/2.; // Flange outer radius
2573 const Float_t kRB26s4SFlangeRi1 = 30.60/2.; // Flange inner radius section 1
2574 const Float_t kRB26s4SFlangeRi2 = 30.00/2.; // Flange inner radius section 2
2575 const Float_t kRB26s4SFlangeRi3 = 30.60/2.; // Flange inner radius section 3
2576 z0 = 0;
2577 TGeoPcon* shRB26s4SFlange = new TGeoPcon(0., 360., 6);
2578 z0 = 0.;
2579 shRB26s4SFlange->DefineSection(0, z0, kRB26s4SFlangeRi1, kRB26s4SFlangeRo);
2580 z0 += kRB26s4SFlangeD1;
2581 shRB26s4SFlange->DefineSection(1, z0, kRB26s4SFlangeRi1, kRB26s4SFlangeRo);
2582 shRB26s4SFlange->DefineSection(2, z0, kRB26s4SFlangeRi2, kRB26s4SFlangeRo);
2583 z0 += kRB26s4SFlangeD2;
2584 shRB26s4SFlange->DefineSection(3, z0, kRB26s4SFlangeRi2, kRB26s4SFlangeRo);
2585 shRB26s4SFlange->DefineSection(4, z0, kRB26s4SFlangeRi3, kRB26s4SFlangeRo);
2586 z0 += kRB26s4SFlangeD3;
2587 shRB26s4SFlange->DefineSection(5, z0, kRB26s4SFlangeRi3, kRB26s4SFlangeRo);
2588 TGeoVolume* voRB26s4SFlange = new TGeoVolume("RB26s4SFlange", shRB26s4SFlange, kMedSteel);
2589
2590 TGeoVolume* voRB26s4SFlangeM = new TGeoVolume("RB26s4SFlangeM", MakeMotherFromTemplate(shRB26s4SFlange, 0, 3), kMedVac);
2591 voRB26s4SFlangeM->AddNode(voRB26s4SFlange, 1, gGeoIdentity);
2592
2593 ///////////////////////////////////////
2594 // RB26/5 Rotable Flange //
2595 // Drawing LHCVFX__0009 //
2596 ///////////////////////////////////////
2597 const Float_t kRB26s5RFlangeL = 1.86; // Length of the flange
2598 const Float_t kRB26s5RFlangeD1 = 0.61; // Length of section 1
2599 const Float_t kRB26s5RFlangeD2 = 0.15; // Length of section 2
2600 const Float_t kRB26s5RFlangeD3 = 0.60; // Length of section 3
2601 const Float_t kRB26s5RFlangeD4 = 0.50; // Length of section 4
2602 const Float_t kRB26s5RFlangeRo = 15.20/2.; // Flange outer radius
2603 const Float_t kRB26s5RFlangeRi1 = 10.30/2.; // Flange inner radius section 1
2604 const Float_t kRB26s5RFlangeRi2 = 10.00/2.; // Flange inner radius section 2
2605 const Float_t kRB26s5RFlangeRi3 = 10.30/2.; // Flange inner radius section 3
2606 const Float_t kRB26s5RFlangeRi4 = 10.50/2.; // Flange inner radius section 4
2607
2608 z0 = 0;
2609 TGeoPcon* shRB26s5RFlange = new TGeoPcon(0., 360., 8);
2610 z0 = 0.;
2611 shRB26s5RFlange->DefineSection(0, z0, kRB26s5RFlangeRi4, kRB26s5RFlangeRo);
2612 z0 += kRB26s5RFlangeD4;
2613 shRB26s5RFlange->DefineSection(1, z0, kRB26s5RFlangeRi4, kRB26s5RFlangeRo);
2614 shRB26s5RFlange->DefineSection(2, z0, kRB26s5RFlangeRi3, kRB26s5RFlangeRo);
2615 z0 += kRB26s5RFlangeD3;
2616 shRB26s5RFlange->DefineSection(3, z0, kRB26s5RFlangeRi3, kRB26s5RFlangeRo);
2617 shRB26s5RFlange->DefineSection(4, z0, kRB26s5RFlangeRi2, kRB26s5RFlangeRo);
2618 z0 += kRB26s5RFlangeD2;
2619 shRB26s5RFlange->DefineSection(5, z0, kRB26s5RFlangeRi2, kRB26s5RFlangeRo);
2620 shRB26s5RFlange->DefineSection(6, z0, kRB26s5RFlangeRi1, kRB26s5RFlangeRo);
2621 z0 += kRB26s5RFlangeD1;
2622 shRB26s5RFlange->DefineSection(7, z0, kRB26s5RFlangeRi1, kRB26s5RFlangeRo);
2623 TGeoVolume* voRB26s5RFlange = new TGeoVolume("RB26s5RFlange", shRB26s5RFlange, kMedSteel);
2624
2625 TGeoVolume* voRB26s5RFlangeM = new TGeoVolume("RB26s5RFlangeM", MakeMotherFromTemplate(shRB26s5RFlange, 4, 7), kMedVac);
2626 voRB26s5RFlangeM->AddNode(voRB26s5RFlange, 1, gGeoIdentity);
2627
2628 //
2629 // Assemble RB26/1-2
2630 //
2631 TGeoVolumeAssembly* asRB26s12 = new TGeoVolumeAssembly("RB26s12");
2632 z0 = 0.;
2633 asRB26s12->AddNode(voRB26s1RFlange, 1, gGeoIdentity);
2634 z0 += kRB26s1RFlangeIsL + kRB26s1RFlangeFpL;
2635 asRB26s12->AddNode(voRB26s12TubeM, 1, new TGeoTranslation(0., 0., z0));
2636 z0 += kRB26s12TubeL;
2637 asRB26s12->AddNode(voRB26s2Compensator, 1, new TGeoTranslation(0., 0., z0));
2638 z0 += kRB26s2CompL;
2639 z0 -= kRB26s2FFlangeD1;
2640 asRB26s12->AddNode(voRB26s2FFlangeM, 1, new TGeoTranslation(0., 0., z0));
2641 z0 += kRB26s2FFlangeL;
2642 const Float_t kRB26s12L = z0;
2643
2644 //
2645 // Assemble RB26/3
2646 //
2647 TGeoVolumeAssembly* asRB26s3 = new TGeoVolumeAssembly("RB26s3");
2648 z0 = 0.;
2649 asRB26s3->AddNode(voRB26s3SFlangeM, 1, gGeoIdentity);
2650 z0 += kRB26s3SFlangeL;
2651 z0 -= kRB26s3SFlangeD3;
2652 asRB26s3->AddNode(voRB26s3FixedPointM, 1, new TGeoTranslation(0., 0., z0));
2653 z0 += kRB26s3FixedPointL;
2654 asRB26s3->AddNode(voRB26s3TubeM, 1, new TGeoTranslation(0., 0., z0));
2655 z0 += kRB26s3TubeL;
2656 asRB26s3->AddNode(voRB26s3Compensator, 1, new TGeoTranslation(0., 0., z0));
2657 z0 += kRB26s3CompL;
2658 z0 -= kRB26s3FFlangeD1;
2659 asRB26s3->AddNode(voRB26s3FFlangeM, 1, new TGeoTranslation(0., 0., z0));
2660 z0 += kRB26s3FFlangeL;
2661 const Float_t kRB26s3L = z0;
2662
2663
2664 //
2665 // Assemble RB26/4-5
2666 //
2667 TGeoVolumeAssembly* asRB26s45 = new TGeoVolumeAssembly("RB26s45");
2668 z0 = 0.;
2669 asRB26s45->AddNode(voRB26s4SFlangeM, 1, gGeoIdentity);
2670 z0 += kRB26s4SFlangeL;
2671 z0 -= kRB26s4SFlangeD3;
2672 asRB26s45->AddNode(voRB26s4FixedPointM, 1, new TGeoTranslation(0., 0., z0));
2673 z0 += kRB26s4FixedPointL;
2674 asRB26s45->AddNode(voRB26s45TubeM, 1, new TGeoTranslation(0., 0., z0));
2675 z0 += kRB26s45TubeL;
2676 asRB26s45->AddNode(voRB26s5Compensator, 1, new TGeoTranslation(0., 0., z0));
2677 z0 += kRB26s5CompL;
2678 z0 -= kRB26s5RFlangeD3;
2679 z0 -= kRB26s5RFlangeD4;
2680 asRB26s45->AddNode(voRB26s5RFlangeM, 1, new TGeoTranslation(0., 0., z0));
2681 z0 += kRB26s5RFlangeL;
2682 const Float_t kRB26s45L = z0;
2683
2684 //
2685 // Assemble RB26
2686 //
2687 TGeoVolumeAssembly* asRB26Pipe = new TGeoVolumeAssembly("RB26Pipe");
2688 z0 = 0.;
2689 asRB26Pipe->AddNode(asRB26s12, 1, new TGeoTranslation(0., 0., z0));
2690 z0 += kRB26s12L;
2691 asRB26Pipe->AddNode(asRB26s3, 1, new TGeoTranslation(0., 0., z0));
2692 z0 += kRB26s3L;
2693 asRB26Pipe->AddNode(asRB26s45, 1, new TGeoTranslation(0., 0., z0));
2694 z0 += kRB26s45L;
2695 top->AddNode(asRB26Pipe, 1, new TGeoCombiTrans(0., 0., -82., rot180));
2696}
2697
2698
2699
2700//___________________________________________
2701void AliPIPEv4::CreateMaterials()
2702{
2703 //
2704 // Define materials for beam pipe
2705 //
2706
2707 AliDebugClass(1,"Create PIPEv4 materials");
2708 Int_t isxfld = ((AliMagF*)TGeoGlobalMagField::Instance()->GetField())->Integ();
2709 Float_t sxmgmx = ((AliMagF*)TGeoGlobalMagField::Instance()->GetField())->Max();
2710 // Steel (Inox)
2711 Float_t asteel[4] = { 55.847,51.9961,58.6934,28.0855 };
2712 Float_t zsteel[4] = { 26.,24.,28.,14. };
2713 Float_t wsteel[4] = { .715,.18,.1,.005 };
2714 // AlBe - alloy
2715 Float_t aAlBe[2] = { 26.98, 9.01};
2716 Float_t zAlBe[2] = { 13.00, 4.00};
2717 Float_t wAlBe[2] = { 0.4, 0.6};
2718 //
2719 // Polyamid
2720 Float_t aPA[4] = {16., 14., 12., 1.};
2721 Float_t zPA[4] = { 8., 7., 6., 1.};
2722 Float_t wPA[4] = { 1., 1., 6., 11.};
2723 //
2724 // Air
2725 //
2726 Float_t aAir[4]={12.0107,14.0067,15.9994,39.948};
2727 Float_t zAir[4]={6.,7.,8.,18.};
2728 Float_t wAir[4]={0.000124,0.755267,0.231781,0.012827};
2729 Float_t dAir = 1.20479E-3;
2730 Float_t dAir1 = 1.20479E-10;
2731 //
2732 // Insulation powder
2733 // Si O Ti Al
2734 Float_t ains[4] ={28.0855, 15.9994, 47.867, 26.982};
2735 Float_t zins[4] ={14., 8. , 22. , 13. };
2736 Float_t wins[4] ={ 0.3019, 0.4887, 0.1914, 0.018};
2737 //
2738 //
2739 // Anticorodal
2740 //
2741 // Al Si7 Mg 0.6
2742 //
2743 Float_t aaco[3] ={26.982, 28.0855, 24.035};
2744 Float_t zaco[3] ={13., 14. , 12. };
2745 Float_t waco[3] ={ 0.924, 0.07, 0.006};
2746 // Kapton
2747 //
2748 Float_t aKapton[4]={1.00794,12.0107, 14.010,15.9994};
2749 Float_t zKapton[4]={1.,6.,7.,8.};
2750 Float_t wKapton[4]={0.026362,0.69113,0.07327,0.209235};
2751 Float_t dKapton = 1.42;
2752 // NEG coating
2753 // Ti V Zr
2754 Float_t aNEG[4] = {47.87, 50.94, 91.24};
2755 Float_t zNEG[4] = {22.00, 23.00, 40.00};
2756 Float_t wNEG[4] = {1./3., 1./3., 1./3.};
2757 Float_t dNEG = 5.6; // ?
2758
2759 //
2760 //
2761 // Berillium
2762 AliMaterial(5, "BERILLIUM$", 9.01, 4., 1.848, 35.3, 36.7);
2763 //
2764 // Carbon
2765 AliMaterial(6, "CARBON$ ", 12.01, 6., 2.265, 18.8, 49.9);
2766 //
2767 // Aluminum
2768 AliMaterial(9, "ALUMINIUM$", 26.98, 13., 2.7, 8.9, 37.2);
2769 //
2770 // Copper
2771 AliMaterial(10, "COPPER", 63.55, 29, 8.96, 1.43, 85.6/8.96);
2772 //
2773 // Air
2774 AliMixture(15, "AIR$ ", aAir, zAir, dAir, 4, wAir);
2775 AliMixture(35, "AIR_HIGH$ ", aAir, zAir, dAir, 4, wAir);
2776 //
2777 // Vacuum
2778 AliMixture(16, "VACUUM$ ", aAir, zAir, dAir1, 4, wAir);
2779 //
2780 // stainless Steel
2781 AliMixture(19, "STAINLESS STEEL$", asteel, zsteel, 7.88, 4, wsteel);
2782 //
2783 // reduced density steel to approximate pump getter material
2784 AliMixture(20, "GETTER$", asteel, zsteel, 1.00, 4, wsteel);
2785 // Al-Be alloy
2786 //
2787 AliMixture(21, "AlBe$", aAlBe, zAlBe, 2.07, 2, wAlBe);
2788 // Polyamid
2789 //
2790 AliMixture(22, "PA$", aPA, zPA, 1.14, -4, wPA);
2791 //
2792 // Kapton
2793 AliMixture(23, "KAPTON", aKapton, zKapton, dKapton, 4, wKapton);
2794 // Anticorodal
2795 AliMixture(24, "ANTICORODAL", aaco, zaco, 2.66, 3, waco);
2796
2797 //
2798 // Insulation powder
2799 AliMixture(14, "INSULATION0$", ains, zins, 0.41, 4, wins);
2800 AliMixture(34, "INSULATION1$", ains, zins, 0.41, 4, wins);
2801 AliMixture(54, "INSULATION2$", ains, zins, 0.41, 4, wins);
2802
2803 // NEG
2804 AliMixture(25, "NEG COATING", aNEG, zNEG, dNEG, -3, wNEG);
2805
2806
2807 // ****************
2808 // Defines tracking media parameters.
2809 //
2810 Float_t epsil = .001; // Tracking precision,
2811 Float_t stemax = -0.01; // Maximum displacement for multiple scat
2812 Float_t tmaxfd = -20.; // Maximum angle due to field deflection
2813 Float_t deemax = -.3; // Maximum fractional energy loss, DLS
2814 Float_t stmin = -.8;
2815 // ***************
2816 //
2817 // Beryllium
2818
2819 AliMedium(5, "BE", 5, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
2820
2821 // Carbon
2822 AliMedium(6, "C", 6, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
2823 //
2824 // Aluminum
2825 AliMedium(9, "ALU", 9, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
2826 // Copper
2827 AliMedium(10, "CU", 10, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
2828 //
2829 // Air
2830 AliMedium(15, "AIR", 15, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
2831 AliMedium(35, "AIR_HIGH",35, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
2832 //
2833 // Vacuum
2834 AliMedium(16, "VACUUM", 16, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
2835 //
2836 // Steel
2837 AliMedium(19, "INOX", 19, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
2838 //
2839 // Getter
2840 AliMedium(20, "GETTER", 20, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
2841 //
2842 // AlBe - Aloy
2843 AliMedium(21, "AlBe" , 21, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
2844 //
2845 // Polyamid
2846 AliMedium(22, "PA" , 22, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
2847 // Antocorodal
2848 AliMedium(24, "ANTICORODAL", 24, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
2849 // Insulation Powder
2850 AliMedium(14, "INS_C0 ", 14, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
2851 AliMedium(34, "INS_C1 ", 34, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
2852 AliMedium(54, "INS_C2 ", 54, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
2853 //
2854 // KAPTON
2855 AliMedium(23, "KAPTON", 23, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
2856
2857 //
2858 // NEG
2859 AliMedium(25, "NEG COATING", 25, 0, isxfld, sxmgmx, tmaxfd, stemax, deemax, epsil, stmin);
2860}
2861
2862
2863TGeoPcon* AliPIPEv4::MakeMotherFromTemplate(TGeoPcon* shape, Int_t imin, Int_t imax, Float_t r0, Int_t nz)
2864{
2865 //
2866 // Create a mother shape from a template setting some min radii to 0
2867 //
2868 Int_t nz0 = shape->GetNz();
2869 // if nz > -1 the number of planes is given by nz
2870 if (nz != -1) nz0 = nz;
2871 TGeoPcon* mother = new TGeoPcon(0., 360., nz0);
2872
2873 if (imin == -1 || imax == -1) {
2874 imin = 0;
2875 imax = shape->GetNz();
2876 } else if (imax >= nz0) {
2877 imax = nz0 - 1;
2878 printf("Warning: imax reset to nz-1 %5d %5d %5d %5d\n", imin, imax, nz, nz0);
2879 }
2880
2881
2882
2883 for (Int_t i = 0; i < shape->GetNz(); i++) {
2884 Double_t rmin = shape->GetRmin(i);
2885 if ((i >= imin) && (i <= imax) ) rmin = r0;
2886 Double_t rmax = shape->GetRmax(i);
2887 Double_t z = shape->GetZ(i);
2888 mother->DefineSection(i, z, rmin, rmax);
2889 }
2890 return mother;
2891
2892}
2893
2894TGeoPcon* AliPIPEv4::MakeInsulationFromTemplate(TGeoPcon* shape)
2895{
2896 //
2897 // Create an beam pipe insulation layer shape from a template
2898 //
2899 Int_t nz = shape->GetNz();
2900 TGeoPcon* insu = new TGeoPcon(0., 360., nz);
2901
2902 for (Int_t i = 0; i < nz; i++) {
2903 Double_t z = shape->GetZ(i);
2904 Double_t rmin = shape->GetRmin(i);
2905 Double_t rmax = shape->GetRmax(i);
2906 rmax += 0.5;
2907 shape->DefineSection(i, z, rmin, rmax);
2908 rmin = rmax - 0.5;
2909 insu->DefineSection(i, z, rmin, rmax);
2910 }
2911 return insu;
2912
2913}
2914
2915
2916TGeoVolume* AliPIPEv4::MakeBellow(const char* ext, Int_t nc, Float_t rMin, Float_t rMax, Float_t dU, Float_t rPlie, Float_t dPlie)
2917{
2918 // nc Number of convolution
2919 // rMin Inner radius of the bellow
2920 // rMax Outer radius of the bellow
2921 // dU Undulation length
2922 // rPlie Plie radius
2923 // dPlie Plie thickness
2924 const TGeoMedium* kMedVac = gGeoManager->GetMedium("PIPE_VACUUM");
2925 const TGeoMedium* kMedSteel = gGeoManager->GetMedium("PIPE_INOX");
2926
2927 char name[64], nameA[64], nameB[64], bools[64];
2928 sprintf(name, "%sBellowUS", ext);
2929 TGeoVolume* voBellow = new TGeoVolume(name, new TGeoTube(rMin, rMax, dU/2.), kMedVac);
2930 //
2931 // Upper part of the undulation
2932 //
2933 TGeoTorus* shPlieTorusU = new TGeoTorus(rMax - rPlie, rPlie - dPlie, rPlie);
2934 sprintf(nameA, "%sTorusU", ext);
2935 shPlieTorusU->SetName(nameA);
2936 TGeoTube* shPlieTubeU = new TGeoTube (rMax - rPlie, rMax, rPlie);
2937 sprintf(nameB, "%sTubeU", ext);
2938 shPlieTubeU->SetName(nameB);
2939 sprintf(name, "%sUpperPlie", ext);
2940 sprintf(bools, "%s*%s", nameA, nameB);
2941 TGeoCompositeShape* shUpperPlie = new TGeoCompositeShape(name, bools);
2942
2943 TGeoVolume* voWiggleU = new TGeoVolume(name, shUpperPlie, kMedSteel);
2944 //
2945 // Lower part of the undulation
2946 TGeoTorus* shPlieTorusL = new TGeoTorus(rMin + rPlie, rPlie - dPlie, rPlie);
2947 sprintf(nameA, "%sTorusL", ext);
2948 shPlieTorusL->SetName(nameA);
2949 TGeoTube* shPlieTubeL = new TGeoTube (rMin, rMin + rPlie, rPlie);
2950 sprintf(nameB, "%sTubeL", ext);
2951 shPlieTubeL->SetName(nameB);
2952 sprintf(name, "%sLowerPlie", ext);
2953 sprintf(bools, "%s*%s", nameA, nameB);
2954 TGeoCompositeShape* shLowerPlie = new TGeoCompositeShape(name, bools);
2955
2956 TGeoVolume* voWiggleL = new TGeoVolume(name, shLowerPlie, kMedSteel);
2957
2958 //
2959 // Connection between upper and lower part of undulation
2960 sprintf(name, "%sPlieConn1", ext);
2961 TGeoVolume* voWiggleC1 = new TGeoVolume(name, new TGeoTube(rMin + rPlie, rMax - rPlie, dPlie/2.), kMedSteel);
2962 //
2963 // One wiggle
2964 Float_t dz = rPlie - dPlie / 2.;
2965 Float_t z0 = - dPlie / 2.;
2966 sprintf(name, "%sWiggle", ext);
2967 TGeoVolumeAssembly* asWiggle = new TGeoVolumeAssembly(name);
2968 asWiggle->AddNode(voWiggleC1, 1 , new TGeoTranslation(0., 0., z0));
2969 z0 += dz;
2970 asWiggle->AddNode(voWiggleU, 1 , new TGeoTranslation(0., 0., z0));
2971 z0 += dz;
2972 asWiggle->AddNode(voWiggleC1, 2 , new TGeoTranslation(0., 0., z0));
2973 z0 += dz;
2974 asWiggle->AddNode(voWiggleL , 1 , new TGeoTranslation(0., 0., z0));
2975 // Positioning of the volumes
2976 z0 = - dU / 2.+ rPlie;
2977 voBellow->AddNode(voWiggleL, 2, new TGeoTranslation(0., 0., z0));
2978 z0 += rPlie;
2979 Float_t zsh = 4. * rPlie - 2. * dPlie;
2980 for (Int_t iw = 0; iw < nc; iw++) {
2981 Float_t zpos = z0 + iw * zsh;
2982 voBellow->AddNode(asWiggle, iw + 1, new TGeoTranslation(0., 0., zpos - dPlie));
2983 }
2984 return voBellow;
2985}
2986
2987
2988
2989