/[MITgcm]/MITgcm/pkg/cal/cal_readparms.F
ViewVC logotype

Diff of /MITgcm/pkg/cal/cal_readparms.F

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

revision 1.4 by heimbach, Tue Nov 25 19:04:16 2003 UTC revision 1.5 by edhill, Tue Dec 21 02:09:34 2004 UTC
# Line 107  c     (version 0.1.3 >> END << ) Line 107  c     (version 0.1.3 >> END << )
107    
108        _BEGIN_MASTER(myThid)        _BEGIN_MASTER(myThid)
109    
110  c       Initialise the calendar's parameters  c       Initialise the calendar parameters
111          TheCalendar = ' '          TheCalendar = ' '
112          startdate_1 = 0          startdate_1 = 0
113          startdate_2 = 0          startdate_2 = 0
# Line 140  c       Next, read the calendar data fil Line 140  c       Next, read the calendar data fil
140          close( scrunit1 )          close( scrunit1 )
141    
142    
143  c       Check consistency of the date specifications with the MITgcmUV's  c       Check consistency of the date specifications with the MITgcm
144  c       startTime, endTime, and nTimeSteps, then set all the calendar  c       startTime, endTime, and nTimeSteps, then set all the calendar
145  c       parameters.  c       parameters.
146    

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

  ViewVC Help
Powered by ViewVC 1.1.22