]>
Commit | Line | Data |
---|---|---|
7c21f297 | 1 | #include "Rtypes.h" |
2 | #include "cfortran.h" | |
3 | // | |
4 | // common /parimp/ b1, psib1, rb1, rb2 | |
5 | // | |
6 | extern "C" { | |
7 | ||
8 | typedef struct { | |
9 | Double_t b1; | |
10 | Double_t psib1; | |
11 | Double_t rb1; | |
12 | Double_t rb2; | |
13 | } parimpCommon; | |
14 | #define PARIMP COMMON_BLOCK(PARIMP,parimp) | |
15 | COMMON_BLOCK_DEF(parimpCommon,PARIMP); | |
16 | } |