Last layer of Pb outer angle corrected
authormorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Thu, 13 Jan 2000 11:23:59 +0000 (11:23 +0000)
committermorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Thu, 13 Jan 2000 11:23:59 +0000 (11:23 +0000)
STRUCT/AliABSOv0.cxx

index 2b19537704b253a1765ebe4b90506cce9385f9d9..6c278dfe78c5f4016ffaa63145e8f28d81c021a2 100644 (file)
@@ -15,6 +15,9 @@
 
 /*
 $Log$
+Revision 1.1  2000/01/12 15:39:30  morsch
+Standar version of ABSO
+
 */
 
 ///////////////////////////////////////////////////////////////////////////////
@@ -198,7 +201,7 @@ void AliABSOv0::CreateGeometry()
   cpar[1] = zr * TMath::Tan(theta_r);
   cpar[2] = zr * TMath::Tan(acc_max);
   cpar[3] = cpar[1] + TMath::Tan(acc_min) * 5;
-  cpar[4] = cpar[2] + TMath::Tan(theta_r) * 5;
+  cpar[4] = cpar[2] + TMath::Tan(acc_max) * 5;
   gMC->Gsvolu("ARPB", "CONE", idtmed[1632], cpar, 5);
   dz=(abs_l-abs_d)/2.-cpar[0];
   gMC->Gspos("ARPB", 1, "AITR", 0., 0., dz, 0, "ONLY");