File |
Line number |
Procedure |
Code |
./model/inc/PARAMS.h |
228 |
NO PROCEDURE |
& nonlinFreeSurf, select_rStar, |
./model/inc/PARAMS.h |
252 |
NO PROCEDURE |
INTEGER select_rStar |
./pkg/generic_advdiff/gad_implicit_r.F |
382 |
GAD_IMPLICIT_R |
IF ( select_rStar.GT.0 ) THEN |
./pkg/generic_advdiff/gad_som_adv_r.F |
150 |
GAD_SOM_ADV_R |
& .OR. select_rStar.NE.0 |
./pkg/generic_advdiff/gad_som_advect.F |
453 |
GAD_SOM_ADVECT |
& .OR. select_rStar.NE.0 |
./pkg/gridalt/gridalt_update.F |
48 |
GRIDALT_UPDATE |
if(usefizhi .and. (select_rStar.GT.0) )then |
./model/src/calc_grad_phi_hyd.F |
164 |
CALC_GRAD_PHI_HYD |
IF (select_rStar.GE.2 .AND. nonlinFreeSurf.GE.1 ) THEN |
./model/src/calc_grad_phi_hyd.F |
69 |
CALC_GRAD_PHI_HYD |
IF (select_rStar.GE.2 .AND. nonlinFreeSurf.GE.4 ) THEN |
./model/src/calc_grad_phi_hyd.F |
90 |
CALC_GRAD_PHI_HYD |
ELSEIF (select_rStar.GE.1 .AND. nonlinFreeSurf.GE.4 ) THEN |
./pkg/longstep/longstep_thermodynamics.F |
141 |
LONGSTEP_THERMODYNAMICS |
IF ( select_rStar.GT.0 ) THEN |
./model/src/calc_phi_hyd.F |
102 |
CALC_PHI_HYD |
addSurfPhiAnom = select_rStar.EQ.0 .AND. nonlinFreeSurf.GE.4 |
./model/src/calc_phi_hyd.F |
438 |
CALC_PHI_HYD |
IF ( select_rStar.GE.1 .OR. selectSigmaCoord.GE.1 ) THEN |
./pkg/mom_fluxform/mom_calc_rtrans.F |
114 |
MOM_CALC_RTRANS |
IF ( select_rStar.NE.0 ) THEN |
./pkg/mom_fluxform/mom_fluxform.F |
465 |
MOM_FLUXFORM |
IF ( select_rStar.GT.0 ) THEN |
./pkg/mom_fluxform/mom_fluxform.F |
474 |
MOM_FLUXFORM |
IF ( select_rStar.LT.0 ) THEN |
./pkg/mom_fluxform/mom_fluxform.F |
698 |
MOM_FLUXFORM |
IF ( select_rStar.GT.0 ) THEN |
./pkg/mom_fluxform/mom_fluxform.F |
707 |
MOM_FLUXFORM |
IF ( select_rStar.LT.0 ) THEN |
./pkg/mom_fluxform/mom_u_adv_wu.F |
92 |
MOM_U_ADV_WU |
IF ( select_rStar.EQ.0 .AND. .NOT.rigidLid ) THEN |
./pkg/mom_fluxform/mom_v_adv_wv.F |
93 |
MOM_V_ADV_WV |
IF ( select_rStar.EQ.0 .AND. .NOT.rigidLid ) THEN |
./model/src/cg3d.F |
120 |
CG3D |
IF ( select_rStar .NE. 0 ) THEN |
./model/src/cg3d.F |
176 |
CG3D |
IF ( select_rStar .NE. 0 ) THEN |
./model/src/cg3d.F |
358 |
CG3D |
IF ( select_rStar .NE. 0 ) THEN |
./model/src/cg3d_ex0.F |
112 |
CG3D_EX0 |
IF ( select_rStar .NE. 0 ) THEN |
./model/src/cg3d_ex0.F |
169 |
CG3D_EX0 |
IF ( select_rStar .NE. 0 ) THEN |
./model/src/cg3d_ex0.F |
342 |
CG3D_EX0 |
IF ( select_rStar .NE. 0 ) THEN |
./pkg/monitor/mon_surfcor.F |
143 |
MON_SURFCOR |
IF (select_rStar.NE.0) THEN |
./model/src/config_check.F |
255 |
CONFIG_CHECK |
IF (select_rStar .NE. 0) THEN |
./model/src/config_check.F |
267 |
CONFIG_CHECK |
IF ( select_rStar.NE.0 ) THEN |
./model/src/config_check.F |
499 |
CONFIG_CHECK |
IF ( select_rStar.NE.0 .AND. gravityFile .NE. ' ' ) THEN |
./model/src/config_check.F |
515 |
CONFIG_CHECK |
IF ( select_rStar.NE.0 .AND. |
./model/src/config_check.F |
582 |
CONFIG_CHECK |
IF (select_rStar.NE.0 .AND. .NOT.exactConserv) THEN |
./model/src/config_check.F |
592 |
CONFIG_CHECK |
IF ( select_rStar.GE.1 .AND. nonlinFreeSurf.LE.0 ) THEN |
./model/src/config_check.F |
594 |
CONFIG_CHECK |
& ' (select_rStar=', select_rStar, ' ) cannot be used' |
./model/src/config_check.F |
601 |
CONFIG_CHECK |
IF ( select_rStar.EQ.2 .AND. nonlinFreeSurf.NE.4 ) THEN |
./model/src/config_check.F |
624 |
CONFIG_CHECK |
IF (select_rStar.NE.0 ) THEN |
./model/src/config_summary.F |
378 |
CONFIG_SUMMARY |
CALL WRITE_0D_I( select_rStar, INDEX_NONE, |
./model/src/diags_phi_hyd.F |
76 |
DIAGS_PHI_HYD |
IF (select_rStar.GE.1 .AND. nonlinFreeSurf.GE.4 ) THEN |
./pkg/ocn_compon_interf/ocn_store_my_data.F |
73 |
OCN_STORE_MY_DATA |
IF ( select_rStar.GT.0 ) THEN |
./model/src/diags_phi_rlow.F |
139 |
DIAGS_PHI_RLOW |
IF ( select_rStar.GE.1 .AND. nonlinFreeSurf.GE.4 ) THEN |
./pkg/offline/offline_fields_load.F |
383 |
OFFLINE_FIELDS_LOAD |
IF ( select_rStar.GT.0 ) THEN |
./model/src/do_atmospheric_phys.F |
83 |
DO_ATMOSPHERIC_PHYS |
IF ( select_rStar.GE.1 .OR. selectSigmaCoord.GE.1 ) THEN |
./model/src/do_oceanic_phys.F |
804 |
DO_OCEANIC_PHYS |
IF ( select_rStar.GE.1 .OR. selectSigmaCoord.GE.1 ) THEN |
./model/src/forcing_surf_relax.F |
119 |
FORCING_SURF_RELAX |
IF ( select_rStar.GT.0 ) THEN |
./model/src/forward_step.F |
430 |
FORWARD_STEP |
IF ( select_rStar.GT.0 ) THEN |
./model/src/forward_step.F |
855 |
FORWARD_STEP |
IF ( select_rStar.GT.0 ) THEN |
./model/src/forward_step.F |
977 |
FORWARD_STEP |
IF ( select_rStar.NE.0 ) THEN |
./model/src/freesurf_rescale_g.F |
43 |
FREESURF_RESCALE_G |
IF ( select_rStar.GT.0 ) THEN |
./model/src/ini_linear_phisurf.F |
149 |
INI_LINEAR_PHISURF |
IF ( select_rStar.GE.1 .OR. selectSigmaCoord.GE.1 ) THEN |
./model/src/ini_nh_fields.F |
77 |
INI_NH_FIELDS |
IF ( select_rStar.EQ.0 .AND. uniformFreeSurfLev ) THEN |
./model/src/ini_nh_fields.F |
85 |
INI_NH_FIELDS |
ELSEIF ( select_rStar.EQ.0 ) THEN |
./pkg/thsice/thsice_get_ocean.F |
65 |
THSICE_GET_OCEAN |
IF ( select_rStar.GT.0 ) THEN |
./model/src/ini_parms.F |
212 |
INI_PARMS |
& nonlinFreeSurf, hFacInf, hFacSup, select_rStar, |
./pkg/zonal_filt/zonal_filt_apply_uv.F |
45 |
ZONAL_FILT_APPLY_UV |
IF ( select_rStar.GT.0 ) THEN |
./model/src/initialise_varia.F |
221 |
INITIALISE_VARIA |
IF ( select_rStar.NE.0 ) |
./model/src/initialise_varia.F |
225 |
INITIALISE_VARIA |
IF ( select_rStar.GT.0 ) THEN |
./model/src/initialise_varia.F |
252 |
INITIALISE_VARIA |
IF ( select_rStar.NE.0 ) THEN |
./model/src/integr_continuity.F |
235 |
INTEGR_CONTINUITY |
IF (select_rStar .NE. 0) THEN |
./model/src/integrate_for_w.F |
123 |
INTEGRATE_FOR_W |
ELSEIF ( select_rStar.NE.0 ) THEN |
./model/src/reset_nlfs_vars.F |
51 |
RESET_NLFS_VARS |
IF ( fluidIsAir .AND. select_rStar.GE.1 ) THEN |
./model/src/set_defaults.F |
257 |
SET_DEFAULTS |
select_rStar = 0 |
./model/src/set_ref_state.F |
287 |
SET_REF_STATE |
IF ( select_rStar.GE.1 .OR. selectSigmaCoord.GE.1 ) THEN |
./model/src/thermodynamics.F |
202 |
THERMODYNAMICS |
IF ( select_rStar.GT.0 ) THEN |
./model/src/timestep.F |
279 |
TIMESTEP |
IF ( select_rStar.GT.0 ) THEN |
./pkg/aim_v23/aim_aim2dyn.F |
127 |
AIM_AIM2DYN |
IF ( select_rStar.GE.1 ) THEN |
./pkg/aim_v23/aim_aim2dyn.F |
149 |
AIM_AIM2DYN |
IF ( select_rStar.GT.0 ) THEN |
./pkg/aim_v23/aim_dyn2aim.F |
109 |
AIM_DYN2AIM |
IF ( select_rStar.GT.0 ) THEN |
./pkg/aim_v23/aim_dyn2aim.F |
187 |
AIM_DYN2AIM |
IF ( select_rStar.GE.1 ) THEN |
./pkg/atm2d/get_ocnvars.F |
80 |
GET_OCNVARS |
IF ( select_rStar.GT.0 ) THEN |
./pkg/atm_phys/atm_phys_driver.F |
406 |
ATM_PHYS_DRIVER |
IF ( select_rStar.GE.1 ) THEN |
./pkg/atm_phys/atm_phys_dyn2phys.F |
133 |
ATM_PHYS_DYN2PHYS |
IF ( select_rStar.GE.1 ) THEN |
./pkg/atm_phys/atm_phys_dyn2phys.F |
74 |
ATM_PHYS_DYN2PHYS |
IF ( staggerTimeStep.AND.select_rStar.GT.0 ) THEN |
./pkg/atm_phys/atm_phys_dyn2phys.F |
85 |
ATM_PHYS_DYN2PHYS |
ELSEIF ( select_rStar.GT.0 ) THEN |
./pkg/diagnostics/diagnostics_check.F |
176 |
DIAGNOSTICS_CHECK |
IF (select_rStar.GT.0) THEN |
./pkg/diagnostics/diagnostics_interp_vert.F |
91 |
DIAGNOSTICS_INTERP_VERT |
IF (select_rStar.GT.0) THEN |