| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
228 |
NO PROCEDURE |
& nonlinFreeSurf, select_rStar, |
|
./model/inc/PARAMS.h |
251 |
NO PROCEDURE |
INTEGER nonlinFreeSurf |
|
./pkg/generic_advdiff/gad_implicit_r.F |
380 |
GAD_IMPLICIT_R |
IF ( nonlinFreeSurf.GT.0 ) THEN |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
149 |
GAD_SOM_ADV_R |
noFlowAcrossSurf = rigidLid .OR. nonlinFreeSurf.GE.1 |
|
./pkg/generic_advdiff/gad_som_advect.F |
452 |
GAD_SOM_ADVECT |
noFlowAcrossSurf = rigidLid .OR. nonlinFreeSurf.GE.1 |
|
./model/src/apply_forcing.F |
515 |
APPLY_FORCING_T |
IF ( ( selectAddFluid.GE.1 .AND. nonlinFreeSurf.GT.0 ) |
|
./model/src/apply_forcing.F |
880 |
APPLY_FORCING_S |
IF ( ( selectAddFluid.GE.1 .AND. nonlinFreeSurf.GT.0 ) |
|
./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_forcing_surf.F |
71 |
LONGSTEP_FORCING_SURF |
IF ( (nonlinFreeSurf.GT.0 .OR. usingPCoords) |
|
./pkg/longstep/longstep_init_fixed.F |
33 |
LONGSTEP_INIT_FIXED |
IF ( (nonlinFreeSurf.GT.0 .OR. usingPCoords) |
|
./pkg/longstep/longstep_thermodynamics.F |
140 |
LONGSTEP_THERMODYNAMICS |
IF ( nonlinFreeSurf.GT.0 ) THEN |
|
./model/src/calc_phi_hyd.F |
102 |
CALC_PHI_HYD |
addSurfPhiAnom = select_rStar.EQ.0 .AND. nonlinFreeSurf.GE.4 |
|
./pkg/mom_fluxform/mom_fluxform.F |
280 |
MOM_FLUXFORM |
& .AND. nonlinFreeSurf.GT.0 ) THEN |
|
./pkg/mom_vecinv/mom_vecinv.F |
312 |
MOM_VECINV |
IF ( no_slip_sides .AND. nonlinFreeSurf.GT.0 ) THEN |
|
./model/src/config_check.F |
243 |
CONFIG_CHECK |
IF (nonlinFreeSurf.NE.0) THEN |
|
./model/src/config_check.F |
552 |
CONFIG_CHECK |
IF ( linFSConserveTr .AND. nonlinFreeSurf.NE.0 ) THEN |
|
./model/src/config_check.F |
572 |
CONFIG_CHECK |
IF (nonlinFreeSurf.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 |
597 |
CONFIG_CHECK |
& ' with Linear FreeSurf (nonlinFreeSurf=', nonlinFreeSurf,' )' |
|
./model/src/config_check.F |
601 |
CONFIG_CHECK |
IF ( select_rStar.EQ.2 .AND. nonlinFreeSurf.NE.4 ) THEN |
|
./model/src/config_check.F |
606 |
CONFIG_CHECK |
& 'select_rStar=2 not right with nonlinFreeSurf=', nonlinFreeSurf |
|
./model/src/config_check.F |
618 |
CONFIG_CHECK |
IF ( nonlinFreeSurf.LE.0 ) THEN |
|
./model/src/config_check.F |
641 |
CONFIG_CHECK |
IF ( nonlinFreeSurf.NE.0 .AND. |
|
./model/src/config_check.F |
748 |
CONFIG_CHECK |
IF (nonlinFreeSurf.NE.0 .AND. use3Dsolver) THEN |
|
./model/src/config_summary.F |
367 |
CONFIG_SUMMARY |
buffI(1) = nonlinFreeSurf |
|
./model/src/config_summary.F |
400 |
CONFIG_SUMMARY |
& .OR. nonlinFreeSurf.LE.0 ) THEN |
|
./pkg/obcs/obcs_calc_stevens.F |
224 |
OBCS_CALC_STEVENS |
IF ( nonlinFreeSurf.GT.0 ) THEN |
|
./pkg/obcs/obcs_calc_stevens.F |
351 |
OBCS_CALC_STEVENS |
IF ( nonlinFreeSurf.GT.0 ) THEN |
|
./pkg/obcs/obcs_calc_stevens.F |
462 |
OBCS_CALC_STEVENS |
IF ( nonlinFreeSurf.GT.0 ) THEN |
|
./pkg/obcs/obcs_calc_stevens.F |
574 |
OBCS_CALC_STEVENS |
IF ( nonlinFreeSurf.GT.0 ) THEN |
|
./pkg/obcs/obcs_check.F |
244 |
OBCS_CHECK |
IF (nonlinFreeSurf.GT.0) THEN |
|
./pkg/obcs/obcs_check.F |
282 |
OBCS_CHECK |
IF (nonlinFreeSurf.GT.0) THEN |
|
./pkg/obcs/obcs_check.F |
402 |
OBCS_CHECK |
IF ( nonlinFreeSurf.EQ.0 .AND. |
|
./model/src/diags_oceanic_surf_flux.F |
130 |
DIAGS_OCEANIC_SURF_FLUX |
IF ( (nonlinFreeSurf.GT.0 .OR. usingPCoords) |
|
./model/src/diags_oceanic_surf_flux.F |
163 |
DIAGS_OCEANIC_SURF_FLUX |
IF ( (nonlinFreeSurf.GT.0 .OR. usingPCoords) |
|
./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 |
72 |
OCN_STORE_MY_DATA |
IF ( nonlinFreeSurf.GT.0 .AND. staggerTimeStep ) 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 |
360 |
OFFLINE_FIELDS_LOAD |
IF ( myIter.NE.nIter0 .OR. nonlinFreeSurf.LE.0 ) THEN |
|
./pkg/offline/offline_fields_load.F |
394 |
OFFLINE_FIELDS_LOAD |
ELSEIF ( nonlinFreeSurf.GT.0 ) THEN |
|
./pkg/ptracers/ptracers_forcing_surf.F |
118 |
PTRACERS_FORCING_SURF |
IF ( (nonlinFreeSurf.GT.0 .OR. usingPCoords) |
|
./pkg/ptracers/ptracers_forcing_surf.F |
83 |
PTRACERS_FORCING_SURF |
IF ( ( (nonlinFreeSurf.GT.0 .OR. usingPCoords) |
|
./pkg/ptracers/ptracers_integrate.F |
375 |
PTRACERS_INTEGRATE |
IF (nonlinFreeSurf.GT.0) THEN |
|
./model/src/do_write_pickup.F |
97 |
DO_WRITE_PICKUP |
IF ( .NOT.useOffLine .OR. nonlinFreeSurf.GT.0 ) THEN |
|
./model/src/external_forcing.F |
387 |
EXTERNAL_FORCING_T |
IF ( ( selectAddFluid.GE.1 .AND. nonlinFreeSurf.GT.0 ) |
|
./model/src/external_forcing.F |
709 |
EXTERNAL_FORCING_S |
IF ( ( selectAddFluid.GE.1 .AND. nonlinFreeSurf.GT.0 ) |
|
./model/src/external_forcing_surf.F |
250 |
EXTERNAL_FORCING_SURF |
IF ( (nonlinFreeSurf.GT.0 .OR. usingPCoords) |
|
./model/src/forcing_surf_relax.F |
118 |
FORCING_SURF_RELAX |
IF (staggerTimeStep.AND.nonlinFreeSurf.GT.0) THEN |
|
./model/src/forward_step.F |
895 |
FORWARD_STEP |
& ( nonlinFreeSurf.GT.2 .OR. selectImplicitDrag.EQ.2 ) ) THEN |
|
./model/src/forward_step.F |
990 |
FORWARD_STEP |
ELSEIF ( nonlinFreeSurf.GT.0 .AND. selectSigmaCoord.EQ.0 ) THEN |
|
./model/src/freesurf_rescale_g.F |
42 |
FREESURF_RESCALE_G |
IF ( nonlinFreeSurf.GT.0 ) THEN |
|
./pkg/seaice/seaice_growth.F |
2271 |
SEAICE_GROWTH |
& useRealFreshWaterFlux.AND.(nonlinFreeSurf.NE.0) ) THEN |
|
./pkg/seaice/seaice_growth.F |
2275 |
SEAICE_GROWTH |
& useRealFreshWaterFlux.AND.(nonlinFreeSurf.NE.0) ) THEN |
|
./pkg/seaice/seaice_growth.F |
2289 |
SEAICE_GROWTH |
IF ( useRealFreshWaterFlux.AND.(nonlinFreeSurf.GT.0) |
|
./pkg/seaice/seaice_growth.F |
2339 |
SEAICE_GROWTH |
& useRealFreshWaterFlux.AND.(nonlinFreeSurf.NE.0) ) THEN |
|
./pkg/seaice/seaice_growth.F |
2343 |
SEAICE_GROWTH |
& useRealFreshWaterFlux.AND.(nonlinFreeSurf.NE.0) ) THEN |
|
./pkg/seaice/seaice_growth.F |
2643 |
SEAICE_GROWTH |
& useRealFreshWaterFlux.AND.(nonlinFreeSurf.NE.0) ) THEN |
|
./pkg/seaice/seaice_growth.F |
2647 |
SEAICE_GROWTH |
& useRealFreshWaterFlux.AND.(nonlinFreeSurf.NE.0) ) THEN |
|
./model/src/ini_fields.F |
40 |
INI_FIELDS |
ELSEIF ( .NOT.useOffLine .OR. nonlinFreeSurf.GT.0 ) THEN |
|
./pkg/thsice/thsice_get_ocean.F |
64 |
THSICE_GET_OCEAN |
IF ( staggerTimeStep .AND. nonlinFreeSurf.GT.0 ) THEN |
|
./model/src/ini_parms.F |
212 |
INI_PARMS |
& nonlinFreeSurf, hFacInf, hFacSup, select_rStar, |
|
./pkg/timeave/timeave_surf_flux.F |
76 |
TIMEAVE_SURF_FLUX |
IF ( (nonlinFreeSurf.GT.0 .OR. usingPCoords) |
|
./pkg/timeave/timeave_surf_flux.F |
97 |
TIMEAVE_SURF_FLUX |
IF ( (nonlinFreeSurf.GT.0 .OR. usingPCoords) |
|
./model/src/initialise_varia.F |
224 |
INITIALISE_VARIA |
IF ( nonlinFreeSurf.GT.0 ) THEN |
|
./model/src/initialise_varia.F |
239 |
INITIALISE_VARIA |
IF ( nonlinFreeSurf.GT.2 ) THEN |
|
./model/src/initialise_varia.F |
257 |
INITIALISE_VARIA |
ELSEIF ( nonlinFreeSurf.GT.0 .AND. selectSigmaCoord.EQ.0 ) THEN |
|
./model/src/integr_continuity.F |
320 |
INTEGR_CONTINUITY |
IF ( nonlinFreeSurf.GT.0 .AND. selectSigmaCoord.NE.0 ) THEN |
|
./model/src/read_pickup.F |
184 |
READ_PICKUP |
IF (nonlinFreeSurf .GE. 0) THEN |
|
./model/src/read_pickup.F |
234 |
READ_PICKUP |
IF ( nonlinFreeSurf.GT.0 ) THEN |
|
./model/src/read_pickup.F |
429 |
READ_PICKUP |
IF ( nonlinFreeSurf.GT.0 ) THEN |
|
./model/src/read_pickup.F |
488 |
READ_PICKUP |
IF (nonlinFreeSurf .GT. 0) THEN |
|
./verification/rotating_tank/code/apply_forcing.F |
517 |
APPLY_FORCING_T |
IF ( ( selectAddFluid.GE.1 .AND. nonlinFreeSurf.GT.0 ) |
|
./verification/rotating_tank/code/apply_forcing.F |
937 |
APPLY_FORCING_S |
IF ( ( selectAddFluid.GE.1 .AND. nonlinFreeSurf.GT.0 ) |
|
./model/src/salt_integrate.F |
412 |
SALT_INTEGRATE |
IF (nonlinFreeSurf.GT.0) THEN |
|
./model/src/set_defaults.F |
254 |
SET_DEFAULTS |
nonlinFreeSurf = 0 |
|
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F |
121 |
PTRACERS_FORCING_SURF |
IF ( (nonlinFreeSurf.GT.0 .OR. usingPCoords) |
|
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F |
86 |
PTRACERS_FORCING_SURF |
IF ( ( (nonlinFreeSurf.GT.0 .OR. usingPCoords) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
253 |
EXTERNAL_FORCING_SURF |
IF ( (nonlinFreeSurf.GT.0 .OR. usingPCoords) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
253 |
EXTERNAL_FORCING_SURF |
IF ( (nonlinFreeSurf.GT.0 .OR. usingPCoords) |
|
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F |
116 |
PTRACERS_FORCING_SURF |
IF ( (nonlinFreeSurf.GT.0 .OR. usingPCoords) |
|
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F |
81 |
PTRACERS_FORCING_SURF |
IF ( ( (nonlinFreeSurf.GT.0 .OR. usingPCoords) |
|
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F |
116 |
PTRACERS_FORCING_SURF |
IF ( (nonlinFreeSurf.GT.0 .OR. usingPCoords) |
|
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F |
81 |
PTRACERS_FORCING_SURF |
IF ( ( (nonlinFreeSurf.GT.0 .OR. usingPCoords) |
|
./model/src/temp_integrate.F |
420 |
TEMP_INTEGRATE |
IF (nonlinFreeSurf.GT.0) THEN |
|
./model/src/thermodynamics.F |
201 |
THERMODYNAMICS |
IF ( nonlinFreeSurf.GT.0 ) THEN |
|
./model/src/timestep.F |
278 |
TIMESTEP |
& .AND. nonlinFreeSurf.GT.1 ) THEN |
|
./model/src/update_etah.F |
82 |
UPDATE_ETAH |
IF ( useOBCS.AND.nonlinFreeSurf.GT.0 ) |
|
./model/src/update_etah.F |
93 |
UPDATE_ETAH |
& ( useOBCS.AND.nonlinFreeSurf.GT.0 ) ) |
|
./model/src/update_etaws.F |
49 |
UPDATE_ETAWS |
IF ( nonlinFreeSurf.GT.0 .AND. selectSigmaCoord.NE.0 ) THEN |
|
./model/src/update_surf_dr.F |
52 |
UPDATE_SURF_DR |
IF (useLatest.AND.(nonlinFreeSurf.GT.0)) then |
|
./model/src/update_surf_dr.F |
87 |
UPDATE_SURF_DR |
ELSEIF (nonlinFreeSurf.GT.0) THEN |
|
./pkg/aim_v23/aim_aim2dyn.F |
148 |
AIM_AIM2DYN |
IF ( staggerTimeStep .AND. nonlinFreeSurf.GT.0 ) THEN |
|
./pkg/aim_v23/aim_dyn2aim.F |
108 |
AIM_DYN2AIM |
IF ( staggerTimeStep .AND. nonlinFreeSurf.GT.0 ) THEN |
|
./pkg/atm2d/get_ocnvars.F |
79 |
GET_OCNVARS |
IF ( nonlinFreeSurf.GT.0 .AND. staggerTimeStep ) THEN |
|
./pkg/atm_phys/atm_phys_dyn2phys.F |
126 |
ATM_PHYS_DYN2PHYS |
IF ( nonlinFreeSurf.LE.0 ) THEN |
|
./pkg/atm_phys/atm_phys_dyn2phys.F |
155 |
ATM_PHYS_DYN2PHYS |
IF ( nonlinFreeSurf.LE.0 ) THEN |
|
./pkg/atm_phys/atm_phys_dyn2phys.F |
73 |
ATM_PHYS_DYN2PHYS |
IF ( nonlinFreeSurf.GT.0 ) THEN |