Int_t nollda;
} emfrgnCommon;
-#define EFMRGN COMMON_BLOCK(EFMRGN,efmrgn)
-COMMON_BLOCK_DEF(emfrgnCommon,EFMRGN);
+#define EMFRGN COMMON_BLOCK(EMFRGN,emfrgn)
+COMMON_BLOCK_DEF(emfrgnCommon,EMFRGN);
}
#endif
POX = TXPOPP(LSTOPP)
POY = TYPOPP(LSTOPP)
POZ = TZPOPP(LSTOPP)
- CALL PushCerenkovPhoton(PXCR, PYCR, PZCR, EPHSMP, XTRKCR,
+ CALL pshckp(PXCR, PYCR, PZCR, EPHSMP, XTRKCR,
& YTRKCR , ZTRKCR, ATRKCR, POX, POY, POZ, WTRACK, ITFL)
NPROD = NPROD + 1
- CALL UserSteppingCKV(NPROD, MREG, XTRKCR, YTRKCR, ZTRKCR)
+ CALL ustckv(NPROD, MREG, XTRKCR, YTRKCR, ZTRKCR)
*
*
*
// Ckeck transport cut first
Int_t ireg = EMFSTK.iremf[kp];
- Double_t cut = (TMath::Abs(EMFSTK.ichemf[kp]) == 1) ? EFMRGN.elethr[ireg-1] : EFMRGN.phothr[ireg-1];
+ Double_t cut = (TMath::Abs(EMFSTK.ichemf[kp]) == 1) ? EMFRGN.elethr[ireg-1] : EMFRGN.phothr[ireg-1];
Double_t e = EMFSTK.etemf[kp];
if ((e < cut)
&& (
(EMFSTK.ichemf[kp] == 0) ||
(EMFSTK.ichemf[kp] == -1) ||
- (EMFSTK.ichemf[kp] == 1 && EFMRGN.phothr[ireg-1] > emassmev)
+ (EMFSTK.ichemf[kp] == 1 && EMFRGN.phothr[ireg-1] > emassmev)
)
)
{