| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/obcs_calc_stevens.F |
116 |
OBCS_CALC_STEVENS |
_RL cflZon (1-OLx:sNx+OLx,Nr) |
|
./pkg/obcs/obcs_calc_stevens.F |
477 |
OBCS_CALC_STEVENS |
cflZon(I,K) = 0.5 _d 0 * _dyC(I,J-1,bi,bj)/dTtracerLev(K) |
|
./pkg/obcs/obcs_calc_stevens.F |
482 |
OBCS_CALC_STEVENS |
cflZon(I,K) = 0. _d 0 |
|
./pkg/obcs/obcs_calc_stevens.F |
491 |
OBCS_CALC_STEVENS |
I vVel, cflZon, gFacZ, pFac, aFac, |
|
./pkg/obcs/obcs_calc_stevens.F |
499 |
OBCS_CALC_STEVENS |
I vVel, cflZon, gFacZ, pFac, aFac, |
|
./pkg/obcs/obcs_calc_stevens.F |
589 |
OBCS_CALC_STEVENS |
cflZon(I,K) = 0.5 _d 0 * _dyC(I,J+2,bi,bj)/dTtracerLev(K) |
|
./pkg/obcs/obcs_calc_stevens.F |
594 |
OBCS_CALC_STEVENS |
cflZon(I,K) = 0. _d 0 |
|
./pkg/obcs/obcs_calc_stevens.F |
603 |
OBCS_CALC_STEVENS |
I vVel, cflZon, gFacZ, pFac, aFac, |
|
./pkg/obcs/obcs_calc_stevens.F |
611 |
OBCS_CALC_STEVENS |
I vVel, cflZon, gFacZ, pFac, aFac, |
|
./pkg/obcs/obcs_calc_stevens.F |
842 |
OBCS_STEVENS_CALC_TRACER_NORTH |
I vVel, cflZon, gFacZ, pFac, aFac, |
|
./pkg/obcs/obcs_calc_stevens.F |
869 |
OBCS_STEVENS_CALC_TRACER_NORTH |
_RL cflZon (1-OLx:sNx+OLx,Nr) |
|
./pkg/obcs/obcs_calc_stevens.F |
896 |
OBCS_STEVENS_CALC_TRACER_NORTH |
vPhase = cflZon(I,K) * pFac |
|
./pkg/obcs/obcs_calc_stevens.F |
898 |
OBCS_STEVENS_CALC_TRACER_NORTH |
vPhase = MIN( cflZon(I,K), |
|
./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 |
924 |
OBCS_STEVENS_CALC_TRACER_SOUTH |
I vVel, cflZon, gFacZ, pFac, aFac, |
|
./pkg/obcs/obcs_calc_stevens.F |
951 |
OBCS_STEVENS_CALC_TRACER_SOUTH |
_RL cflZon (1-OLx:sNx+OLx,Nr) |
|
./pkg/obcs/obcs_calc_stevens.F |
977 |
OBCS_STEVENS_CALC_TRACER_SOUTH |
vPhase = -cflZon(I,K) * pFac |
|
./pkg/obcs/obcs_calc_stevens.F |
979 |
OBCS_STEVENS_CALC_TRACER_SOUTH |
vPhase = MAX( -cflZon(I,K), |
|
./pkg/obcs/obcs_calc_stevens.F |
980 |
OBCS_STEVENS_CALC_TRACER_SOUTH |
& MIN( 0.D0, -cflZon(I,K)*dTracTime/dTracSpace ) |