00001
00002 #ifndef __CALLINTERF__
00003 #define __CALLINTERF__
00004 #
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014 extern void C2F(gw_linear_algebra)();
00015
00016
00017 extern void C2F(gw_io)();
00018 extern void C2F(gw_elementaries_functions)();
00019 extern void C2F(gw_graphics)();
00020 extern void C2F(gw_cacsd0)();
00021 extern void C2F(gw_cacsd1)();
00022 extern void C2F(gw_cacsd2)();
00023 extern void C2F(gw_optim)();
00024 extern void C2F(gw_differential_equations1)();
00025 extern void C2F(gw_core)();
00026 extern void C2F(gw_user)();
00027 extern void C2F(gw_metanet)();
00028 extern void C2F(gw_polynomials)();
00029 extern void C2F(gwdatastructures1)();
00030 extern void C2F(gw_signal)();
00031 extern void C2F(gw_interpolation)();
00032 extern void C2F(gw_cacsd3)();
00033 extern void C2F(gw_string)();
00034 extern void C2F(gw_symbolic)();
00035 extern void C2F(gw_boolean)();
00036 extern void C2F(gw_user2)();
00037 extern void C2F(gw_gui)();
00038 extern void C2F(gw_differential_equations2)();
00039 extern void C2F(gw_sparse)();
00040 extern void C2F(gw_slicot)();
00041 extern void C2F(gw_differential_equations3)();
00042 extern void C2F(gw_differential_equations4)();
00043 extern void C2F(gw_differential_equations5)();
00044 extern void C2F(gw_differential_equations6)();
00045
00046 extern void C2F(gw_fileio)();
00047 extern void C2F(gw_arnoldi)();
00048 extern void C2F(gw_special_functions1)();
00049 extern void C2F(gw_statistics)();
00050 extern void C2F(gw_randlib)();
00051 extern void C2F(gw_special_functions2)();
00052
00053 #ifdef WITH_TK
00054 extern void C2F(gw_tclsci)();
00055 #define TCLINTERF C2F(gw_tclsci)
00056 #else
00057 #define TCLINTERF C2F(no_gw_tclsci)
00058 #endif
00059
00060 extern void C2F(gwdatastructures2)();
00061
00062 #ifdef WITH_PVM
00063 extern void C2F(gw_pvm)();
00064 #define PVMINTERF C2F(gw_pvm)
00065 #else
00066 #define PVMINTERF C2F(NoPvm)
00067 #endif
00068
00069 extern void C2F(gw_integer)();
00070 extern void C2F(gw_linear_algebra2)();
00071
00072 #ifdef WITHOUT_SCICOS
00073 #define SCICOSINTERF1 C2F(Nogw_scicos)
00074 #define SCICOSINTERF2 C2F(Nogw_cscicos)
00075 #else
00076 extern void C2F(gw_scicos)();
00077 #define SCICOSINTERF1 C2F(gw_scicos)
00078 extern void C2F(gw_cscicos)();
00079 #define SCICOSINTERF2 C2F(gw_cscicos)
00080 #endif
00081
00082 extern void C2F(gw_wintools)();
00083 extern void C2F(gw_time)();
00084 extern void C2F(gw_sound)();
00085 extern void C2F(gw_localization)();
00086
00087 #if defined(WITH_FFTW) || defined(_MSC_VER)
00088 extern void C2F(gw_fftw)();
00089 #endif
00090
00091 static OpTab Interfaces[] ={
00092 {C2F(gw_user)},
00093 {C2F(gw_linear_algebra)},
00094 {C2F(gw_user)},
00095 {C2F(gw_user)},
00096 {C2F(gw_io)},
00097 {C2F(gw_elementaries_functions)},
00098 {C2F(gw_graphics)},
00099 {C2F(gw_cacsd0)},
00100 {C2F(gw_cacsd1)},
00101 {C2F(gw_cacsd2)},
00102 {C2F(gw_optim)},
00103 {C2F(gw_differential_equations1)},
00104 {C2F(gw_core)},
00105 {C2F(gw_user)},
00106 {C2F(gw_metanet)},
00107 {C2F(gw_polynomials)},
00108 {C2F(gwdatastructures1)},
00109 {C2F(gw_signal)},
00110 {C2F(gw_interpolation)},
00111 {C2F(gw_cacsd3)},
00112 {C2F(gw_string)},
00113 {C2F(gw_symbolic)},
00114 {C2F(gw_boolean)},
00115 {C2F(gw_user2)},
00116 {C2F(gw_gui)},
00117 {C2F(gw_differential_equations2)},
00118 {C2F(gw_sparse)},
00119 {C2F(gw_slicot)},
00120 {C2F(gw_differential_equations3)},
00121 {C2F(gw_differential_equations4)},
00122 {C2F(gw_differential_equations5)},
00123 {C2F(gw_differential_equations6)},
00124 {C2F(gw_user2)},
00125 {C2F(gw_fileio)},
00126 {C2F(gw_arnoldi)},
00127 {C2F(gw_special_functions1)},
00128 {C2F(gw_statistics)},
00129 {C2F(gw_randlib)},
00130 {C2F(gw_special_functions2)},
00131 {TCLINTERF},
00132 {C2F(gwdatastructures2)},
00133 {PVMINTERF},
00134 {C2F(gw_integer)},
00135 {C2F(gw_linear_algebra2)},
00136 {SCICOSINTERF1},
00137 {SCICOSINTERF2},
00138 {C2F(gw_wintools)},
00139 {C2F(gw_time)},
00140 {C2F(gw_sound)},
00141 {C2F(gw_localization)}
00142
00143 #if defined(WITH_FFTW) || defined(_MSC_VER)
00144 ,
00145 {C2F(gw_fftw)}
00146 #endif
00147 };
00148
00149 #endif