| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/obcs_calc_stevens.F |
137 |
OBCS_CALC_STEVENS |
drFBar(J) = 0. _d 0 |
|
./pkg/obcs/obcs_calc_stevens.F |
150 |
OBCS_CALC_STEVENS |
drFBar(J) = drFBar(J) + drF(K)* _hFacW(I,J,K,bi,bj) |
|
./pkg/obcs/obcs_calc_stevens.F |
155 |
OBCS_CALC_STEVENS |
IF ( drFBar(J) .GT. 0. _d 0 ) |
|
./pkg/obcs/obcs_calc_stevens.F |
156 |
OBCS_CALC_STEVENS |
& uMerBar(J) = uMerBar(J)/drFBar(J) |
|
./pkg/obcs/obcs_calc_stevens.F |
168 |
OBCS_CALC_STEVENS |
drFBar(J) = 0. _d 0 |
|
./pkg/obcs/obcs_calc_stevens.F |
176 |
OBCS_CALC_STEVENS |
drFBar(J) = drFBar(J) + drF(K)* _hFacW(I,J,K,bi,bj) |
|
./pkg/obcs/obcs_calc_stevens.F |
181 |
OBCS_CALC_STEVENS |
IF ( drFBar(J) .GT. 0. _d 0 ) |
|
./pkg/obcs/obcs_calc_stevens.F |
182 |
OBCS_CALC_STEVENS |
& uMerBar(J) = uMerBar(J)/drFBar(J) |
|
./pkg/obcs/obcs_calc_stevens.F |
284 |
OBCS_CALC_STEVENS |
drFBar(J) = 0. _d 0 |
|
./pkg/obcs/obcs_calc_stevens.F |
297 |
OBCS_CALC_STEVENS |
drFBar(J) = drFBar(J) + drF(K)* _hFacW(I+1,J,K,bi,bj) |
|
./pkg/obcs/obcs_calc_stevens.F |
302 |
OBCS_CALC_STEVENS |
IF ( drFBar(J) .GT. 0. _d 0 ) |
|
./pkg/obcs/obcs_calc_stevens.F |
303 |
OBCS_CALC_STEVENS |
& uMerBar(J) = uMerBar(J)/drFBar(J) |
|
./pkg/obcs/obcs_calc_stevens.F |
315 |
OBCS_CALC_STEVENS |
drFBar(J) = 0. _d 0 |
|
./pkg/obcs/obcs_calc_stevens.F |
323 |
OBCS_CALC_STEVENS |
drFBar(J) = drFBar(J) + drF(K)* _hFacW(I+1,J,K,bi,bj) |
|
./pkg/obcs/obcs_calc_stevens.F |
328 |
OBCS_CALC_STEVENS |
IF ( drFBar(J) .GT. 0. _d 0 ) |
|
./pkg/obcs/obcs_calc_stevens.F |
329 |
OBCS_CALC_STEVENS |
& uMerBar(J) = uMerBar(J)/drFBar(J) |
|
./pkg/obcs/obcs_calc_stevens.F |
98 |
OBCS_CALC_STEVENS |
_RL drFBar(1-OLy:sNy+OLy) |