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