62 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
63 mBlocks = geom->
MakeTubs(no_Block, Iron, 21, 29, 1.8, sP, sP + 6.25);
68 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
69 mBlocks = geom->
MakeTubs(no_Block, Iron, 21, 30, 1.8, sP, sP + 2.5);
73 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
74 mBlocks = geom->
MakeTubs(no_Block, Iron, 21, 31, 1.8, sP, sP + 1);
78 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
79 mBlocks = geom->
MakeTubs(no_Block, Iron, 21, 30, 1.8, sP, sP + 1);
83 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
84 mBlocks = geom->
MakeTubs(no_Block, Iron, 21, 31, 1.8, sP, sP + 1);
88 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
89 mBlocks = geom->
MakeTubs(no_Block, Iron, 21, 30, 1.8, sP, sP + 2.5);
95 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
96 mBlocks = geom->
MakeTubs(no_Block, Iron, 21, 30, 1.8, sP, 103);
102 sprintf(no_Block,
"B1_F%d", ++
F);
103 mBlocks = geom->
MakeTubs(no_Block, Iron, 21, 30, 2.2, 0, 103);
108 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
109 mBlocks = geom->
MakeTubs(no_Block, Iron, 18.5, 21, 0.8, 92, 101);
114 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
115 mBlocks = geom->
MakeTubs(no_Block, Iron, 18.5, 21, 3.2, 92, 102);
121 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
122 mBlocks = geom->
MakeTubs(no_Block, Iron, 18.5, 21, 2, 92, 102);
125 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
126 mBlocks = geom->
MakeTubs(no_Block, Iron, 18.5, 21, 3.2, 92, 102);
130 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
131 mBlocks = geom->
MakeTubs(no_Block, Iron, 21, 30, 2, 0, 103);
135 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
136 mBlocks = geom->
MakeTubs(no_Block, Iron, 18, 21, 2, 0, 102);
140 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
141 mBlocks = geom->
MakeTubs(no_Block, Iron, 18, 18.5, 14, 92, 103);
146 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
147 mBlocks = geom->
MakeTubs(no_Block, Iron, 21, 29, 2, 0, 97);
151 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
152 mBlocks = geom->
MakeTubs(no_Block, Iron, 21, 32, 2, 37, 97);
156 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
157 mBlocks = geom->
MakeTubs(no_Block, Iron, 21, 29, 1.95, 0, 37);
160 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
161 mBlocks = geom->
MakeTubs(no_Block, Iron, 21, 29, 0.05, 0, 37);
166 sprintf(no_Block,
"B1_RT%d",
N = 0);
167 mBlocks = geom->
MakeTubs(no_Block, Iron, 21, 29.5, 0.2, 0, 102);
170 sprintf(no_Block,
"B1_RT%d", ++
N);
171 mBlocks = geom->
MakeTubs(no_Block, Iron, 18.5, 21, 0.2, 0, 101);
175 sprintf(no_Block,
"B1_RT%d", ++
N);
176 mBlocks = geom->
MakeTubs(no_Block, Iron, 21, 30, 0.7, 102.9, 103);
179 sprintf(no_Block,
"B1_RT%d", ++
N);
180 mBlocks = geom->
MakeTubs(no_Block, Iron, 21.1, 29.9, 0.7, 102, 102.9);
184 sprintf(no_Block,
"B1_RT%d", ++
N);
185 mBlocks = geom->
MakeTubs(no_Block, Iron, 21.1, 21.5, 0.5, 98, 102.9);
188 sprintf(no_Block,
"B1_RT%d", ++
N);
189 mBlocks = geom->
MakeTubs(no_Block, Iron, 21, 21.1, 0.7, 98, 103);
193 sprintf(no_Block,
"B1_RT%d", ++
N);
194 mBlocks = geom->
MakeTubs(no_Block, Iron, 18.6, 21, 0.7, 101.9, 102);
197 sprintf(no_Block,
"B1_RT%d", ++
N);
198 mBlocks = geom->
MakeTubs(no_Block, Iron, 18.6, 21, 0.7, 101, 101.9);
202 sprintf(no_Block,
"B1_RT%d", ++
N);
203 mBlocks = geom->
MakeTubs(no_Block, Iron, 29.5, 29.9, 0.5, 0, 102);
206 sprintf(no_Block,
"B1_RT%d", ++
N);
207 mBlocks = geom->
MakeTubs(no_Block, Iron, 29.9, 30, 0.5, 0, 103);
211 sprintf(no_Block,
"B1_RT%d", ++
N);
212 mBlocks = geom->
MakeTubs(no_Block, Iron, 18.1, 18.5, 0.5, -1, 101.9);
215 sprintf(no_Block,
"B1_RT%d", ++
N);
216 mBlocks = geom->
MakeTubs(no_Block, Iron, 18, 18.1, 0.5, -0.5, 102);
220 sprintf(no_Block,
"B1_RT%d", ++
N);
221 mBlocks = geom->
MakeTubs(no_Block, Iron, 18.1, 18.4, 0.5, 101.9, 102.9);
224 sprintf(no_Block,
"B1_RT%d", ++
N);
225 mBlocks = geom->
MakeTubs(no_Block, Iron, 18, 18.1, 0.5, 102, 103);
228 sprintf(no_Block,
"B1_RT%d", ++
N);
229 mBlocks = geom->
MakeTubs(no_Block, Iron, 18.4, 18.5, 0.5, 102, 103);
232 sprintf(no_Block,
"B1_RT%d", ++
N);
233 mBlocks = geom->
MakeTubs(no_Block, Iron, 18, 18.5, 0.5, 102.9, 103);
238 sprintf(no_Block,
"B1_WW%d",
N = 0);
239 mBlocks = geom->
MakeTubs(no_Block, Iron, 20.8, 31, 19.5, sP, sP + 1);
243 sprintf(no_Block,
"B1_WW%d", ++
N);
244 mBlocks = geom->
MakeTubs(no_Block, Iron, 26.8, 31, 5, sP, sP + 1);
248 sprintf(no_Block,
"B1_WW%d", ++
N);
249 mBlocks = geom->
MakeTubs(no_Block, Iron, 23, 24.3, 5, sP, sP + 1);
253 sprintf(no_Block,
"B1_WW%d", ++
N);
254 mBlocks = geom->
MakeTubs(no_Block, Iron, 20.8, 21.3, 5, sP, sP + 1);
259 sprintf(no_Block,
"B1_ZF%d",
N = 0);
260 mBlocks = geom->
MakeTubs(no_Block, Iron, 0, 21, 9, 0, 92);
264 sprintf(no_Block,
"B1_ZF%d", ++
N);
265 mBlocks = geom->
MakeTubs(no_Block, Iron, 18, 21, 7.5, 0, 92);
269 sprintf(no_Block,
"B1_ZF%d", ++
N);
270 mBlocks = geom->
MakeTubs(no_Block, Iron, 18, 21, 4.5, 0, 92);
274 sprintf(no_Block,
"B1_ZF%d", ++
N);
275 mBlocks = geom->
MakeTubs(no_Block, Iron, 0, 18, 0.2, 0, 101);
278 sprintf(no_Block,
"B1_ZF%d", ++
N);
279 mBlocks = geom->
MakeTubs(no_Block, Iron, 0, 18, 1.7, 0, 100);
282 sprintf(no_Block,
"B1_ZF%d", ++
N);
283 mBlocks = geom->
MakeTubs(no_Block, Iron, 0, 18, 1.2, 101, 101.9);
286 sprintf(no_Block,
"B1_ZF%d", ++
N);
287 mBlocks = geom->
MakeTubs(no_Block, Iron, 0, 18, 1.2, 101.9, 102);
292 sprintf(no_Block,
"B1_ZF%d", ++
N);
293 mBlocks = geom->
MakeBox(no_Block, Iron, 6.5, 7, 2.5);
297 sprintf(no_Block,
"B1_ZF%d", ++
N);
298 mBlocks = geom->
MakeBox(no_Block, Iron, 6.5, 7, 3);
302 sprintf(no_Block,
"B1_ZF%d", ++
N);
303 mBlocks = geom->
MakeBox(no_Block, Iron, 7, 0.05, 10);
306 sprintf(no_Block,
"B1_ZF%d", ++
N);
307 mBlocks = geom->
MakeBox(no_Block, Iron, 6.9, 0.20, 10);
310 sprintf(no_Block,
"B1_ZF%d", ++
N);
311 mBlocks = geom->
MakeBox(no_Block, Iron, 0.1, 0.20, 10);
315 sprintf(no_Block,
"B1_ZF%d", ++
N);
316 mBlocks = geom->
MakeBox(no_Block, Iron, 0.05, 7, 3.5);
319 sprintf(no_Block,
"B1_ZF%d", ++
N);
320 mBlocks = geom->
MakeBox(no_Block, Iron, 0.20, 6.9, 3.5);
324 sprintf(no_Block,
"B1_ZF%d", ++
N);
325 mBlocks = geom->
MakeBox(no_Block, Iron, 0.25, 7, 4);
329 sprintf(no_Block,
"B1_ZF%d", ++
N);
330 mBlocks = geom->
MakeBox(no_Block, Iron, 7, 0.05, 10);
333 sprintf(no_Block,
"B1_ZF%d", ++
N);
334 mBlocks = geom->
MakeBox(no_Block, Iron, 6.9, 0.20, 10);
337 sprintf(no_Block,
"B1_ZF%d", ++
N);
338 mBlocks = geom->
MakeBox(no_Block, Iron, 0.1, 0.20, 10);
343 sprintf(no_Block,
"B1_ZF%d", ++
N);
344 mBlocks = geom->
MakeBox(no_Block, Iron, 5, 5, 1);
348 sprintf(no_Block,
"B1_ZF%d", ++
N);
349 mBlocks = geom->
MakeBox(no_Block, Iron, 5, 0.25, 1.5);
353 sprintf(no_Block,
"B1_ZF%d", ++
N);
354 mBlocks = geom->
MakeBox(no_Block, Iron, 0.25, 5.5, 1.5);
358 sprintf(no_Block,
"B1_ZF%d", ++
N);
359 mBlocks = geom->
MakeBox(no_Block, Iron, 5.5, 3.5, 5);
364 sprintf(no_Block,
"B1_GRD%d",
N = 0);
365 mBlocks = geom->
MakeTubs(no_Block, Iron, 0, 29, 1, 0, 36.75);
369 sprintf(no_Block,
"B1_GRD%d", ++
N);
370 mBlocks = geom->
MakeTubs(no_Block, Iron, 0, 30.4, 0.4, 36.75, 77.25);
374 sprintf(no_Block,
"B1_GRD%d", ++
N);
375 mBlocks = geom->
MakeTubs(no_Block, Iron, 0, 29.7, 0.3, 36.75, 77.25);
379 sprintf(no_Block,
"B1_GRD%d", ++
N);
380 mBlocks = geom->
MakeTubs(no_Block, Iron, 0, 29, 0.3, 36.75, 77.25);
384 sprintf(no_Block,
"B1_GRD%d", ++
N);
385 mBlocks = geom->
MakeTubs(no_Block, Iron, 0, 29, 1, 77.25, 97);
390 sprintf(no_Block,
"B1_PF%d",
N = 0);
391 mBlocks = geom->
MakeBox(no_Block, Iron, 1.2, 1.5, 9);
395 sprintf(no_Block,
"B1_PF%d", ++
N);
396 mBlocks = geom->
MakeBox(no_Block, Iron, 1.2, 1.5, 9);
400 sprintf(no_Block,
"B1_PF%d", ++
N);
401 mBlocks = geom->
MakeBox(no_Block, Iron, 1.2, 1.5, 9);
405 sprintf(no_Block,
"B1_PF%d", ++
N);
406 mBlocks = geom->
MakeBox(no_Block, Iron, 1.2, 1.5, 9);
410 sprintf(no_Block,
"B1_PF%d", ++
N);
411 mBlocks = geom->
MakeTubs(no_Block, Iron, 29, 30, 2, 0, 36.75);
415 sprintf(no_Block,
"B1_PF%d", ++
N);
416 mBlocks = geom->
MakeBox(no_Block, Iron, 3, 2, 2);
420 sprintf(no_Block,
"B1_PF%d", ++
N);
421 mBlocks = geom->
MakeBox(no_Block, Iron, 0.25, 4.3, 1.5);
425 sprintf(no_Block,
"B1_PF%d", ++
N);
426 mBlocks = geom->
MakeBox(no_Block, Iron, 5.25, 4.3, 0.4);
430 sprintf(no_Block,
"B1_PF%d", ++
N);
431 mBlocks = geom->
MakeBox(no_Block, Iron, 5.5, 0.25, 0.75);
435 sprintf(no_Block,
"B1_PF%d", ++
N);
436 mBlocks = geom->
MakeTrd1(no_Block, Iron, 1.5, 0, 0.25, 5.5);
451 sprintf(no_Block,
"B12_F%d_B%d",
F, ++
N);
452 mBlocks = geom->
MakeBox(no_Block, Iron, 3.8, 0.35, 1.8);
455 new TGeoCombiTrans(23.38 + (21.65 - 6 * i) * 0.13, -21.2 + (21.65 - 6 * i) * 0.99,
457 sprintf(no_Block,
"B12_F%d_B%d",
F, ++
N);
458 mBlocks = geom->
MakeBox(no_Block, Iron, 4.8, 0.3, 1.8);
461 new TGeoCombiTrans(23.38 + (21.0 - 6 * i) * 0.13, -21.2 + (21 - 6 * i) * 0.99,
463 sprintf(no_Block,
"B12_F%d_B%d",
F, ++
N);
464 mBlocks = geom->
MakeBox(no_Block, Iron, 3.8, 0.3, 1.8);
467 new TGeoCombiTrans(23.38 + (20.4 - 6 * i) * 0.13, -21.2 + (20.4 - 6 * i) * 0.99,
469 sprintf(no_Block,
"B12_F%d_B%d",
F, ++
N);
470 mBlocks = geom->
MakeBox(no_Block, Iron, 4.8, 0.3, 1.8);
473 new TGeoCombiTrans(23.38 + (19.7 - 6 * i) * 0.13, -21.2 + (19.7 - 6 * i) * 0.99,
475 sprintf(no_Block,
"B12_F%d_B%d",
F, ++
N);
476 mBlocks = geom->
MakeBox(no_Block, Iron, 3.8, 0.35, 1.8);
479 new TGeoCombiTrans(23.38 + (19.05 - 6 * i) * 0.13, -21.2 + (19.05 - 6 * i) * 0.99,
482 sprintf(no_Block,
"B12_F%d_B%d",
F, ++
N);
483 mBlocks = geom->
MakeBox(no_Block, Iron, 3, 1.4, 1.8);
486 new TGeoCombiTrans(23.38 + (17.4 - 6 * i) * 0.13, -21.2 + (17.4 - 6 * i) * 0.99,
490 sprintf(no_Block,
"B12_F%d_B%d",
F, ++
N);
491 mBlocks = geom->
MakeBox(no_Block, Iron, 5.8, 1, 1.8);
494 new TGeoCombiTrans(21.4 + (-21) * 0.13, -21 + (-21) * 0.99, hP + (8 *
F),
499 sprintf(no_Block,
"B12_F%d_B%d", ++
F, ++
N);
500 mBlocks = geom->
MakeBox(no_Block, Iron, 5.8, 22, 2.2);
505 sprintf(no_Block,
"B12_F%d_%d",
F, ++
N);
506 mBlocks = geom->
MakeBox(no_Block, Iron, 5.8, 22, 2);
511 sprintf(no_Block,
"B12_F%d_%d",
F, ++
N);
512 mBlocks = geom->
MakeBox(no_Block, Iron, 2.8, 22, 14);
517 sprintf(no_Block,
"B12_RT%d_%d",
F,
N = 0);
518 mBlocks = geom->
MakeBox(no_Block, Iron, 5.5, 21.75, 0.2);
523 sprintf(no_Block,
"B12_RT%d_%d",
F, ++
N);
524 mBlocks = geom->
MakeBox(no_Block, Iron, 0.23, 21.95, 0.5);
528 sprintf(no_Block,
"B12_RT%d_%d",
F, ++
N);
529 mBlocks = geom->
MakeBox(no_Block, Iron, 0.1, 22, 0.5);
534 sprintf(no_Block,
"B12_RT%d_%d",
F, ++
N);
535 mBlocks = geom->
MakeBox(no_Block, Iron, 0.23, 3.6, 0.5);
540 sprintf(no_Block,
"B12_RT%d_%d",
F, ++
N);
541 mBlocks = geom->
MakeBox(no_Block, Iron, 0.02, 3.8, 0.5);
546 sprintf(no_Block,
"B12_RT%d_%d",
F, ++
N);
547 mBlocks = geom->
MakeBox(no_Block, Iron, 5.7, 0.23, 0.5);
551 sprintf(no_Block,
"B12_RT%d_%d",
F, ++
N);
552 mBlocks = geom->
MakeBox(no_Block, Iron, 5.8, 0.1, 0.5);
558 sprintf(no_Block,
"B12_PF%d",
N = 0);
559 mBlocks = geom->
MakeBox(no_Block, Iron, 1.2, 1.5, 9);
563 sprintf(no_Block,
"B12_PF%d", ++
N);
564 mBlocks = geom->
MakeBox(no_Block, Iron, 1.2, 1.5, 9);
568 sprintf(no_Block,
"B12_PF%d", ++
N);
569 mBlocks = geom->
MakeBox(no_Block, Iron, 1.2, 1.5, 9);
573 sprintf(no_Block,
"B12_PF%d", ++
N);
574 mBlocks = geom->
MakeBox(no_Block, Iron, 1.2, 1.5, 11);
578 sprintf(no_Block,
"B12_PF%d", ++
N);
579 mBlocks = geom->
MakeBox(no_Block, Iron, 1.2, 1.5, 11);
583 sprintf(no_Block,
"B12_PF%d", ++
N);
584 mBlocks = geom->
MakeBox(no_Block, Iron, 0.5, 15.75, 2);
588 sprintf(no_Block,
"B12_PF%d", ++
N);
589 mBlocks = geom->
MakeBox(no_Block, Iron, 0.5, 2, 4);
593 sprintf(no_Block,
"B12_PF%d", ++
N);
594 mBlocks = geom->
MakeBox(no_Block, Iron, 1.5, 15.75, 2);
598 sprintf(no_Block,
"B12_RT%d_%d",
F, ++
N);
599 mBlocks = geom->
MakeBox(no_Block, Iron, 5.8, 0.5, 4);
604 sprintf(no_Block,
"B12_PF%d", ++
N);
605 mBlocks = geom->
MakeBox(no_Block, Iron, 3, 0.5, 3.25);
610 sprintf(no_Block,
"B12_PF%d", ++
N);
611 mBlocks = geom->
MakeBox(no_Block, Iron, 0.5, 6.25, 1.625);
615 sprintf(no_Block,
"B1_PF%d", ++
N);
616 mBlocks = geom->
MakeTrd1(no_Block, Iron, 3.25, 0, 0.5, 6.25);
621 sprintf(no_Block,
"B12_PF%d", ++
N);
622 mBlocks = geom->
MakeBox(no_Block, Iron, 3, 3, 0.5);
626 sprintf(no_Block,
"B12_PF%d", ++
N);
627 mBlocks = geom->
MakeBox(no_Block, Iron, 2.5, 3, 0.5);
631 sprintf(no_Block,
"B12_PF%d", ++
N);
632 mBlocks = geom->
MakeBox(no_Block, Iron, 2.5, 3, 0.5);
636 sprintf(no_Block,
"B12_PF%d", ++
N);
637 mBlocks = geom->
MakeBox(no_Block, Iron, 2.5, 3, 0.5);
643 sprintf(no_Block,
"B12_GR%d",
N = 0);
644 mBlocks = geom->
MakeBox(no_Block, Iron, 4.8, 21, 1);
648 sprintf(no_Block,
"B12_GR%d", ++
N);
649 mBlocks = geom->
MakeBox(no_Block, Iron, 5.8, 18, 9);
653 sprintf(no_Block,
"B12_GR%d", ++
N);
654 mBlocks = geom->
MakeBox(no_Block, Iron, 4.8, 22, 2);
658 sprintf(no_Block,
"B12_GR%d_%d",
F, ++
N);
659 mBlocks = geom->
MakeBox(no_Block, Iron, 4.8, 22, 1.95);
662 sprintf(no_Block,
"B12_GR%d_%d",
F, ++
N);
663 mBlocks = geom->
MakeBox(no_Block, Iron, 4.8, 22, 0.05);
674 sprintf(no_Block,
"B2_F%d", 6);
675 mBlocks = geom->
MakeBox(no_Block, Iron, 7, 17.5, 2);
681 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
682 mBlocks = geom->
MakeBox(no_Block, Iron, 0.8, 4, 4);
686 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
687 mBlocks = geom->
MakeBox(no_Block, Iron, 1.1, 3.5, 1);
690 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
691 mBlocks = geom->
MakeBox(no_Block, Iron, 1.1, 4.5, 0.2);
694 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
695 mBlocks = geom->
MakeBox(no_Block, Iron, 1.1, 4, 2.8);
699 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
700 mBlocks = geom->
MakeBox(no_Block, Iron, 0.7, 4, 4);
704 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
705 mBlocks = geom->
MakeBox(no_Block, Iron, 1.1, 3.5, 1);
708 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
709 mBlocks = geom->
MakeBox(no_Block, Iron, 1.1, 4.5, 0.2);
712 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
713 mBlocks = geom->
MakeBox(no_Block, Iron, 1.1, 4, 2.8);
717 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
718 mBlocks = geom->
MakeBox(no_Block, Iron, 0.7, 4, 4);
723 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
724 mBlocks = geom->
MakeBox(no_Block, Iron, 1.3, 13.5, 1.5);
727 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
728 mBlocks = geom->
MakeBox(no_Block, Iron, 1.3, 14, 0.2);
731 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
732 mBlocks = geom->
MakeBox(no_Block, Iron, 1.3, 13.5, 2.3);
736 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
737 mBlocks = geom->
MakeBox(no_Block, Iron, 3.7, 13, 1.5);
740 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
741 mBlocks = geom->
MakeBox(no_Block, Iron, 3.7, 14, 0.2);
744 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
745 mBlocks = geom->
MakeBox(no_Block, Iron, 3.7, 13.5, 2.3);
750 sprintf(no_Block,
"B2_F%d_%d", 0, 1);
751 mBlocks = geom->
MakeBox(no_Block, Iron, 5, 13.5, 6);
754 sprintf(no_Block,
"B2_F%d_%d", 0, 2);
755 mBlocks = geom->
MakeBox(no_Block, Iron, 5, 13.5, 4);
758 sprintf(no_Block,
"B2_F%d_%d", 0, 3);
759 mBlocks = geom->
MakeBox(no_Block, Iron, 5, 13.5, 4);
764 sprintf(no_Block,
"B2_F%d", ++
N);
765 mBlocks = geom->
MakeBox(no_Block, Iron, 7, 17.4, 0.1);
769 sprintf(no_Block,
"B2_F%d", ++
N);
770 mBlocks = geom->
MakeBox(no_Block, Iron, 4.5, 0.2, 0.5);
773 sprintf(no_Block,
"B2_F%d", ++
N);
774 mBlocks = geom->
MakeBox(no_Block, Iron, 4.5, 0.05, 0.5);
778 sprintf(no_Block,
"B2_F%d", ++
N);
779 mBlocks = geom->
MakeBox(no_Block, Iron, 4.75, 0.2, 0.5);
782 sprintf(no_Block,
"B2_F%d", ++
N);
783 mBlocks = geom->
MakeBox(no_Block, Iron, 4.55, 0.05, 0.5);
795 sprintf(no_Block,
"B3_F0%d", 7);
796 mBlocks = geom->
MakeBox(no_Block, Iron, 3, 36, 2);
804 sprintf(no_Block,
"B3_F%d_%d",
F, ++
N);
805 mBlocks = geom->
MakeBox(no_Block, Iron, 4, 36, 0.2);
810 sprintf(no_Block,
"B3_F%d_%d",
F, ++
N);
811 mBlocks = geom->
MakeBox(no_Block, Iron, 2.5, 5, 1.8);
815 sprintf(no_Block,
"B3_F%d_%d",
F, ++
N);
816 mBlocks = geom->
MakeBox(no_Block, Iron, 2.8, 1, 1.8);
821 sprintf(no_Block,
"B3_F%d_%d",
F, ++
N);
822 mBlocks = geom->
MakeBox(no_Block, Iron, 3, 36, 2);
827 sprintf(no_Block,
"B3_F0%d", 1);
828 mBlocks = geom->
MakeBox(no_Block, Iron, 2.8, 36, 2);
831 sprintf(no_Block,
"B3_F0%d", 2);
832 mBlocks = geom->
MakeBox(no_Block, Iron, 2.8, 36, 2);
836 sprintf(no_Block,
"B3_F0%d", 3);
837 mBlocks = geom->
MakeBox(no_Block, Iron, 2.8, 36, 4);
841 sprintf(no_Block,
"B3_F0%d", 4);
842 mBlocks = geom->
MakeBox(no_Block, Iron, 2.8, 36, 4);
851 sprintf(no_Block,
"B3_F0%d", 61);
852 mBlocks = geom->
MakeBox(no_Block, Iron, 3, 8, 2);
856 sprintf(no_Block,
"B3_F0%d", 62);
857 mBlocks = geom->
MakeBox(no_Block, Iron, 0.5, 8, 24);
860 sprintf(no_Block,
"B3_F0%d", 63);
861 mBlocks = geom->
MakeBox(no_Block, Iron, 2, 7, 24);
864 sprintf(no_Block,
"B3_F0%d", 64);
865 mBlocks = geom->
MakeBox(no_Block, Iron, 0.5, 8, 24);
869 sprintf(no_Block,
"B3_F0%d", 65);
870 mBlocks = geom->
MakeBox(no_Block, Iron, 3, 8, 4);
878 sprintf(no_Block,
"B3_F2%d", 7);
879 mBlocks = geom->
MakeBox(no_Block, Iron, 7, 40.5, 2);
883 for (
F = 0;
F < nF;
F++) {
885 for (i = 0; i < nW; i++) {
886 sprintf(no_Block,
"B3_F2%d_%d",
F, ++
N);
887 mBlocks = geom->
MakeBox(no_Block, Iron, 6, 2.35, 2);
890 sprintf(no_Block,
"B3_F2%d_%d",
F, ++
N);
891 mBlocks = geom->
MakeBox(no_Block, Iron, 6.5, 0.3, 2);
894 sprintf(no_Block,
"B3_F2%d_%d",
F, ++
N);
895 mBlocks = geom->
MakeBox(no_Block, Iron, 6, 2.35, 2);
899 sprintf(no_Block,
"B3_F2%d_%d",
F, ++
N);
900 mBlocks = geom->
MakeBox(no_Block, Iron, 7, 1, 2);
905 sprintf(no_Block,
"B3_F2%d_%d",
F, ++
N);
906 mBlocks = geom->
MakeBox(no_Block, Iron, 6.8, 36, 0.3);
910 sprintf(no_Block,
"B3_F2%d_%d",
F, ++
N);
911 mBlocks = geom->
MakeBox(no_Block, Iron, 7, 36, 2);
915 for (
int i = 0; i < 4; i++) {
916 sprintf(no_Block,
"B3_F2%d_%d",
F, ++
N);
917 mBlocks = geom->
MakeBox(no_Block, Iron, 7, 0.5, 1.4);
921 sprintf(no_Block,
"B3_F2%d_%d",
F, ++
N);
922 mBlocks = geom->
MakeBox(no_Block, Iron, 6, 0.7, 1.4);
926 sprintf(no_Block,
"B3_F2%d_%d",
F, ++
N);
927 mBlocks = geom->
MakeBox(no_Block, Iron, 7, 1.6, 1.4);
931 sprintf(no_Block,
"B3_F2%d_%d",
F, ++
N);
932 mBlocks = geom->
MakeBox(no_Block, Iron, 6, 0.7, 1.4);
937 sprintf(no_Block,
"B3_F2%d_%d",
F, ++
N);
938 mBlocks = geom->
MakeBox(no_Block, Iron, 7, 3.5, 2.6);
943 sprintf(no_Block,
"B3_F2%d", 71);
944 mBlocks = geom->
MakeBox(no_Block, Iron, 7, 40.5, 4);
948 sprintf(no_Block,
"B3_F2%d", 72);
949 mBlocks = geom->
MakeBox(no_Block, Iron, 7, 2, 30);
953 sprintf(no_Block,
"B3_F2%d", 73);
954 mBlocks = geom->
MakeBox(no_Block, Iron, 7, 1, 30);
959 sprintf(no_Block,
"B3_RT%d",
N = 0);
960 mBlocks = geom->
MakeBox(no_Block, Iron, 7, 42.25, 0.1);
963 sprintf(no_Block,
"B3_RT%d", ++
N);
964 mBlocks = geom->
MakeBox(no_Block, Iron, 2.75, 41.75, 0.1);
968 sprintf(no_Block,
"B3_RT%d", ++
N);
969 mBlocks = geom->
MakeBox(no_Block, Iron, 0.24, 41.99, 0.5);
972 sprintf(no_Block,
"B3_RT%d", ++
N);
973 mBlocks = geom->
MakeBox(no_Block, Iron, 0.01, 42, 0.5);
977 sprintf(no_Block,
"B3_RT%d", ++
N);
978 mBlocks = geom->
MakeBox(no_Block, Iron, 0.24, 3.99, 0.5);
981 sprintf(no_Block,
"B3_RT%d", ++
N);
982 mBlocks = geom->
MakeBox(no_Block, Iron, 0.01, 4, 0.5);
986 sprintf(no_Block,
"B3_RT%d", ++
N);
987 mBlocks = geom->
MakeBox(no_Block, Iron, 2.99, 0.24, 0.5);
990 sprintf(no_Block,
"B3_RT%d", ++
N);
991 mBlocks = geom->
MakeBox(no_Block, Iron, 3, 0.01, 0.5);
995 sprintf(no_Block,
"B3_RT%d", ++
N);
996 mBlocks = geom->
MakeBox(no_Block, Iron, 0.24, 42.49, 0.5);
999 sprintf(no_Block,
"B3_RT%d", ++
N);
1000 mBlocks = geom->
MakeBox(no_Block, Iron, 0.01, 42.5, 0.5);
1005 sprintf(no_Block,
"B3_RT%d", ++
N);
1006 mBlocks = geom->
MakeBox(no_Block, Iron, 6.99, 0.24, 0.5);
1009 sprintf(no_Block,
"B3_RT%d", ++
N);
1010 mBlocks = geom->
MakeBox(no_Block, Iron, 7, 0.01, 0.5);
1014 sprintf(no_Block,
"B3_RT%d", ++
N);
1015 mBlocks = geom->
MakeBox(no_Block, Iron, 7, 0.25, 0.5);
1018 sprintf(no_Block,
"B3_RT%d", ++
N);
1019 mBlocks = geom->
MakeBox(no_Block, Iron, 7, 0.01, 0.5);
1025 for (i = 0; i < 6; i++) {
1026 sprintf(no_Block,
"B3_PF%d", ++
N);
1027 mBlocks = geom->
MakeBox(no_Block, Iron, 1.2, 1.5, 12);
1031 sprintf(no_Block,
"B3_PF%d", ++
N);
1032 mBlocks = geom->
MakeBox(no_Block, Iron, 1.5, 40, 2);
1037 sprintf(no_Block,
"B3_ST%d",
N = 0);
1038 mBlocks = geom->
MakeBox(no_Block, Iron, 0.5, 7, 5);
1042 for (
int i = 0; i < 5; i++) {
1043 sprintf(no_Block,
"B3_ST%d", ++
N);
1044 mBlocks = geom->
MakeBox(no_Block, Iron, 3, 5, 0.5);
1055 for (
int F = 0;
F < 5;
F++) {
1057 sprintf(no_Block,
"B4_LF%d_%d",
F, ++
N);
1058 mBlocks = geom->
MakeBox(no_Block, Iron, 5.5, 12.5, 2.3);
1062 sprintf(no_Block,
"B4_LF%d_%d",
F, ++
N);
1063 mBlocks = geom->
MakeBox(no_Block, Iron, 5.5, 2, 1.7);
1067 sprintf(no_Block,
"B4_LF%d_%d",
F, ++
N);
1068 mBlocks = geom->
MakeBox(no_Block, Iron, 5, 10.5, 1.7);
1073 sprintf(no_Block,
"B4_LF%d_%d", 9,
N = 0);
1074 mBlocks = geom->
MakeBox(no_Block, Iron, 5.5, 12.5, 6);
1078 sprintf(no_Block,
"B4_LF%d_%d", 9, ++
N);
1079 mBlocks = geom->
MakeBox(no_Block, Iron, 5.5, 2, 4.5);
1082 sprintf(no_Block,
"B4_LF%d_%d", 9, ++
N);
1083 mBlocks = geom->
MakeBox(no_Block, Iron, 5, 10.5, 4.5);
1087 sprintf(no_Block,
"B4_LF%d_%d", 9, ++
N);
1088 mBlocks = geom->
MakeBox(no_Block, Iron, 5.5, 12.5, 5);
1093 sprintf(no_Block,
"B4_RS%d", ++
N);
1094 mBlocks = geom->
MakeBox(no_Block, Iron, 4.25, 11, 24);
1097 sprintf(no_Block,
"B4_RS%d", ++
N);
1098 mBlocks = geom->
MakeBox(no_Block, Iron, 0.25, 4, 32);
1102 sprintf(no_Block,
"B4_RS%d", ++
N);
1103 mBlocks = geom->
MakeBox(no_Block, Iron, 4.5, 2, 1.8);
1106 sprintf(no_Block,
"B4_RS%d", ++
N);
1107 mBlocks = geom->
MakeBox(no_Block, Iron, 5.5, 3.5, 5);
1110 sprintf(no_Block,
"B4_RS%d", ++
N);
1111 mBlocks = geom->
MakeBox(no_Block, Iron, 6, 2, 0.3);
1114 sprintf(no_Block,
"B4_RS%d", ++
N);
1115 mBlocks = geom->
MakeBox(no_Block, Iron, 4, 2, 1.5);
1118 sprintf(no_Block,
"B4_RS%d", ++
N);
1119 mBlocks = geom->
MakeBox(no_Block, Iron, 4.5, 7, 1.8);
1123 sprintf(no_Block,
"B4_RS%d", ++
N);
1124 mBlocks = geom->
MakeBox(no_Block, Iron, 4.5, 11, 1.8);
1128 sprintf(no_Block,
"B4_RS%d", ++
N);
1129 mBlocks = geom->
MakeBox(no_Block, Iron, 4.25, 1.5, 2);
1132 sprintf(no_Block,
"B4_RS%d", ++
N);
1133 mBlocks = geom->
MakeBox(no_Block, Iron, 4, 2, 2);
1136 sprintf(no_Block,
"B4_RS%d", ++
N);
1137 mBlocks = geom->
MakeBox(no_Block, Iron, 4.5, 7, 2);
1141 sprintf(no_Block,
"B4_RS%d", ++
N);
1142 mBlocks = geom->
MakeBox(no_Block, Iron, 4.5, 11, 2.4);
1147 sprintf(no_Block,
"B4_RT%d",
N = 0);
1148 mBlocks = geom->
MakeBox(no_Block, Iron, 4.25, 10.9, 0.2);
1151 sprintf(no_Block,
"B4_RT%d", ++
N);
1152 mBlocks = geom->
MakeBox(no_Block, Iron, 5.25, 12.4, 0.2);
1156 sprintf(no_Block,
"B4_RT%d", ++
N);
1157 mBlocks = geom->
MakeBox(no_Block, Iron, 0.24, 12.4, 0.5);
1160 sprintf(no_Block,
"B4_RT%d", ++
N);
1161 mBlocks = geom->
MakeBox(no_Block, Iron, 0.01, 12.4, 0.5);
1165 sprintf(no_Block,
"B4_RT%d", ++
N);
1166 mBlocks = geom->
MakeBox(no_Block, Iron, 0.24, 13, 0.5);
1169 sprintf(no_Block,
"B4_RT%d", ++
N);
1170 mBlocks = geom->
MakeBox(no_Block, Iron, 0.01, 13, 0.5);
1174 sprintf(no_Block,
"B4_RT%d", ++
N);
1175 mBlocks = geom->
MakeBox(no_Block, Iron, 8.75, 0.24, 0.5);
1178 sprintf(no_Block,
"B4_RT%d", ++
N);
1179 mBlocks = geom->
MakeBox(no_Block, Iron, 8.75, 0.01, 0.5);
1183 sprintf(no_Block,
"B4_RT%d", ++
N);
1184 mBlocks = geom->
MakeBox(no_Block, Iron, 5.25, 0.24, 0.5);
1187 sprintf(no_Block,
"B4_RT%d", ++
N);
1188 mBlocks = geom->
MakeBox(no_Block, Iron, 5.5, 0.01, 0.5);
1192 sprintf(no_Block,
"B4_RT%d", ++
N);
1193 mBlocks = geom->
MakeBox(no_Block, Iron, 3.5, 0.24, 0.5);
1196 sprintf(no_Block,
"B4_RT%d", ++
N);
1197 mBlocks = geom->
MakeBox(no_Block, Iron, 3.5, 0.01, 0.5);
1205 sprintf(no_Block,
"GRD%d", ++
N);
1206 mBlocks = geom->
MakeBox(no_Block, Iron, 40, 90, 2);
1210 sprintf(no_Block,
"GRD%d", ++
N);
1211 mBlocks = geom->
MakeBox(no_Block, Iron, 30, 30, 2);
1218 Phy_Building->
Draw(
"ogl");
Class describing rotation + translation.
The manager class for any TGeo geometry.
void CloseGeometry(Option_t *option="d")
Closing geometry implies checking the geometry validity, fixing shapes with negative parameters (run-...
TGeoVolume * MakeBox(const char *name, TGeoMedium *medium, Double_t dx, Double_t dy, Double_t dz)
Make in one step a volume pointing to a box shape with given medium.
TGeoVolume * MakeTrd1(const char *name, TGeoMedium *medium, Double_t dx1, Double_t dx2, Double_t dy, Double_t dz)
Make in one step a volume pointing to a TGeoTrd1 shape with given medium.
void SetTopVolume(TGeoVolume *vol)
Set the top volume and corresponding node as starting point of the geometry.
void SetTopVisible(Bool_t vis=kTRUE)
make top volume visible on screen
TGeoVolume * MakeTubs(const char *name, TGeoMedium *medium, Double_t rmin, Double_t rmax, Double_t dz, Double_t phi1, Double_t phi2)
Make in one step a volume pointing to a tube segment shape with given medium.
Base class describing materials.
Media are used to store properties related to tracking and which are useful only when using geometry ...
Class describing rotations.
Class describing translations.
TGeoVolume, TGeoVolumeMulti, TGeoVolumeAssembly are the volume classes.
void SetVisibility(Bool_t vis=kTRUE) override
set visibility of this volume
void Draw(Option_t *option="") override
draw top volume according to option
virtual void AddNodeOverlap(TGeoVolume *vol, Int_t copy_no, TGeoMatrix *mat=nullptr, Option_t *option="")
Add a TGeoNode to the list of nodes.
void SetLineColor(Color_t lcolor) override
Set the line color.