61 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
62 mBlocks = geom->
MakeTubs(no_Block,Iron,21,29,1.8,sP,sP+6.25);
67 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
68 mBlocks = geom->
MakeTubs(no_Block,Iron,21,30,1.8,sP,sP+2.5);
72 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
73 mBlocks = geom->
MakeTubs(no_Block,Iron,21,31,1.8,sP,sP+1);
77 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
78 mBlocks = geom->
MakeTubs(no_Block,Iron,21,30,1.8,sP,sP+1);
82 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
83 mBlocks = geom->
MakeTubs(no_Block,Iron,21,31,1.8,sP,sP+1);
87 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
88 mBlocks = geom->
MakeTubs(no_Block,Iron,21,30,1.8,sP,sP+2.5);
94 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
95 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);
122 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
123 mBlocks = geom->
MakeTubs(no_Block,Iron,18.5,21,2,92,102);
126 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
127 mBlocks = geom->
MakeTubs(no_Block,Iron,18.5,21,3.2,92,102);
131 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
132 mBlocks = geom->
MakeTubs(no_Block,Iron,21,30,2,0,103);
136 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
137 mBlocks = geom->
MakeTubs(no_Block,Iron,18,21,2,0,102);
141 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
142 mBlocks = geom->
MakeTubs(no_Block,Iron,18,18.5,14,92,103);
147 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
148 mBlocks = geom->
MakeTubs(no_Block,Iron,21,29,2,0,97);
152 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
153 mBlocks = geom->
MakeTubs(no_Block,Iron,21,32,2,37,97);
157 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
158 mBlocks = geom->
MakeTubs(no_Block,Iron,21,29,1.95,0,37);
161 sprintf(no_Block,
"B1_F%d_%d",
F, ++
N);
162 mBlocks = geom->
MakeTubs(no_Block,Iron,21,29,0.05,0,37);
168 sprintf(no_Block,
"B1_RT%d",
N = 0);
169 mBlocks = geom->
MakeTubs(no_Block,Iron,21,29.5,0.2,0,102);
172 sprintf(no_Block,
"B1_RT%d", ++
N);
173 mBlocks = geom->
MakeTubs(no_Block,Iron,18.5,21,0.2,0,101);
177 sprintf(no_Block,
"B1_RT%d", ++
N);
178 mBlocks = geom->
MakeTubs(no_Block,Iron,21,30,0.7,102.9,103);
181 sprintf(no_Block,
"B1_RT%d", ++
N);
182 mBlocks = geom->
MakeTubs(no_Block,Iron,21.1,29.9,0.7,102,102.9);
186 sprintf(no_Block,
"B1_RT%d", ++
N);
187 mBlocks = geom->
MakeTubs(no_Block,Iron,21.1,21.5,0.5,98,102.9);
190 sprintf(no_Block,
"B1_RT%d", ++
N);
191 mBlocks = geom->
MakeTubs(no_Block,Iron,21,21.1,0.7,98,103);
195 sprintf(no_Block,
"B1_RT%d", ++
N);
196 mBlocks = geom->
MakeTubs(no_Block,Iron,18.6,21,0.7,101.9,102);
199 sprintf(no_Block,
"B1_RT%d", ++
N);
200 mBlocks = geom->
MakeTubs(no_Block,Iron,18.6,21,0.7,101,101.9);
204 sprintf(no_Block,
"B1_RT%d", ++
N);
205 mBlocks = geom->
MakeTubs(no_Block,Iron,29.5,29.9,0.5,0,102);
208 sprintf(no_Block,
"B1_RT%d", ++
N);
209 mBlocks = geom->
MakeTubs(no_Block,Iron,29.9,30,0.5,0,103);
213 sprintf(no_Block,
"B1_RT%d", ++
N);
214 mBlocks = geom->
MakeTubs(no_Block,Iron,18.1,18.5,0.5,-1,101.9);
217 sprintf(no_Block,
"B1_RT%d", ++
N);
218 mBlocks = geom->
MakeTubs(no_Block,Iron,18,18.1,0.5,-0.5,102);
222 sprintf(no_Block,
"B1_RT%d", ++
N);
223 mBlocks = geom->
MakeTubs(no_Block,Iron,18.1,18.4,0.5,101.9,102.9);
226 sprintf(no_Block,
"B1_RT%d", ++
N);
227 mBlocks = geom->
MakeTubs(no_Block,Iron,18,18.1,0.5,102,103);
230 sprintf(no_Block,
"B1_RT%d", ++
N);
231 mBlocks = geom->
MakeTubs(no_Block,Iron,18.4,18.5,0.5,102,103);
234 sprintf(no_Block,
"B1_RT%d", ++
N);
235 mBlocks = geom->
MakeTubs(no_Block,Iron,18,18.5,0.5,102.9,103);
241 sprintf(no_Block,
"B1_WW%d",
N = 0);
242 mBlocks = geom->
MakeTubs(no_Block,Iron,20.8,31,19.5,sP,sP+1);
246 sprintf(no_Block,
"B1_WW%d", ++
N);
247 mBlocks = geom->
MakeTubs(no_Block,Iron,26.8,31,5,sP,sP+1);
251 sprintf(no_Block,
"B1_WW%d", ++
N);
252 mBlocks = geom->
MakeTubs(no_Block,Iron,23,24.3,5,sP,sP+1);
256 sprintf(no_Block,
"B1_WW%d", ++
N);
257 mBlocks = geom->
MakeTubs(no_Block,Iron,20.8,21.3,5,sP,sP+1);
264 sprintf(no_Block,
"B1_ZF%d",
N=0);
265 mBlocks = geom->
MakeTubs(no_Block,Iron,0,21,9,0,92);
269 sprintf(no_Block,
"B1_ZF%d",++
N);
270 mBlocks = geom->
MakeTubs(no_Block,Iron,18,21,7.5,0,92);
274 sprintf(no_Block,
"B1_ZF%d",++
N);
275 mBlocks = geom->
MakeTubs(no_Block,Iron,18,21,4.5,0,92);
279 sprintf(no_Block,
"B1_ZF%d",++
N);
280 mBlocks = geom->
MakeTubs(no_Block,Iron,0,18,0.2,0,101);
283 sprintf(no_Block,
"B1_ZF%d",++
N);
284 mBlocks = geom->
MakeTubs(no_Block,Iron,0,18,1.7,0,100);
287 sprintf(no_Block,
"B1_ZF%d",++
N);
288 mBlocks = geom->
MakeTubs(no_Block,Iron,0,18,1.2,101,101.9);
291 sprintf(no_Block,
"B1_ZF%d",++
N);
292 mBlocks = geom->
MakeTubs(no_Block,Iron,0,18,1.2,101.9,102);
298 sprintf(no_Block,
"B1_ZF%d", ++
N);
299 mBlocks = geom->
MakeBox(no_Block,Iron,6.5,7,2.5);
303 sprintf(no_Block,
"B1_ZF%d", ++
N);
304 mBlocks = geom->
MakeBox(no_Block,Iron,6.5,7,3);
308 sprintf(no_Block,
"B1_ZF%d", ++
N);
309 mBlocks = geom->
MakeBox(no_Block,Iron,7,0.05,10);
312 sprintf(no_Block,
"B1_ZF%d", ++
N);
313 mBlocks = geom->
MakeBox(no_Block,Iron,6.9,0.20,10);
316 sprintf(no_Block,
"B1_ZF%d", ++
N);
317 mBlocks = geom->
MakeBox(no_Block,Iron,0.1,0.20,10);
321 sprintf(no_Block,
"B1_ZF%d", ++
N);
322 mBlocks = geom->
MakeBox(no_Block,Iron,0.05,7,3.5);
325 sprintf(no_Block,
"B1_ZF%d", ++
N);
326 mBlocks = geom->
MakeBox(no_Block,Iron,0.20,6.9,3.5);
330 sprintf(no_Block,
"B1_ZF%d", ++
N);
331 mBlocks = geom->
MakeBox(no_Block,Iron,0.25,7,4);
335 sprintf(no_Block,
"B1_ZF%d", ++
N);
336 mBlocks = geom->
MakeBox(no_Block,Iron,7,0.05,10);
339 sprintf(no_Block,
"B1_ZF%d", ++
N);
340 mBlocks = geom->
MakeBox(no_Block,Iron,6.9,0.20,10);
343 sprintf(no_Block,
"B1_ZF%d", ++
N);
344 mBlocks = geom->
MakeBox(no_Block,Iron,0.1,0.20,10);
350 sprintf(no_Block,
"B1_ZF%d", ++
N);
351 mBlocks = geom->
MakeBox(no_Block,Iron,5,5,1);
355 sprintf(no_Block,
"B1_ZF%d", ++
N);
356 mBlocks = geom->
MakeBox(no_Block,Iron,5,0.25,1.5);
360 sprintf(no_Block,
"B1_ZF%d", ++
N);
361 mBlocks = geom->
MakeBox(no_Block,Iron,0.25,5.5,1.5);
365 sprintf(no_Block,
"B1_ZF%d", ++
N);
366 mBlocks = geom->
MakeBox(no_Block,Iron,5.5,3.5,5);
372 sprintf(no_Block,
"B1_GRD%d",
N=0);
373 mBlocks = geom->
MakeTubs(no_Block,Iron,0,29,1,0,36.75);
377 sprintf(no_Block,
"B1_GRD%d",++
N);
378 mBlocks = geom->
MakeTubs(no_Block,Iron,0,30.4,0.4,36.75,77.25);
382 sprintf(no_Block,
"B1_GRD%d",++
N);
383 mBlocks = geom->
MakeTubs(no_Block,Iron,0,29.7,0.3,36.75,77.25);
387 sprintf(no_Block,
"B1_GRD%d",++
N);
388 mBlocks = geom->
MakeTubs(no_Block,Iron,0,29,0.3,36.75,77.25);
392 sprintf(no_Block,
"B1_GRD%d",++
N);
393 mBlocks = geom->
MakeTubs(no_Block,Iron,0,29,1,77.25,97);
399 sprintf(no_Block,
"B1_PF%d",
N = 0);
400 mBlocks = geom->
MakeBox(no_Block,Iron,1.2,1.5,9);
404 sprintf(no_Block,
"B1_PF%d", ++
N);
405 mBlocks = geom->
MakeBox(no_Block,Iron,1.2,1.5,9);
409 sprintf(no_Block,
"B1_PF%d", ++
N);
410 mBlocks = geom->
MakeBox(no_Block,Iron,1.2,1.5,9);
414 sprintf(no_Block,
"B1_PF%d", ++
N);
415 mBlocks = geom->
MakeBox(no_Block,Iron,1.2,1.5,9);
419 sprintf(no_Block,
"B1_PF%d",++
N);
420 mBlocks = geom->
MakeTubs(no_Block,Iron,29,30,2,0,36.75);
424 sprintf(no_Block,
"B1_PF%d", ++
N);
425 mBlocks = geom->
MakeBox(no_Block,Iron,3,2,2);
429 sprintf(no_Block,
"B1_PF%d", ++
N);
430 mBlocks = geom->
MakeBox(no_Block,Iron,0.25,4.3,1.5);
434 sprintf(no_Block,
"B1_PF%d", ++
N);
435 mBlocks = geom->
MakeBox(no_Block,Iron,5.25,4.3,0.4);
439 sprintf(no_Block,
"B1_PF%d", ++
N);
440 mBlocks = geom->
MakeBox(no_Block,Iron,5.5,0.25,0.75);
444 sprintf(no_Block,
"B1_PF%d", ++
N);
445 mBlocks = geom->
MakeTrd1(no_Block,Iron,1.5,0,0.25,5.5);
463 N = 0; i = 0; nW = 7;
466 sprintf(no_Block,
"B12_F%d_B%d",
F, ++
N);
467 mBlocks = geom->
MakeBox(no_Block,Iron,3.8,0.35,1.8);
470 new TGeoCombiTrans(23.38 + (21.65-6*i)*0.13,-21.2 + (21.65-6*i)*0.99,hP+(8*
F),
472 sprintf(no_Block,
"B12_F%d_B%d",
F, ++
N);
473 mBlocks = geom->
MakeBox(no_Block,Iron,4.8,0.3,1.8);
476 new TGeoCombiTrans(23.38 + (21.0-6*i)*0.13,-21.2 + (21-6*i)*0.99,hP+(8*
F),
478 sprintf(no_Block,
"B12_F%d_B%d",
F, ++
N);
479 mBlocks = geom->
MakeBox(no_Block,Iron,3.8,0.3,1.8);
482 new TGeoCombiTrans(23.38 + (20.4-6*i)*0.13,-21.2 + (20.4-6*i)*0.99,hP+(8*
F),
484 sprintf(no_Block,
"B12_F%d_B%d",
F, ++
N);
485 mBlocks = geom->
MakeBox(no_Block,Iron,4.8,0.3,1.8);
488 new TGeoCombiTrans(23.38 + (19.7-6*i)*0.13,-21.2 + (19.7-6*i)*0.99,hP+(8*
F),
490 sprintf(no_Block,
"B12_F%d_B%d",
F, ++
N);
491 mBlocks = geom->
MakeBox(no_Block,Iron,3.8,0.35,1.8);
494 new TGeoCombiTrans(23.38 + (19.05-6*i)*0.13,-21.2 + (19.05-6*i)*0.99,hP+(8*
F),
498 sprintf(no_Block,
"B12_F%d_B%d",
F, ++
N);
499 mBlocks = geom->
MakeBox(no_Block,Iron,3,1.4,1.8);
502 new TGeoCombiTrans(23.38 + (17.4-6*i)*0.13,-21.2 + (17.4-6*i)*0.99,hP+(8*
F),
506 sprintf(no_Block,
"B12_F%d_B%d",
F, ++
N);
507 mBlocks = geom->
MakeBox(no_Block,Iron,5.8,1,1.8);
515 sprintf(no_Block,
"B12_F%d_B%d",++
F, ++
N);
516 mBlocks = geom->
MakeBox(no_Block,Iron,5.8,22,2.2);
521 sprintf(no_Block,
"B12_F%d_%d",
F, ++
N);
522 mBlocks = geom->
MakeBox(no_Block,Iron,5.8,22,2);
526 sprintf(no_Block,
"B12_F%d_%d",
F, ++
N);
527 mBlocks = geom->
MakeBox(no_Block,Iron,2.8,22,14);
533 sprintf(no_Block,
"B12_RT%d_%d",
F,
N=0);
534 mBlocks = geom->
MakeBox(no_Block,Iron,5.5,21.75,0.2);
538 sprintf(no_Block,
"B12_RT%d_%d",
F, ++
N);
539 mBlocks = geom->
MakeBox(no_Block,Iron,0.23,21.95,0.5);
542 sprintf(no_Block,
"B12_RT%d_%d",
F, ++
N);
543 mBlocks = geom->
MakeBox(no_Block,Iron,0.1,22,0.5);
548 sprintf(no_Block,
"B12_RT%d_%d",
F, ++
N);
549 mBlocks = geom->
MakeBox(no_Block,Iron,0.23,3.6,0.5);
553 sprintf(no_Block,
"B12_RT%d_%d",
F, ++
N);
554 mBlocks = geom->
MakeBox(no_Block,Iron,0.02,3.8,0.5);
560 sprintf(no_Block,
"B12_RT%d_%d",
F, ++
N);
561 mBlocks = geom->
MakeBox(no_Block,Iron,5.7,0.23,0.5);
564 sprintf(no_Block,
"B12_RT%d_%d",
F, ++
N);
565 mBlocks = geom->
MakeBox(no_Block,Iron,5.8,0.1,0.5);
571 sprintf(no_Block,
"B12_PF%d",
N = 0);
572 mBlocks = geom->
MakeBox(no_Block,Iron,1.2,1.5,9);
576 sprintf(no_Block,
"B12_PF%d", ++
N);
577 mBlocks = geom->
MakeBox(no_Block,Iron,1.2,1.5,9);
581 sprintf(no_Block,
"B12_PF%d", ++
N);
582 mBlocks = geom->
MakeBox(no_Block,Iron,1.2,1.5,9);
586 sprintf(no_Block,
"B12_PF%d", ++
N);
587 mBlocks = geom->
MakeBox(no_Block,Iron,1.2,1.5,11);
591 sprintf(no_Block,
"B12_PF%d", ++
N);
592 mBlocks = geom->
MakeBox(no_Block,Iron,1.2,1.5,11);
598 sprintf(no_Block,
"B12_PF%d", ++
N);
599 mBlocks = geom->
MakeBox(no_Block,Iron,0.5,15.75,2);
603 sprintf(no_Block,
"B12_PF%d", ++
N);
604 mBlocks = geom->
MakeBox(no_Block,Iron,0.5,2,4);
608 sprintf(no_Block,
"B12_PF%d", ++
N);
609 mBlocks = geom->
MakeBox(no_Block,Iron,1.5,15.75,2);
613 sprintf(no_Block,
"B12_RT%d_%d",
F, ++
N);
614 mBlocks = geom->
MakeBox(no_Block,Iron,5.8,0.5,4);
620 sprintf(no_Block,
"B12_PF%d", ++
N);
621 mBlocks = geom->
MakeBox(no_Block,Iron,3,0.5,3.25);
625 sprintf(no_Block,
"B12_PF%d", ++
N);
626 mBlocks = geom->
MakeBox(no_Block,Iron,0.5,6.25,1.625);
629 sprintf(no_Block,
"B1_PF%d", ++
N);
630 mBlocks = geom->
MakeTrd1(no_Block,Iron,3.25,0,0.5,6.25);
635 sprintf(no_Block,
"B12_PF%d", ++
N);
636 mBlocks = geom->
MakeBox(no_Block,Iron,3,3,0.5);
639 sprintf(no_Block,
"B12_PF%d", ++
N);
640 mBlocks = geom->
MakeBox(no_Block,Iron,2.5,3,0.5);
643 sprintf(no_Block,
"B12_PF%d", ++
N);
644 mBlocks = geom->
MakeBox(no_Block,Iron,2.5,3,0.5);
647 sprintf(no_Block,
"B12_PF%d", ++
N);
648 mBlocks = geom->
MakeBox(no_Block,Iron,2.5,3,0.5);
655 sprintf(no_Block,
"B12_GR%d",
N=0);
656 mBlocks = geom->
MakeBox(no_Block,Iron,4.8,21,1);
660 sprintf(no_Block,
"B12_GR%d", ++
N);
661 mBlocks = geom->
MakeBox(no_Block,Iron,5.8,18,9);
665 sprintf(no_Block,
"B12_GR%d", ++
N);
666 mBlocks = geom->
MakeBox(no_Block,Iron,4.8,22,2);
670 sprintf(no_Block,
"B12_GR%d_%d",
F, ++
N);
671 mBlocks = geom->
MakeBox(no_Block,Iron,4.8,22,1.95);
674 sprintf(no_Block,
"B12_GR%d_%d",
F, ++
N);
675 mBlocks = geom->
MakeBox(no_Block,Iron,4.8,22,0.05);
691 sprintf(no_Block,
"B2_F%d", 6);
692 mBlocks = geom->
MakeBox(no_Block,Iron,7,17.5,2);
698 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
699 mBlocks = geom->
MakeBox(no_Block,Iron,0.8,4,4);
703 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
704 mBlocks = geom->
MakeBox(no_Block,Iron,1.1,3.5,1);
707 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
708 mBlocks = geom->
MakeBox(no_Block,Iron,1.1,4.5,0.2);
711 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
712 mBlocks = geom->
MakeBox(no_Block,Iron,1.1,4,2.8);
716 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
717 mBlocks = geom->
MakeBox(no_Block,Iron,0.7,4,4);
721 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
722 mBlocks = geom->
MakeBox(no_Block,Iron,1.1,3.5,1);
725 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
726 mBlocks = geom->
MakeBox(no_Block,Iron,1.1,4.5,0.2);
729 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
730 mBlocks = geom->
MakeBox(no_Block,Iron,1.1,4,2.8);
734 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
735 mBlocks = geom->
MakeBox(no_Block,Iron,0.7,4,4);
741 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
742 mBlocks = geom->
MakeBox(no_Block,Iron,1.3,13.5,1.5);
745 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
746 mBlocks = geom->
MakeBox(no_Block,Iron,1.3,14,0.2);
749 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
750 mBlocks = geom->
MakeBox(no_Block,Iron,1.3,13.5,2.3);
756 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
757 mBlocks = geom->
MakeBox(no_Block,Iron,3.7,13,1.5);
760 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
761 mBlocks = geom->
MakeBox(no_Block,Iron,3.7,14,0.2);
764 sprintf(no_Block,
"B2_F%d_%d",
F, ++
N);
765 mBlocks = geom->
MakeBox(no_Block,Iron,3.7,13.5,2.3);
773 sprintf(no_Block,
"B2_F%d_%d", 0,1);
774 mBlocks = geom->
MakeBox(no_Block,Iron,5,13.5,6);
777 sprintf(no_Block,
"B2_F%d_%d", 0,2);
778 mBlocks = geom->
MakeBox(no_Block,Iron,5,13.5,4);
781 sprintf(no_Block,
"B2_F%d_%d", 0,3);
782 mBlocks = geom->
MakeBox(no_Block,Iron,5,13.5,4);
789 sprintf(no_Block,
"B2_F%d", ++
N);
790 mBlocks = geom->
MakeBox(no_Block,Iron,7,17.4,0.1);
794 sprintf(no_Block,
"B2_F%d", ++
N);
795 mBlocks = geom->
MakeBox(no_Block,Iron,4.5,0.2,0.5);
798 sprintf(no_Block,
"B2_F%d", ++
N);
799 mBlocks = geom->
MakeBox(no_Block,Iron,4.5,0.05,0.5);
803 sprintf(no_Block,
"B2_F%d", ++
N);
804 mBlocks = geom->
MakeBox(no_Block,Iron,4.75,0.2,0.5);
807 sprintf(no_Block,
"B2_F%d", ++
N);
808 mBlocks = geom->
MakeBox(no_Block,Iron,4.55,0.05,0.5);
823 F=0;
N = 0; nF = 4; nW = 6;
826 sprintf(no_Block,
"B3_F0%d", 7);
827 mBlocks = geom->
MakeBox(no_Block,Iron,3,36,2);
834 sprintf(no_Block,
"B3_F%d_%d",
F, ++
N);
835 mBlocks = geom->
MakeBox(no_Block,Iron,4,36,0.2);
840 sprintf(no_Block,
"B3_F%d_%d",
F, ++
N);
841 mBlocks = geom->
MakeBox(no_Block,Iron,2.5,5,1.8);
845 sprintf(no_Block,
"B3_F%d_%d",
F, ++
N);
846 mBlocks = geom->
MakeBox(no_Block,Iron,2.8,1,1.8);
852 sprintf(no_Block,
"B3_F%d_%d",
F, ++
N);
853 mBlocks = geom->
MakeBox(no_Block,Iron,3,36,2);
859 sprintf(no_Block,
"B3_F0%d", 1);
860 mBlocks = geom->
MakeBox(no_Block,Iron,2.8,36,2);
863 sprintf(no_Block,
"B3_F0%d", 2);
864 mBlocks = geom->
MakeBox(no_Block,Iron,2.8,36,2);
868 sprintf(no_Block,
"B3_F0%d", 3);
869 mBlocks = geom->
MakeBox(no_Block,Iron,2.8,36,4);
873 sprintf(no_Block,
"B3_F0%d", 4);
874 mBlocks = geom->
MakeBox(no_Block,Iron,2.8,36,4);
883 sprintf(no_Block,
"B3_F0%d", 61);
884 mBlocks = geom->
MakeBox(no_Block,Iron,3,8,2);
888 sprintf(no_Block,
"B3_F0%d", 62);
889 mBlocks = geom->
MakeBox(no_Block,Iron,0.5,8,24);
892 sprintf(no_Block,
"B3_F0%d", 63);
893 mBlocks = geom->
MakeBox(no_Block,Iron,2,7,24);
896 sprintf(no_Block,
"B3_F0%d", 64);
897 mBlocks = geom->
MakeBox(no_Block,Iron,0.5,8,24);
901 sprintf(no_Block,
"B3_F0%d", 65);
902 mBlocks = geom->
MakeBox(no_Block,Iron,3,8,4);
909 sprintf(no_Block,
"B3_F2%d",7);
910 mBlocks = geom->
MakeBox(no_Block,Iron,7,40.5,2);
914 for (
F=0 ;
F<nF ;
F++){
N=0;
915 for (i = 0 ; i<nW ; i++){
916 sprintf(no_Block,
"B3_F2%d_%d",
F,++
N);
917 mBlocks = geom->
MakeBox(no_Block,Iron,6,2.35,2);
920 sprintf(no_Block,
"B3_F2%d_%d",
F,++
N);
921 mBlocks = geom->
MakeBox(no_Block,Iron,6.5,0.3,2);
924 sprintf(no_Block,
"B3_F2%d_%d",
F,++
N);
925 mBlocks = geom->
MakeBox(no_Block,Iron,6,2.35,2);
929 sprintf(no_Block,
"B3_F2%d_%d",
F,++
N);
930 mBlocks = geom->
MakeBox(no_Block,Iron,7,1,2);
935 sprintf(no_Block,
"B3_F2%d_%d",
F,++
N);
936 mBlocks = geom->
MakeBox(no_Block,Iron,6.8,36,0.3);
940 sprintf(no_Block,
"B3_F2%d_%d",
F,++
N);
941 mBlocks = geom->
MakeBox(no_Block,Iron,7,36,2);
945 for(
int i=0;i<4;i++){
946 sprintf(no_Block,
"B3_F2%d_%d",
F,++
N);
947 mBlocks = geom->
MakeBox(no_Block,Iron,7,0.5,1.4);
951 sprintf(no_Block,
"B3_F2%d_%d",
F,++
N);
952 mBlocks = geom->
MakeBox(no_Block,Iron,6,0.7,1.4);
956 sprintf(no_Block,
"B3_F2%d_%d",
F,++
N);
957 mBlocks = geom->
MakeBox(no_Block,Iron,7,1.6,1.4);
961 sprintf(no_Block,
"B3_F2%d_%d",
F,++
N);
962 mBlocks = geom->
MakeBox(no_Block,Iron,6,0.7,1.4);
967 sprintf(no_Block,
"B3_F2%d_%d",
F,++
N);
968 mBlocks = geom->
MakeBox(no_Block,Iron,7,3.5,2.6);
973 sprintf(no_Block,
"B3_F2%d",71);
974 mBlocks = geom->
MakeBox(no_Block,Iron,7,40.5,4);
978 sprintf(no_Block,
"B3_F2%d",72);
979 mBlocks = geom->
MakeBox(no_Block,Iron,7,2,30);
983 sprintf(no_Block,
"B3_F2%d",73);
984 mBlocks = geom->
MakeBox(no_Block,Iron,7,1,30);
991 sprintf(no_Block,
"B3_RT%d",
N = 0);
992 mBlocks = geom->
MakeBox(no_Block,Iron,7,42.25,0.1);
995 sprintf(no_Block,
"B3_RT%d", ++
N);
996 mBlocks = geom->
MakeBox(no_Block,Iron,2.75,41.75,0.1);
1000 sprintf(no_Block,
"B3_RT%d", ++
N);
1001 mBlocks = geom->
MakeBox(no_Block,Iron,0.24,41.99,0.5);
1004 sprintf(no_Block,
"B3_RT%d", ++
N);
1005 mBlocks = geom->
MakeBox(no_Block,Iron,0.01,42,0.5);
1009 sprintf(no_Block,
"B3_RT%d", ++
N);
1010 mBlocks = geom->
MakeBox(no_Block,Iron,0.24,3.99,0.5);
1013 sprintf(no_Block,
"B3_RT%d", ++
N);
1014 mBlocks = geom->
MakeBox(no_Block,Iron,0.01,4,0.5);
1018 sprintf(no_Block,
"B3_RT%d", ++
N);
1019 mBlocks = geom->
MakeBox(no_Block,Iron,2.99,0.24,0.5);
1022 sprintf(no_Block,
"B3_RT%d", ++
N);
1023 mBlocks = geom->
MakeBox(no_Block,Iron,3,0.01,0.5);
1027 sprintf(no_Block,
"B3_RT%d",++
N);
1028 mBlocks = geom->
MakeBox(no_Block,Iron,0.24,42.49,0.5);
1031 sprintf(no_Block,
"B3_RT%d",++
N);
1032 mBlocks = geom->
MakeBox(no_Block,Iron,0.01,42.5,0.5);
1038 sprintf(no_Block,
"B3_RT%d",++
N);
1039 mBlocks = geom->
MakeBox(no_Block,Iron,6.99,0.24,0.5);
1042 sprintf(no_Block,
"B3_RT%d",++
N);
1043 mBlocks = geom->
MakeBox(no_Block,Iron,7,0.01,0.5);
1047 sprintf(no_Block,
"B3_RT%d",++
N);
1048 mBlocks = geom->
MakeBox(no_Block,Iron,7,0.25,0.5);
1051 sprintf(no_Block,
"B3_RT%d",++
N);
1052 mBlocks = geom->
MakeBox(no_Block,Iron,7,0.01,0.5);
1060 for (i=0 ; i<6; i++) {
1061 sprintf(no_Block,
"B3_PF%d", ++
N);
1062 mBlocks = geom->
MakeBox(no_Block,Iron,1.2,1.5,12);
1066 sprintf(no_Block,
"B3_PF%d", ++
N);
1067 mBlocks = geom->
MakeBox(no_Block,Iron,1.5,40,2);
1073 sprintf(no_Block,
"B3_ST%d",
N=0);
1074 mBlocks = geom->
MakeBox(no_Block,Iron,0.5,7,5);
1078 for(
int i=0;i<5;i++){
1079 sprintf(no_Block,
"B3_ST%d",++
N);
1080 mBlocks = geom->
MakeBox(no_Block,Iron,3,5,0.5);
1092 for(
int F=0;
F<5;
F++){
N=0;
1093 sprintf(no_Block,
"B4_LF%d_%d",
F,++
N);
1094 mBlocks = geom->
MakeBox(no_Block,Iron,5.5,12.5,2.3);
1098 sprintf(no_Block,
"B4_LF%d_%d",
F,++
N);
1099 mBlocks = geom->
MakeBox(no_Block,Iron,5.5,2,1.7);
1103 sprintf(no_Block,
"B4_LF%d_%d",
F,++
N);
1104 mBlocks = geom->
MakeBox(no_Block,Iron,5,10.5,1.7);
1109 sprintf(no_Block,
"B4_LF%d_%d",9,
N=0);
1110 mBlocks = geom->
MakeBox(no_Block,Iron,5.5,12.5,6);
1114 sprintf(no_Block,
"B4_LF%d_%d",9,++
N);
1115 mBlocks = geom->
MakeBox(no_Block,Iron,5.5,2,4.5);
1118 sprintf(no_Block,
"B4_LF%d_%d",9,++
N);
1119 mBlocks = geom->
MakeBox(no_Block,Iron,5,10.5,4.5);
1123 sprintf(no_Block,
"B4_LF%d_%d",9,++
N);
1124 mBlocks = geom->
MakeBox(no_Block,Iron,5.5,12.5,5);
1132 sprintf(no_Block,
"B4_RS%d",++
N);
1133 mBlocks = geom->
MakeBox(no_Block,Iron,4.25,11,24);
1136 sprintf(no_Block,
"B4_RS%d",++
N);
1137 mBlocks = geom->
MakeBox(no_Block,Iron,0.25,4,32);
1142 sprintf(no_Block,
"B4_RS%d",++
N);
1143 mBlocks = geom->
MakeBox(no_Block,Iron,4.5,2,1.8);
1146 sprintf(no_Block,
"B4_RS%d",++
N);
1147 mBlocks = geom->
MakeBox(no_Block,Iron,5.5,3.5,5);
1150 sprintf(no_Block,
"B4_RS%d",++
N);
1151 mBlocks = geom->
MakeBox(no_Block,Iron,6,2,0.3);
1154 sprintf(no_Block,
"B4_RS%d",++
N);
1155 mBlocks = geom->
MakeBox(no_Block,Iron,4,2,1.5);
1158 sprintf(no_Block,
"B4_RS%d",++
N);
1159 mBlocks = geom->
MakeBox(no_Block,Iron,4.5,7,1.8);
1163 sprintf(no_Block,
"B4_RS%d",++
N);
1164 mBlocks = geom->
MakeBox(no_Block,Iron,4.5,11,1.8);
1168 sprintf(no_Block,
"B4_RS%d",++
N);
1169 mBlocks = geom->
MakeBox(no_Block,Iron,4.25,1.5,2);
1172 sprintf(no_Block,
"B4_RS%d",++
N);
1173 mBlocks = geom->
MakeBox(no_Block,Iron,4,2,2);
1176 sprintf(no_Block,
"B4_RS%d",++
N);
1177 mBlocks = geom->
MakeBox(no_Block,Iron,4.5,7,2);
1182 sprintf(no_Block,
"B4_RS%d",++
N);
1183 mBlocks = geom->
MakeBox(no_Block,Iron,4.5,11,2.4);
1188 sprintf(no_Block,
"B4_RT%d",
N=0);
1189 mBlocks = geom->
MakeBox(no_Block,Iron,4.25,10.9,0.2);
1192 sprintf(no_Block,
"B4_RT%d",++
N);
1193 mBlocks = geom->
MakeBox(no_Block,Iron,5.25,12.4,0.2);
1197 sprintf(no_Block,
"B4_RT%d",++
N);
1198 mBlocks = geom->
MakeBox(no_Block,Iron,0.24,12.4,0.5);
1201 sprintf(no_Block,
"B4_RT%d",++
N);
1202 mBlocks = geom->
MakeBox(no_Block,Iron,0.01,12.4,0.5);
1206 sprintf(no_Block,
"B4_RT%d",++
N);
1207 mBlocks = geom->
MakeBox(no_Block,Iron,0.24,13,0.5);
1210 sprintf(no_Block,
"B4_RT%d",++
N);
1211 mBlocks = geom->
MakeBox(no_Block,Iron,0.01,13,0.5);
1215 sprintf(no_Block,
"B4_RT%d",++
N);
1216 mBlocks = geom->
MakeBox(no_Block,Iron,8.75,0.24,0.5);
1219 sprintf(no_Block,
"B4_RT%d",++
N);
1220 mBlocks = geom->
MakeBox(no_Block,Iron,8.75,0.01,0.5);
1224 sprintf(no_Block,
"B4_RT%d",++
N);
1225 mBlocks = geom->
MakeBox(no_Block,Iron,5.25,0.24,0.5);
1228 sprintf(no_Block,
"B4_RT%d",++
N);
1229 mBlocks = geom->
MakeBox(no_Block,Iron,5.5,0.01,0.5);
1233 sprintf(no_Block,
"B4_RT%d",++
N);
1234 mBlocks = geom->
MakeBox(no_Block,Iron,3.5,0.24,0.5);
1237 sprintf(no_Block,
"B4_RT%d",++
N);
1238 mBlocks = geom->
MakeBox(no_Block,Iron,3.5,0.01,0.5);
1246 sprintf(no_Block,
"GRD%d",++
N);
1247 mBlocks = geom->
MakeBox(no_Block,Iron,40,90,2);
1251 sprintf(no_Block,
"GRD%d",++
N);
1252 mBlocks = geom->
MakeBox(no_Block,Iron,30,30,2);
1262 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.
virtual void SetVisibility(Bool_t vis=kTRUE)
set visibility of this volume
virtual void AddNodeOverlap(TGeoVolume *vol, Int_t copy_no, TGeoMatrix *mat=0, Option_t *option="")
Add a TGeoNode to the list of nodes.
virtual void Draw(Option_t *option="")
draw top volume according to option
virtual void SetLineColor(Color_t lcolor)
Set the line color.