pkg/streamice/STREAMICE_BDRY.h

5ca83cd8f7 Dani*0001 C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|
                0002
                0003 #ifdef ALLOW_STREAMICE
                0004
                0005 C     params to construct boundary conditions for ice flow
887f427c62 Jean*0006 C     on each boundary of rect domain, ranges for different boundary
                0007 C      conditions are specified; it is up to the user to ensure that
5ca83cd8f7 Dani*0008 C      the ranges do not overlap
                0009 C     along with a flux boundary range, a flux value is given
                0010 C     if a dirichlet boundary is specified, velocities must be given
                0011 C      in a file
                0012 C     also must be aware of units (m for cartesian, deg for curvilinear, m/deg for CYLINDRICAL POLAR)
                0013
                0014 C     real params
887f427c62 Jean*0015       COMMON /STREAMICE_BDRY_PARMS/
5ca83cd8f7 Dani*0016      & min_x_noflow_NORTH, max_x_noflow_NORTH,
                0017      & min_x_noflow_SOUTH, max_x_noflow_SOUTH,
                0018      & min_y_noflow_WEST, max_y_noflow_WEST,
                0019      & min_y_noflow_EAST, max_y_noflow_EAST,
                0020      & min_x_noStress_NORTH, max_x_noStress_NORTH,
                0021      & min_x_noStress_SOUTH, max_x_noStress_SOUTH,
                0022      & min_y_noStress_WEST, max_y_noStress_WEST,
                0023      & min_y_noStress_EAST, max_y_noStress_EAST,
                0024      & min_x_FluxBdry_NORTH, max_x_FluxBdry_NORTH,
                0025      & min_x_FluxBdry_SOUTH, max_x_FluxBdry_SOUTH,
                0026      & min_y_FluxBdry_WEST, max_y_FluxBdry_WEST,
                0027      & min_y_FluxBdry_EAST, max_y_FluxBdry_EAST,
                0028      & min_x_Dirich_NORTH, max_x_Dirich_NORTH,
                0029      & min_x_Dirich_SOUTH, max_x_Dirich_SOUTH,
                0030      & min_y_Dirich_WEST, max_y_Dirich_WEST,
                0031      & min_y_Dirich_EAST, max_y_Dirich_EAST,
                0032      & min_x_CFBC_NORTH, max_x_CFBC_NORTH,
                0033      & min_x_CFBC_SOUTH, max_x_CFBC_SOUTH,
                0034      & min_y_CFBC_WEST, max_y_CFBC_WEST,
                0035      & min_y_CFBC_EAST, max_y_CFBC_EAST,
                0036      & flux_bdry_val_SOUTH, flux_bdry_val_NORTH,
                0037      & flux_bdry_val_WEST, flux_bdry_val_EAST
                0038       _RL min_x_noflow_NORTH, max_x_noflow_NORTH
                0039       _RL min_x_noflow_SOUTH, max_x_noflow_SOUTH
                0040       _RL min_y_noflow_WEST, max_y_noflow_WEST
                0041       _RL min_y_noflow_EAST, max_y_noflow_EAST
                0042       _RL min_x_noStress_NORTH, max_x_noStress_NORTH
                0043       _RL min_x_noStress_SOUTH, max_x_noStress_SOUTH
                0044       _RL min_y_noStress_WEST, max_y_noStress_WEST
                0045       _RL min_y_noStress_EAST, max_y_noStress_EAST
                0046       _RL min_x_FluxBdry_NORTH, max_x_FluxBdry_NORTH
                0047       _RL min_x_FluxBdry_SOUTH, max_x_FluxBdry_SOUTH
                0048       _RL min_y_FluxBdry_WEST, max_y_FluxBdry_WEST
                0049       _RL min_y_FluxBdry_EAST, max_y_FluxBdry_EAST
                0050       _RL min_x_Dirich_NORTH, max_x_Dirich_NORTH
                0051       _RL min_x_Dirich_SOUTH, max_x_Dirich_SOUTH
                0052       _RL min_y_Dirich_WEST, max_y_Dirich_WEST
                0053       _RL min_y_Dirich_EAST, max_y_Dirich_EAST
                0054       _RL min_x_CFBC_NORTH, max_x_CFBC_NORTH
                0055       _RL min_x_CFBC_SOUTH, max_x_CFBC_SOUTH
                0056       _RL min_y_CFBC_WEST, max_y_CFBC_WEST
                0057       _RL min_y_CFBC_EAST, max_y_CFBC_EAST
                0058       _RL flux_bdry_val_SOUTH, flux_bdry_val_NORTH
                0059       _RL flux_bdry_val_WEST, flux_bdry_val_EAST
                0060
                0061 #endif /* ALLOW_STREAMICE */
                0062
                0063 CEH3 ;;; Local Variables: ***
                0064 CEH3 ;;; mode:fortran ***
                0065 CEH3 ;;; End: ***
                0066