4 #include "Fdimpar.h" //(DIMPAR) fluka include
5 #include "Ftrackr.h" //(TRACKR) fluka common
7 # define bxdraw bxdraw_
12 void bxdraw(Int_t& icode, Int_t& mreg, Int_t& newreg,
13 Double_t& xsco, Double_t& ysco, Double_t& zsco)
15 TFluka* fluka = (TFluka*) gMC;
17 fluka->SetIcode(icode);
18 fluka->SetNewreg(newreg);
22 Int_t verbosityLevel = fluka->GetVerbosityLevel();
23 Bool_t debug = (verbosityLevel>=3)?kTRUE:kFALSE;
25 // Double step for boundary crossing
27 fluka->SetTrackIsNew(kFALSE); // has to be called BEFORE Stepping()
28 if (debug) printf("bxdraw (ex) \n");
29 fluka->SetTrackIsExiting();
32 (TVirtualMCApplication::Instance())->Stepping();
34 if (debug) printf("bxdraw (en) \n");
36 fluka->SetTrackIsEntering();
37 if (fluka->GetDummyBoundary() == 1) fluka->SetDummyBoundary(2);
38 fluka->SetMreg(newreg);
39 (TVirtualMCApplication::Instance())->Stepping();
42 } // end of extern "C"