]>
Commit | Line | Data |
---|---|---|
fa3d1cc7 | 1 | #include <Riostream.h> |
7dac99f1 | 2 | #include "TVirtualMCApplication.h" |
a7bb59a2 | 3 | |
fa3d1cc7 | 4 | #include "TFluka.h" |
d566901f | 5 | #include "TFlukaCodes.h" |
a7bb59a2 | 6 | |
fa3d1cc7 | 7 | #ifndef WIN32 |
8 | # define sodraw sodraw_ | |
9 | #else | |
10 | # define sodraw SODRAW | |
11 | #endif | |
12 | extern "C" { | |
13 | void sodraw() | |
14 | { | |
d566901f | 15 | ((TFluka*) gMC)->SetCaller(kSODRAW); |
16 | ((TFluka*) gMC)->SetIcode((FlukaProcessCode_t)0); | |
42b936d1 | 17 | (TVirtualMCApplication::Instance())->Stepping(); |
fa3d1cc7 | 18 | } // end of sodraw |
19 | } // end of extern "C" | |
20 |