/[MITgcm]/MITgcm/pkg/cheapaml/cheapaml_fields_load.F
ViewVC logotype

Diff of /MITgcm/pkg/cheapaml/cheapaml_fields_load.F

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

revision 1.3 by jmc, Tue Sep 9 19:05:20 2008 UTC revision 1.4 by jmc, Tue Apr 28 18:08:13 2009 UTC
# Line 248  C      data for the period ahead and the Line 248  C      data for the period ahead and the
248       &       myIter,myThid )       &       myIter,myThid )
249        ENDIF        ENDIF
250    
251         _EXCH_XY_R4(trair0 , myThid )         _EXCH_XY_RS(trair0 , myThid )
252         _EXCH_XY_R4(qrair0 , myThid )         _EXCH_XY_RS(qrair0 , myThid )
253         _EXCH_XY_R4(solar0 , myThid )         _EXCH_XY_RS(solar0 , myThid )
254         _EXCH_XY_R4(uwind0 , myThid )         _EXCH_XY_RS(uwind0 , myThid )
255         _EXCH_XY_R4(vwind0 , myThid )         _EXCH_XY_RS(vwind0 , myThid )
256         _EXCH_XY_R4(trair1 , myThid )         _EXCH_XY_RS(trair1 , myThid )
257         _EXCH_XY_R4(qrair1 , myThid )         _EXCH_XY_RS(qrair1 , myThid )
258         _EXCH_XY_R4(solar1 , myThid )         _EXCH_XY_RS(solar1 , myThid )
259         _EXCH_XY_R4(uwind1 , myThid )         _EXCH_XY_RS(uwind1 , myThid )
260         _EXCH_XY_R4(vwind1 , myThid )         _EXCH_XY_RS(vwind1 , myThid )
261  C  C
262        ENDIF        ENDIF
263    
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22