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);
 
  103   sprintf(no_Block, 
"B1_F%d", ++
F);                  
 
  104   mBlocks = geom->
MakeTubs(no_Block,Iron,21,30,2.2,0,103);
 
  109   sprintf(no_Block, 
"B1_F%d_%d", 
F, ++
N);
 
  110   mBlocks = geom->
MakeTubs(no_Block,Iron,18.5,21,0.8,92,101);
 
  115      sprintf(no_Block, 
"B1_F%d_%d", 
F, ++
N);
 
  116      mBlocks = geom->
MakeTubs(no_Block,Iron,18.5,21,3.2,92,102);
 
  123   sprintf(no_Block, 
"B1_F%d_%d", 
F, ++
N);               
 
  124   mBlocks = geom->
MakeTubs(no_Block,Iron,18.5,21,2,92,102);
 
  127   sprintf(no_Block, 
"B1_F%d_%d", 
F, ++
N);
 
  128   mBlocks = geom->
MakeTubs(no_Block,Iron,18.5,21,3.2,92,102);
 
  132   sprintf(no_Block, 
"B1_F%d_%d", 
F, ++
N);
 
  133   mBlocks = geom->
MakeTubs(no_Block,Iron,21,30,2,0,103);
 
  137   sprintf(no_Block, 
"B1_F%d_%d", 
F, ++
N);
 
  138   mBlocks = geom->
MakeTubs(no_Block,Iron,18,21,2,0,102);
 
  142   sprintf(no_Block, 
"B1_F%d_%d", 
F, ++
N);
 
  143   mBlocks = geom->
MakeTubs(no_Block,Iron,18,18.5,14,92,103);
 
  148   sprintf(no_Block, 
"B1_F%d_%d", 
F, ++
N);
 
  149   mBlocks = geom->
MakeTubs(no_Block,Iron,21,29,2,0,97);
 
  153   sprintf(no_Block, 
"B1_F%d_%d", 
F, ++
N);
 
  154   mBlocks = geom->
MakeTubs(no_Block,Iron,21,32,2,37,97);
 
  158   sprintf(no_Block, 
"B1_F%d_%d", 
F, ++
N);
 
  159   mBlocks = geom->
MakeTubs(no_Block,Iron,21,29,1.95,0,37);
 
  162   sprintf(no_Block, 
"B1_F%d_%d", 
F, ++
N);
 
  163   mBlocks = geom->
MakeTubs(no_Block,Iron,21,29,0.05,0,37);
 
  169   sprintf(no_Block, 
"B1_RT%d", 
N = 0);
 
  170   mBlocks = geom->
MakeTubs(no_Block,Iron,21,29.5,0.2,0,102);
 
  173   sprintf(no_Block, 
"B1_RT%d", ++
N);
 
  174   mBlocks = geom->
MakeTubs(no_Block,Iron,18.5,21,0.2,0,101);
 
  178   sprintf(no_Block, 
"B1_RT%d", ++
N);
 
  179   mBlocks = geom->
MakeTubs(no_Block,Iron,21,30,0.7,102.9,103);
 
  182   sprintf(no_Block, 
"B1_RT%d", ++
N);
 
  183   mBlocks = geom->
MakeTubs(no_Block,Iron,21.1,29.9,0.7,102,102.9);
 
  187   sprintf(no_Block, 
"B1_RT%d", ++
N);
 
  188   mBlocks = geom->
MakeTubs(no_Block,Iron,21.1,21.5,0.5,98,102.9);
 
  191   sprintf(no_Block, 
"B1_RT%d", ++
N);
 
  192   mBlocks = geom->
MakeTubs(no_Block,Iron,21,21.1,0.7,98,103);
 
  196   sprintf(no_Block, 
"B1_RT%d", ++
N);
 
  197   mBlocks = geom->
MakeTubs(no_Block,Iron,18.6,21,0.7,101.9,102);
 
  200   sprintf(no_Block, 
"B1_RT%d", ++
N);
 
  201   mBlocks = geom->
MakeTubs(no_Block,Iron,18.6,21,0.7,101,101.9);
 
  205   sprintf(no_Block, 
"B1_RT%d", ++
N);
 
  206   mBlocks = geom->
MakeTubs(no_Block,Iron,29.5,29.9,0.5,0,102);
 
  209   sprintf(no_Block, 
"B1_RT%d", ++
N);
 
  210   mBlocks = geom->
MakeTubs(no_Block,Iron,29.9,30,0.5,0,103);
 
  214   sprintf(no_Block, 
"B1_RT%d", ++
N);
 
  215   mBlocks = geom->
MakeTubs(no_Block,Iron,18.1,18.5,0.5,-1,101.9);
 
  218   sprintf(no_Block, 
"B1_RT%d", ++
N);
 
  219   mBlocks = geom->
MakeTubs(no_Block,Iron,18,18.1,0.5,-0.5,102);
 
  223   sprintf(no_Block, 
"B1_RT%d", ++
N);
 
  224   mBlocks = geom->
MakeTubs(no_Block,Iron,18.1,18.4,0.5,101.9,102.9);
 
  227   sprintf(no_Block, 
"B1_RT%d", ++
N);
 
  228   mBlocks = geom->
