Calculation of new variables needed for Non-id HBT added. (Z. Chajecki)
[u/mrichter/AliRoot.git] / Flugg / Wrappers.hh
1
2 // Flugg tag 
3
4 ///////////////////////////////////////////////////////////////////
5 //
6 // Interface for Flugg Wrappers
7 //
8 ///////////////////////////////////////////////////////////////////
9
10 #ifndef WRAPPERS_HH
11 #define WRAPPERS_HH
12
13 #include "globals.hh"
14
15 #define idnrwr idnrwr_
16 #define g1wr g1wr_
17 #define g1rtwr g1rtwr_
18 #define conhwr conhwr_
19 #define inihwr inihwr_
20 #define jomiwr jomiwr_
21 #define lkdbwr lkdbwr_
22 #define lkfxwr lkfxwr_
23 #define lkmgwr lkmgwr_
24 #define lkwr lkwr_
25 #define magfld magfld_
26 #define nrmlwr nrmlwr_
27 #define rgrpwr rgrpwr_
28 #define isvhwr isvhwr_
29
30
31 // WrapDN
32
33 extern "C" G4int idnrwr(const G4int & nreg, const G4int & mlat);
34
35 // WrapG1
36
37 extern "C" void  g1wr(G4double& pSx, G4double& pSy, G4double& pSz, G4double* pV,
38                       G4int& oldReg, const G4int& oldLttc, G4double& propStep,
39                       G4int& nascFlag, G4double& retStep, G4int& newReg,
40                       G4double& saf, G4int& newLttc, G4int& LttcFlag,
41                       G4double* sLt, G4int* jrLt);
42
43 // WrapG1RT
44
45 extern "C" void g1rtwr(void);
46
47 // WrapIncrHist
48
49 extern "C" void conhwr(G4int& intHist, G4int* incrCount); 
50
51 // WrapIniHist
52
53 extern "C" void inihwr(G4int& intHist);                   
54
55 // WrapInit
56
57 extern "C" void jomiwr(const G4int & nge, const G4int& lin, const G4int& lou,
58                        G4int& flukaReg);
59
60 // WrapLookDB
61
62 extern "C" void lkdbwr(G4double& pSx, G4double& pSy, G4double& pSz,
63                        G4double* pV, const G4int& oldReg, const G4int& oldLttc,
64                        G4int& newReg, G4int& flagErr, G4int& newLttc);
65
66 // WrapLookFX
67
68 extern "C" void lkfxwr(G4double& pSx, G4double& pSy, G4double& pSz,
69                        G4double* pV, const G4int& oldReg, const G4int& oldLttc,
70                        G4int& newReg, G4int& flagErr, G4int& newLttc);
71             
72 // WrapLookMG
73
74 extern "C" void lkmgwr(G4double& pSx, G4double& pSy, G4double& pSz,
75                        G4double* pV, const G4int& oldReg, const G4int& oldLttc,
76                        G4int& flagErr, G4int& newReg, G4int& newLttc);
77             
78 // WrapLookZ
79
80 extern "C" void lkwr(G4double& pSx, G4double& pSy, G4double& pSz,
81                      G4double* pV, const G4int& oldReg, const G4int& oldLttc,
82                      G4int& newReg, G4int& flagErr, G4int& newLttc);
83
84 // WrapMag
85
86 extern "C" void magfld(const G4double& pX, const G4double& pY, const G4double& pZ,
87                        G4double& cosBx, G4double& cosBy, G4double& cosBz, 
88                        G4double& Bmag, G4int& reg, G4int& idiscflag);
89             
90 // WrapNorml
91
92 extern "C" void nrmlwr(G4double& pSx, G4double& pSy, G4double& pSz,
93                        G4double& pVx, G4double& pVy, G4double& pVz,
94                        G4double* norml, const G4int& oldReg, 
95                        const G4int& newReg, G4int& flagErr);
96
97 // WrapReg
98
99 extern "C" void rgrpwr(const G4int& flukaReg, const G4int& ptrLttc, G4int& g4Reg,
100                        G4int* indMother, G4int* repMother, G4int& depthFluka);
101
102 // WrapSavHist
103             
104 extern "C" G4int isvhwr(const G4int& fCheck, const G4int& intHist);
105
106 #endif //WRAPPERS_HH
107