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