Fortran: Module Interface util -- parameters and interfaces for utilities (Source File: util.F90)

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