/[MITgcm]/MITgcm/pkg/exf/exf_mapfields.F
ViewVC logotype

Diff of /MITgcm/pkg/exf/exf_mapfields.F

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

revision 1.2 by heimbach, Tue Nov 12 20:34:41 2002 UTC revision 1.3 by cheisey, Tue Dec 17 19:47:41 2002 UTC
# Line 229  c     Update the tile edges. Line 229  c     Update the tile edges.
229    
230        _EXCH_XY_R4(  qnet, mythid )        _EXCH_XY_R4(  qnet, mythid )
231        _EXCH_XY_R4( empmr, mythid )        _EXCH_XY_R4( empmr, mythid )
232        _EXCH_XY_R4(    fu, mythid )  c      _EXCH_XY_R4(    fu, mythid )
233        _EXCH_XY_R4(    fv, mythid )  c      _EXCH_XY_R4(    fv, mythid )
234           CALL EXCH_UV_XY_RS(fu, fv, .TRUE., myThid)
235  #ifdef ALLOW_KPP  #ifdef ALLOW_KPP
236        _EXCH_XY_R4(   qsw, mythid )        _EXCH_XY_R4(   qsw, mythid )
237  #endif  #endif

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

  ViewVC Help
Powered by ViewVC 1.1.22