| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/obcs_calc_stevens.F |
114 |
OBCS_CALC_STEVENS |
_RL cflZon (1-OLx:sNx+OLx,Nr) |
|
./pkg/obcs/obcs_calc_stevens.F |
512 |
OBCS_CALC_STEVENS |
cflZon(I,K) = 0.5 _d 0 * _dyC(I,J-1,bi,bj)/dTtracerLev(K) |
|
./pkg/obcs/obcs_calc_stevens.F |
517 |
OBCS_CALC_STEVENS |
cflZon(I,K) = 0. _d 0 |
|
./pkg/obcs/obcs_calc_stevens.F |
530 |
OBCS_CALC_STEVENS |
vPhase = cflZon(I,K) * pFac |
|
./pkg/obcs/obcs_calc_stevens.F |
532 |
OBCS_CALC_STEVENS |
vPhase = MIN( cflZon(I,K), |
|
./pkg/obcs/obcs_calc_stevens.F |
533 |
OBCS_CALC_STEVENS |
& MAX( 0.D0, -cflZon(I,K)*dTracTime/dTracSpace ) |
|
./pkg/obcs/obcs_calc_stevens.F |
548 |
OBCS_CALC_STEVENS |
vPhase = cflZon(I,K) * pFac |
|
./pkg/obcs/obcs_calc_stevens.F |
550 |
OBCS_CALC_STEVENS |
vPhase = MIN( cflZon(I,K), |
|
./pkg/obcs/obcs_calc_stevens.F |
551 |
OBCS_CALC_STEVENS |
& MAX( 0.D0, -cflZon(I,K)*dTracTime/dTracSpace ) |
|
./pkg/obcs/obcs_calc_stevens.F |
650 |
OBCS_CALC_STEVENS |
cflZon(I,K) = 0.5 _d 0 * _dyC(I,J+2,bi,bj)/dTtracerLev(K) |
|
./pkg/obcs/obcs_calc_stevens.F |
655 |
OBCS_CALC_STEVENS |
cflZon(I,K) = 0. _d 0 |
|
./pkg/obcs/obcs_calc_stevens.F |
668 |
OBCS_CALC_STEVENS |
vPhase = -cflZon(I,K) * pFac |
|
./pkg/obcs/obcs_calc_stevens.F |
670 |
OBCS_CALC_STEVENS |
vPhase = MAX( -cflZon(I,K), |
|
./pkg/obcs/obcs_calc_stevens.F |
671 |
OBCS_CALC_STEVENS |
& MIN( 0.D0, -cflZon(I,K)*dTracTime/dTracSpace ) |
|
./pkg/obcs/obcs_calc_stevens.F |
686 |
OBCS_CALC_STEVENS |
vPhase = -cflZon(I,K) * pFac |
|
./pkg/obcs/obcs_calc_stevens.F |
688 |
OBCS_CALC_STEVENS |
vPhase = MAX( -cflZon(I,K), |
|
./pkg/obcs/obcs_calc_stevens.F |
689 |
OBCS_CALC_STEVENS |
& MIN( 0.D0, -cflZon(I,K)*dTracTime/dTracSpace ) |