+ Float_t dzs = -(kZvac12-zstart)/2. + (kZch32-zstart) + dl;
+ gMC->Gspos("YOPB", 1, "YMOT", 0., 0., dzs, 0, "ONLY");
+
+ par0[ 0] = 0.;
+ par0[ 1] = 360.;
+ par0[ 2] = 18.;
+
+ par0[ 3] = -dl;
+ par0[ 5] = 30.+(kZch32-kZConeE)*TMath::Tan(kThetaOpenPbO);
+ par0[ 4] = par0[ 5] - 4.;
+// 4th station
+ par0[ 6] = -dz + kZch41 - 4.;
+ par0[ 8] = 30.+(kZch41-4.-kZConeE)*TMath::Tan(kThetaOpenPbO);
+ par0[ 7] = par0[ 8] -4.;
+
+ par0[ 9] = -dz + kZch41 - 4.;
+ par0[11] = par0[8];
+ par0[10] = 33.5;
+
+ par0[12] = -dz + kZch41;
+ par0[14] = 30.+(kZch41-kZConeE)*TMath::Tan(kThetaOpenPbO);
+ par0[13] = 33.5;
+
+ par0[15] = -dz + kZch41;
+ par0[17] = 37.5;
+ par0[16] = 33.5;
+
+ par0[18] = -dz + kZch42;
+ par0[20] = 37.5;
+ par0[19] = 33.5;
+
+ par0[21] = -dz + kZch42;
+ par0[23] = 30.+(kZch42-kZConeE)*TMath::Tan(kThetaOpenPbO);
+ par0[22] = 33.5;
+
+ par0[24] = -dz + kZch42 + 4.;
+ par0[26] = 30.+(kZch42+4.-kZConeE)*TMath::Tan(kThetaOpenPbO);
+ par0[25] = 33.5;
+
+ par0[27] = -dz + kZch42 + 4.;
+ par0[29] = 30.+(kZch42+4.-kZConeE)*TMath::Tan(kThetaOpenPbO);
+ par0[28] = par0[29] - 4.;
+
+// 5th station
+ par0[30] = -dz + kZch51 - 4.;
+ par0[32] = 30.+(kZch51-4.-kZConeE)*TMath::Tan(kThetaOpenPbO);
+ par0[31] = par0[32] - 4.;
+
+ par0[33] = -dz + kZch51 - 4.;
+ par0[35] = par0[32];
+ par0[34] = 33.5;
+
+ par0[36] = -dz + kZch51;
+ par0[38] = 30.+(kZch51-kZConeE)*TMath::Tan(kThetaOpenPbO);
+ par0[37] = 33.5;
+
+ par0[39] = -dz + kZch51;
+ par0[41] = 37.5;
+ par0[40] = 33.5;
+
+ par0[42] = -dz + kZch52;
+ par0[44] = 37.5;
+ par0[43] = 33.5;
+
+ par0[45] = -dz + kZch52;
+ par0[47] = 30.+(kZch52-kZConeE)*TMath::Tan(kThetaOpenPbO);
+ par0[46] = 33.5;
+
+ par0[48] = -dz + kZch52 + 4.;
+ par0[50] = 30.+(kZch52+4.-kZConeE)*TMath::Tan(kThetaOpenPbO);
+ par0[49] = 33.5;
+
+ par0[51] = -dz + kZch52 + 4.;
+ par0[53] = 30.+(kZch52+4.-kZConeE)*TMath::Tan(kThetaOpenPbO);
+ par0[52] = par0[53] - 4.;
+
+ par0[54] = +dl;
+ par0[56] = par0[53];
+ par0[55] = par0[52];
+
+ gMC->Gsvolu("YOSE", "PCON", idtmed[kSteel], par0, 57);
+ gMC->Gspos ("YOSE", 1, "YOPB", 0., 0., 0., 0, "ONLY");