Reduces size of pillars to avoid overlap with DIPO.
authormorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Tue, 28 May 2002 08:47:38 +0000 (08:47 +0000)
committermorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Tue, 28 May 2002 08:47:38 +0000 (08:47 +0000)
STRUCT/AliHALL.cxx

index 52e8a77a4c0f0364836dd98762519ec07e611747..6fc996559d552c1c5ed591beb088235a77bce3bd 100644 (file)
@@ -15,6 +15,9 @@
 
 /*
 $Log$
 
 /*
 $Log$
+Revision 1.14  2001/11/16 12:38:26  morsch
+Reverse z-ordering in HMBS. (I. Hrivnacova)
+
 Revision 1.13  2001/06/21 12:26:52  morsch
 Simple concrete shielding around compensator dipole.
 
 Revision 1.13  2001/06/21 12:26:52  morsch
 Simple concrete shielding around compensator dipole.
 
@@ -279,7 +282,7 @@ void AliHALL::CreateGeometry()
   //     pillars for working platform 
   
   pbox[0] = 40.;
   //     pillars for working platform 
   
   pbox[0] = 40.;
-  pbox[1] = 120.;
+  pbox[1] = 97.;
   pbox[2] = 550.;
   gMC->Gsvolu("HPIL", "BOX ", idtmed[1956], pbox, 3);
   gMC->Gspos("HPIL", 1, "ALIC", 165.,-706+pbox[1] , 1350., 0, "ONLY");
   pbox[2] = 550.;
   gMC->Gsvolu("HPIL", "BOX ", idtmed[1956], pbox, 3);
   gMC->Gspos("HPIL", 1, "ALIC", 165.,-706+pbox[1] , 1350., 0, "ONLY");
@@ -301,6 +304,26 @@ void AliHALL::CreateGeometry()
 
   gMC->Gsvolu("HMBS", "PGON", idtmed[1956], ppgon, 10);
   gMC->Gspos("HMBS", 1, "ALIC", 0., 70., 0., 0, "ONLY");
 
   gMC->Gsvolu("HMBS", "PGON", idtmed[1956], ppgon, 10);
   gMC->Gspos("HMBS", 1, "ALIC", 0., 70., 0., 0, "ONLY");
+/*
+  ppgon[4] = -1800.;
+  ppgon[5] =     0.;
+  ppgon[6] =   150.;
+  ppgon[7] = -1300.;
+  ppgon[8] =     0.;
+  ppgon[9] =   150.;
+  gMC->Gsvolu("HMBT", "PGON", idtmed[1956], ppgon, 10);
+
+  ppgon[4] = -1800.;
+  ppgon[5] =     0.;
+  ppgon[6] =    10.;
+  ppgon[7] = -1300.;
+  ppgon[8] =     0.;
+  ppgon[9] =    10.;
+  gMC->Gsvolu("HMBU", "PGON", idtmed[1954], ppgon, 10);
+
+  gMC->Gspos("HMBU", 1, "HMBT", 0., -70., 0., 0, "ONLY");
+*/
+  gMC->Gspos("HMBT", 1, "ALIC", 0.,  70., 0., 0, "ONLY");
   
 }
 
   
 }