Symbol Description Uses
usingZCoords Set to indicate that we are working in a height 57



File Line number Procedure Code
./model/inc/PARAMS.h 413 NO PROCEDURE
     & usingPCoords, usingZCoords,
./model/inc/PARAMS.h 458 NO PROCEDURE
      LOGICAL usingZCoords
./model/src/apply_forcing.F 477 APPLY_FORCING_T
      ELSEIF ( usingZCoords .AND. useShelfIce ) THEN
./model/src/apply_forcing.F 659 APPLY_FORCING_T
      IF ( usingZCoords ) THEN
./model/src/apply_forcing.F 843 APPLY_FORCING_S
      ELSEIF ( usingZCoords .AND. useShelfIce ) THEN
./model/src/calc_grad_phi_hyd.F 165 CALC_GRAD_PHI_HYD
       IF ( fluidIsWater .AND. usingZCoords ) THEN
./pkg/mnc/mnc_cw_cvars.F 313 MNC_CW_WRITE_CVAR
        IF ( usingZCoords ) THEN
./pkg/mnc/mnc_cw_cvars.F 332 MNC_CW_WRITE_CVAR
        IF ( usingZCoords ) THEN
./pkg/mnc/mnc_cw_cvars.F 350 MNC_CW_WRITE_CVAR
        IF ( usingZCoords ) THEN
./pkg/mnc/mnc_cw_cvars.F 370 MNC_CW_WRITE_CVAR
        IF ( usingZCoords ) THEN
./pkg/mnc/mnc_cw_cvars.F 390 MNC_CW_WRITE_CVAR
        IF ( usingZCoords ) THEN
./pkg/mom_common/mom_quasihydrostatic.F 57 MOM_QUASIHYDROSTATIC
      IF ( usingZCoords ) THEN
./pkg/mom_common/mom_u_botdrag_impl.F 69 MOM_U_BOTDRAG_IMPL
       IF ( usingZCoords ) THEN
./pkg/mom_common/mom_u_bottomdrag.F 65 MOM_U_BOTTOMDRAG
      IF ( usingZCoords ) THEN
./pkg/mom_common/mom_v_botdrag_impl.F 69 MOM_V_BOTDRAG_IMPL
       IF ( usingZCoords ) THEN
./pkg/mom_common/mom_v_bottomdrag.F 65 MOM_V_BOTTOMDRAG
      IF ( usingZCoords ) THEN
./model/src/config_check.F 517 CONFIG_CHECK
     &          usingZCoords.AND.rhoRefFile .NE. ' ' ) ) THEN
