| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/obcs_calc_stevens.F |
109 |
OBCS_CALC_STEVENS |
_RL dTracTime |
|
./pkg/obcs/obcs_calc_stevens.F |
254 |
OBCS_CALC_STEVENS |
dTracTime = (theta(I-1,J,K,bi,bj)-OBEtStevens(J,K,bi,bj)) |
|
./pkg/obcs/obcs_calc_stevens.F |
258 |
OBCS_CALC_STEVENS |
& MAX( 0.D0, -cflMer(J,K)*dTracTime/dTracSpace ) |
|
./pkg/obcs/obcs_calc_stevens.F |
272 |
OBCS_CALC_STEVENS |
dTracTime = (salt(I-1,J,K,bi,bj)-OBEsStevens(J,K,bi,bj)) |
|
./pkg/obcs/obcs_calc_stevens.F |
276 |
OBCS_CALC_STEVENS |
& MAX( 0.D0, -cflMer(J,K)*dTracTime/dTracSpace ) |
|
./pkg/obcs/obcs_calc_stevens.F |
392 |
OBCS_CALC_STEVENS |
dTracTime = (theta(I+1,J,K,bi,bj)-OBWtStevens(J,K,bi,bj)) |
|
./pkg/obcs/obcs_calc_stevens.F |
396 |
OBCS_CALC_STEVENS |
& MIN( 0.D0, -cflMer(J,K)*dTracTime/dTracSpace ) |
|
./pkg/obcs/obcs_calc_stevens.F |
410 |
OBCS_CALC_STEVENS |
dTracTime = (salt(I+1,J,K,bi,bj)-OBWsStevens(J,K,bi,bj)) |
|
./pkg/obcs/obcs_calc_stevens.F |
414 |
OBCS_CALC_STEVENS |
& MIN( 0.D0, -cflMer(J,K)*dTracTime/dTracSpace ) |
|
./pkg/obcs/obcs_calc_stevens.F |
529 |
OBCS_CALC_STEVENS |
dTracTime = (theta(I,J-1,K,bi,bj)-OBNtStevens(I,K,bi,bj)) |
|
./pkg/obcs/obcs_calc_stevens.F |
533 |
OBCS_CALC_STEVENS |
& MAX( 0.D0, -cflZon(I,K)*dTracTime/dTracSpace ) |
|
./pkg/obcs/obcs_calc_stevens.F |
547 |
OBCS_CALC_STEVENS |
dTracTime = (salt(I,J-1,K,bi,bj)-OBNsStevens(I,K,bi,bj)) |
|
./pkg/obcs/obcs_calc_stevens.F |
551 |
OBCS_CALC_STEVENS |
& MAX( 0.D0, -cflZon(I,K)*dTracTime/dTracSpace ) |
|
./pkg/obcs/obcs_calc_stevens.F |
667 |
OBCS_CALC_STEVENS |
dTracTime = (theta(I,J+1,K,bi,bj)-OBStStevens(I,K,bi,bj)) |
|
./pkg/obcs/obcs_calc_stevens.F |
671 |
OBCS_CALC_STEVENS |
& MIN( 0.D0, -cflZon(I,K)*dTracTime/dTracSpace ) |
|
./pkg/obcs/obcs_calc_stevens.F |
685 |
OBCS_CALC_STEVENS |
dTracTime = (salt(I,J+1,K,bi,bj)-OBSsStevens(I,K,bi,bj)) |
|
./pkg/obcs/obcs_calc_stevens.F |
689 |
OBCS_CALC_STEVENS |
& MIN( 0.D0, -cflZon(I,K)*dTracTime/dTracSpace ) |