Parent Directory | Revision Log | Revision Graph | Patch
revision 1.34 by baylor, Thu Mar 10 02:39:56 2005 UTC | revision 1.35 by baylor, Thu Mar 10 03:45:11 2005 UTC | |
---|---|---|
# | Line 232 C in terms of vorticity and diverge | Line 232 C in terms of vorticity and diverge |
232 | & myThid) | & myThid) |
233 | ENDIF | ENDIF |
234 | C or in terms of tension and strain | C or in terms of tension and strain |
235 | IF (viscAstrain.NE.0. .OR. viscAtension.NE.0.) THEN | IF (viscAstrain.NE.0. .OR. viscAtension.NE.0. |
236 | O .OR. viscC2smag.ne.0) THEN | |
237 | CALL MOM_CALC_TENSION(bi,bj,k,uFld,vFld, | CALL MOM_CALC_TENSION(bi,bj,k,uFld,vFld, |
238 | O tension, | O tension, |
239 | I myThid) | I myThid) |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |