85 |
ENDDO |
ENDDO |
86 |
ENDIF |
ENDIF |
87 |
|
|
88 |
#if (defined (ALLOW_TAU_EDDY) || defined (ALLOW_GMREDI)) |
#if (defined (ALLOW_TAU_EDDY)) |
89 |
CALL TAUEDDY_EXTERNAL_FORCING_U( |
CALL TAUEDDY_EXTERNAL_FORCING_U( |
90 |
I iMin, iMax, jMin, jMax,bi,bj,kLev, |
I iMin, iMax, jMin, jMax,bi,bj,kLev, |
91 |
I myCurrentTime,myThid) |
I myCurrentTime,myThid) |
179 |
ENDDO |
ENDDO |
180 |
ENDIF |
ENDIF |
181 |
|
|
182 |
#if (defined (ALLOW_TAU_EDDY) || defined (ALLOW_GMREDI)) |
#if (defined (ALLOW_TAU_EDDY)) |
183 |
CALL TAUEDDY_EXTERNAL_FORCING_V( |
CALL TAUEDDY_EXTERNAL_FORCING_V( |
184 |
I iMin, iMax, jMin, jMax,bi,bj,kLev, |
I iMin, iMax, jMin, jMax,bi,bj,kLev, |
185 |
I myCurrentTime,myThid) |
I myCurrentTime,myThid) |