+
+ //
+ // Stack filling loop
+ //
+ for (i = 0; i < nTracks; i++) {
+
+ TParticle* iparticle = fReader->NextParticle();
+ Bool_t selected = KinematicSelection(iparticle,0);
+ if (!selected) {
+ Double_t pz = iparticle->Pz();
+ Double_t e = iparticle->Energy();
+ Double_t y;
+ if ((e-pz) == 0) {
+ y = 20.;
+ } else if ((e+pz) == 0.) {
+ y = -20.;
+ } else {
+ y = 0.5*TMath::Log((e+pz)/(e-pz));
+ }
+ printf("\n Not selected %d %f %f %f %f %f", i,
+ iparticle->Theta(),
+ iparticle->Phi(),
+ iparticle->P(),
+ iparticle->Pt(),
+ y);
+ //PH delete iparticle;
+ // continue;
+ }
+ p[0] = iparticle->Px();
+ p[1] = iparticle->Py();
+ p[2] = iparticle->Pz();
+ Int_t idpart = iparticle->GetPdgCode();
+ if(fVertexSmear==kPerTrack)
+ {
+ Rndm(random,6);
+ for (j = 0; j < 3; j++) {
+ origin[j]=fOrigin[j]+
+ fOsigma[j]*TMath::Cos(2*random[2*j]*TMath::Pi())*
+ TMath::Sqrt(-2*TMath::Log(random[2*j+1]));
+ }
+ }
+ Int_t decayed = iparticle->GetFirstDaughter();
+ Int_t doTracking = fTrackIt && (decayed < 0) &&
+ (TMath::Abs(idpart) > 10) && selected;
+ // printf("*** pdg, first daughter, trk = %d, %d, %d\n",
+ // idpart,decayed, doTracking);
+ //PH SetTrack(doTracking,-1,idpart,p,origin,polar,0,kPPrimary,nt);
+ Int_t parent = iparticle->GetFirstMother();
+ SetTrack(doTracking,parent,idpart,p,origin,polar,0,kPPrimary,nt);
+ KeepTrack(nt);
+ } // track loop
+
+ break;
+
+ } // event loop
+
+ SetHighWaterMark(nt);
+ CdEventFile();