Symbol Description Uses
uniformFreeSurfLev TRUE if free-surface level-index is uniform (=1) 12



File Line number Procedure Code
./model/inc/PARAMS.h 397 NO PROCEDURE
     & uniformLin_PhiSurf, uniformFreeSurfLev,
./model/inc/PARAMS.h 476 NO PROCEDURE
      LOGICAL uniformFreeSurfLev
./pkg/generic_advdiff/gad_som_adv_r.F 247 GAD_SOM_ADV_R
      IF ( .NOT.uniformFreeSurfLev .AND. k.NE.1 .AND.
./model/src/calc_phi_hyd.F 209 CALC_PHI_HYD
     &       uniformFreeSurfLev .AND. k.EQ.1 ) THEN
./model/src/calc_phi_hyd.F 228 CALC_PHI_HYD
        IF ( uniformFreeSurfLev ) THEN
./model/src/calc_phi_hyd.F 269 CALC_PHI_HYD
        IF ( uniformFreeSurfLev ) THEN
./model/src/config_summary.F 325 CONFIG_SUMMARY
      CALL WRITE_0D_L( uniformFreeSurfLev, INDEX_NONE,
./model/src/ini_nh_fields.F 77 INI_NH_FIELDS
          IF ( select_rStar.EQ.0 .AND. uniformFreeSurfLev ) THEN
./model/src/post_cg3d.F 62 POST_CG3D
         IF ( select_rStar.EQ.0 .AND. uniformFreeSurfLev ) THEN
./model/src/pre_cg3d.F 140 PRE_CG3D
         ELSEIF ( uniformFreeSurfLev ) THEN
./model/src/set_parms.F 125 SET_PARMS
      uniformFreeSurfLev = usingZCoords
./model/src/set_parms.F 128 SET_PARMS
      uniformFreeSurfLev = usingZCoords .AND. .NOT.useShelfIce