/[MITgcm]/MITgcm/pkg/rw/set_write_global_fld.F
ViewVC logotype

Diff of /MITgcm/pkg/rw/set_write_global_fld.F

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

revision 1.1 by adcroft, Fri Aug 17 18:34:42 2001 UTC revision 1.2 by jmc, Thu Nov 11 01:25:05 2004 UTC
# Line 1  Line 1 
1  C $Header$  C $Header$
2  C $Name$  C $Name$
3    
4  #include "CPP_OPTIONS.h"  #include "CPP_EEOPTIONS.h"
5    
6        SUBROUTINE SET_WRITE_GLOBAL_FLD ( flag )        SUBROUTINE SET_WRITE_GLOBAL_FLD ( flag )
7        IMPLICIT NONE        IMPLICIT NONE
# Line 11  C READ_WRITE_FLD package should create " Line 11  C READ_WRITE_FLD package should create "
11  C   flag = .TRUE.  indicates "global" files  C   flag = .TRUE.  indicates "global" files
12  C   flag = .FALSE. indicates "tiled" files  C   flag = .FALSE. indicates "tiled" files
13  C  C
14  C Arguments  C Arguments (input)
15        LOGICAL flag        LOGICAL flag
16  C Common  C Common
17        COMMON /RD_WR_FLD/ globalFile        COMMON /RD_WR_FLD/ globalFile
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22