/[MITgcm]/MITgcm/pkg/mom_vecinv/mom_vecinv.F
ViewVC logotype

Diff of /MITgcm/pkg/mom_vecinv/mom_vecinv.F

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

revision 1.22 by jmc, Mon Sep 20 21:54:55 2004 UTC revision 1.23 by jmc, Fri Sep 24 17:02:34 2004 UTC
# Line 512  C--   Set du/dt & dv/dt on boundaries to Line 512  C--   Set du/dt & dv/dt on boundaries to
512       &   .AND. k.EQ.4 .AND. myIter.EQ.nIter0       &   .AND. k.EQ.4 .AND. myIter.EQ.nIter0
513       &   .AND. nPx.EQ.1 .AND. nPy.EQ.1       &   .AND. nPx.EQ.1 .AND. nPy.EQ.1
514       &   .AND. useCubedSphereExchange ) THEN       &   .AND. useCubedSphereExchange ) THEN
515          CALL DEBUG_CS_CORNER_UV(uDiss,vDiss,k,          CALL DEBUG_CS_CORNER_UV( ' uDiss,vDiss from MOM_VECINV',
516       &                          standardMessageUnit,bi,bj,myThid)       &             uDiss,vDiss, k, standardMessageUnit,bi,bj,myThid )
517        ENDIF        ENDIF
518  #endif /* ALLOW_DEBUG */  #endif /* ALLOW_DEBUG */
519    
Legend:
Removed from v.1.22  
changed lines
  Added in v.1.23
  ViewVC Help
Powered by ViewVC 1.1.22