MakeTubs(no_Block,Iron,18,18.1,0.5,102,103);
 
  231   sprintf(no_Block, 
"B1_RT%d", ++
N);
 
  232   mBlocks = geom->
MakeTubs(no_Block,Iron,18.4,18.5,0.5,102,103);
 
  235   sprintf(no_Block, 
"B1_RT%d", ++
N);
 
  236   mBlocks = geom->
MakeTubs(no_Block,Iron,18,18.5,0.5,102.9,103);
 
  242   sprintf(no_Block, 
"B1_WW%d", 
N = 0);
 
  243   mBlocks = geom->
MakeTubs(no_Block,Iron,20.8,31,19.5,sP,sP+1);
 
  247   sprintf(no_Block, 
"B1_WW%d", ++
N);
 
  248   mBlocks = geom->
MakeTubs(no_Block,Iron,26.8,31,5,sP,sP+1);
 
  252   sprintf(no_Block, 
"B1_WW%d", ++
N);
 
  253   mBlocks = geom->
MakeTubs(no_Block,Iron,23,24.3,5,sP,sP+1);
 
  257   sprintf(no_Block, 
"B1_WW%d", ++
N);
 
  258   mBlocks = geom->
MakeTubs(no_Block,Iron,20.8,21.3,5,sP,sP+1);
 
  265   sprintf(no_Block, 
"B1_ZF%d",
N=0);
 
  266   mBlocks = geom->
MakeTubs(no_Block,Iron,0,21,9,0,92);
 
  270   sprintf(no_Block, 
"B1_ZF%d",++
N);
 
  271   mBlocks = geom->
MakeTubs(no_Block,Iron,18,21,7.5,0,92);
 
  275   sprintf(no_Block, 
"B1_ZF%d",++
N);
 
  276   mBlocks = geom->
MakeTubs(no_Block,Iron,18,21,4.5,0,92);
 
  280   sprintf(no_Block, 
"B1_ZF%d",++
N);
 
  281   mBlocks = geom->
MakeTubs(no_Block,Iron,0,18,0.2,0,101);
 
  284   sprintf(no_Block, 
"B1_ZF%d",++
N);
 
  285   mBlocks = geom->
MakeTubs(no_Block,Iron,0,18,1.7,0,100);
 
  288   sprintf(no_Block, 
"B1_ZF%d",++
N);
 
  289   mBlocks = geom->
MakeTubs(no_Block,Iron,0,18,1.2,101,101.9);
 
  292   sprintf(no_Block, 
"B1_ZF%d",++
N);
 
  293   mBlocks = geom->
MakeTubs(no_Block,Iron,0,18,1.2,101.9,102);
 
  299   sprintf(no_Block, 
"B1_ZF%d", ++
N);
 
  300   mBlocks = geom->
MakeBox(no_Block,Iron,6.5,7,2.5);
 
  304   sprintf(no_Block, 
"B1_ZF%d", ++
N);
 
  305   mBlocks = geom->
MakeBox(no_Block,Iron,6.5,7,3);
 
  309   sprintf(no_Block, 
"B1_ZF%d", ++
N);
 
  310   mBlocks = geom->
MakeBox(no_Block,Iron,7,0.05,10);
 
  313   sprintf(no_Block, 
"B1_ZF%d", ++
N);
 
  314   mBlocks = geom->
MakeBox(no_Block,Iron,6.9,0.20,10);
 
  317   sprintf(no_Block, 
"B1_ZF%d", ++
N);
 
  318   mBlocks = geom->
MakeBox(no_Block,Iron,0.1,0.20,10);
 
  322   sprintf(no_Block, 
"B1_ZF%d", ++
N);
 
  323   mBlocks = geom->
MakeBox(no_Block,Iron,0.05,7,3.5);
 
  326   sprintf(no_Block, 
"B1_ZF%d", ++
N);
 
  327   mBlocks = geom->
MakeBox(no_Block,Iron,0.20,6.9,3.5);
 
  331   sprintf(no_Block, 
"B1_ZF%d", ++
N);
 
  332   mBlocks = geom->
MakeBox(no_Block,Iron,0.25,7,4);
 
  336   sprintf(no_Block, 
"B1_ZF%d", ++
N);
 
  337   mBlocks = geom->
MakeBox(no_Block,Iron,7,0.05,10);
 
  340   sprintf(no_Block, 
"B1_ZF%d", ++
N);
 
  341   mBlocks = geom->
MakeBox(no_Block,Iron,6.9,0.20,10);
 
  344   sprintf(no_Block, 
"B1_ZF%d", ++
N);
 
  345   mBlocks = geom->
MakeBox(no_Block,Iron,0.1,0.20,10);
 
  351   sprintf(no_Block, 
"B1_ZF%d", ++
N);
 
  352   mBlocks = geom->
MakeBox(no_Block,Iron,5,5,1);
 
  356   sprintf(no_Block, 
"B1_ZF%d", ++
N);
 
  357   mBlocks = geom->
MakeBox(no_Block,Iron,5,0.25,1.5);
 
  361   sprintf(no_Block, 
"B1_ZF%d", ++
N);
 
  362   mBlocks = geom->
