| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
200 |
NO PROCEDURE |
& nonlinFreeSurf, select_rStar, |
|
./model/inc/PARAMS.h |
222 |
NO PROCEDURE |
INTEGER select_rStar |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
658 |
GAD_CALC_RHS |
IF (select_rStar.GT.0) THEN |
|
./pkg/gridalt/gridalt_update.F |
48 |
GRIDALT_UPDATE |
if(usefizhi .and. (select_rStar.GT.0) )then |
|
./model/src/calc_grad_phi_hyd.F |
163 |
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/mom_fluxform/mom_calc_rtrans.F |
114 |
MOM_CALC_RTRANS |
IF ( select_rStar.NE.0 ) THEN |
|
./pkg/mom_fluxform/mom_fluxform.F |
432 |
MOM_FLUXFORM |
IF ( select_rStar.GT.0 ) THEN |
|
./pkg/mom_fluxform/mom_fluxform.F |
441 |
MOM_FLUXFORM |
IF ( select_rStar.LT.0 ) THEN |
|
./pkg/mom_fluxform/mom_fluxform.F |
648 |
MOM_FLUXFORM |
IF ( select_rStar.GT.0 ) THEN |
|
./pkg/mom_fluxform/mom_fluxform.F |
657 |
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 |
137 |
MON_SURFCOR |
IF (select_rStar.NE.0) THEN |
|
./model/src/calc_phi_hyd.F |
90 |
CALC_PHI_HYD |
addSurfPhiAnom = select_rStar.EQ.0 .AND. nonlinFreeSurf.GT.3 |
|
./model/src/cg3d.F |
117 |
CG3D |
IF ( select_rStar .NE. 0 ) THEN |
|
./model/src/cg3d.F |
176 |
CG3D |
IF ( select_rStar .NE. 0 ) THEN |
|
./model/src/cg3d.F |
366 |
CG3D |
IF ( select_rStar .NE. 0 ) THEN |
|
./pkg/ocn_compon_interf/ocn_store_my_data.F |
68 |
OCN_STORE_MY_DATA |
IF ( select_rStar.GT.0 ) THEN |
|
./model/src/config_check.F |
161 |
CONFIG_CHECK |
IF (select_rStar .NE. 0) THEN |
|
./model/src/config_check.F |
173 |
CONFIG_CHECK |
IF ( select_rStar.NE.0 ) THEN |
|
./model/src/config_check.F |
306 |
CONFIG_CHECK |
IF ( select_rStar.NE.0 .AND. |
|
./model/src/config_check.F |
374 |
CONFIG_CHECK |
IF (select_rStar.NE.0 .AND. .NOT.exactConserv) THEN |
|
./model/src/config_check.F |
397 |
CONFIG_CHECK |
IF (select_rStar.NE.0 ) THEN |
|
./model/src/config_summary.F |
283 |
CONFIG_SUMMARY |
CALL WRITE_0D_I( select_rStar, INDEX_NONE, |
|
./model/src/diags_phi_rlow.F |
136 |
DIAGS_PHI_RLOW |
IF ( select_rStar.GT.0 .AND. nonlinFreeSurf.GE.4 ) THEN |
|
./model/src/external_forcing_surf.F |
121 |
EXTERNAL_FORCING_SURF |
IF ( select_rStar.GT.0 ) THEN |
|
./model/src/forward_step.F |
680 |
FORWARD_STEP |
IF ( select_rStar.GT.0 ) THEN |
|
./model/src/forward_step.F |
845 |
FORWARD_STEP |
IF ( select_rStar.NE.0 ) THEN |
|
./model/src/freesurf_rescale_g.F |
43 |
FREESURF_RESCALE_G |
IF ( select_rStar.GT.0 ) THEN |
|
./pkg/thsice/thsice_main.F |
120 |
THSICE_MAIN |
IF ( select_rStar.GT.0 ) THEN |
|
./pkg/zonal_filt/zonal_filt_apply_uv.F |
45 |
ZONAL_FILT_APPLY_UV |
IF ( select_rStar.GT.0 ) THEN |
|
./model/src/ini_cg3d.F |
240 |
INI_CG3D |
IF ( select_rStar .EQ. 0 ) THEN |
|
./model/src/ini_nh_fields.F |
72 |
INI_NH_FIELDS |
IF ( select_rStar.EQ.0 .AND. usingZCoords ) THEN |
|
./model/src/ini_nh_fields.F |
80 |
INI_NH_FIELDS |
ELSEIF ( select_rStar.EQ.0 ) THEN |
|
./model/src/ini_parms.F |
184 |
INI_PARMS |
& nonlinFreeSurf, hFacInf, hFacSup, select_rStar, |
|
./model/src/initialise_varia.F |
236 |
INITIALISE_VARIA |
IF ( select_rStar.NE.0 ) |
|
./model/src/initialise_varia.F |
240 |
INITIALISE_VARIA |
IF ( select_rStar.GT.0 ) THEN |
|
./model/src/initialise_varia.F |
283 |
INITIALISE_VARIA |
IF ( select_rStar.NE.0 ) THEN |
|
./model/src/integr_continuity.F |
206 |
INTEGR_CONTINUITY |
IF (select_rStar .NE. 0) THEN |
|
./model/src/integrate_for_w.F |
117 |
INTEGRATE_FOR_W |
ELSEIF ( select_rStar.NE.0 ) THEN |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
121 |
EXTERNAL_FORCING_SURF |
IF ( select_rStar.GT.0 ) THEN |
|
./model/src/post_cg3d.F |
62 |
POST_CG3D |
IF ( select_rStar.EQ.0 .AND. usingZCoords ) THEN |
|
./model/src/post_cg3d.F |
69 |
POST_CG3D |
ELSEIF ( select_rStar.EQ.0 ) THEN |
|
./model/src/pre_cg3d.F |
124 |
PRE_CG3D |
ELSEIF ( select_rStar.NE.0 ) THEN |
|
./model/src/pre_cg3d.F |
97 |
PRE_CG3D |
IF ( select_rStar.EQ.0 .AND. .NOT.oldFreeSurfTerm ) THEN |
|
./model/src/set_defaults.F |
216 |
SET_DEFAULTS |
select_rStar = 0 |
|
./model/src/timestep.F |
296 |
TIMESTEP |
IF ( select_rStar.GT.0 ) THEN |
|
./pkg/aim_v23/aim_aim2dyn.F |
128 |
AIM_AIM2DYN |
IF ( select_rStar.GT.0 ) THEN |
|
./pkg/aim_v23/aim_dyn2aim.F |
106 |
AIM_DYN2AIM |
IF ( select_rStar.GT.0 ) THEN |
|
./pkg/atm2d/get_ocnvars.F |
81 |
GET_OCNVARS |
IF ( select_rStar.GT.0 ) THEN |
|
./pkg/diagnostics/diagnostics_check.F |
150 |
DIAGNOSTICS_CHECK |
IF (select_rStar.GT.0) THEN |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
89 |
DIAGNOSTICS_INTERP_VERT |
IF (select_rStar.GT.0) THEN |
|
./pkg/ecco/the_main_loop.F |
748 |
THE_MAIN_LOOP |
IF ( select_rStar.GT.0 ) THEN |
|
./pkg/ecco/the_main_loop.F |
878 |
THE_MAIN_LOOP |
IF ( select_rStar.NE.0 ) THEN |