| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
437 |
NO PROCEDURE |
& use3Dsolver, implicitIntGravWave, staggerTimeStep, |
|
./model/inc/PARAMS.h |
525 |
NO PROCEDURE |
LOGICAL implicitIntGravWave |
|
./pkg/generic_advdiff/gad_check.F |
83 |
GAD_CHECK |
IF ( .NOT.(staggerTimeStep.OR.implicitIntGravWave) ) THEN |
|
./model/src/calc_phi_hyd.F |
156 |
CALC_PHI_HYD |
IF ( implicitIntGravWave .OR. myIter.LT.0 ) THEN |
|
./model/src/calc_phi_hyd.F |
318 |
CALC_PHI_HYD |
IF ( implicitIntGravWave .OR. myIter.LT.0 ) THEN |
|
./model/src/calc_phi_hyd.F |
436 |
CALC_PHI_HYD |
IF ( implicitIntGravWave .OR. myIter.LT.0 ) THEN |
|
./model/src/config_check.F |
117 |
CONFIG_CHECK |
IF ( implicitIntGravWave ) WRITE(msgBuf,'(A)') |
|
./model/src/config_check.F |
759 |
CONFIG_CHECK |
& .AND. implicitIntGravWave ) THEN |
|
./model/src/config_check.F |
919 |
CONFIG_CHECK |
IF ( implicitIntGravWave .AND. staggerTimeStep ) THEN |
|
./model/src/config_summary.F |
520 |
CONFIG_SUMMARY |
CALL WRITE_0D_L( implicitIntGravWave, INDEX_NONE, |
|
./model/src/do_fields_blocking_exchanges.F |
58 |
DO_FIELDS_BLOCKING_EXCHANGES |
IF ( .NOT.implicitIntGravWave ) |
|
./model/src/do_fields_blocking_exchanges.F |
63 |
DO_FIELDS_BLOCKING_EXCHANGES |
IF ( .NOT.implicitIntGravWave ) THEN |
|
./model/src/do_stagger_fields_exchanges.F |
44 |
DO_STAGGER_FIELDS_EXCHANGES |
IF ( .NOT.implicitIntGravWave ) |
|
./model/src/do_stagger_fields_exchanges.F |
49 |
DO_STAGGER_FIELDS_EXCHANGES |
IF ( implicitIntGravWave ) THEN |
|
./model/src/dynamics.F |
660 |
DYNAMICS |
IF ( nonHydrostatic.OR.implicitIntGravWave ) |
|
./model/src/forward_step.F |
789 |
FORWARD_STEP |
IF ( implicitIntGravWave ) THEN |
|
./model/src/ini_cg3d.F |
98 |
INI_CG3D |
IF ( implicitIntGravWave ) igwFac = 1. _d 0 |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
61 |
SHAP_FILT_APPLY_TS |
IF ( implicitIntGravWave ) exchInOut = 2 |
|
./model/src/ini_parms.F |
214 |
INI_PARMS |
& implicitIntGravWave, staggerTimeStep, doResetHFactors, |
|
./model/src/integr_continuity.F |
304 |
INTEGR_CONTINUITY |
IF ( implicitIntGravWave .OR. myIter.EQ.nIter0 ) |
|
./model/src/set_defaults.F |
181 |
SET_DEFAULTS |
implicitIntGravWave = .FALSE. |
|
./model/src/set_parms.F |
67 |
SET_PARMS |
implicitIntGravWave=momPressureForcing .AND. implicitIntGravWave |
|
./model/src/set_parms.F |
71 |
SET_PARMS |
use3Dsolver = nonHydrostatic.OR. implicitIntGravWave |
|
./model/src/set_ref_state.F |
138 |
SET_REF_STATE |
IF ( implicitIntGravWave ) THEN |
|
./model/src/timestep.F |
116 |
TIMESTEP |
IF ( .NOT.staggerTimeStep .AND. .NOT. implicitIntGravWave ) THEN |
|
./model/src/timestep_wvel.F |
112 |
TIMESTEP_WVEL |
ELSEIF ( implicitIntGravWave ) THEN |
|
./model/src/timestep_wvel.F |
55 |
TIMESTEP_WVEL |
IF ( implicitIntGravWave ) igwFac = 1. _d 0 |
|
./model/src/tracers_correction_step.F |
52 |
TRACERS_CORRECTION_STEP |
IF ( implicitIntGravWave ) THEN |