amroc/clawpack/src/2d/equations/acoustics/acousticsv2.h

Go to the documentation of this file.

// -*- C++ -*-

#ifndef AMROC_ACOUSTICS2_H
#define AMROC_ACOUSTICS2_H

// Copyright (C) 2009 Ralf Deiterding
// Oak Ridge National Laboratory

#define DIM        2
#define NEQUATIONS 3
#define NEQUSED    3
#define NWAVES     2
#define NFIXUP     3
#define NAUX       2

#include "DAGHFortranInterfaces.h"                           

#define f_normalflux FORTRAN_NAME(rpn2acv, RPN2ACV)
#define f_transverseflux FORTRAN_NAME(rpt2acv, RPT2ACV)
#define f_check FORTRAN_NAME(chk2ac, CHK2AC)
#define f_flgout FORTRAN_NAME(flgout2ac, FLGOUT2AC)
#define f_ibndrfl FORTRAN_NAME(ip2acrfl, IP2ACRFL)
#define f_ibndex FORTRAN_NAME(ip2acex, IP2ACEX)

extern "C" {
  void f_normalflux();
  void f_transverseflux();
  void f_check();
  void f_flgout();
  void f_ibndrfl();
  void f_ibndex();
}

#include "ClpStdFunctions.h"

#endif