Correct flukaid for positron.

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

diff --git a/TFluka/Fpaprop.h b/TFluka/Fpaprop.h
index 5a6786447e823c294abeb2aed19a7bb50e19757c..72940e35109ff02eb13b3a4c03be1ca1aed56d50 100644 (file)
--- a/TFluka/Fpaprop.h
+++ b/TFluka/Fpaprop.h
@@ -55,6 +55,7 @@ extern "C" {
 //*----------------------------------------------------------------------*
 //*
 
+const Int_t mxgnpr =  33;
 typedef struct {
    Double_t am[nallwp+7];         //(-6:NALLWP)
    Double_t amdisc[nallwp+7];     //(-6:NALLWP)
@@ -80,10 +81,24 @@ COMMON_BLOCK_DEF(papropCommon,PAPROP);
 
 typedef struct {
    Char_t   btype[nallwp+7][8];     //(-6:NALLWP)
-   Char_t   genpar[30][8];          //(30)
+   Char_t   genpar[mxgnpr][8];          //(30)
 } chpprpCommon;
 #define CHPPRP COMMON_BLOCK(CHPPRP,chpprp)
 COMMON_BLOCK_DEF(chpprpCommon,CHPPRP);
 }
 
+//Get functions
+//inline Double_t GetFlukaAM(unsigned int i) {return PAPROP.am[i+6];}
+//inline Double_t GetFlukaAMDISC(unsigned int i) {return PAPROP.amdisc[i+6];}
+//inline Double_t GetFlukaTHALH(unsigned int i) {return PAPROP.thalf[i+6];}
+//inline Double_t GetFlukaBIASDC(unsigned int i) {return PAPROP.biasdc[i+6];}
+//inline Double_t GetFlukaBIASIN(unsigned int i) {return PAPROP.biasin[i+6];}
+//inline Int_t    GetFlukaICHRGE(unsigned int i) {return PAPROP.ichrge[i+6];}
+//inline Int_t    GetFlukaIBARCH(unsigned int i) {return PAPROP.ibarch[i+6];}
+//inline Int_t    GetFlukaIJDISC(unsigned int i) {return PAPROP.ijdisc[i+6];}
+//inline Int_t    GetFlukaJSPINP(unsigned int i) {return PAPROP.jspinp[i+6];}
+//inline Int_t    GetFlukaIPARTY(unsigned int i) {return PAPROP.iparty[i+6];}
+//inline Int_t    GetFlukaIPARID(unsigned int i) {return PAPROP.iparid[i+6];}
+//inline Int_t    GetFlukaLHADRO(unsigned int i) {return PAPROP.lhadro[i+6];}
+//inline Int_t    GetFlukaLBSDCY(unsigned int i) {return PAPROP.lbsdcy[i+6];}
 #endif