| File |
Line number |
Procedure |
Code |
|
./model/src/calc_div_ghat.F |
115 |
CALC_DIV_GHAT |
pf(i,j) = ( implicDiv2Dflow * gU(i,j,k,bi,bj) |
|
./model/src/calc_div_ghat.F |
116 |
CALC_DIV_GHAT |
& + (1. _d 0-implicDiv2Dflow)* uVel(i,j,k,bi,bj) |
|
./model/src/calc_div_ghat.F |
138 |
CALC_DIV_GHAT |
IF (implicDiv2Dflow.EQ.1.) THEN |
|
./model/src/calc_div_ghat.F |
150 |
CALC_DIV_GHAT |
pf(i,j) = implicDiv2Dflow |
|
./model/src/calc_div_ghat.F |
158 |
CALC_DIV_GHAT |
pf(i,j) = ( implicDiv2Dflow * gV(i,j,k,bi,bj) |
|
./model/src/calc_div_ghat.F |
159 |
CALC_DIV_GHAT |
& + (1. _d 0-implicDiv2Dflow)* vVel(i,j,k,bi,bj) |
|
./model/src/calc_div_ghat.F |
79 |
CALC_DIV_GHAT |
IF (implicDiv2Dflow.EQ.1.) THEN |
|
./model/src/calc_div_ghat.F |
91 |
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/integr_continuity.F |
145 |
INTEGR_CONTINUITY |
& / (implicDiv2Dflow*deltaTfreesurf) |
|
./model/src/integr_continuity.F |
206 |
INTEGR_CONTINUITY |
IF (implicDiv2Dflow.EQ. 0. _d 0) THEN |
|
./model/src/integr_continuity.F |
216 |
INTEGR_CONTINUITY |
& + implicDiv2Dflow*dEtaHdt(i,j,bi,bj)*deltaTfreesurf |
|
./model/src/integr_continuity.F |
302 |
INTEGR_CONTINUITY |
& .AND. implicDiv2Dflow .NE. 0. _d 0 ) |
|
./model/src/update_etah.F |
62 |
UPDATE_ETAH |
IF (implicDiv2Dflow.EQ. 1. _d 0) THEN |
|
./model/src/update_etah.F |
73 |
UPDATE_ETAH |
& + (1. - implicDiv2Dflow)*dEtaHdt(i,j,bi,bj) |
|
./model/src/update_etah.F |
92 |
UPDATE_ETAH |
IF ( implicDiv2Dflow .NE. 1. _d 0 .OR. |