143 mparam[0]=0; mparam[1]=1; mparam[2] =0; mparam[3] =0;
144 mparam[4]=0; mparam[5]=0; mparam[6]=0; mparam[7]=0;
149 for (Int_t i=0;i<6;i++) bparam[i]=0;
158 length = TMath::Sqrt((end[0]-start[0])*(end[0]-start[0])+
159 (end[1]-start[1])*(end[1]-start[1])+
160 (end[2]-start[2])*(end[2]-start[2]));
162 if (length<TGeoShape::Tolerance())
return 0.0;
163 Double_t invlen = 1./length;
164 dir[0] = (end[0]-start[0])*invlen;
165 dir[1] = (end[1]-start[1])*invlen;
166 dir[2] = (end[2]-start[2])*invlen;
169 TGeoNode *currentnode = 0;
170 TGeoNode *startnode = gGeoManager->InitTrack(start, dir);
176 TGeoMaterial *material = startnode->GetVolume()->GetMedium()->GetMaterial();
177 lparam[0] = material->GetDensity();
178 if (lparam[0] > mparam[7]) mparam[7]=lparam[0];
179 lparam[1] = material->GetRadLen();
180 lparam[2] = material->GetA();
181 lparam[3] = material->GetZ();
183 lparam[5] = lparam[3]/lparam[2];
184 if (material->IsMixture()) {
185 TGeoMixture * mixture = (TGeoMixture*)material;
188 for (Int_t iel=0;iel<mixture->GetNelements();iel++){
189 sum += mixture->GetWmixt()[iel];
190 lparam[5]+= mixture->GetZmixt()[iel]*mixture->GetWmixt()[iel]/mixture->GetAmixt()[iel];
197 gGeoManager->FindNextBoundaryAndStep(length, kFALSE);
199 Double_t snext = gGeoManager->GetStep();
201 if (!gGeoManager->IsOnBoundary()) {
202 mparam[0] = lparam[0];
203 mparam[1] = lparam[4]/lparam[1];
204 mparam[2] = lparam[2];
205 mparam[3] = lparam[3];
206 mparam[4] = lparam[4];
211 while (length>TGeoShape::Tolerance()) {
212 currentnode = gGeoManager->GetCurrentNode();
213 if (snext<2.*TGeoShape::Tolerance()) nzero++;
219 mparam[0] = bparam[0]/step;
220 mparam[1] = bparam[1];
221 mparam[2] = bparam[2]/step;
222 mparam[3] = bparam[3]/step;
223 mparam[5] = bparam[5]/step;
227 return bparam[0]/step;
231 bparam[1] += snext/lparam[1];
232 bparam[2] += snext*lparam[2];
233 bparam[3] += snext*lparam[3];
234 bparam[5] += snext*lparam[5];
235 bparam[0] += snext*lparam[0];
237 if (snext>=length)
break;
238 if (!currentnode)
break;
240 material = currentnode->GetVolume()->GetMedium()->GetMaterial();
241 lparam[0] = material->GetDensity();
242 if (lparam[0] > mparam[7]) mparam[7]=lparam[0];
243 lparam[1] = material->GetRadLen();
244 lparam[2] = material->GetA();
245 lparam[3] = material->GetZ();
246 lparam[5] = lparam[3]/lparam[2];
247 if (material->IsMixture()) {
248 TGeoMixture * mixture = (TGeoMixture*)material;
251 for (Int_t iel=0;iel<mixture->GetNelements();iel++){
252 sum+= mixture->GetWmixt()[iel];
253 lparam[5]+= mixture->GetZmixt()[iel]*mixture->GetWmixt()[iel]/mixture->GetAmixt()[iel];
257 gGeoManager->FindNextBoundaryAndStep(length, kFALSE);
258 snext = gGeoManager->GetStep();
260 mparam[0] = bparam[0]/step;
261 mparam[1] = bparam[1];
262 mparam[2] = bparam[2]/step;
263 mparam[3] = bparam[3]/step;
264 mparam[5] = bparam[5]/step;
265 return bparam[0]/step;
319 cout <<
"Info NuageGenerator: MaterialBudget " << start[2] <<
" - "<< end[2] << endl;
320 cout <<
"Info NuageGenerator: MaterialBudget " << bparam << endl;
321 cout <<
"Info NuageGenerator: MaterialBudget 0 " << mparam[0] << endl;
322 cout <<
"Info NuageGenerator: MaterialBudget 1 " << mparam[1] << endl;
323 cout <<
"Info NuageGenerator: MaterialBudget 2 " << mparam[2] << endl;
324 cout <<
"Info NuageGenerator: MaterialBudget 3 " << mparam[3] << endl;
325 cout <<
"Info NuageGenerator: MaterialBudget 4 " << mparam[4] << endl;
326 cout <<
"Info NuageGenerator: MaterialBudget 5 " << mparam[5] << endl;
327 cout <<
"Info NuageGenerator: MaterialBudget 6 " << mparam[6] << endl;
328 cout <<
"Info NuageGenerator: MaterialBudget " << mparam[0]*mparam[4] << endl;
337 LOG(WARNING) <<
"End of input file. Rewind.";
343 cout <<
"Info NuageGenerator: neutrino event-nr "<<
fn << endl;
347 Double_t zMean = (start[2]+end[2])/2;
349 Double_t zBD = zMean -
ztarget;
352 Double_t ThetaXMax =
startX/zBD;
353 Double_t ThetaXMin =
endX/zBD;
354 Double_t ThetaYMax =
startY/zBD;
355 Double_t ThetaYMin =
endY/zBD;
369 while (bparam<1.e-10)
371 txnu = gRandom->Uniform(ThetaXMax,ThetaXMin);
372 tynu = gRandom->Uniform(ThetaYMax,ThetaYMin);
374 pout[2] =
pzv*
pzv/(1+txnu*txnu+tynu*tynu);
378 pout[2]=TMath::Sqrt(pout[2]);
379 pout[0] = pout[2]*txnu;
380 pout[1] = pout[2]*tynu;
385 start[0]=txnu*(start[2]-
ztarget);
386 start[1]=tynu*(start[2]-
ztarget);
397 else bparam = 1.e-10;
401 Double_t prob2int = 0.;
408 while (prob2int<gRandom->Uniform(0.,1.))
410 z=gRandom->Uniform(start[2],end[2]);
417 TGeoNode *node = gGeoManager->FindNode(x,y,z);
418 TGeoMaterial *mat = 0;
419 if (node && !gGeoManager->IsOutside()) mat = node->GetVolume()->GetMaterial();
423 prob2int= mat->GetDensity()/mparam[7];
426 cout <<
"***WARNING*** NuageGenerator: prob2int > Maximum density????" << prob2int <<
" maxrho:" << mparam[7] <<
" material: " << mat->GetName() << endl;
434 Double_t tof=TMath::Sqrt(x*x+y*y+zrelative*zrelative)/2.99792458e+6;
435 cpg->AddTrack(
neu,pout[0],pout[1],pout[2],x,y,z,-1,
false,TMath::Sqrt(pout[0]*pout[0]+pout[1]*pout[1]+pout[2]*pout[2]),tof,mparam[0]*mparam[4]);
440 Int_t oLPdgCode =
neu;
444 oLPdgCode = copysign(TMath::Abs(
neu)-1,
neu);
446 if(TMath::Abs(oLPdgCode)!=15)
448 cpg->AddTrack(oLPdgCode,pp[0],pp[1],pp[2],x,y,z,0,
true,TMath::Sqrt(pp[0]*pp[0]+pp[1]*pp[1]+pp[2]*pp[2]),tof,mparam[0]*mparam[4]);
452 if(TMath::Abs(oLPdgCode)==15)
456 cpg->AddTrack(oLPdgCode,pp[0],pp[1],pp[2],x,y,z,0,
false,TMath::Sqrt(pp[0]*pp[0]+pp[1]*pp[1]+pp[2]*pp[2]),tof,mparam[0]*mparam[4]);
461 Double_t x2=0., y2=0., z2=0.;
465 Double_t zrelative2 = z2-z;
466 Double_t tof2=TMath::Sqrt(x2*x2+y2*y2+zrelative2*zrelative2)/2.99792458e+6;
467 for(
int j=0; j<
nf2; j++)
470 cpg->AddTrack(
pdgf2[j],pp[0],pp[1],pp[2],x2,y2,z2,nAddTrk,
true,TMath::Sqrt(pp[0]*pp[0]+pp[1]*pp[1]+pp[2]*pp[2]),tof2,mparam[0]*mparam[4]);
479 Double_t x3=0., y3=0., z3=0.;
483 Double_t zrelative3 = z3-z;
484 Double_t tof3=TMath::Sqrt(x3*x3+y3*y3+zrelative3*zrelative3)/2.99792458e+6;
485 for(
int j=0; j<
nf3; j++)
488 cpg->AddTrack(
pdgf3[j],pp[0],pp[1],pp[2],x3,y3,z3,nAddTrk,
true,TMath::Sqrt(pp[0]*pp[0]+pp[1]*pp[1]+pp[2]*pp[2]),tof3,mparam[0]*mparam[4]);
495 Double_t x4=0., y4=0., z4=0.;
499 Double_t zrelative4 = z4-z;
500 Double_t tof4=TMath::Sqrt(x4*x4+y4*y4+zrelative4*zrelative4)/2.99792458e+6;
501 for(
int j=0; j<
nf4; j++)
504 cpg->AddTrack(
pdgf4[j],pp[0],pp[1],pp[2],x4,y4,z4,nAddTrk,
true,TMath::Sqrt(pp[0]*pp[0]+pp[1]*pp[1]+pp[2]*pp[2]),tof4,mparam[0]*mparam[4]);
510 cpg->AddTrack(oLPdgCode,pp[0],pp[1],pp[2],x,y,z,0,
true,TMath::Sqrt(pp[0]*pp[0]+pp[1]*pp[1]+pp[2]*pp[2]),tof,mparam[0]*mparam[4]);
515 for(
int i=0; i<
nf; i++)
518 if(Abs(
pdgf[i])!= 411&&Abs(
pdgf[i])!=421&&Abs(
pdgf[i])!=431&&Abs(
pdgf[i])!=4122)
520 cpg->AddTrack(
pdgf[i],pp[0],pp[1],pp[2],x,y,z,0,
true,TMath::Sqrt(pp[0]*pp[0]+pp[1]*pp[1]+pp[2]*pp[2]),tof,mparam[0]*mparam[4]);
524 if(Abs(
pdgf[i]) == 411 || Abs(
pdgf[i])==421 || Abs(
pdgf[i])==431||Abs(
pdgf[i])==4122)
525 cout <<
"charm particle " << endl;
530 cpg->AddTrack(
pdgf[i],pp[0],pp[1],pp[2],x,y,z,0,
false,TMath::Sqrt(pp[0]*pp[0]+pp[1]*pp[1]+pp[2]*pp[2]),tof,mparam[0]*mparam[4]);
535 Double_t x2=0., y2=0., z2=0.;
539 Double_t zrelative2 = z2-z;
540 Double_t tof2=TMath::Sqrt(x2*x2+y2*y2+zrelative2*zrelative2)/2.99792458e+6;
541 for(
int j=0; j<
nf2; j++)
544 cpg->AddTrack(
pdgf2[j],pp[0],pp[1],pp[2],x2,y2,z2,nAddTrk,
true,TMath::Sqrt(pp[0]*pp[0]+pp[1]*pp[1]+pp[2]*pp[2]),tof2,mparam[0]*mparam[4]);
553 Double_t x3=0., y3=0., z3=0.;
557 Double_t zrelative3 = z3-z;
558 Double_t tof3=TMath::Sqrt(x3*x3+y3*y3+zrelative3*zrelative3)/2.99792458e+6;
559 for(
int j=0; j<
nf3; j++)
562 cpg->AddTrack(
pdgf3[j],pp[0],pp[1],pp[2],x3,y3,z3,nAddTrk,
true,TMath::Sqrt(pp[0]*pp[0]+pp[1]*pp[1]+pp[2]*pp[2]),tof3,mparam[0]*mparam[4]);
569 Double_t x4=0., y4=0., z4=0.;
573 Double_t zrelative4 = z4-z;
574 Double_t tof4=TMath::Sqrt(x4*x4+y4*y4+zrelative4*zrelative4)/2.99792458e+6;
575 for(
int j=0; j<
nf4; j++)
578 cpg->AddTrack(
pdgf4[j],pp[0],pp[1],pp[2],x4,y4,z4,nAddTrk,
true,TMath::Sqrt(pp[0]*pp[0]+pp[1]*pp[1]+pp[2]*pp[2]),tof4,mparam[0]*mparam[4]);
584 cpg->AddTrack(
pdgf[i],pp[0],pp[1],pp[2],x,y,z,0,
true,TMath::Sqrt(pp[0]*pp[0]+pp[1]*pp[1]+pp[2]*pp[2]),tof,mparam[0]*mparam[4]);