c9c6bd3b |
1 | #ifndef ROOT_TEcommon |
2 | #define ROOT_TEcommon |
3 | //------------------------------------------------------------------------ |
4 | // TEcommon is an interface COMMON blocks of the fortran event generator of |
5 | // single e+e- pair production in ultraperipheral PbPb collisions |
6 | // at 5.5 GeV/c |
7 | //% |
8 | // Yuri.Kharlov@cern.ch |
9 | // 9 October 2002 |
10 | //------------------------------------------------------------------------ |
11 | |
12 | #ifndef __CFORTRAN_LOADED |
13 | #include "cfortran.h" |
14 | #endif |
15 | |
16 | // c++ interface to the f77 program - event generator of |
17 | // e+e- pair production in ultraperipheral ion collisions |
18 | // Author: Yuri Kharlov, 20 September 2002 |
19 | |
20 | extern "C" { |
21 | typedef struct { |
22 | Double_t Xsect2; |
23 | Double_t Dsect2; |
24 | Double_t Xsecttot; |
25 | Double_t Dsecttot; |
26 | Int_t Nevnt; |
27 | } EeventCommon; |
28 | #define EEVENT COMMON_BLOCK(EEVENT,eevent) |
29 | COMMON_BLOCK_DEF(EeventCommon,EEVENT); |
30 | } |
31 | |
32 | #endif |