/[MITgcm]/MITgcm_contrib/jscott/igsm/src/atmosphere.F
ViewVC logotype

Diff of /MITgcm_contrib/jscott/igsm/src/atmosphere.F

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

revision 1.2 by jscott, Tue Aug 22 20:25:52 2006 UTC revision 1.3 by jscott, Wed Sep 13 15:23:04 2006 UTC
# Line 2023  c      print *,'co24ocean=',co24ocean(jm Line 2023  c      print *,'co24ocean=',co24ocean(jm
2023  c      WRITE (6,905) TOFDAY,JDATE,JMONTH,JYEAR  c      WRITE (6,905) TOFDAY,JDATE,JMONTH,JYEAR
2024         WRITE (6,905) TOFDAYPR,JDATEPR,JMONTHPR,JYEARPR         WRITE (6,905) TOFDAYPR,JDATEPR,JMONTHPR,JYEARPR
2025          endif          endif
2026          print *,'ncallclm=',ncallclm  c        print *,'ncallclm=',ncallclm
2027         JDAYLAST=JDAY         JDAYLAST=JDAY
2028  c      if(ncallclm.gt.6) stop  c      if(ncallclm.gt.6) stop
2029  c      stop  c      stop
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22