MakeBox(no_Block,Iron,0.25,5.5,1.5);
 
  366   sprintf(no_Block, 
"B1_ZF%d", ++
N);
 
  367   mBlocks = geom->
MakeBox(no_Block,Iron,5.5,3.5,5);
 
  373   sprintf(no_Block, 
"B1_GRD%d",
N=0);
 
  374   mBlocks = geom->
MakeTubs(no_Block,Iron,0,29,1,0,36.75);
 
  378   sprintf(no_Block, 
"B1_GRD%d",++
N);
 
  379   mBlocks = geom->
MakeTubs(no_Block,Iron,0,30.4,0.4,36.75,77.25);
 
  383   sprintf(no_Block, 
"B1_GRD%d",++
N);
 
  384   mBlocks = geom->
MakeTubs(no_Block,Iron,0,29.7,0.3,36.75,77.25);
 
  388   sprintf(no_Block, 
"B1_GRD%d",++
N);
 
  389   mBlocks = geom->
MakeTubs(no_Block,Iron,0,29,0.3,36.75,77.25);
 
  393   sprintf(no_Block, 
"B1_GRD%d",++
N);
 
  394   mBlocks = geom->
MakeTubs(no_Block,Iron,0,29,1,77.25,97);
 
  400   sprintf(no_Block, 
"B1_PF%d", 
N = 0);
 
  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->
MakeBox(no_Block,Iron,1.2,1.5,9);
 
  415   sprintf(no_Block, 
"B1_PF%d", ++
N);
 
  416   mBlocks = geom->
MakeBox(no_Block,Iron,1.2,1.5,9);
 
  420   sprintf(no_Block, 
"B1_PF%d",++
N);
 
  421   mBlocks = geom->
MakeTubs(no_Block,Iron,29,30,2,0,36.75);
 
  425   sprintf(no_Block, 
"B1_PF%d", ++
N);
 
  426   mBlocks = geom->
MakeBox(no_Block,Iron,3,2,2);
 
  430   sprintf(no_Block, 
"B1_PF%d", ++
N);      
 
  431   mBlocks = geom->
MakeBox(no_Block,Iron,0.25,4.3,1.5);
 
  435   sprintf(no_Block, 
"B1_PF%d", ++
N);
 
  436   mBlocks = geom->
MakeBox(no_Block,Iron,5.25,4.3,0.4);
 
  440   sprintf(no_Block, 
"B1_PF%d", ++
N);
 
  441   mBlocks = geom->
MakeBox(no_Block,Iron,5.5,0.25,0.75);
 
  445   sprintf(no_Block, 
"B1_PF%d", ++
N);
 
  446   mBlocks = geom->
MakeTrd1(no_Block,Iron,1.5,0,0.25,5.5);
 
  464      N = 0; i = 0; nW = 7;
 
  467      sprintf(no_Block, 
"B12_F%d_B%d",
F, ++
N);      
 
  468      mBlocks = geom->
