/*
$Log$
+Revision 1.10 1999/10/01 09:24:40 fca
+Protect against no current file in FinishEvent
+
Revision 1.9 1999/09/29 09:24:20 fca
Introduction of the Copyright and cvs Log
Float_t type_of_call rndm() {return gRandom->Rndm();}
}
+void fcnfwrap(Int_t &i1, Double_t *d1, Double_t &d2,
+ Double_t *d3, Int_t i2)
+{
+ fcnf(i1,d1,d2,d3,i2);
+}
+
+void fcnfitfwrap(Int_t &i1, Double_t *d1, Double_t &d2,
+ Double_t *d3, Int_t i2)
+{
+ fcnfitf(i1,d1,d2,d3,i2);
+}
+
+
// Static variables for the pad-hit iterator routines
static Int_t sMaxIterPad=0;
static Int_t sCurIterPad=0;
TMinuit *gMinuit = new TMinuit(5);
gMinuit->mninit(5,10,7);
- gMinuit->SetFCN(fcnf); // constant m.f.
+ gMinuit->SetFCN(fcnfwrap); // constant m.f.
arglist[0] = -1;
TMinuit *gMinuit = new TMinuit(5);
gMinuit->mninit(5,10,7);
- gMinuit->SetFCN(fcnfitf);
+ gMinuit->SetFCN(fcnfitfwrap);
arglist[0] = -1.;
gMinuit->mnexcm("SET PRINT", arglist, 1, ierflg);
//
// Get member data
//
+ // Pad size in x
+ virtual Float_t Dpx(){return AliMUONsegmentationV0::Dpx();}
+ // Pad size in y
+ virtual Float_t Dpy(){return AliMUONsegmentationV0::Dpy();}
// Pad size in x by Sector
virtual Float_t Dpx(Int_t isec);
// Pad size in y by Sector
PXZR = SQRT( PXR(ITR)**2+PZR(ITR)**2)
PRINT *,' PXZ GEANT= ', PXZV,' PXZ RECONS= ',PXZR
FIV=ATAN2(PYV(ITR),PZV(ITR))
- ALAMV=ATAN2(PXV(ITR),PXZV)
+ ALAMV=ATAN2(DBLE(PXV(ITR)),PXZV)
FIR=ATAN2(PXR(ITR),PZR(ITR))
- ALAMR=ATAN2(PYR(ITR),PXZR)
+ ALAMR=ATAN2(DBLE(PYR(ITR)),PXZR)
** PRINT *,' PHI GEANT= ',FIV,' PXZ RECONS= ',FIR
** PRINT *,' ALAM GEANT= ',ALAMV,' ALAM RECONS= ',ALAMR
ENDDO
* $Id$
*
* $Log$
+* Revision 1.2 1999/08/06 14:12:30 fca
+* Remove several warnings
+*
* Revision 1.1 1999/07/30 10:53:20 fca
* New version of MUON from M.Bondila & A.Morsch
*
/*
$Log$
+Revision 1.3 1999/09/29 09:24:29 fca
+Introduction of the Copyright and cvs Log
+
*/
/////////////////////////////////////////////////////////
static Int_t idvol;
static Int_t vol[2];
Int_t ipart;
- static Float_t hits[9];
+ static Float_t hits[10];
TLorentzVector Position;
TLorentzVector Momentum;
Float_t pos[3];
/*
$Log$
+Revision 1.2 1999/09/29 09:24:34 fca
+Introduction of the Copyright and cvs Log
+
*/
///////////////////////////////////////////////////////////////////////////////
//Float_t res = z1*(1-dy)+z2*dy;
return res;
}
- return 0.;
}