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 |