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


File Line number Procedure Code
./model/inc/PARAMS.h 377 NO PROCEDURE 
     & usingPCoords, usingZCoords, useDynP_inEos_Zc,
./model/inc/PARAMS.h 421 NO PROCEDURE 
      LOGICAL usingZCoords
./model/src/apply_forcing.F 467 APPLY_FORCING_T 
      ELSEIF ( usingZCoords .AND. useShelfIce ) THEN
./model/src/apply_forcing.F 645 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_bottomdrag.F 63 MOM_U_BOTTOMDRAG 
      IF ( usingZCoords ) THEN
./pkg/mom_common/mom_v_bottomdrag.F 63 MOM_V_BOTTOMDRAG 
      IF ( usingZCoords ) THEN
./model/src/config_check.F 425 CONFIG_CHECK 
     &          usingZCoords.AND.rhoRefFile .NE. ' ' ) ) THEN
./model/src/config_check.F 434 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 746 CONFIG_SUMMARY 
      IF ( usingZCoords ) THEN
./pkg/opps/opps_calc.F 475 OPPS_CALC 
      IF ( usingZCoords ) THEN
./pkg/pp81/pp81_calc.F 94 PP81_CALC 
       IF ( (usingZCoords .AND. K .EQ. 2) .OR.
./model/src/diags_phi_rlow.F 68 DIAGS_PHI_RLOW 
      IF ( usingZCoords ) THEN
./pkg/salt_plume/salt_plume_apply.F 116 SALT_PLUME_APPLY 
        IF (usingZCoords) upward = -1
./model/src/external_forcing.F 354 EXTERNAL_FORCING_T 
      ELSEIF ( usingZCoords .AND. useShelfIce ) THEN
./model/src/external_forcing.F 678 EXTERNAL_FORCING_S 
      ELSEIF ( usingZCoords .AND. useShelfIce ) THEN
./model/src/external_forcing_surf.F 353 EXTERNAL_FORCING_SURF 
        IF ( usingZCoords ) THEN
./pkg/shelfice/shelfice_forcing_surf.F 82 SHELFICE_FORCING_SURF 
        IF ( usingZCoords ) THEN
./pkg/shelfice/shelfice_u_drag.F 59 SHELFICE_U_DRAG 
      IF ( usingZCoords ) THEN
./pkg/shelfice/shelfice_v_drag.F 59 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 398 INI_PARMS 
      usingZCoords    = .FALSE.
./model/src/ini_parms.F 408 INI_PARMS 
        usingZCoords  = .TRUE.
./model/src/ini_sigma_hfac.F 58 INI_SIGMA_HFAC 
      IF ( usingZCoords ) rEmpty = rF(1)
./model/src/ini_vertical_grid.F 197 INI_VERTICAL_GRID 
         IF ( usingZCoords ) rSigBndRS = rF(1)
./model/src/ini_vertical_grid.F 255 INI_VERTICAL_GRID 
        IF ( usingZCoords .AND. setInterFDr ) THEN
./model/src/ini_vertical_grid.F 273 INI_VERTICAL_GRID 
        IF ( usingZCoords .AND. setCenterDr ) 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/pressure_for_eos.F 49 PRESSURE_FOR_EOS 
      IF ( usingZCoords ) THEN
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 348 EXTERNAL_FORCING_SURF 
        IF ( usingZCoords ) THEN
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 348 EXTERNAL_FORCING_SURF 
        IF ( usingZCoords ) THEN
./model/src/set_grid_factors.F 65 SET_GRID_FACTORS 
       IF ( usingZCoords ) THEN
./model/src/set_parms.F 125 SET_PARMS 
      uniformFreeSurfLev = usingZCoords
./model/src/set_parms.F 128 SET_PARMS 
      uniformFreeSurfLev = usingZCoords .AND. .NOT.useShelfIce
./model/src/set_parms.F 229 SET_PARMS 
      useDynP_inEos_Zc = ( fluidIsWater .AND. usingZCoords
./model/src/set_ref_state.F 287 SET_REF_STATE 
      IF ( usingZCoords .AND. rhoRefFile .NE. ' ' ) THEN
./pkg/down_slope/dwnslp_apply.F 103 DWNSLP_APPLY 
       IF (usingZCoords) upward = -1