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