amroc/clawpack/src/3d/equations/acoustics/acousticsv3.h

Go to the documentation of this file.
00001 // -*- C++ -*-
00002 
00003 #ifndef AMROC_ACOUSTICS3_H
00004 #define AMROC_ACOUSTICS3_H
00005 
00006 // Copyright (C) 2009 Ralf Deiterding
00007 // Oak Ridge National Laboratory
00008 
00014 #define DIM        3
00015 #define NEQUATIONS 4
00016 #define NEQUSED    4
00017 #define NWAVES     2
00018 #define NFIXUP     4
00019 #define NAUX       2
00020 
00021 #include "DAGHFortranInterfaces.h"                           
00022 
00023 #define f_normalflux FORTRAN_NAME(rpn3acv, RPN3ACV)
00024 #define f_transverseflux FORTRAN_NAME(rpt3acv, RPT3ACV)
00025 #define f_check FORTRAN_NAME(chk3ac, CHK3AC)
00026 #define f_flgout FORTRAN_NAME(flgout3ac, FLGOUT3AC)
00027 #define f_out FORTRAN_NAME(out3ac, OUT3AC)
00028 #define f_ibndrfl FORTRAN_NAME(ip3acrfl, IP3ACRFL)
00029 #define f_ibndex FORTRAN_NAME(ip3acex, IP3ACEX)
00030 
00031 extern "C" {
00032   void f_normalflux();
00033   void f_transverseflux();
00034   void f_check();
00035   void f_flgout();
00036   void f_out();
00037   void f_ibndrfl();
00038   void f_ibndex();
00039 }
00040 
00041 #include "ClpStdFunctions.h"
00042 
00043 #endif
00044 
00045