/*
$Log$
+Revision 1.5.10.1 2002/06/10 14:43:06 hristov
+Merged with v3-08-02
+
+Revision 1.7 2002/05/07 16:44:04 morsch
+Correct initialization of origin[2]. (Thanks to Angela Badala)
+
+Revision 1.6 2002/05/03 12:18:24 morsch
+Print-out corrected.
+
+Revision 1.5 2001/05/16 14:57:22 alibrary
+New files for folders and Stack
+
+Revision 1.4 2001/01/12 09:23:17 morsch
+Correct order of phi and z.
+
+Revision 1.3 2000/11/30 07:12:49 alibrary
+Introducing new Rndm and QA classes
+
+Revision 1.2 2000/10/27 11:40:01 morsch
+Error in printouts corrected
+
+Revision 1.1 2000/10/27 08:13:02 morsch
+Lego generator for phi-z binning.
+
*/
#include "AliLegoGeneratorPhiZ.h"
return;
} else {
fCoor2Bin++;
- printf("Generating rays in phi bin:%d\n",fCoor2Bin);
+ printf("Generating rays in Phi-bin:%d\n",fCoor2Bin);
fCoor1Bin=0;
} else fCoor1Bin++;
-
fCurCoor1 = (fCoor1Min+(fCoor1Bin+0.5)*(fCoor1Max-fCoor1Min)/fNCoor1);
fCurCoor2 = (fCoor2Min+(fCoor2Bin+0.5)*(fCoor2Max-fCoor2Min)/fNCoor2);
- Float_t phi = fCurCoor1*TMath::Pi()/180.;
+ Float_t phi = fCurCoor2*TMath::Pi()/180.;
cosp = TMath::Cos(phi);
sinp = TMath::Sin(phi);
// --- Where to start
orig[0] = orig[1] = orig[2] = 0;
- orig[2] = fCurCoor2;
+ orig[2] = fCurCoor1;
Float_t dalicz = 3000;
if (fRadMin > 0) {
t = PropagateCylinder(orig,pmom,fRadMin,dalicz);
- orig[0] = pmom[0]*t;
- orig[1] = pmom[1]*t;
- orig[2] = pmom[2]*t;
+ orig[0] += pmom[0]*t;
+ orig[1] += pmom[1]*t;
+ orig[2] += pmom[2]*t;
if (TMath::Abs(orig[2]) > fZMax) return;
}
Float_t polar[3]={0.,0.,0.};
Int_t ntr;
- gAlice->SetTrack(1, 0, kMpart, pmom, orig, polar, 0, "LEGO ray", ntr);
+ gAlice->SetTrack(1, -1, kMpart, pmom, orig, polar, 0, kPPrimary, ntr);
}