| File |
Line number |
Procedure |
Code |
|
./model/src/calc_eddy_stress.F |
100 |
CALC_EDDY_STRESS |
CALL DIAGNOSTICS_FILL(tauyEddy, 'TAUYEDDY',0,Nr,0,1,1,myThid) |
|
./model/src/calc_eddy_stress.F |
91 |
CALC_EDDY_STRESS |
tauyEddy(i,j,k,bi,bj) = -rhoConst*coriV*psix |
|
./model/src/taueddy_tendency_apply.F |
164 |
TAUEDDY_TENDENCY_APPLY_V |
& ( maskm1*_maskS(i,j, k ,bi,bj)*tauyEddy(i,j, k ,bi,bj) |
|
./model/src/taueddy_tendency_apply.F |
165 |
TAUEDDY_TENDENCY_APPLY_V |
& - maskp1*_maskS(i,j,kp1,bi,bj)*tauyEddy(i,j,kp1,bi,bj) ) |
|
./model/inc/DYNVARS.h |
103 |
NO PROCEDURE |
_RL tauyEddy(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./model/inc/DYNVARS.h |
98 |
NO PROCEDURE |
COMMON /DYNVARS_EDDYPSI/ tauxEddy,tauyEddy, uMean, vMean |