/[MITgcm]/MITgcm/pkg/mdsio/mdsio_write_whalos.F
ViewVC logotype

Diff of /MITgcm/pkg/mdsio/mdsio_write_whalos.F

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

revision 1.1 by gforget, Fri Sep 24 18:39:35 2010 UTC revision 1.2 by gforget, Fri Sep 24 23:21:02 2010 UTC
# Line 92  c     == local variables == Line 92  c     == local variables ==
92        LOGICAL iAmDoingIO        LOGICAL iAmDoingIO
93    
94        _RL fld2d(1:sNxWh,1:sNyWh,nSx,nSy)        _RL fld2d(1:sNxWh,1:sNyWh,nSx,nSy)
 c global buffers  
       Real*4 fld2d_globuff_r4(sNxWh,gloNyWh)  
       Real*8 fld2d_globuff_r8(sNxWh,gloNyWh)  
 c The corresponding proc buffers are in common blocks  
 c  (in MDSIO_BUFF_WH.h) which is needed for multi-threads.  
 c Eventually we could want to also put global buffers in common  
 c  blocks in .h (to save memory) but local is fine for now.  
95    
96  c     == functions ==  c     == functions ==
97        INTEGER  ILNBLNK        INTEGER  ILNBLNK
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22