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