* provided "as is" without express or implied warranty. *
**************************************************************************/
-/*
-$Log$
-Revision 1.1 2000/10/27 08:13:02 morsch
-Lego generator for phi-z binning.
+/* $Id$ */
-*/
+//-------------------------------------------------------------------------
+// Lego generator in Phi - Z bins
+// Uses geantino rays to check the material distributions and detector's
+// geometry
+// Author: A.Morsch
+//-------------------------------------------------------------------------
#include "AliLegoGeneratorPhiZ.h"
#include "AliRun.h"
+#include "AliMC.h"
+#include "AliLog.h"
ClassImp(AliLegoGeneratorPhiZ)
// Prepare for next step
if(fCoor1Bin>=fNCoor1-1)
if(fCoor2Bin>=fNCoor2-1) {
- Warning("Generate","End of Lego Generation");
+ AliWarning("End of Lego Generation");
return;
} else {
fCoor2Bin++;
- printf("Generating rays in z-bin:%d\n",fCoor2Bin);
+ AliDebug(1, Form("Generating rays in Phi-bin:%d",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->GetMCApp()->PushTrack(1, -1, kMpart, pmom, orig, polar, 0, kPPrimary, ntr);
}