./model/src/config_summary.F 113 CONFIG_SUMMARY
      CALL WRITE_0D_L( usingZCoords, INDEX_NONE,
./model/src/config_summary.F 270 CONFIG_SUMMARY
      IF ( usingZCoords ) THEN
./model/src/config_summary.F 836 CONFIG_SUMMARY
      IF ( usingZCoords ) THEN
./model/src/diags_phi_rlow.F 68 DIAGS_PHI_RLOW
      IF ( usingZCoords ) THEN
./pkg/opps/opps_calc.F 478 OPPS_CALC
      IF ( usingZCoords ) THEN
./pkg/pp81/pp81_calc.F 101 PP81_CALC
       IF ( (usingZCoords .AND. K .EQ. 2) .OR.
./pkg/ptracers/ptracers_apply_forcing.F 62 PTRACERS_APPLY_FORCING
      ELSEIF ( usingZCoords .AND. useShelfIce ) THEN
./model/src/external_forcing.F 354 EXTERNAL_FORCING_T
      ELSEIF ( usingZCoords .AND. useShelfIce ) THEN
./model/src/external_forcing.F 677 EXTERNAL_FORCING_S
      ELSEIF ( usingZCoords .AND. useShelfIce ) THEN
./model/src/external_forcing_surf.F 356 EXTERNAL_FORCING_SURF
        IF ( usingZCoords ) THEN
./pkg/salt_plume/salt_plume_apply.F 116 SALT_PLUME_APPLY
        IF (usingZCoords) upward = -1
./pkg/shelfice/shelfice_forcing_surf.F 124 SHELFICE_FORCING_SURF
        IF ( usingZCoords ) THEN
./pkg/shelfice/shelfice_init_depths.F 76 SHELFICE_INIT_DEPTHS
      IF ( usingZCoords ) THEN
./pkg/shelfice/shelfice_u_drag.F 60 SHELFICE_U_DRAG
      IF ( usingZCoords ) THEN
./pkg/shelfice/shelfice_v_drag.F 60 SHELFICE_V_DRAG
      IF ( usingZCoords ) THEN
./model/src/ini_eos.F 473 EOS_CHECK
          IF ( usingZCoords ) THEN
./model/src/ini_linear_phisurf.F 81 INI_LINEAR_PHISURF
      IF ( usingZCoords ) THEN
./model/src/ini_parms.F 1093 INI_PARMS
       ELSEIF ( usingZCoords ) THEN
./model/src/ini_parms.F 1102 INI_PARMS
       ELSEIF ( usingZCoords ) THEN
./model/src/ini_parms.F 1220 INI_PARMS
       IF ( usingZCoords .AND. seaLev_Z.NE.UNSET_RL ) THEN
./model/src/ini_parms.F 413 INI_PARMS
      usingZCoords    = .FALSE.
./model/src/ini_parms.F 423 INI_PARMS
        usingZCoords  = .TRUE.
./model/src/ini_psurf.F 100 INI_PSURF
      IF ( useShelfIce .AND. usingZCoords ) THEN
./model/src/ini_sigma_hfac.F 58 INI_SIGMA_HFAC
      IF ( usingZCoords ) rEmpty = rF(1)
./model/src/ini_vertical_grid.F 140 INI_VERTICAL_GRID
     &     usingZCoords.AND.fluidIsWater ) THEN
./model/src/ini_vertical_grid.F 227 INI_VERTICAL_GRID
         IF ( usingZCoords ) rSigBndRS = rF(1)
./model/src/ini_vertical_grid.F 285 INI_VERTICAL_GRID
        IF ( usingZCoords .AND. setInterFDr ) THEN
./model/src/ini_vertical_grid.F 303 INI_VERTICAL_GRID
        IF ( usingZCoords .AND. setCenterDr ) THEN
./model/src/pressure_for_eos.F 52 PRESSURE_FOR_EOS
      IF ( usingZCoords ) THEN
./verification/rotating_tank/code/apply_forcing.F 484 APPLY_FORCING_T
      ELSEIF ( usingZCoords .AND. useShelfIce ) THEN
./verification/rotating_tank/code/apply_forcing.F 905 APPLY_FORCING_S
      ELSEIF ( usingZCoords .AND. useShelfIce ) THEN
./model/src/set_grid_factors.F 65 SET_GRID_FACTORS
       IF ( usingZCoords ) THEN
./model/src/set_parms.F 128 SET_PARMS
      uniformFreeSurfLev = usingZCoords
./model/src/set_parms.F 131 SET_PARMS
      uniformFreeSurfLev = usingZCoords .AND. .NOT.useShelfIce
./model/src/set_parms.F 229 SET_PARMS
      IF ( usingZCoords ) THEN
./model/src/set_ref_state.F 337 SET_REF_STATE
      IF ( usingZCoords .AND. rhoRefFile .NE. ' ' ) THEN
./model/src/set_ref_state.F 396 SET_REF_STATE
      IF ( usingZCoords .AND. rhoRefFile .NE. ' ' ) THEN
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 359 EXTERNAL_FORCING_SURF
        IF ( usingZCoords ) THEN
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 359 EXTERNAL_FORCING_SURF
        IF ( usingZCoords ) THEN
./pkg/down_slope/dwnslp_apply.F 103 DWNSLP_APPLY
       IF (usingZCoords) upward = -1