euler3.h

Go to the documentation of this file.

#ifndef AMROC_EULER3_H
#define AMROC_EULER3_H

// Copyright (C) 2002 Ralf Deiterding
// Brandenburgische Universitaet Cottbus
//
// Copyright (C) 2003-2007 California Institute of Technology
// Ralf Deiterding, ralf@amroc.net

#define DIM        3
#define NEQUATIONS 5
#define NEQUSED    5
#define NWAVES     3
#define NFIXUP     5
#define NAUX       0

#include "DAGHFortranInterfaces.h"                           

#define f_normalflux FORTRAN_NAME(rpn3eu, RPN3EU)
#define f_transverseflux FORTRAN_NAME(rpt3eu, RPT3EU)
#define f_check FORTRAN_NAME(chk3eu, CHK3EU)
#define f_flgout FORTRAN_NAME(flgout3eu, FLGOUT3EU)
#define f_ibndrfl FORTRAN_NAME(ip3eurfl, IP3EURFL)
#define f_ibndex FORTRAN_NAME(ip3euex, IP3EUEX)
#define f_itrans FORTRAN_NAME(it3eurfl, IT3EURFL)

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

#include "ClpStdFunctions.h"

#endif