!$Author: fredfox $ !$Date: 2011-04-27 10:01:11 -0500 (Wed, 27 Apr 2011) $ !$Revision: 11825 $ !$HeadURL: https://svn.weru.ksu.edu/weru/weps1/trunk/weps.src/src/inc/erosion/m2geo.inc $ ! ----------------------------------------------------------------- MODULE m2geo_def ! replaces file 'erosion/m2geo.inc' ! This block common is contains variables used for a simulation run ! for MAIN and EROSION. ! + + + VARIABLE DECLARATIONS + + + integer :: imax integer :: jmax real :: ix real :: jy integer :: xgdpt = 0 !specified # of grid data points in the x-dir integer :: ygdpt = 0 !specified # of grid data points in the y-dir integer, parameter :: N_G_DPT = 30 !# of grid data points under no barrier cond. integer, parameter :: B_G_DPT = 60 !# of grid data points to use if barrier exists real, parameter :: MIN_GRID_SP = 7.0 !minimum targeted grid spacing (m) END MODULE m2geo_def