File |
Line number |
Procedure |
Code |
./pkg/obcs/obcs_calc_stevens.F |
723 |
OBCS_STEVENS_CALC_TRACER_EAST |
_RL dTracTime |
./pkg/obcs/obcs_calc_stevens.F |
731 |
OBCS_STEVENS_CALC_TRACER_EAST |
dTracTime = (tracer(I-1,J,K,bi,bj)-OBE_Stevens(J,K,bi,bj)) |
./pkg/obcs/obcs_calc_stevens.F |
735 |
OBCS_STEVENS_CALC_TRACER_EAST |
& MAX( 0.D0, -cflMer(J,K)*dTracTime/dTracSpace ) |
./pkg/obcs/obcs_calc_stevens.F |
804 |
OBCS_STEVENS_CALC_TRACER_WEST |
_RL dTracTime |
./pkg/obcs/obcs_calc_stevens.F |
813 |
OBCS_STEVENS_CALC_TRACER_WEST |
dTracTime = (tracer(I+1,J,K,bi,bj)-OBW_Stevens(J,K,bi,bj)) |
./pkg/obcs/obcs_calc_stevens.F |
817 |
OBCS_STEVENS_CALC_TRACER_WEST |
& MIN( 0.D0, -cflMer(J,K)*dTracTime/dTracSpace ) |
./pkg/obcs/obcs_calc_stevens.F |
886 |
OBCS_STEVENS_CALC_TRACER_NORTH |
_RL dTracTime |
./pkg/obcs/obcs_calc_stevens.F |
895 |
OBCS_STEVENS_CALC_TRACER_NORTH |
dTracTime = (tracer(I,J-1,K,bi,bj)-OBN_Stevens(I,K,bi,bj)) |
./pkg/obcs/obcs_calc_stevens.F |
899 |
OBCS_STEVENS_CALC_TRACER_NORTH |
& MAX( 0.D0, -cflZon(I,K)*dTracTime/dTracSpace ) |
./pkg/obcs/obcs_calc_stevens.F |
968 |
OBCS_STEVENS_CALC_TRACER_SOUTH |
_RL dTracTime |
./pkg/obcs/obcs_calc_stevens.F |
976 |
OBCS_STEVENS_CALC_TRACER_SOUTH |
dTracTime = (tracer(I,J+1,K,bi,bj)-OBS_Stevens(I,K,bi,bj)) |
./pkg/obcs/obcs_calc_stevens.F |
980 |
OBCS_STEVENS_CALC_TRACER_SOUTH |
& MIN( 0.D0, -cflZon(I,K)*dTracTime/dTracSpace ) |