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