/[MITgcm]/MITgcm/pkg/fizhi/fizhi_readparms.F
ViewVC logotype

Diff of /MITgcm/pkg/fizhi/fizhi_readparms.F

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

revision 1.7 by molod, Wed Sep 29 22:23:29 2004 UTC revision 1.8 by molod, Tue Mar 1 18:56:21 2005 UTC
# Line 50  C     Read Fizhi Namelist Line 50  C     Read Fizhi Namelist
50        close (ku)        close (ku)
51    
52  C     Read Supplemental Ascii File with Current Time Info  C     Read Supplemental Ascii File with Current Time Info
53        open(10,file='datetime',form='formatted')        open(10,file='datetime0',form='formatted')
54        read(10,1000)nymdcurrent,nhmscurrent        read(10,1000)nymdcurrent,nhmscurrent
55        close (10)        close (10)
56   1000 format(i8,2x,i6)   1000 format(i8,2x,i6)
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22