/[MITgcm]/MITgcm_contrib/mlosch/optim_m1qn3/optim_readparms.F
ViewVC logotype

Diff of /MITgcm_contrib/mlosch/optim_m1qn3/optim_readparms.F

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

revision 1.11 by mlosch, Mon May 9 09:37:17 2016 UTC revision 1.12 by mlosch, Thu May 3 11:26:05 2018 UTC
# Line 200  c--   Do some final printout. Line 200  c--   Do some final printout.
200         print*, ' expected cost function decrease   = ', ff-fmin         print*, ' expected cost function decrease   = ', ff-fmin
201        endif        endif
202        print '(a,4a,i4.4)',        print '(a,4a,i4.4)',
203       &        ' Data will be read from the following file: ',       &     '  Data will be read from the following file: ',
204       &     ctrlname,'_',yctrlid(1:10),'.opt', optimcycle       &     ctrlname,'_',yctrlid(1:10),'.opt', optimcycle
205        print*        print*
206    
Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12
  ViewVC Help
Powered by ViewVC 1.1.22