(file) Return to inv2d.f CVS log (file) (dir) Up to [Development] / JSOC / proj / globalhs / apps

Diff for /JSOC/proj/globalhs/apps/inv2d.f between version 1.2 and 1.3

version 1.2, 2014/05/24 16:48:20 version 1.3, 2017/01/17 18:43:40
Line 66  c omega is assumed cons
Line 66  c omega is assumed cons
       open (20,file='status.log',form='formatted')       open (20,file='status.log',form='formatted')
       write (20,*) 1       write (20,*) 1
       close (20)       close (20)
   
         open (20,file='cvstag.log',form='formatted')
         write (20,*) CVSTAG
         close (20)
   
 c     read parameters etc. c     read parameters etc.
       call clnfile(5,10)       call clnfile(5,10)
       write (6,*) 'ierr, err'       write (6,*) 'ierr, err'

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
Karen Tian
 Powered by
ViewCVS 0.9.4