| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
641 |
NO PROCEDURE |
& delT, tauCD, rCD, freeSurfFac, implicSurfPress, implicDiv2Dflow, |
|
./model/inc/PARAMS.h |
683 |
NO PROCEDURE |
_RL implicDiv2Dflow |
|
./model/src/integr_continuity.F |
115 |
INTEGR_CONTINUITY |
& / (implicDiv2Dflow*deltaTfreesurf) |
|
./model/src/integr_continuity.F |
153 |
INTEGR_CONTINUITY |
IF (implicDiv2Dflow.EQ. 0. _d 0) THEN |
|
./model/src/integr_continuity.F |
163 |
INTEGR_CONTINUITY |
& + implicDiv2Dflow*dEtaHdt(i,j,bi,bj)*deltaTfreesurf |
|
./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) |
|
./model/src/momentum_correction_step.F |
182 |
MOMENTUM_CORRECTION_STEP |
IF ( exactConserv .AND. implicDiv2Dflow .NE. 0. _d 0) |
|
./model/src/forward_step.F |
528 |
FORWARD_STEP |
IF (implicDiv2Dflow.LT.1.) THEN |
|
./model/src/forward_step.F |
541 |
FORWARD_STEP |
IF (implicDiv2Dflow.LT.1.) THEN |
|
./model/src/config_summary.F |
241 |
CONFIG_SUMMARY |
CALL WRITE_0D_R8( implicDiv2Dflow, INDEX_NONE, |
|
./model/src/calc_div_ghat.F |
120 |
CALC_DIV_GHAT |
IF (implicDiv2Dflow.EQ.1.) THEN |
|
./model/src/calc_div_ghat.F |
132 |
CALC_DIV_GHAT |
pf(i,j) = implicDiv2Dflow |
|
./model/src/calc_div_ghat.F |
140 |
CALC_DIV_GHAT |
pf(i,j) = ( implicDiv2Dflow * gV(i,j,k,bi,bj) |
|
./model/src/calc_div_ghat.F |
141 |
CALC_DIV_GHAT |
& + (1.-implicDiv2Dflow) * vVel(i,j,k,bi,bj) |
|
./model/src/calc_div_ghat.F |
64 |
CALC_DIV_GHAT |
IF (implicDiv2Dflow.EQ.1.) THEN |
|
./model/src/calc_div_ghat.F |
76 |
CALC_DIV_GHAT |
pf(i,j) = implicDiv2Dflow |
|
./model/src/calc_div_ghat.F |
97 |
CALC_DIV_GHAT |
pf(i,j) = ( implicDiv2Dflow * gU(i,j,k,bi,bj) |
|
./model/src/calc_div_ghat.F |
98 |
CALC_DIV_GHAT |
& + (1.-implicDiv2Dflow) * uVel(i,j,k,bi,bj) |
|
./pkg/monitor/mon_vort3.F |
75 |
MON_VORT3 |
IF( implicDiv2Dflow.GT.0 .AND. abEps.GT.-0.5 ) |
|
./pkg/monitor/mon_vort3.F |
76 |
MON_VORT3 |
& tmpFac = (0.5+abEps) / implicDiv2Dflow |
|
./pkg/ecco/the_main_loop.F |
838 |
THE_MAIN_LOOP |
IF (implicDiv2Dflow.LT.1.) THEN |
|
./pkg/ecco/the_main_loop.F |
851 |
THE_MAIN_LOOP |
IF (implicDiv2Dflow.LT.1.) THEN |