/[MITgcm]/MITgcm/pkg/shap_filt/shap_filt_uv_s2.F
ViewVC logotype

Diff of /MITgcm/pkg/shap_filt/shap_filt_uv_s2.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.6 by jmc, Mon Mar 4 01:32:55 2002 UTC revision 1.7 by jmc, Sun Aug 3 03:05:19 2003 UTC
# Line 108  C    [d_xx+d_yy] tmpFld Line 108  C    [d_xx+d_yy] tmpFld
108       I                    tmpFldU(1-OLx,1-OLy,k,bi,bj),       I                    tmpFldU(1-OLx,1-OLy,k,bi,bj),
109       I                    tmpFldV(1-OLx,1-OLy,k,bi,bj),       I                    tmpFldV(1-OLx,1-OLy,k,bi,bj),
110       &                    hDiv,myThid)       &                    hDiv,myThid)
111             CALL MOM_VI_CALC_RELVORT3(bi,bj,k,             CALL SHAP_FILT_RELVORT3(bi,bj,k,
112       I                    tmpFldU(1-OLx,1-OLy,k,bi,bj),       I                    tmpFldU(1-OLx,1-OLy,k,bi,bj),
113       I                    tmpFldV(1-OLx,1-OLy,k,bi,bj),       I                    tmpFldV(1-OLx,1-OLy,k,bi,bj),
114       &                    hFacZ,vort3,myThid)       &                    hFacZ,vort3,myThid)
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7
  ViewVC Help
Powered by ViewVC 1.1.22