| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
895 |
NO PROCEDURE |
LOGICAL useOBCS |
|
./model/inc/PARAMS.h |
938 |
NO PROCEDURE |
& useGAD, useOBCS, useSHAP_FILT, useZONAL_FILT, |
|
./pkg/flt/flt_runga2.F |
214 |
FLT_RUNGA2 |
IF ( useOBCS ) THEN |
|
./pkg/generic_advdiff/gad_advection.F |
477 |
GAD_ADVECTION |
IF ( useOBCS ) THEN |
|
./pkg/generic_advdiff/gad_advection.F |
647 |
GAD_ADVECTION |
IF (useOBCS) THEN |
|
./pkg/ptracers/ptracers_implicit.F |
135 |
PTRACERS_IMPLICIT |
IF ( useOBCS ) THEN |
|
./pkg/ptracers/ptracers_integrate.F |
225 |
PTRACERS_INTEGRATE |
IF (useOBCS) THEN |
|
./model/src/do_oceanic_phys.F |
152 |
DO_OCEANIC_PHYS |
IF (useOBCS) THEN |
|
./pkg/seaice/seaice_init_varia.F |
194 |
SEAICE_INIT_VARIA |
IF (useOBCS) THEN |
|
./pkg/seaice/seaice_model.F |
174 |
SEAICE_MODEL |
IF ( useOBCS ) CALL OBCS_APPLY_UVICE( uice, vice, myThid ) |
|
./pkg/seaice/seaice_model.F |
229 |
SEAICE_MODEL |
IF ( useOBCS ) CALL OBCS_APPLY_SEAICE( myThid ) |
|
./pkg/seaice/seaice_output.F |
295 |
SEAICE_OUTPUT |
IF ( useOBCS ) CALL SEAICE_OBCS_OUTPUT( myTime, myIter, myThid ) |
|
./model/src/do_the_model_io.F |
100 |
DO_THE_MODEL_IO |
IF (useOBCS .AND. myIter.NE.nIter0 ) |
|
./model/src/dynamics.F |
551 |
DYNAMICS |
IF (useOBCS) THEN |
|
./model/src/dynamics.F |
596 |
DYNAMICS |
IF ( useOBCS .AND.(implicitViscosity.OR.momImplVertAdv) ) THEN |
|
./model/src/dynamics.F |
652 |
DYNAMICS |
IF (useOBCS) THEN |
|
./model/src/external_forcing.F |
198 |
EXTERNAL_FORCING_V |
IF (useOBCS) THEN |
|
./model/src/external_forcing.F |
388 |
EXTERNAL_FORCING_T |
IF (useOBCS) THEN |
|
./model/src/external_forcing.F |
553 |
EXTERNAL_FORCING_S |
IF (useOBCS) THEN |
|
./model/src/external_forcing.F |
94 |
EXTERNAL_FORCING_U |
IF (useOBCS) THEN |
|
./model/src/ini_cg2d.F |
116 |
INI_CG2D |
IF (useOBCS) THEN |
|
./model/src/ini_cg3d.F |
161 |
INI_CG3D |
IF ( useOBCS ) THEN |
|
./model/src/ini_depths.F |
287 |
INI_DEPTHS |
IF ( useOBCS ) THEN |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
287 |
INI_DEPTHS |
IF ( useOBCS ) THEN |
|
./model/src/integr_continuity.F |
198 |
INTEGR_CONTINUITY |
IF ( useOBCS ) CALL OBCS_APPLY_ETA( bi, bj, etaN, myThid ) |
|
./model/src/integr_continuity.F |
250 |
INTEGR_CONTINUITY |
IF ( useOBCS ) CALL OBCS_APPLY_W( bi, bj, k, wVel, myThid ) |
|
./verification/rotating_tank/code/external_forcing.F |
192 |
EXTERNAL_FORCING_V |
IF (useOBCS) THEN |
|
./verification/rotating_tank/code/external_forcing.F |
425 |
EXTERNAL_FORCING_T |
IF (useOBCS) THEN |
|
./verification/rotating_tank/code/external_forcing.F |
516 |
EXTERNAL_FORCING_S |
IF (useOBCS) THEN |
|
./verification/rotating_tank/code/external_forcing.F |
94 |
EXTERNAL_FORCING_U |
IF (useOBCS) THEN |
|
./model/src/momentum_correction_step.F |
110 |
MOMENTUM_CORRECTION_STEP |
IF (useOBCS) THEN |
|
./model/src/packages_boot.F |
106 |
PACKAGES_BOOT |
useOBCS =.FALSE. |
|
./model/src/packages_boot.F |
48 |
PACKAGES_BOOT |
& useOBCS, |
|
./verification/tidal_basin_2d/code/external_forcing.F |
125 |
EXTERNAL_FORCING_U |
IF (useOBCS) THEN |
|
./verification/tidal_basin_2d/code/external_forcing.F |
223 |
EXTERNAL_FORCING_V |
IF (useOBCS) THEN |
|
./verification/tidal_basin_2d/code/external_forcing.F |
346 |
EXTERNAL_FORCING_T |
IF (useOBCS) THEN |
|
./verification/tidal_basin_2d/code/external_forcing.F |
437 |
EXTERNAL_FORCING_S |
IF (useOBCS) THEN |
|
./model/src/packages_check.F |
172 |
PACKAGES_CHECK |
IF (useOBCS) CALL OBCS_CHECK( myThid ) |
|
./model/src/packages_check.F |
174 |
PACKAGES_CHECK |
IF (useOBCS) CALL PACKAGES_ERROR_MSG('OBCS',' ',myThid) |
|
./model/src/packages_init_fixed.F |
193 |
PACKAGES_INIT_FIXED |
IF (useOBCS) THEN |
|
./model/src/packages_init_variables.F |
347 |
PACKAGES_INIT_VARIABLES |
IF (useOBCS) THEN |
|
./model/src/packages_readparms.F |
211 |
PACKAGES_READPARMS |
IF (useOBCS) CALL OBCS_READPARMS( myThid ) |
|
./model/src/packages_write_pickup.F |
74 |
PACKAGES_WRITE_PICKUP |
IF (useOBCS) THEN |
|
./model/src/pre_cg3d.F |
179 |
PRE_CG3D |
IF (useOBCS) THEN |
|
./model/src/pre_cg3d.F |
241 |
PRE_CG3D |
IF (useOBCS) THEN |
|
./model/src/solve_for_pressure.F |
232 |
SOLVE_FOR_PRESSURE |
IF (useOBCS) THEN |
|
./model/src/thermodynamics.F |
693 |
THERMODYNAMICS |
IF (useOBCS) THEN |
|
./model/src/thermodynamics.F |
881 |
THERMODYNAMICS |
& ) .AND. useOBCS ) THEN |
|
./model/src/timestep_wvel.F |
112 |
TIMESTEP_WVEL |
IF (useOBCS) THEN |
|
./model/src/update_cg2d.F |
95 |
UPDATE_CG2D |
IF (useOBCS) THEN |
|
./model/src/update_etah.F |
100 |
UPDATE_ETAH |
IF (implicDiv2Dflow .NE. 1. _d 0 .OR. useOBCS ) |
|
./model/src/update_etah.F |
91 |
UPDATE_ETAH |
IF ( useOBCS ) CALL OBCS_APPLY_ETA( bi, bj, etaH, myThid ) |
|
./model/src/update_r_star.F |
77 |
UPDATE_R_STAR |
IF (useOBCS) THEN |
|
./model/src/update_surf_dr.F |
78 |
UPDATE_SURF_DR |
IF (useOBCS) THEN |
|
./model/src/write_grid.F |
103 |
WRITE_GRID |
IF ( useOBCS ) THEN |
|
./pkg/ctrl/ctrl_init_variables.F |
305 |
CTRL_INIT_VARIABLES |
IF (useOBCS) CALL CTRL_INIT_OBCS_VARIABLES( mythid ) |