Set flag for transport interruption/resuming to 0.
[u/mrichter/AliRoot.git] / TFluka / usdraw.cxx
CommitLineData
fa3d1cc7 1#include <Riostream.h>
7dac99f1 2#include "TVirtualMCApplication.h"
a7bb59a2 3
a7bb59a2 4#include "TFluka.h"
a7bb59a2 5
a1f42b9c 6#include "Fdimpar.h" //(DIMPAR) fluka include
7#include "Ftrackr.h" //(TRACKR) fluka common
fa3d1cc7 8#ifndef WIN32
9# define usdraw usdraw_
10#else
11# define usdraw USDRAW
12#endif
13extern "C" {
14void usdraw(Int_t& icode, Int_t& mreg,
15 Double_t& xsco, Double_t& ysco, Double_t& zsco)
16{
fbf08100 17 TFluka *fluka = (TFluka*)gMC;
bcf1cd9c 18 Int_t verbosityLevel = fluka->GetVerbosityLevel();
19 Bool_t debug = (verbosityLevel>=3)?kTRUE:kFALSE;
fbf08100 20 fluka->SetCaller(6);
21 fluka->SetIcode(icode);
22 fluka->SetMreg(mreg);
23 fluka->SetXsco(xsco);
24 fluka->SetYsco(ysco);
25 fluka->SetZsco(zsco);
bcf1cd9c 26 if (debug) printf("USDRAW: Number of track segments:%d %d\n", TRACKR.ntrack, TRACKR.mtrack);
cad96957 27
a1f42b9c 28 (TVirtualMCApplication::Instance())->Stepping();
fbf08100 29 fluka->SetTrackIsNew(kFALSE);
30
fa3d1cc7 31} // end of usdraw
32} // end of extern "C"
33