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

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

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

revision 1.7 by heimbach, Wed Jan 12 19:15:03 2005 UTC revision 1.8 by heimbach, Wed Jan 12 20:33:13 2005 UTC
# Line 357  C Local variables Line 357  C Local variables
357        character*(max_len_mbuf) msgbuf        character*(max_len_mbuf) msgbuf
358  cph-usesingle(  cph-usesingle(
359        integer ii,jj        integer ii,jj
360        integer x_size,y_size,iG_IO,jG_IO,length_of_rec,npe        integer x_size,y_size,iG_IO,jG_IO,npe
361        PARAMETER ( x_size = Nx )        PARAMETER ( x_size = Nx )
362        PARAMETER ( y_size = Ny )        PARAMETER ( y_size = Ny )
363        Real*4 xy_buffer_r4(x_size,y_size)        Real*4 xy_buffer_r4(x_size,y_size)
# Line 944  C Local variables Line 944  C Local variables
944        character*(max_len_mbuf) msgbuf        character*(max_len_mbuf) msgbuf
945  cph-usesingle(  cph-usesingle(
946        integer ii,jj        integer ii,jj
947        integer x_size,y_size,iG_IO,jG_IO,length_of_rec,npe        integer x_size,y_size,iG_IO,jG_IO,npe
948        PARAMETER ( x_size = Nx )        PARAMETER ( x_size = Nx )
949        PARAMETER ( y_size = Ny )        PARAMETER ( y_size = Ny )
950        Real*4 xy_buffer_r4(x_size,y_size)        Real*4 xy_buffer_r4(x_size,y_size)
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22