MakeBox(no_Block,Iron,3.8,0.35,1.8);
 
  471         new TGeoCombiTrans(23.38 + (21.65-6*i)*0.13,-21.2 + (21.65-6*i)*0.99,hP+(8*
F),
 
  473      sprintf(no_Block, 
"B12_F%d_B%d",
F, ++
N);
 
  474      mBlocks = geom->
MakeBox(no_Block,Iron,4.8,0.3,1.8);
 
  477         new TGeoCombiTrans(23.38 + (21.0-6*i)*0.13,-21.2 + (21-6*i)*0.99,hP+(8*
F),
 
  479      sprintf(no_Block, 
"B12_F%d_B%d",
F, ++
N);
 
  480      mBlocks = geom->
MakeBox(no_Block,Iron,3.8,0.3,1.8);
 
  483         new TGeoCombiTrans(23.38 + (20.4-6*i)*0.13,-21.2 + (20.4-6*i)*0.99,hP+(8*
F),
 
  485      sprintf(no_Block, 
"B12_F%d_B%d",
F, ++
N);
 
  486      mBlocks = geom->
MakeBox(no_Block,Iron,4.8,0.3,1.8);
 
  489         new TGeoCombiTrans(23.38 + (19.7-6*i)*0.13,-21.2 + (19.7-6*i)*0.99,hP+(8*
F),
 
  491      sprintf(no_Block, 
"B12_F%d_B%d",
F, ++
N);
 
  492      mBlocks = geom->
MakeBox(no_Block,Iron,3.8,0.35,1.8);
 
  495         new TGeoCombiTrans(23.38 + (19.05-6*i)*0.13,-21.2 + (19.05-6*i)*0.99,hP+(8*
F),
 
  499      sprintf(no_Block, 
"B12_F%d_B%d",
F, ++
N);      
 
  500      mBlocks = geom->
MakeBox(no_Block,Iron,3,1.4,1.8);
 
  503         new TGeoCombiTrans(23.38 + (17.4-6*i)*0.13,-21.2 + (17.4-6*i)*0.99,hP+(8*
F),
 
  507      sprintf(no_Block, 
"B12_F%d_B%d",
F, ++
N);      
 
  508      mBlocks = geom->
MakeBox(no_Block,Iron,5.8,1,1.8);
 
  516      sprintf(no_Block, 
"B12_F%d_B%d",++
F, ++
N);
 
  517      mBlocks = geom->
MakeBox(no_Block,Iron,5.8,22,2.2);
 
  522   sprintf(no_Block, 
"B12_F%d_%d", 
F, ++
N);
 
  523   mBlocks = geom->
MakeBox(no_Block,Iron,5.8,22,2);
 
  527   sprintf(no_Block, 
"B12_F%d_%d", 
F, ++
N);
 
  528   mBlocks = geom->
MakeBox(no_Block,Iron,2.8,22,14);
 
  534   sprintf(no_Block, 
"B12_RT%d_%d", 
F, 
N=0);
 
  535   mBlocks = geom->
MakeBox(no_Block,Iron,5.5,21.75,0.2);
 
  539   sprintf(no_Block, 
"B12_RT%d_%d", 
F, ++
N);
 
  540   mBlocks = geom->
MakeBox(no_Block,Iron,0.23,21.95,0.5);
 
  543   sprintf(no_Block, 
"B12_RT%d_%d", 
F, ++
N);
 
  544   mBlocks = geom->
MakeBox(no_Block,Iron,0.1,22,0.5);
 
  549   sprintf(no_Block, 
"B12_RT%d_%d", 
F, ++
N);
 
  550   mBlocks = geom->
MakeBox(no_Block,Iron,0.23,3.6,0.5);
 
  554   sprintf(no_Block, 
"B12_RT%d_%d", 
F, ++
N);
 
  555   mBlocks = geom->
MakeBox(no_Block,Iron,0.02,3.8,0.5);
 
  561   sprintf(no_Block, 
"B12_RT%d_%d", 
F, ++
N);
 
  562   mBlocks = geom->
MakeBox(no_Block,Iron,5.7,0.23,0.5);
 
  565   sprintf(no_Block, 
"B12_RT%d_%d", 
F, ++
N);
 
  566   mBlocks = geom->
MakeBox(no_Block,Iron,5.8,0.1,0.5);
 
  572   sprintf(no_Block, 
"B12_PF%d", 
N = 0);
 
  573   mBlocks = geom->
MakeBox(no_Block,Iron,1.2,1.5,9);
 
  577   sprintf(no_Block, 
"B12_PF%d", ++
N);
 
  578   mBlocks = geom->
MakeBox(no_Block,Iron,1.2,1.5,9);
 
  582   sprintf(no_Block, 
"B12_PF%d", ++
N);
 
  583   mBlocks = geom->
MakeBox(no_Block,Iron,1.2,1.5,9);
 
  587   sprintf(no_Block, 
"B12_PF%d", ++
N);
 
  588   mBlocks = geom->
MakeBox(no_Block,Iron,1.2,1.5,11);
 
  592   sprintf(no_Block, 
"B12_PF%d", ++
N);
 
  593   mBlocks = geom->
MakeBox(no_Block,Iron,1.2,1.5,11);
 
  599   sprintf(no_Block, 
"B12_PF%d", ++
N);
 
  600   mBlocks = geom->
MakeBox(no_Block,Iron,0.5,15.75,2);
 
  604   sprintf(no_Block, 
"B12_PF%d", ++
N);
 
  605   mBlocks = geom->
MakeBox(no_Block,Iron,0.5,2,4);
 
  609   sprintf(no_Block, 
"B12_PF%d", ++
N);
 
  610   mBlocks = geom->
MakeBox(no_Block,Iron,1.5,15.75,2);
 
  614   sprintf(no_Block, 
"B12_RT%d_%d", 
F, ++
N);
 
  615   mBlocks = geom->
MakeBox(no_Block,Iron,5.8,0.5,4);
 
  621   sprintf(no_Block, 
"B12_PF%d", ++
N);
 
  622   mBlocks = geom->
MakeBox(no_Block,Iron,3,0.5,3.25);
 
  626   sprintf(no_Block, 
"B12_PF%d", ++
N);
 
  627   mBlocks = geom->
MakeBox(no_Block,Iron,0.5,6.25,1.625);
 
  630   sprintf(no_Block, 
"B1_PF%d", ++
N);
 
  631   mBlocks = geom->
MakeTrd1(no_Block,Iron,3.25,0,0.5,6.25);
 
  636   sprintf(no_Block, 
"B12_PF%d", ++
N);
 
  637   mBlocks = geom->
MakeBox(no_Block,Iron,3,3,0.5);
 
  640   sprintf(no_Block, 
"B12_PF%d", ++
N);
 
  641   mBlocks = geom->
MakeBox(no_Block,Iron,2.5,3,0.5);
 
  644   sprintf(no_Block, 
"B12_PF%d", ++
N);
 
  645   mBlocks = geom->
MakeBox(no_Block,Iron,2.5,3,0.5);
 
  648   sprintf(no_Block, 
"B12_PF%d", ++
N);
 
  649   mBlocks = geom->
MakeBox(no_Block,Iron,2.5,3,0.5);
 
  656   sprintf(no_Block, 
"B12_GR%d", 
N=0);
 
  657   mBlocks = geom->
MakeBox(no_Block,Iron,4.8,21,1);
 
  661   sprintf(no_Block, 
"B12_GR%d", ++
N);
 
  662   mBlocks = geom->
MakeBox(no_Block,Iron,5.8,18,9);
 
  666   sprintf(no_Block, 
"B12_GR%d", ++
N);
 
  667   mBlocks = geom->
MakeBox(no_Block,Iron,4.8,22,2);
 
  671   sprintf(no_Block, 
"B12_GR%d_%d", 
F, ++
N);
 
  672   mBlocks = geom->
MakeBox(no_Block,Iron,4.8,22,1.95);
 
  675   sprintf(no_Block, 
"B12_GR%d_%d", 
F, ++
N);
 
  676   mBlocks = geom->
MakeBox(no_Block,Iron,4.8,22,0.05);
 
  692   sprintf(no_Block, 
"B2_F%d", 6);
 
  693   mBlocks = geom->
MakeBox(no_Block,Iron,7,17.5,2);
 
  699      sprintf(no_Block, 
"B2_F%d_%d",
F, ++
N);
 
  700      mBlocks = geom->
MakeBox(no_Block,Iron,0.8,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);
 
  722      sprintf(no_Block, 
"B2_F%d_%d",
F, ++
N);
 
  723      mBlocks = geom->
MakeBox(no_Block,Iron,1.1,3.5,1);
 
  726      sprintf(no_Block, 
"B2_F%d_%d",
F, ++
N);
 
  727      mBlocks = geom->
MakeBox(no_Block,Iron,1.1,4.5,0.2);
 
  730      sprintf(no_Block, 
"B2_F%d_%d",
F, ++
N);
 
  731      mBlocks = geom->
MakeBox(no_Block,Iron,1.1,4,2.8);
 
  735      sprintf(no_Block, 
"B2_F%d_%d",
F, ++
N);
 
  736      mBlocks = geom->
MakeBox(no_Block,Iron,0.7,4,4);
 
  742      sprintf(no_Block, 
"B2_F%d_%d",
F, ++
N);
 
  743      mBlocks = geom->
MakeBox(no_Block,Iron,1.3,13.5,1.5);
 
  746      sprintf(no_Block, 
"B2_F%d_%d",
F, ++
N);
 
  747      mBlocks = geom->
MakeBox(no_Block,Iron,1.3,14,0.2);
 
  750      sprintf(no_Block, 
"B2_F%d_%d",
F, ++
N);
 
  751      mBlocks = geom->
MakeBox(no_Block,Iron,1.3,13.5,2.3);
 
  757      sprintf(no_Block, 
"B2_F%d_%d",
F, ++
N);
 
  758      mBlocks = geom->
MakeBox(no_Block,Iron,3.7,13,1.5);
 
  761      sprintf(no_Block, 
"B2_F%d_%d",
F, ++
N);
 
  762      mBlocks = geom->
MakeBox(no_Block,Iron,3.7,14,0.2);
 
  765      sprintf(no_Block, 
"B2_F%d_%d",
F, ++
N);
 
  766      mBlocks = geom->
MakeBox(no_Block,Iron,3.7,13.5,2.3);
 
  774   sprintf(no_Block, 
"B2_F%d_%d", 0,1);
 
  775   mBlocks = geom->
MakeBox(no_Block,Iron,5,13.5,6);
 
  778   sprintf(no_Block, 
"B2_F%d_%d", 0,2);
 
  779   mBlocks = geom->
MakeBox(no_Block,Iron,5,13.5,4);
 
  782   sprintf(no_Block, 
"B2_F%d_%d", 0,3);
 
  783   mBlocks = geom->
MakeBox(no_Block,Iron,5,13.5,4);
 
  790   sprintf(no_Block, 
"B2_F%d", ++
N);
 
  791   mBlocks = geom->
MakeBox(no_Block,Iron,7,17.4,0.1);
 
  795   sprintf(no_Block, 
"B2_F%d", ++
N);
 
  796   mBlocks = geom->
MakeBox(no_Block,Iron,4.5,0.2,0.5);
 
  799   sprintf(no_Block, 
"B2_F%d", ++
N);
 
  800   mBlocks = geom->
MakeBox(no_Block,Iron,4.5,0.05,0.5);
 
  804   sprintf(no_Block, 
"B2_F%d", ++
N);
 
  805   mBlocks = geom->
MakeBox(no_Block,Iron,4.75,0.2,0.5);
 
  808   sprintf(no_Block, 
"B2_F%d", ++
N);
 
  809   mBlocks = geom->
MakeBox(no_Block,Iron,4.55,0.05,0.5);
 
  824   F=0; 
N = 0; nF = 4; nW = 6;
 
  827   sprintf(no_Block, 
"B3_F0%d", 7);
 
  828   mBlocks = geom->
MakeBox(no_Block,Iron,3,36,2);
 
  835      sprintf(no_Block, 
"B3_F%d_%d",
F, ++
N);
 
  836      mBlocks = geom->
MakeBox(no_Block,Iron,4,36,0.2);
 
  841         sprintf(no_Block, 
"B3_F%d_%d",
F, ++
N);
 
  842         mBlocks = geom->
MakeBox(no_Block,Iron,2.5,5,1.8);
 
  846         sprintf(no_Block, 
"B3_F%d_%d",
F, ++
N);
 
  847         mBlocks = geom->
MakeBox(no_Block,Iron,2.8,1,1.8);
 
  853      sprintf(no_Block, 
"B3_F%d_%d",
F, ++
N);
 
  854      mBlocks = geom->
MakeBox(no_Block,Iron,3,36,2);
 
  860   sprintf(no_Block, 
"B3_F0%d", 1);
 
  861   mBlocks = geom->
MakeBox(no_Block,Iron,2.8,36,2);
 
  864   sprintf(no_Block, 
"B3_F0%d", 2);
 
  865   mBlocks = geom->
MakeBox(no_Block,Iron,2.8,36,2);
 
  869   sprintf(no_Block, 
"B3_F0%d", 3);
 
  870   mBlocks = geom->
MakeBox(no_Block,Iron,2.8,36,4);
 
  874   sprintf(no_Block, 
"B3_F0%d", 4);
 
  875   mBlocks = geom->
MakeBox(no_Block,Iron,2.8,36,4);
 
  884   sprintf(no_Block, 
"B3_F0%d", 61);
 
  885   mBlocks = geom->
MakeBox(no_Block,Iron,3,8,2);
 
  889   sprintf(no_Block, 
"B3_F0%d", 62);
 
  890   mBlocks = geom->
MakeBox(no_Block,Iron,0.5,8,24);
 
  893   sprintf(no_Block, 
"B3_F0%d", 63);
 
  894   mBlocks = geom->
MakeBox(no_Block,Iron,2,7,24);
 
  897   sprintf(no_Block, 
"B3_F0%d", 64);
 
  898   mBlocks = geom->
MakeBox(no_Block,Iron,0.5,8,24);
 
  902   sprintf(no_Block, 
"B3_F0%d", 65);
 
  903   mBlocks = geom->
MakeBox(no_Block,Iron,3,8,4);
 
  910   sprintf(no_Block, 
"B3_F2%d",7);
 
  911   mBlocks = geom->
MakeBox(no_Block,Iron,7,40.5,2);
 
  915   for (
F=0 ; 
F<nF ; 
F++){ 
N=0;
 
  916      for (i = 0 ; i<nW ; i++){
 
  917         sprintf(no_Block, 
"B3_F2%d_%d",
F,++
N);
 
  918         mBlocks = geom->
MakeBox(no_Block,Iron,6,2.35,2);
 
  921         sprintf(no_Block, 
"B3_F2%d_%d",
F,++
N);
 
  922         mBlocks = geom->
MakeBox(no_Block,Iron,6.5,0.3,2);
 
  925         sprintf(no_Block, 
"B3_F2%d_%d",
F,++
N);
 
  926         mBlocks = geom->
MakeBox(no_Block,Iron,6,2.35,2);
 
  930         sprintf(no_Block, 
"B3_F2%d_%d",
F,++
N);
 
  931         mBlocks = geom->
MakeBox(no_Block,Iron,7,1,2);
 
  936      sprintf(no_Block, 
"B3_F2%d_%d",
F,++
N);
 
  937      mBlocks = geom->
MakeBox(no_Block,Iron,6.8,36,0.3);
 
  941      sprintf(no_Block, 
"B3_F2%d_%d",
F,++
N);
 
  942      mBlocks = geom->
MakeBox(no_Block,Iron,7,36,2);
 
  946      for(
int i=0;i<4;i++){
 
  947         sprintf(no_Block, 
"B3_F2%d_%d",
F,++
N);
 
  948         mBlocks = geom->
MakeBox(no_Block,Iron,7,0.5,1.4);
 
  952         sprintf(no_Block, 
"B3_F2%d_%d",
F,++
N);
 
  953         mBlocks = geom->
MakeBox(no_Block,Iron,6,0.7,1.4);
 
  957         sprintf(no_Block, 
"B3_F2%d_%d",
F,++
N);
 
  958         mBlocks = geom->
MakeBox(no_Block,Iron,7,1.6,1.4);
 
  962         sprintf(no_Block, 
"B3_F2%d_%d",
F,++
N);
 
  963         mBlocks = geom->
MakeBox(no_Block,Iron,6,0.7,1.4);
 
  968      sprintf(no_Block, 
"B3_F2%d_%d",
F,++
N);
 
  969      mBlocks = geom->
MakeBox(no_Block,Iron,7,3.5,2.6);
 
  974   sprintf(no_Block, 
"B3_F2%d",71);
 
  975   mBlocks = geom->
MakeBox(no_Block,Iron,7,40.5,4);
 
  979   sprintf(no_Block, 
"B3_F2%d",72);
 
  980   mBlocks = geom->
MakeBox(no_Block,Iron,7,2,30);
 
  984   sprintf(no_Block, 
"B3_F2%d",73);
 
  985   mBlocks = geom->
MakeBox(no_Block,Iron,7,1,30);
 
  992   sprintf(no_Block, 
"B3_RT%d",
N = 0);
 
  993   mBlocks = geom->
MakeBox(no_Block,Iron,7,42.25,0.1);
 
  996   sprintf(no_Block, 
"B3_RT%d", ++
N);
 
  997   mBlocks = geom->
MakeBox(no_Block,Iron,2.75,41.75,0.1);
 
 1001   sprintf(no_Block, 
"B3_RT%d", ++
N);
 
 1002   mBlocks = geom->
MakeBox(no_Block,Iron,0.24,41.99,0.5);
 
 1005   sprintf(no_Block, 
"B3_RT%d", ++
N);
 
 1006   mBlocks = geom->
MakeBox(no_Block,Iron,0.01,42,0.5);
 
 1010   sprintf(no_Block, 
"B3_RT%d", ++
N);
 
 1011   mBlocks = geom->
MakeBox(no_Block,Iron,0.24,3.99,0.5);
 
 1014   sprintf(no_Block, 
"B3_RT%d", ++
N);
 
 1015   mBlocks = geom->
MakeBox(no_Block,Iron,0.01,4,0.5);
 
 1019   sprintf(no_Block, 
"B3_RT%d", ++
N);
 
 1020   mBlocks = geom->
MakeBox(no_Block,Iron,2.99,0.24,0.5);
 
 1023   sprintf(no_Block, 
"B3_RT%d", ++
N);
 
 1024   mBlocks = geom->
MakeBox(no_Block,Iron,3,0.01,0.5);
 
 1028   sprintf(no_Block, 
"B3_RT%d",++
N);
 
 1029   mBlocks = geom->
MakeBox(no_Block,Iron,0.24,42.49,0.5);
 
 1032   sprintf(no_Block, 
"B3_RT%d",++
N);
 
 1033   mBlocks = geom->
MakeBox(no_Block,Iron,0.01,42.5,0.5);
 
 1039   sprintf(no_Block, 
"B3_RT%d",++
N);
 
 1040   mBlocks = geom->
MakeBox(no_Block,Iron,6.99,0.24,0.5);
 
 1043   sprintf(no_Block, 
"B3_RT%d",++
N);
 
 1044   mBlocks = geom->
MakeBox(no_Block,Iron,7,0.01,0.5);
 
 1048   sprintf(no_Block, 
"B3_RT%d",++
N);
 
 1049   mBlocks = geom->
MakeBox(no_Block,Iron,7,0.25,0.5);
 
 1052   sprintf(no_Block, 
"B3_RT%d",++
N);
 
 1053   mBlocks = geom->
MakeBox(no_Block,Iron,7,0.01,0.5);
 
 1061   for (i=0 ; i<6; i++) {
 
 1062      sprintf(no_Block, 
"B3_PF%d", ++
N);
 
 1063      mBlocks = geom->
MakeBox(no_Block,Iron,1.2,1.5,12);
 
 1067   sprintf(no_Block, 
"B3_PF%d", ++
N);
 
 1068   mBlocks = geom->
MakeBox(no_Block,Iron,1.5,40,2);
 
 1074   sprintf(no_Block, 
"B3_ST%d",
N=0);
 
 1075   mBlocks = geom->
MakeBox(no_Block,Iron,0.5,7,5);
 
 1079   for(
int i=0;i<5;i++){
 
 1080      sprintf(no_Block, 
"B3_ST%d",++
N);
 
 1081      mBlocks = geom->
MakeBox(no_Block,Iron,3,5,0.5);
 
 1093   for(
int F=0;
F<5;
F++){ 
N=0;
 
 1094      sprintf(no_Block, 
"B4_LF%d_%d",
F,++
N);
 
 1095      mBlocks = geom->
MakeBox(no_Block,Iron,5.5,12.5,2.3);
 
 1099      sprintf(no_Block, 
"B4_LF%d_%d",
F,++
N);
 
 1100      mBlocks = geom->
MakeBox(no_Block,Iron,5.5,2,1.7);
 
 1104      sprintf(no_Block, 
"B4_LF%d_%d",
F,++
N);
 
 1105      mBlocks = geom->
MakeBox(no_Block,Iron,5,10.5,1.7);
 
 1110   sprintf(no_Block, 
"B4_LF%d_%d",9,
N=0);
 
 1111   mBlocks = geom->
MakeBox(no_Block,Iron,5.5,12.5,6);
 
 1115   sprintf(no_Block, 
"B4_LF%d_%d",9,++
N);
 
 1116   mBlocks = geom->
MakeBox(no_Block,Iron,5.5,2,4.5);
 
 1119   sprintf(no_Block, 
"B4_LF%d_%d",9,++
N);
 
 1120   mBlocks = geom->
MakeBox(no_Block,Iron,5,10.5,4.5);
 
 1124   sprintf(no_Block, 
"B4_LF%d_%d",9,++
N);
 
 1125   mBlocks = geom->
MakeBox(no_Block,Iron,5.5,12.5,5);
 
 1133   sprintf(no_Block, 
"B4_RS%d",++
N);
 
 1134   mBlocks = geom->
MakeBox(no_Block,Iron,4.25,11,24);
 
 1137   sprintf(no_Block, 
"B4_RS%d",++
N);
 
 1138   mBlocks = geom->
MakeBox(no_Block,Iron,0.25,4,32);
 
 1143   sprintf(no_Block, 
"B4_RS%d",++
N);
 
 1144   mBlocks = geom->
MakeBox(no_Block,Iron,4.5,2,1.8);
 
 1147   sprintf(no_Block, 
"B4_RS%d",++
N);
 
 1148   mBlocks = geom->
MakeBox(no_Block,Iron,5.5,3.5,5);
 
 1151   sprintf(no_Block, 
"B4_RS%d",++
N);
 
 1152   mBlocks = geom->
MakeBox(no_Block,Iron,6,2,0.3);
 
 1155   sprintf(no_Block, 
"B4_RS%d",++
N);
 
 1156   mBlocks = geom->
MakeBox(no_Block,Iron,4,2,1.5);
 
 1159   sprintf(no_Block, 
"B4_RS%d",++
N);
 
 1160   mBlocks = geom->
MakeBox(no_Block,Iron,4.5,7,1.8);
 
 1164   sprintf(no_Block, 
"B4_RS%d",++
N);
 
 1165   mBlocks = geom->
MakeBox(no_Block,Iron,4.5,11,1.8);
 
 1169   sprintf(no_Block, 
"B4_RS%d",++
N);
 
 1170   mBlocks = geom->
MakeBox(no_Block,Iron,4.25,1.5,2);
 
 1173   sprintf(no_Block, 
"B4_RS%d",++
N);
 
 1174   mBlocks = geom->
MakeBox(no_Block,Iron,4,2,2);
 
 1177   sprintf(no_Block, 
"B4_RS%d",++
N);
 
 1178   mBlocks = geom->
MakeBox(no_Block,Iron,4.5,7,2);
 
 1183   sprintf(no_Block, 
"B4_RS%d",++
N);
 
 1184   mBlocks = geom->
MakeBox(no_Block,Iron,4.5,11,2.4);
 
 1189   sprintf(no_Block, 
"B4_RT%d",
N=0);
 
 1190   mBlocks = geom->
MakeBox(no_Block,Iron,4.25,10.9,0.2);
 
 1193   sprintf(no_Block, 
"B4_RT%d",++
N);
 
 1194   mBlocks = geom->
MakeBox(no_Block,Iron,5.25,12.4,0.2);
 
 1198   sprintf(no_Block, 
"B4_RT%d",++
N);
 
 1199   mBlocks = geom->
MakeBox(no_Block,Iron,0.24,12.4,0.5);
 
 1202   sprintf(no_Block, 
"B4_RT%d",++
N);
 
 1203   mBlocks = geom->
MakeBox(no_Block,Iron,0.01,12.4,0.5);
 
 1207   sprintf(no_Block, 
"B4_RT%d",++
N);
 
 1208   mBlocks = geom->
MakeBox(no_Block,Iron,0.24,13,0.5);
 
 1211   sprintf(no_Block, 
"B4_RT%d",++
N);
 
 1212   mBlocks = geom->
MakeBox(no_Block,Iron,0.01,13,0.5);
 
 1216   sprintf(no_Block, 
"B4_RT%d",++
N);
 
 1217   mBlocks = geom->
MakeBox(no_Block,Iron,8.75,0.24,0.5);
 
 1220   sprintf(no_Block, 
"B4_RT%d",++
N);
 
 1221   mBlocks = geom->
MakeBox(no_Block,Iron,8.75,0.01,0.5);
 
 1225   sprintf(no_Block, 
"B4_RT%d",++
N);
 
 1226   mBlocks = geom->
MakeBox(no_Block,Iron,5.25,0.24,0.5);
 
 1229   sprintf(no_Block, 
"B4_RT%d",++
N);
 
 1230   mBlocks = geom->
MakeBox(no_Block,Iron,5.5,0.01,0.5);
 
 1234   sprintf(no_Block, 
"B4_RT%d",++
N);
 
 1235   mBlocks = geom->
MakeBox(no_Block,Iron,3.5,0.24,0.5);
 
 1238   sprintf(no_Block, 
"B4_RT%d",++
N);
 
 1239   mBlocks = geom->
MakeBox(no_Block,Iron,3.5,0.01,0.5);
 
 1247   sprintf(no_Block, 
"GRD%d",++
N);
 
 1248   mBlocks = geom->
MakeBox(no_Block,Iron,40,90,2);
 
 1252   sprintf(no_Block, 
"GRD%d",++
N);
 
 1253   mBlocks = geom->
MakeBox(no_Block,Iron,30,30,2);
 
 1263   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 AddNodeOverlap(TGeoVolume *vol, Int_t copy_no, TGeoMatrix *mat=nullptr, Option_t *option="")
Add a TGeoNode to the list of nodes.
 
virtual void SetVisibility(Bool_t vis=kTRUE)
set visibility of this volume
 
virtual void Draw(Option_t *option="")
draw top volume according to option
 
virtual void SetLineColor(Color_t lcolor)
Set the line color.