bed_functions.inc

! -*- f90 -*------------------------------------------------------
! file: bed_functions.inc
! ----------------------------------------------------------------
! ----------------------------------------------------------------
! Battelle Memorial Institute
! Pacific Northwest Laboratory
! ----------------------------------------------------------------
! ----------------------------------------------------------------
! Created October 24, 2000 by William A. Perkins
! Last Change: Thu May 15 08:07:06 2003 by William A. Perkins <perk@leechong.pnl.gov>
! ----------------------------------------------------------------

! RCS ID: $Id$ Battelle PNL

EXTERNAL bed_part_conc
EXTERNAL bed_part_vconc
EXTERNAL bed_pore_conc
EXTERNAL bed_porosity
EXTERNAL bed_depth
EXTERNAL bed_sediment_mass
EXTERNAL bed_max_erosion
EXTERNAL bed_max_part_erosion
EXTERNAL bed_pore_flux
DOUBLE PRECISION bed_part_conc
DOUBLE PRECISION bed_part_vconc
DOUBLE PRECISION bed_pore_conc
DOUBLE PRECISION bed_porosity
DOUBLE PRECISION bed_depth
DOUBLE PRECISION bed_sediment_mass
DOUBLE PRECISION bed_max_erosion
DOUBLE PRECISION bed_max_part_erosion
DOUBLE PRECISION bed_pore_flux