| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/obcs_calc_stevens.F |
119 |
OBCS_CALC_STEVENS |
_RL vZonBar |
|
./pkg/obcs/obcs_calc_stevens.F |
417 |
OBCS_CALC_STEVENS |
vZonBar = 0. _d 0 |
|
./pkg/obcs/obcs_calc_stevens.F |
423 |
OBCS_CALC_STEVENS |
vZonBar = vZonBar + vVel(I,J-1,K,bi,bj) |
|
./pkg/obcs/obcs_calc_stevens.F |
425 |
OBCS_CALC_STEVENS |
vZonBar = vZonBar + OBNvStevens(I,K,bi,bj) |
|
./pkg/obcs/obcs_calc_stevens.F |
430 |
OBCS_CALC_STEVENS |
IF ( drFBar .GT. 0. _d 0 ) vZonBar = vZonBar/drFBar |
|
./pkg/obcs/obcs_calc_stevens.F |
433 |
OBCS_CALC_STEVENS |
vZonPri(K) = (vVel(I,J-1,K,bi,bj)-vZonBar) |
|
./pkg/obcs/obcs_calc_stevens.F |
435 |
OBCS_CALC_STEVENS |
vZonPri(K) = (OBNvStevens(I,K,bi,bj)-vZonBar) |
|
./pkg/obcs/obcs_calc_stevens.F |
441 |
OBCS_CALC_STEVENS |
vZonBar = 0. _d 0 |
|
./pkg/obcs/obcs_calc_stevens.F |
443 |
OBCS_CALC_STEVENS |
vZonBar = vZonBar + OBNv(I,K,bi,bj) |
|
./pkg/obcs/obcs_calc_stevens.F |
447 |
OBCS_CALC_STEVENS |
IF ( drFBar .GT. 0. _d 0 ) vZonBar = vZonBar/drFBar |
|
./pkg/obcs/obcs_calc_stevens.F |
451 |
OBCS_CALC_STEVENS |
OBNv(I,K,bi,bj) = (vZonBar + vZonPri(K)) |
|
./pkg/obcs/obcs_calc_stevens.F |
529 |
OBCS_CALC_STEVENS |
vZonBar = 0. _d 0 |
|
./pkg/obcs/obcs_calc_stevens.F |
535 |
OBCS_CALC_STEVENS |
vZonBar = vZonBar + vVel(I,J+2,K,bi,bj) |
|
./pkg/obcs/obcs_calc_stevens.F |
537 |
OBCS_CALC_STEVENS |
vZonBar = vZonBar + OBSvStevens(I,K,bi,bj) |
|
./pkg/obcs/obcs_calc_stevens.F |
542 |
OBCS_CALC_STEVENS |
IF ( drFBar .GT. 0. _d 0 ) vZonBar = vZonBar/drFBar |
|
./pkg/obcs/obcs_calc_stevens.F |
545 |
OBCS_CALC_STEVENS |
vZonPri(K) = (vVel(I,J+2,K,bi,bj)-vZonBar) |
|
./pkg/obcs/obcs_calc_stevens.F |
547 |
OBCS_CALC_STEVENS |
vZonPri(K) = (OBSvStevens(I,K,bi,bj)-vZonBar) |
|
./pkg/obcs/obcs_calc_stevens.F |
553 |
OBCS_CALC_STEVENS |
vZonBar = 0. _d 0 |
|
./pkg/obcs/obcs_calc_stevens.F |
555 |
OBCS_CALC_STEVENS |
vZonBar = vZonBar + OBSv(I,K,bi,bj) |
|
./pkg/obcs/obcs_calc_stevens.F |
559 |
OBCS_CALC_STEVENS |
IF ( drFBar .GT. 0. _d 0 ) vZonBar = vZonBar/drFBar |
|
./pkg/obcs/obcs_calc_stevens.F |
563 |
OBCS_CALC_STEVENS |
OBSv(I,K,bi,bj) = (vZonBar + vZonPri(K)) |