1#include "G4ThreeVector.hh"
35 for(G4int i=0;i<6;i++)
37 for(G4int i=0;i<5;i++)
43 totalThickness=fTyvekThickness+fAlThickness+fMylarThickness;
46 G4String ParaPath = getenv(
"SIMUTILROOT");
48 G4Exception(
"BOOST environment not set!");
50 ParaPath +=
"/dat/EmcEndGeometry.dat";
55 for(G4int i=0;i<30;i++)
56 for (G4int j=0;j<24;j++)
58 for(G4int i=0;i<5;i++)
59 for (G4int j=0;j<6;j++)
91 for(G4int i=0;i<30;i++)
93 for (G4int j=0;j<8;j++)
96 G4ThreeVector* pPnt =
new G4ThreeVector(param[i][j],param[i][j+8],param[i][j+16]-WorldZPosition);
100 if(i==5||i==6||i==14||i==15||i==16)
102 for(G4int j=0;j<8;j++)
103 fPnt[30+pentaNb][j] = fPnt[i][j];
106 G4double y0,y1,y4,y5;
107 G4ThreeVector v0,v1,v4,v5;
108 y0 = penta[pentaNb][0];
109 y1 = penta[pentaNb][1];
110 y4 = penta[pentaNb][2];
111 y5 = penta[pentaNb][3];
112 v0 = (y0-fPnt[i][3].getY())*(fPnt[i][0]-fPnt[i][3])/(fPnt[i][0].getY()-fPnt[i][3].getY())
114 v1 = (y1-fPnt[i][2].getY())*(fPnt[i][1]-fPnt[i][2])/(fPnt[i][1].getY()-fPnt[i][2].getY())
116 v4 = (y4-fPnt[i][7].getY())*(fPnt[i][4]-fPnt[i][7])/(fPnt[i][4].getY()-fPnt[i][7].getY())
118 v5 = (y5-fPnt[i][6].getY())*(fPnt[i][5]-fPnt[i][6])/(fPnt[i][5].getY()-fPnt[i][6].getY())
122 x1 = penta[pentaNb][4];
123 x5 = penta[pentaNb][5];
124 v1 = (x1-v0.getX())*(v1-v0)/(v1.getX()-v0.getX())+v0;
125 v5 = (x5-v4.getX())*(v5-v4)/(v5.getX()-v4.getX())+v4;
132 fPnt[30+pentaNb][2] = v1;
133 fPnt[30+pentaNb][3] = v0;
134 fPnt[30+pentaNb][6] = v5;
135 fPnt[30+pentaNb][7] = v4;
142 G4ThreeVector temp[35][8];
143 for(G4int i=0;i<35;i++)
145 for (G4int j=0;j<8;j++)
147 temp[i][j]=fPnt[i][j];
148 fPnt[i][j].rotateZ(157.5*deg);
149 fPnt[i][j].setX(-fPnt[i][j].getX());
153 for (G4int j=0;j<8;j++)
157 G4ThreeVector
v=fPnt[i][j];
158 fPnt[i][j]=fPnt[i][3-j];
163 G4ThreeVector
v=fPnt[i][j];
164 fPnt[i][j]=fPnt[i][11-j];
184 for(G4int i=0;i<35;i++)
186 for (G4int j=0;j<8;j++)
188 G4ThreeVector pPnt1 = temp[i][j];
189 fPnt1[i][j] = pPnt1.rotateZ(67.5*deg);
191 if((i==3)||(i==7)||(i==12)||(i==17)||(i==23)||(i==29))
193 fPnt1[i][0].setX(10);
194 fPnt1[i][1].setX(10);
195 fPnt1[i][4].setX(10);
196 fPnt1[i][5].setX(10);
198 G4double y0 = fPnt1[i][0].getY()+10*(fPnt1[i][3].getY()-fPnt1[i][0].getY())/fPnt1[i][3].getX();
199 G4double y1 = fPnt1[i][1].getY()+10*(fPnt1[i][2].getY()-fPnt1[i][1].getY())/fPnt1[i][2].getX();
200 G4double y4 = fPnt1[i][4].getY()+10*(fPnt1[i][7].getY()-fPnt1[i][4].getY())/fPnt1[i][7].getX();
201 G4double y5 = fPnt1[i][5].getY()+10*(fPnt1[i][6].getY()-fPnt1[i][5].getY())/fPnt1[i][6].getX();
203 G4double z0 = fPnt1[i][0].getZ()+10*(fPnt1[i][3].getZ()-fPnt1[i][0].getZ())/fPnt1[i][3].getX();
204 G4double z1 = fPnt1[i][1].getZ()+10*(fPnt1[i][2].getZ()-fPnt1[i][1].getZ())/fPnt1[i][2].getX();
205 G4double z4 = fPnt1[i][4].getZ()+10*(fPnt1[i][7].getZ()-fPnt1[i][4].getZ())/fPnt1[i][7].getX();
206 G4double z5 = fPnt1[i][5].getZ()+10*(fPnt1[i][6].getZ()-fPnt1[i][5].getZ())/fPnt1[i][6].getX();
208 fPnt1[i][0].setY(y0);
209 fPnt1[i][1].setY(y1);
210 fPnt1[i][4].setY(y4);
211 fPnt1[i][5].setY(y5);
213 fPnt1[i][0].setZ(z0);
214 fPnt1[i][1].setZ(z1);
215 fPnt1[i][4].setZ(z4);
216 fPnt1[i][5].setZ(z5);
224 for(G4int i=0;i<8;i++)
227 fPnt[cry1][i] = fPnt[cry2][i];
236 for(G4int i=0;i<35;i++)
238 for(G4int j=0;j<8;j++)
240 fPnt1[i][j].setX(-fPnt1[i][j].getX());
245 for(G4int j=0;j<8;j++)
249 G4ThreeVector v2=fPnt1[i][j];
250 fPnt1[i][j]=fPnt1[i][j+1];
260 G4ThreeVector center1=0;
261 G4ThreeVector center2=0;
263 if(CryNb==5||CryNb==6||CryNb==14||CryNb==15||CryNb==16)
265 center1 = (pos[0]+pos[1])/2;
266 center2 = (pos[4]+pos[5])/2;
268 else if(CryNb>=30&&CryNb<35)
270 center1 = (pos[2]+pos[3])/2;
271 center2 = (pos[6]+pos[7])/2;
275 center1 = (pos[0]+pos[1]+pos[2]+pos[3])/4;
276 center2 = (pos[4]+pos[5]+pos[6]+pos[7])/4;
279 G4double r1=(pos[1]-center1).r();
280 G4double r2=(pos[2]-center1).r();
281 G4double r12=(pos[1]-pos[2]).r();
282 G4double theta=acos((r2*r2+r12*r12-r1*r1)/(2*r2*r12));
283 G4double h=r2*
sin(theta);
284 G4double t1=totalThickness/h;
286 r1=(pos[5]-center2).r();
287 r2=(pos[6]-center2).r();
288 r12=(pos[5]-pos[6]).r();
289 theta=acos((r2*r2+r12*r12-r1*r1)/(2*r2*r12));
291 G4double t2=totalThickness/h;
293 for(G4int i=0;i<8;i++)
297 cryPoint[i] = (1-t1)*pos[i]+t1*center1;
301 G4ThreeVector temp = (1-t2)*pos[i]+t2*center2;
302 cryPoint[i] = (1-totalThickness/CrystalLength)*temp+(totalThickness/CrystalLength)*pos[i-4];
309(
const G4int partId,
const G4int numTheta,
const G4int numPhi)
312 G4int sector=-1, cryNb=-1;
317 G4double A1=0,a1=0,B1=0,b1=0,C1=0,c1=0,D1=0,d1=0,E1=0,e1=0;
319 G4ThreeVector position=0;
320 G4int cryInOneSector = cryNumInOneLayer[numTheta]/16;
321 G4ThreeVector pos[8];
325 if(numPhi>=0&&numPhi<8*cryInOneSector)
326 m_numPhi=8*cryInOneSector-1-numPhi;
327 else if(numPhi>=8*cryInOneSector&&numPhi<16*cryInOneSector)
328 m_numPhi=16*cryInOneSector-1-numPhi;
333 if(numPhi>=4*cryInOneSector&&numPhi<5*cryInOneSector)
336 m_numPhi=8*cryInOneSector-1-numPhi;
338 else if(numPhi>=11*cryInOneSector&&numPhi<12*cryInOneSector)
342 m_numPhi=numPhi-8*cryInOneSector;
344 if(numPhi>=12*cryInOneSector&&numPhi<13*cryInOneSector)
347 m_numPhi=16*cryInOneSector-1-numPhi;
351 G4int cryNbOffset = 0;
352 for(G4int i=0;i<numTheta;i++)
353 cryNbOffset += cryNumInOneLayer[i]/16;
355 sector = m_numPhi/cryInOneSector;
356 cryNb = m_numPhi-cryInOneSector*sector+cryNbOffset;
358 if(sector>15&§or<=18)
363 for(G4int i=0;i<8;i++)
364 pos[i]=fPnt1[cryNb][i];
366 for(G4int i=0;i<8;i++)
368 pos[i]=fPnt[cryNb][i];
369 pos[i].rotateZ(-67.5*deg+sector*22.5*deg);
374 G4double A = (cryPoint[0]-cryPoint[3]).r();
375 G4double a = (cryPoint[4]-cryPoint[7]).r();
376 G4double B = (cryPoint[1]-cryPoint[2]).r();
377 G4double
b = (cryPoint[5]-cryPoint[6]).r();
378 G4double
C = (cryPoint[0]-cryPoint[1]).r();
379 G4double c = (cryPoint[4]-cryPoint[5]).r();
380 G4double D = (cryPoint[2]-cryPoint[3]).r();
381 G4double d = (cryPoint[6]-cryPoint[7]).r();
384 for(G4int i=0;i<8;i++)
386 pos[i].setZ(pos[i].getZ()+WorldZPosition);
388 pos[i].setX(-pos[i].getX());
390 pos[i].setY(-pos[i].getY());
393 pos[i].setX(-pos[i].getX());
394 pos[i].setZ(-pos[i].getZ());
399 for(G4int j=4;j<8;j++)
404 for(G4int i=0;i<5;i++)
406 if(cryNb==pentaInOneSector[i])
409 G4ThreeVector penta[8];
413 for(G4int j=0;j<8;j++)
414 penta[j]=fPnt1[30+i][j];
416 for(G4int j=0;j<8;j++)
418 penta[j]=fPnt[30+i][j];
419 penta[j].rotateZ(-67.5*deg+sector*22.5*deg);
424 A1 = (cryPoint[1]-cryPoint[2]).r();
425 a1 = (cryPoint[5]-cryPoint[6]).r();
426 B1 = (cryPoint[1]-cryPoint[0]).r();
427 b1 = (cryPoint[5]-cryPoint[4]).r();
428 C1 = (cryPoint[0]-cryPoint[3]).r()+A;
429 c1 = (cryPoint[4]-cryPoint[7]).r()+a;
436 for(G4int j=0;j<8;j++)
438 penta[j].setZ(penta[j].getZ()+WorldZPosition);
440 penta[j].setX(-penta[j].getX());
442 penta[j].setY(-penta[j].getY());
445 penta[j].setX(-penta[j].getX());
446 penta[j].setZ(-penta[j].getZ());
451 for(G4int j=4;j<8;j++)
455 if(j==0||j==1||j==4||j==5)
456 position += penta[j];
460 flag = leftFlag+downFlag;
463 G4double temp1 = B1; B1 = D1; D1 = temp1;
464 temp1 = A1; A1 = E1; E1 = temp1;
465 temp1 = b1; b1 = d1; d1 = temp1;
466 temp1 = a1; a1 = e1; e1 = temp1;
473 flag = leftFlag+downFlag+partId/2;
476 G4double temp =
C;
C = D; D = temp;
477 temp = c; c = d; d = temp;
double sin(const BesAngle a)
**********Class see also m_nmax DOUBLE PRECISION m_amel DOUBLE PRECISION m_x2 DOUBLE PRECISION m_alfinv DOUBLE PRECISION m_Xenph INTEGER m_KeyWtm INTEGER m_idyfs DOUBLE PRECISION m_zini DOUBLE PRECISION m_q2 DOUBLE PRECISION m_Wt_KF DOUBLE PRECISION m_WtCut INTEGER m_KFfin *COMMON c_KarLud $ !Input CMS energy[GeV] $ !CMS energy after beam spread beam strahlung[GeV] $ !Beam energy spread[GeV] $ !z boost due to beam spread $ !electron beam mass *ff pair spectrum $ !minimum v
***************************************************************************************Pseudo Class RRes *****************************************************************************************Parameters and physical constants **Maarten sept ************************************************************************DOUBLE PRECISION xsmu **************************************************************************PARTICLE DATA all others are from PDG *Only resonances with known widths into electron pairs are sept ************************************************************************C Declarations C
void ModifyForCasing(G4ThreeVector pos[8], G4int CryNb)
G4ThreeVector ComputeDimAndPos(const G4int, const G4int, const G4int)
void Exchange(G4int cry1, G4int cry2)
G4double GetAlThickness()
G4double GetTyvekThickness()
G4int GetPentaInOneSector(G4int nb)
G4int GetCryInOneLayer(G4int nb)
G4double GetWorldZPosition()
G4double GetCrystalLength()
G4double GetMylarThickness()