00001 #ifndef AMROC_EULERZND3_H
00002 #define AMROC_EULERZND3_H
00003
00004
00005
00006
00007
00008
00009
00015 #define DIM 3
00016 #define NEQUATIONS 6
00017 #define NEQUSED 6
00018 #define NWAVES 3
00019 #define NFIXUP 6
00020 #define NAUX 0
00021
00022 #include "DAGHFortranInterfaces.h"
00023
00024 #define f_normalflux FORTRAN_NAME(rpn3euznd, RPN3EUZND)
00025 #define f_transverseflux FORTRAN_NAME(rpt3euznd, RPT3EUZND)
00026 #define f_check FORTRAN_NAME(chk3euznd, CHK3EUZND)
00027 #define f_flgout FORTRAN_NAME(flgout3euznd, FLGOUT3EUZND)
00028 #define f_ibndrfl FORTRAN_NAME(ip3euzndrfl, IP3EUZNDRFL)
00029 #define f_ibndex FORTRAN_NAME(ip3euzndex, IP3EUZNDEX)
00030 #define f_itrans FORTRAN_NAME(it3euzndrfl, IT3EUZNDRFL)
00031
00032 extern "C" {
00033 void f_normalflux();
00034 void f_transverseflux();
00035 void f_check();
00036 void f_flgout();
00037 void f_ibndrfl();
00038 void f_ibndex();
00039 void f_itrans();
00040 }
00041
00042 #include "ClpStdFunctions.h"
00043
00044 #endif
00045