- // Entry window (glass)
- // gMC->Gsvolu("0TOP","TUBE",idtmed[6],ptop,3);
- gMC->Gsvolu("0TOP","TUBE",idtmed[12],ptop,3); //lucite
- z=-ppmt[2]+ptop[2];
- gMC->Gspos("0TOP",1,"0PMT",0,0,z,0,"ONLY");
- // printf("Z PTOP %f -ppmt[2] %f ptop[2] %f\n",z,-ppmt[2],ptop[2]);
-
- // Bottom glass
- gMC->Gsvolu("0BOT","TUBE",idtmed[6],pbot,3);
- z=ppmt[2]-pbot[2];
- if(fDebug) printf("%s: Z bottom %f\n",ClassName(),z);
- gMC->Gspos("0BOT",1,"0PMT",0,0,z,0,"ONLY");
- // Side cylinder glass
- gMC->Gsvolu("0OUT","TUBE",idtmed[6],pglass,3);
- z=ppmt[2]-pglass[2];
- // printf("Z glass %f\n",z);
- gMC->Gspos("0OUT",1,"0PMT",0,0,z,0,"ONLY");
- //PMT electrodes support structure
- gMC->Gsvolu("0CER","TUBE",idtmed[4],pcer,3);
- gMC->Gsvolu("0STE","TUBE",idtmed[8],psteel,3);
- z=-ppmt[2]+2*ptop[2]+0.3;;
- // printf("Z Cer 1 %f\n",z);
- for (is=1; is<=15; is++)
- {
- z=z+psteel[2]+pcer[2];
- gMC->Gspos("0CER",is,"0PMT",0,0,z,0,"ONLY");
- z=z+psteel[2]+pcer[2];
- gMC->Gspos("0STE",is,"0PMT",0,0,z,0,"ONLY");
- }
-
- // Divider
- // Knob at the bottom of PMT baloon
-
- gMC->Gsvolu("0NB","TUBE",idtmed[6],pknob,3);
- z=-pdivider[2]+pknob[2];
- // printf("zknob %f\n",z);
- gMC->Gspos("0NB",1,"0DIV",0,0,z,0,"ONLY");
- gMC->Gsvolu("0KB","TUBE",idtmed[6],pknob_bot,3);
- z=-pdivider[2]+2*pknob[2]+pknob_bot[2];
- // printf(knobbot %f\n",z);
- gMC->Gspos("0KB",1,"0DIV ",0,0,z,0,"ONLY");
- gMC->Gsvolu("0VAC","TUBE",idtmed[3],pknob_vac,3);
- z=-pdivider[2]+pknob_vac[2];
- // printf("knobvac %f\n",z);
- gMC->Gspos("0VAC",1,"0DIV",0,0,z,0,"ONLY");
- //Steel pins + pin holes
- gMC->Gsvolu("0PIN","TUBE",idtmed[8],ppins,3);
- z=-pdivider[2]+ppins[2];
- gMC->Gspos("0PIN",1,"0DIV",0,0,z,0,"ONLY");
- gMC->Gsvolu("0HOL","TUBE",idtmed[11],phole,3);
- z=-pdivider[2]+2*ppins[2]+phole[2];
- gMC->Gspos("0HOL",1,"0DIV",0,0,z,0,"ONLY");
+ x=0;
+ y=0;
+ z=-pinstart[2]+ppmt[2]+2.*psupport6[2]+0.1;
+ gMC->Gspos("0PMT",1,"0INS",x,y,z,0,"ONLY");
+ z=z+pdivider[2]+ppmt[2];
+ gMC->Gspos("0DIV",1,"0INS",x,y,z,0,"ONLY");
+
+ // PMT
+
+ // Entry window (glass)
+ gMC->Gsvolu("0TOP","TUBE",idtmed[kOpGlass],ptop,3); //glass
+ // gMC->Gsvolu("0TOP","TUBE",idtmed[12],ptop,3); //lucite
+ z=-ppmt[2]+ptop[2];
+ gMC->Gspos("0TOP",1,"0PMT",0,0,z,0,"ONLY");
+
+ //Fotokatod
+
+ gMC->Gsvolu ("0REG", "TUBE", idtmed[kOpGlass], preg, 3); //photocathode dobavil bogdanov(AliSTARTv2)
+ z = -ppmt[2] + 2 * ptop[2] + preg[2]; //photocathode dobavil bogdanov
+ gMC->Gspos ("0REG", 1, "0PMT", 0, 0, z, 0, "ONLY"); //photocathode dobavil bogdanov(AliSTARTv2)
+
+ // Bottom glass
+ gMC->Gsvolu("0BOT","TUBE",idtmed[kGlass],pbot,3);
+ z=ppmt[2]-pbot[2];
+ AliDebugClass(1,Form(" Z bottom %f\n",z));
+ gMC->Gspos("0BOT",1,"0PMT",0,0,z,0,"ONLY");
+ // Side cylinder glass
+ gMC->Gsvolu("0OUT","TUBE",idtmed[kGlass],pglass,3);
+ z=ppmt[2]-pglass[2];
+ gMC->Gspos("0OUT",1,"0PMT",0,0,z,0,"ONLY");
+ //PMT electrodes support structure
+ gMC->Gsvolu("0CER","TUBE",idtmed[kCer],pcer,3);
+ gMC->Gsvolu("0STE","TUBE",idtmed[kSteel],psteel,3);
+ z=-ppmt[2]+2*ptop[2]+0.3;;
+ for (is=1; is<=15; is++)
+ {
+ z=z+psteel[2]+pcer[2];
+ gMC->Gspos("0CER",is,"0PMT",0,0,z,0,"ONLY");
+ z=z+psteel[2]+pcer[2];
+ gMC->Gspos("0STE",is,"0PMT",0,0,z,0,"ONLY");
+ }
+
+ // Divider
+ // Knob at the bottom of PMT baloon
+
+ gMC->Gsvolu("0NB","TUBE",idtmed[6],pknob,3);
+ z=-pdivider[2]+pknob[2];
+ gMC->Gspos("0NB",1,"0DIV",0,0,z,0,"ONLY");
+ gMC->Gsvolu("0KB","TUBE",idtmed[kGlass],pknob_bot,3);
+ z=-pdivider[2]+2*pknob[2]+pknob_bot[2];
+ gMC->Gspos("0KB",1,"0DIV ",0,0,z,0,"ONLY");
+ gMC->Gsvolu("0VAC","TUBE",idtmed[kVac],pknob_vac,3);
+ z=-pdivider[2]+pknob_vac[2];
+ gMC->Gspos("0VAC",1,"0DIV",0,0,z,0,"ONLY");
+ //Steel pins + pin holes
+ gMC->Gsvolu("0PIN","TUBE",idtmed[kSteel],ppins,3);
+ z=-pdivider[2]+ppins[2];
+ gMC->Gspos("0PIN",1,"0DIV",0,0,z,0,"ONLY");
+ gMC->Gsvolu("0HOL","TUBE",idtmed[kBrass],phole,3);
+ z=-pdivider[2]+2*ppins[2]+phole[2];
+ gMC->Gspos("0HOL",1,"0DIV",0,0,z,0,"ONLY");
+
+ //Socket
+ gMC->Gsvolu("0V1","TUBE",idtmed[kCer],pdiv1,3);
+ z=-pdivider[2]+pdiv1[2];
+ gMC->Gspos("0V1",1,"0DIV",0,0,z,0,"ONLY");
+ //Resistors
+ gMC->Gsvolu("0V2","TUBE",idtmed[kAir],pdiv2,3);
+ z=pdivider[2]-pdiv2[2];
+ gMC->Gspos("0V2",1,"0DIV",0,0,z,0,"ONLY");
+ gMC->Gsvolu("0RS","TUBE",idtmed[kCer],presist,3);
+ z=-pdiv2[2]+presist[2];
+ gMC->Gspos("0RS",1,"0V2",0,0,z,0,"ONLY");
+ gMC->Gsvolu("0RB","TUBE",idtmed[kRibber],pribber,3);
+ z=pdiv2[2]-pribber[2];
+ gMC->Gspos("0RB",1,"0V2",0,0,z,0,"ONLY");
+
+
+ //Support left side
+ /*
+ z=-pstart[2]+psupport1[2];
+ gMC->Gspos("0SU1",2,"0STL",0,0,z,0,"ONLY"); //C kozhuh snaruzhi
+ gMC->Gspos("0SU2",2,"0STL",0,0,z,0,"ONLY"); //C kozhuh vnutri
+ z=-pstart[2]+psupport3[2];
+ gMC->Gspos("0SU3",2,"0STL",0,0,z,0,"ONLY"); //peredniaia kryshka
+ z=-pstart[2]+2.*psupport1[2];
+ gMC->Gspos("0SU4",2,"0STL",0,0,z,0,"MANY"); //zadnaiai kryshka
+ */
+ z=-pstart[2]+psupport1[2]+0.1;
+ gMC->Gspos("0SU1",1,"0STR",0,0,z,0,"ONLY"); //C kozhuh snaruzhi
+ gMC->Gspos("0SU2",1,"0STR",0,0,z,0,"ONLY"); //C kozhuh vnutri
+ z=-pstart[2]+psupport3[2]+0.1;
+ gMC->Gspos("0SU3",1,"0STR",0,0,z,0,"ONLY"); //peredniaia kryshka
+ z=-pstart[2]+2.*psupport1[2]+0.1;
+ gMC->Gspos("0SU4",1,"0STR",0,0,z,0,"MANY"); //zadnaiai kryshka
+ gMC->Gspos("0SU6",1,"0INS",0,0,0,0,"ONLY");//C stakanchik dlia feu
+ z=-pinstart[2]+psupport6[2];
+ gMC->Gspos("0SU7",1,"0INS",0,0,z,0,"ONLY"); //Al kryshechka
+
+ z=pinstart[2]-psupport7[2];
+ gMC->Gspos("0SU8",1,"0INS",0,0,z,0,"ONLY"); //Al kolechko
+
+
+ Float_t par[3];
+ par[0]=4.4;
+ par[1]=4.5;
+ par[2]=0.5;
+ gMC->Gsvolu("0SC0","TUBE",idtmed[kC],par,3);
+ z=ppcon[3]+par[2];
+ gMC->Gspos("0SC0",1,"0SUP",0,0,z,0,"ONLY");
+ z += par[2];
+ par[0]=4.4;
+ par[1]=5.1;
+ par[2]=0.05;
+ gMC->Gsvolu("0SC1","TUBE",idtmed[kC],par,3);
+ z += par[2];
+ gMC->Gspos("0SC1",1,"0SUP",0,0,z,0,"ONLY");
+ z=z+par[2];
+ par[0]=4.9;
+ par[1]=5.0;
+ par[2]=6.9/2;
+ gMC->Gsvolu("0SC2","TUBE",idtmed[kC],par,3);
+ z += par[2];
+ gMC->Gspos("0SC2",1,"0SUP",0,0,z,0,"ONLY");
+ z += par[2];
+ /*
+ Float_t parC[5];
+ parC[0]=0.25;
+ parC[1]=5.1;
+ parC[2]=5.2;
+ parC[3]=5.5;
+ parC[4]=5.6;
+ gMC->Gsvolu("0SC3","CONE",idtmed[kC],parC,5);
+ z += parC[0];
+ gMC->Gspos("0SC3",1,"0SUP",0,0,z,0,"ONLY");
+ z += parC[0];
+ par[0]=5.5;
+ par[1]=5.6;
+ par[2]=1.2/2;
+ gMC->Gsvolu("0SC4","TUBE",idtmed[kC],par,3);
+ z += par[2];
+ gMC->Gspos("0SC4",1,"0SUP",0,0,z,0,"ONLY");
+ par[0]=5.1;
+ par[1]=5.5;
+ par[2]=1.2/2;
+ gMC->Gsvolu("0SA0","TUBE",idtmed[kAl],par,3);
+ gMC->Gspos("0SA0",1,"0SUP",0,0,z,0,"ONLY");
+ //gvozdi dlia skruchivaniia Al i C parts
+ par[0]=5.75;
+ par[1]=5.78;
+ gMC->Gsvolu("0SN1","TUBE",idtmed[kSteel],par,3);
+ gMC->Gspos("0SN1",1,"0SUP",0,0,z,0,"ONLY");
+ z += par[2];
+ */
+ par[0]=3.15;
+ par[1]=4.9;
+ par[2]=0.1/2;
+ gMC->Gsvolu("0SA1","TUBE",idtmed[kAl],par,3);