/[MITgcm]/MITgcm/pkg/ctrl/ctrl_init.F
ViewVC logotype

Diff of /MITgcm/pkg/ctrl/ctrl_init.F

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

revision 1.6 by heimbach, Fri Nov 29 13:38:37 2002 UTC revision 1.7 by heimbach, Fri Mar 7 02:45:48 2003 UTC
# Line 697  c--   Northern obc. Line 697  c--   Northern obc.
697  #ifdef ALLOW_OBCSS_CONTROL  #ifdef ALLOW_OBCSS_CONTROL
698  c--   Southern obc.  c--   Southern obc.
699    
       _BEGIN_MASTER( mythid )  
700  c-------------------------------------------------------------------------------------------  c-------------------------------------------------------------------------------------------
701  c--  c--
702          _BEGIN_MASTER( mythid )
703  #ifdef ALLOW_CALENDAR  #ifdef ALLOW_CALENDAR
704          call cal_TimePassed( xx_obcssstartdate, modelstartdate,          call cal_TimePassed( xx_obcssstartdate, modelstartdate,
705       &                       difftime, mythid )       &                       difftime, mythid )

Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7

  ViewVC Help
Powered by ViewVC 1.1.22