| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
205 |
NO PROCEDURE |
& nonlinFreeSurf, select_rStar, |
|
./model/inc/PARAMS.h |
229 |
NO PROCEDURE |
INTEGER select_rStar |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
734 |
GAD_CALC_RHS |
IF (select_rStar.GT.0) THEN |
|
./pkg/generic_advdiff/gad_implicit_r.F |
355 |
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 |
447 |
GAD_SOM_ADVECT |
& .OR. select_rStar.NE.0 |
|
./pkg/gridalt/gridalt_update.F |
48 |
GRIDALT_UPDATE |
if(usefizhi .and. (select_rStar.GT.0) )then |
|
./pkg/longstep/longstep_thermodynamics.F |
141 |
LONGSTEP_THERMODYNAMICS |
IF ( 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 |
|
./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 |
433 |
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 |
464 |
MOM_FLUXFORM |
IF ( select_rStar.GT.0 ) THEN |
|
./pkg/mom_fluxform/mom_fluxform.F |
473 |
MOM_FLUXFORM |
IF ( select_rStar.LT.0 ) THEN |
|
./pkg/mom_fluxform/mom_fluxform.F |
691 |
MOM_FLUXFORM |
IF ( select_rStar.GT.0 ) THEN |
|
./pkg/mom_fluxform/mom_fluxform.F |
700 |
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 |
|
./pkg/monitor/mon_surfcor.F |
143 |
MON_SURFCOR |
IF (select_rStar.NE.0) 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 |
|
./model/src/config_check.F |
200 |
CONFIG_CHECK |
IF (select_rStar .NE. 0) THEN |
|
./model/src/config_check.F |
212 |
CONFIG_CHECK |
IF ( select_rStar.NE.0 ) THEN |
|
./model/src/config_check.F |
423 |
CONFIG_CHECK |
IF ( select_rStar.NE.0 .AND. |
|
./model/src/config_check.F |
499 |
CONFIG_CHECK |
IF (select_rStar.NE.0 .AND. .NOT.exactConserv) THEN |
|
./model/src/config_check.F |
509 |
CONFIG_CHECK |
IF ( select_rStar.GE.1 .AND. nonlinFreeSurf.LE.0 ) THEN |
|
./model/src/config_check.F |
511 |
CONFIG_CHECK |
& ' (select_rStar=', select_rStar, ' ) cannot be used' |
|
./model/src/config_check.F |
518 |
CONFIG_CHECK |
IF ( select_rStar.EQ.2 .AND. nonlinFreeSurf.NE.4 ) THEN |
|
./model/src/config_check.F |
541 |
CONFIG_CHECK |
IF (select_rStar.NE.0 ) THEN |
|
./model/src/config_summary.F |
352 |
CONFIG_SUMMARY |
CALL WRITE_0D_I( select_rStar, INDEX_NONE, |
|
./pkg/ocn_compon_interf/ocn_store_my_data.F |
67 |
OCN_STORE_MY_DATA |
IF ( select_rStar.GT.0 ) THEN |
|
./pkg/offline/offline_fields_load.F |
394 |
OFFLINE_FIELDS_LOAD |
IF ( select_rStar.GT.0 .AND. staggerTimeStep ) THEN |
|
./pkg/offline/offline_fields_load.F |
405 |
OFFLINE_FIELDS_LOAD |
ELSEIF ( select_rStar.GT.0 ) THEN |
|
./model/src/diags_phi_hyd.F |
76 |
DIAGS_PHI_HYD |
IF (select_rStar.GE.1 .AND. nonlinFreeSurf.GE.4 ) THEN |
|
./model/src/diags_phi_rlow.F |
137 |
DIAGS_PHI_RLOW |
IF ( select_rStar.GE.1 .AND. nonlinFreeSurf.GE.4 ) THEN |
|
./model/src/do_atmospheric_phys.F |
69 |
DO_ATMOSPHERIC_PHYS |
IF ( select_rStar.GE.1 .OR. selectSigmaCoord.GE.1 ) THEN |
|
./model/src/do_oceanic_phys.F |
702 |
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 |
303 |
FORWARD_STEP |
IF ( select_rStar.GT.0 ) THEN |
|
./model/src/forward_step.F |
711 |
FORWARD_STEP |
IF ( select_rStar.GT.0 ) THEN |
|
./model/src/forward_step.F |
829 |
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_cg3d.F |
208 |
INI_CG3D |
IF ( select_rStar .EQ. 0 ) THEN |
|
./model/src/ini_linear_phisurf.F |
149 |
INI_LINEAR_PHISURF |
IF ( select_rStar.GE.1 .OR. selectSigmaCoord.GE.1 ) THEN |
|
./pkg/thsice/thsice_get_ocean.F |
65 |
THSICE_GET_OCEAN |
IF ( select_rStar.GT.0 ) 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/zonal_filt/zonal_filt_apply_uv.F |
45 |
ZONAL_FILT_APPLY_UV |
IF ( select_rStar.GT.0 ) THEN |
|
./model/src/ini_parms.F |
202 |
INI_PARMS |
& nonlinFreeSurf, hFacInf, hFacSup, select_rStar, |
|
./model/src/initialise_varia.F |
201 |
INITIALISE_VARIA |
IF ( select_rStar.NE.0 ) |
|
./model/src/initialise_varia.F |
205 |
INITIALISE_VARIA |
IF ( select_rStar.GT.0 ) THEN |
|
./model/src/initialise_varia.F |
232 |
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/post_cg3d.F |
62 |
POST_CG3D |
IF ( select_rStar.EQ.0 .AND. uniformFreeSurfLev ) THEN |
|
./model/src/post_cg3d.F |
69 |
POST_CG3D |
ELSEIF ( select_rStar.EQ.0 ) THEN |
|
./model/src/pre_cg3d.F |
119 |
PRE_CG3D |
ELSEIF ( select_rStar.NE.0 ) THEN |
|
./model/src/pre_cg3d.F |
92 |
PRE_CG3D |
IF ( select_rStar.EQ.0 .AND. .NOT.oldFreeSurfTerm ) THEN |
|
./model/src/reset_nlfs_vars.F |
51 |
RESET_NLFS_VARS |
IF ( fluidIsAir .AND. select_rStar.GE.1 ) THEN |
|
./model/src/set_defaults.F |
248 |
SET_DEFAULTS |
select_rStar = 0 |
|
./model/src/set_ref_state.F |
218 |
SET_REF_STATE |
IF ( select_rStar.GE.1 .OR. selectSigmaCoord.GE.1 ) THEN |
|
./model/src/thermodynamics.F |
172 |
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 |
177 |
ATM_PHYS_DRIVER |
IF ( staggerTimeStep.AND.select_rStar.GT.0 ) THEN |
|
./pkg/atm_phys/atm_phys_driver.F |
218 |
ATM_PHYS_DRIVER |
IF ( select_rStar.GE.1 ) THEN |
|
./pkg/atm_phys/atm_phys_driver.F |
443 |
ATM_PHYS_DRIVER |
IF ( select_rStar.GE.1 ) THEN |
|
./pkg/diagnostics/diagnostics_check.F |
157 |
DIAGNOSTICS_CHECK |
IF (select_rStar.GT.0) THEN |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
91 |
DIAGNOSTICS_INTERP_VERT |
IF (select_rStar.GT.0) THEN |