File |
Line number |
Procedure |
Code |
./pkg/seaice/SEAICE.h |
184 |
NO PROCEDURE |
COMMON/WIND_STRESS_ICE/TAUX,TAUY |
./pkg/seaice/SEAICE.h |
188 |
NO PROCEDURE |
_RL TAUY (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/seaice/seaice_dynsolver.F |
148 |
SEAICE_DYNSOLVER |
TAUY (I,J,bi,bj)= 0. _d 0 |
./pkg/seaice/seaice_dynsolver.F |
167 |
SEAICE_DYNSOLVER |
O TAUX, TAUY, |
./pkg/seaice/seaice_dynsolver.F |
205 |
SEAICE_DYNSOLVER |
FORCEY0(I,J,bi,bj)=TAUY(I,J,bi,bj) |
./pkg/seaice/seaice_dynsolver.F |
70 |
SEAICE_DYNSOLVER |
TAUY(i,j,bi,bj) = 0. _d 0 |
./pkg/seaice/seaice_freedrift.F |
69 |
SEAICE_FREEDRIFT |
CALL EXCH_UV_XY_RL( TAUX, TAUY, .TRUE., myThid ) |
./pkg/seaice/seaice_freedrift.F |
89 |
SEAICE_FREEDRIFT |
& tmpscal1*HALF*(TAUY(i,j,bi,bj)+TAUY(i,j+1,bi,bj)) |
./pkg/seaice/seaice_init_varia.F |
136 |
SEAICE_INIT_VARIA |
TAUY(i,j,bi,bj) = 0. _d 0 |