Module util -- parameters and interfaces for utilities

INTERFACE:

   MODULE util

DESCRIPTION:

This module is an encapsulation of a number of parameters used by different routines found in the util directory. It should make it easier to read the code, since finding a line like

if (method.eq.UPSTREAM) then ...

in a subroutine for advection methods tells you more than reading only

if (method.eq.1) then ...

USES:

   IMPLICIT NONE

DEFINED PARAMETERS:

 
   type of advection scheme
   integer,parameter                    :: UPSTREAM       = 1
   integer,parameter                    :: P1             = 2
   integer,parameter                    :: P2             = 3
   integer,parameter                    :: Superbee       = 4
   integer,parameter                    :: MUSCL          = 5
   integer,parameter                    :: P2_PDM         = 6
 
   boundary condition type
   for diffusion scheme
   integer,parameter                    :: Dirichlet      = 0
   integer,parameter                    :: Neumann        = 1
 
   boundary condition type
   for advection schemes
   integer,parameter                    :: flux           = 1
   integer,parameter                    :: value          = 2
   integer,parameter                    :: oneSided       = 3
   integer,parameter                    :: zeroDivergence = 4

REVISION HISTORY:

   Original author(s): Lars Umlauf
   $Log: util.F90,v $
   Revision 1.1  2005-06-27 10:54:33  kbk
   new files needed