| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
736 |
NO PROCEDURE |
& freeSurfFac, implicSurfPress, implicDiv2Dflow, implicitNHPress, |
|
./model/inc/PARAMS.h |
784 |
NO PROCEDURE |
_RL implicDiv2Dflow |
|
./model/src/calc_div_ghat.F |
112 |
CALC_DIV_GHAT |
pf(i,j) = ( implicDiv2Dflow * gU(i,j,k,bi,bj) |
|
./model/src/calc_div_ghat.F |
113 |
CALC_DIV_GHAT |
& + (1. _d 0-implicDiv2Dflow)* uVel(i,j,k,bi,bj) |
|
./model/src/calc_div_ghat.F |
135 |
CALC_DIV_GHAT |
IF (implicDiv2Dflow.EQ.1.) THEN |
|
./model/src/calc_div_ghat.F |
147 |
CALC_DIV_GHAT |
pf(i,j) = implicDiv2Dflow |
|
./model/src/calc_div_ghat.F |
155 |
CALC_DIV_GHAT |
pf(i,j) = ( implicDiv2Dflow * gV(i,j,k,bi,bj) |
|
./model/src/calc_div_ghat.F |
156 |
CALC_DIV_GHAT |
& + (1. _d 0-implicDiv2Dflow)* vVel(i,j,k,bi,bj) |
|
./model/src/calc_div_ghat.F |
76 |
CALC_DIV_GHAT |
IF (implicDiv2Dflow.EQ.1.) THEN |
|
./model/src/calc_div_ghat.F |
88 |
CALC_DIV_GHAT |
pf(i,j) = implicDiv2Dflow |
|
./pkg/monitor/mon_vort3.F |
81 |
MON_VORT3 |
IF( implicDiv2Dflow.GT.0 .AND. abEps.GT.-0.5 ) |
|
./pkg/monitor/mon_vort3.F |
82 |
MON_VORT3 |
& tmpFac = (0.5+abEps) / implicDiv2Dflow |
|
./model/src/config_check.F |
427 |
CONFIG_CHECK |
& .AND. implicDiv2Dflow.EQ.0. _d 0 |
|
./model/src/config_check.F |
439 |
CONFIG_CHECK |
& .AND. implicDiv2Dflow.NE.1. ) THEN |
|
./model/src/config_check.F |
515 |
CONFIG_CHECK |
IF ( implicitNHPress*implicSurfPress*implicDiv2Dflow.NE.1. |
|
./model/src/config_check.F |
526 |
CONFIG_CHECK |
& .AND. implicDiv2Dflow.NE.1. ) THEN |
|
./model/src/config_summary.F |
253 |
CONFIG_SUMMARY |
CALL WRITE_0D_RL( implicDiv2Dflow, INDEX_NONE, |
|
./model/src/forward_step.F |
765 |
FORWARD_STEP |
IF (implicDiv2Dflow.LT.1.) THEN |
|
./model/src/forward_step.F |
778 |
FORWARD_STEP |
IF (implicDiv2Dflow.LT.1.) THEN |
|
./model/src/ini_parms.F |
180 |
INI_PARMS |
& implicSurfPress, implicDiv2Dflow, implicitNHPress, |
|
./model/src/integr_continuity.F |
132 |
INTEGR_CONTINUITY |
& / (implicDiv2Dflow*deltaTfreesurf) |
|
./model/src/integr_continuity.F |
181 |
INTEGR_CONTINUITY |
IF (implicDiv2Dflow.EQ. 0. _d 0) THEN |
|
./model/src/integr_continuity.F |
191 |
INTEGR_CONTINUITY |
& + implicDiv2Dflow*dEtaHdt(i,j,bi,bj)*deltaTfreesurf |
|
./model/src/momentum_correction_step.F |
186 |
MOMENTUM_CORRECTION_STEP |
IF ( exactConserv .AND. implicDiv2Dflow .NE. 0. _d 0) |
|
./model/src/set_defaults.F |
209 |
SET_DEFAULTS |
implicDiv2Dflow = 1. _d 0 |
|
./model/src/update_etah.F |
100 |
UPDATE_ETAH |
IF (implicDiv2Dflow .NE. 1. _d 0 .OR. useOBCS ) |
|
./model/src/update_etah.F |
64 |
UPDATE_ETAH |
IF (implicDiv2Dflow.EQ. 1. _d 0) THEN |
|
./model/src/update_etah.F |
75 |
UPDATE_ETAH |
& + (1. - implicDiv2Dflow)*dEtaHdt(i,j,bi,bj) |
|
./pkg/ecco/the_main_loop.F |
803 |
THE_MAIN_LOOP |
IF (implicDiv2Dflow.LT.1.) THEN |
|
./pkg/ecco/the_main_loop.F |
816 |
THE_MAIN_LOOP |
IF (implicDiv2Dflow.LT.1.) THEN |