/[MITgcm]/MITgcm/pkg/cost/cost_final_restore.F
ViewVC logotype

Diff of /MITgcm/pkg/cost/cost_final_restore.F

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

revision 1.2 by heimbach, Wed Mar 5 23:39:53 2003 UTC revision 1.3 by heimbach, Fri Aug 5 18:40:24 2005 UTC
# Line 57  c Line 57  c
57                open(unit=76,file='costfinal')                open(unit=76,file='costfinal')
58                read(76,*) fc                        read(76,*) fc        
59                close(76)                close(76)
60               else
61                  lastdiva = .FALSE.
62             endif             endif
63  c  c
64           _END_MASTER( mythid )           _END_MASTER( mythid )
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22