/[MITgcm]/MITgcm/pkg/mnc/mnc_readparms.F
ViewVC logotype

Diff of /MITgcm/pkg/mnc/mnc_readparms.F

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

revision 1.25 by edhill, Fri Sep 2 11:40:14 2005 UTC revision 1.26 by edhill, Wed Sep 14 18:32:07 2005 UTC
# Line 38  C     !LOCAL VARIABLES: Line 38  C     !LOCAL VARIABLES:
38       &     pickup_write_mnc, pickup_read_mnc,       &     pickup_write_mnc, pickup_read_mnc,
39       &     timeave_mnc, snapshot_mnc, monitor_mnc, autodiff_mnc,       &     timeave_mnc, snapshot_mnc, monitor_mnc, autodiff_mnc,
40       &     readgrid_mnc,       &     readgrid_mnc,
41       &     mnc_outdir_str, mnc_indir_str, mnc_max_fsize       &     mnc_outdir_str, mnc_indir_str, mnc_max_fsize,
42         &     mnc_filefreq
43    
44  C     Functions  C     Functions
45        integer ILNBLNK        integer ILNBLNK
# Line 66  C     2GB is 2147483648 bytes or approx: Line 67  C     2GB is 2147483648 bytes or approx:
67        mnc_max_fsize         =  2.1 _d 9        mnc_max_fsize         =  2.1 _d 9
68        readgrid_mnc          =  .FALSE.        readgrid_mnc          =  .FALSE.
69    
70    C     Temporary hack for Baylor
71          mnc_filefreq          =  -1
72    
73  C     Set the file name  C     Set the file name
74        DO i=1,MAX_LEN_MBUF        DO i=1,MAX_LEN_MBUF
75          data_file(i:i) = ' '          data_file(i:i) = ' '
Legend:
Removed from v.1.25  
changed lines
  Added in v.1.26
  ViewVC Help
Powered by ViewVC 1.1.22