/[MITgcm]/MITgcm/pkg/obcs/obcs_prescribe_read.F
ViewVC logotype

Diff of /MITgcm/pkg/obcs/obcs_prescribe_read.F

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

revision 1.5 by heimbach, Thu Oct 14 11:56:43 2004 UTC revision 1.6 by adcroft, Tue Oct 19 17:52:03 2004 UTC
# Line 51  c     == end of interface == Line 51  c     == end of interface ==
51       I                       obcsNstartdate, obcsNperiod       I                       obcsNstartdate, obcsNperiod
52       I                     , obcsNstartdate1, obcsNstartdate2       I                     , obcsNstartdate1, obcsNstartdate2
53       I                     , .false.       I                     , .false.
54       O                     , fac, first, changed,       O                     , fac, first, changed
55       O                     , count0, count1, year0, year1       O                     , count0, count1, year0, year1
56       I                     , mycurrenttime, mycurrentiter, mythid       I                     , mycurrenttime, mycurrentiter, mythid
57       &                     )       &                     )
# Line 174  cgg    calendar information as other bou Line 174  cgg    calendar information as other bou
174    
175  #endif /* ALLOW_OBCS */  #endif /* ALLOW_OBCS */
176    
177        end        RETURN
178          END
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22