Common blocks to access material properties and

[u/mrichter/AliRoot.git] / TFluka / Ftrackr.h

diff --git a/TFluka/Ftrackr.h b/TFluka/Ftrackr.h
index 9d7e8451be91416edb82875f91625a00a3dfd635..8528cab2f58f249e59ac0f452bef3479eef26c3f 100644 (file)
--- a/TFluka/Ftrackr.h
+++ b/TFluka/Ftrackr.h
@@ -1,3 +1,8 @@
+#include "cfortran.h"
+#include "Rtypes.h"
+
+#include "Fdimpar.h"
+
 extern "C" {
 //*$ create trackr.add
 //*copy trackr
@@ -83,7 +88,14 @@ extern "C" {
 //*                   fission (used also for low energy neutrons)        *
 //*                                                                      *
 //*----------------------------------------------------------------------*
-//*                                                                      *
+//
+
+//
+// TFluka specific:
+// ispusr[mkbmx2 - 1] : track index in vmcstack
+// ispusr[mkbmx2 - 2] : flag for "interrupted" track
+//
+    
 const Int_t mxtrck = 2500;
 
 typedef struct {