/[MITgcm]/MITgcm/model/src/do_fields_blocking_exchanges.F
ViewVC logotype

Diff of /MITgcm/model/src/do_fields_blocking_exchanges.F

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

revision 1.3 by cnh, Sun Feb 4 14:38:46 2001 UTC revision 1.4 by adcroft, Tue May 29 14:01:37 2001 UTC
# Line 31  c     _EXCH_XYZ_R8( gUNm1 , myThid ) Line 31  c     _EXCH_XYZ_R8( gUNm1 , myThid )
31  c     _EXCH_XYZ_R8( gVNm1 , myThid )  c     _EXCH_XYZ_R8( gVNm1 , myThid )
32  c     _EXCH_XYZ_R8( gTNm1 , myThid )  c     _EXCH_XYZ_R8( gTNm1 , myThid )
33  c     _EXCH_XYZ_R8( gSNm1 , myThid )  c     _EXCH_XYZ_R8( gSNm1 , myThid )
34        _EXCH_XYZ_R8( uVel , myThid )  c     _EXCH_XYZ_R8( uVel , myThid )
35        _EXCH_XYZ_R8( vVel , myThid )  c     _EXCH_XYZ_R8( vVel , myThid )
36          CALL EXCH_UV_XYZ_RL(uVel,vVel,.TRUE.,myThid)
37        _EXCH_XYZ_R8( theta , myThid )        _EXCH_XYZ_R8( theta , myThid )
38        _EXCH_XYZ_R8( salt , myThid )        _EXCH_XYZ_R8( salt , myThid )
39    

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

  ViewVC Help
Powered by ViewVC 1.1.22