pkg/down_slope/DWNSLP_SIZE.h

b6bbe8cccf Jean*0001 c#ifdef ALLOW_DOWN_SLOPE
                0002
                0003 C-    dimension parameters :
                0004 C     xSize  :: X-dimension for 1 tile array (overlap included)
                0005 C     xySize :: product of X-dim x Y-dim for 1 tile array
                0006       INTEGER xSize, xySize
                0007       PARAMETER (  xSize = Olx+sNx+Olx )
                0008       PARAMETER ( xySize = xSize*(Oly+sNy+Oly) )
                0009
                0010 C     DWNSLP_size :: size of downsloping-flow arrays ; for each tile,
                0011 C            must be > number of bathymetric steps
                0012 C            The default value (=tile domain size) can increased (if needed)
                0013 C             or reduced (to save memory space).
                0014       INTEGER DWNSLP_size
                0015       PARAMETER ( DWNSLP_size = xSize * (Oly+sNy+Oly) )
                0016
                0017 c#endif /* ALLOW_DOWN_SLOPE */