47 |
|
#include "config.h" |
48 |
|
|
49 |
|
#define newGayBerneType FC_FUNC(newgbtype, NEWGBTYPE) |
50 |
+ |
#define completeGBFF FC_FUNC(completegbff, COMPLETEGBFF) |
51 |
|
#define destroyGayBerneTypes FC_FUNC(destroygbtypes, DESTROYGBTYPES) |
52 |
|
|
53 |
|
extern "C"{ |
54 |
|
void newGayBerneType( int* ident, |
55 |
< |
RealType* GB_sigma, |
56 |
< |
RealType* GB_l2b_ratio, |
55 |
> |
RealType* GB_d, |
56 |
> |
RealType* GB_l, |
57 |
|
RealType* GB_eps, |
58 |
|
RealType* GB_eps_ratio, |
59 |
< |
RealType* GB_mu, |
59 |
< |
RealType* GB_nu, |
59 |
> |
RealType* GB_dw, |
60 |
|
int* status); |
61 |
|
|
62 |
+ |
void completeGBFF( int* status); |
63 |
+ |
|
64 |
|
void destroyGayBerneTypes( void ); |
65 |
|
|
66 |
|
} |