eulerrhok2.h

Go to the documentation of this file.

#ifndef AMROC_EULERRHOK2_H
#define AMROC_EULERRHOK2_H

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

#define DIM        2
#define NWAVES     3

#include "DAGHFortranInterfaces.h"                           

#define f_normalflux FORTRAN_NAME(rpn2eurhok, RPN2EURHOK)
#define f_transverseflux FORTRAN_NAME(rpt2eurhok, RPT2EURHOK)
#define f_check FORTRAN_NAME(chk2eurhok, CHK2EURHOK)
#define f_flg FORTRAN_NAME(flg2eurhok, FLG2EURHOK)
#define f_out FORTRAN_NAME(out2eurhok, OUT2EURHOK)
#define f_tupdate FORTRAN_NAME(tupdate2, TUPDATE2)
#define f_ibndrfl FORTRAN_NAME(ip2eurhokrfl, IP2EURHOKRFL)
#define f_ibndex FORTRAN_NAME(ip2eurhokex, IP2EURHOKEX)
#define f_itrans FORTRAN_NAME(it2eurhokrfl, IT2EURHOKRFL)

extern "C" {
  void f_normalflux();
  void f_transverseflux();
  void f_check();
  void f_flg();
  void f_out();
  void f_tupdate();
  void f_ibndrfl();
  void f_ibndex();
  void f_itrans();
}

#include "ClpStdFunctions.h"

#endif