/[MITgcm]/MITgcm/pkg/ecco/cost_gencost_all.F
ViewVC logotype

Diff of /MITgcm/pkg/ecco/cost_gencost_all.F

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

revision 1.11 by gforget, Tue Oct 2 01:40:03 2012 UTC revision 1.12 by gforget, Thu Mar 28 00:25:56 2013 UTC
# Line 86  c     == end of interface == Line 86  c     == end of interface ==
86       &    call cost_gencost_sstv4( myiter, mytime, mythid )       &    call cost_gencost_sstv4( myiter, mytime, mythid )
87  # endif /* ALLOW_GENCOST_SSTV4 */  # endif /* ALLOW_GENCOST_SSTV4 */
88    
89    #ifdef ALLOW_GENCOST_SEAICEV4
90          IF (using_cost_seaice)
91         &    call cost_gencost_seaicev4( mythid )
92    # endif /* ALLOW_GENCOST_SEAICEV4 */
93    
94  #endif /* ALLOW_GENCOST_CONTRIBUTION */  #endif /* ALLOW_GENCOST_CONTRIBUTION */
95    
96        end        end
Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12
  ViewVC Help
Powered by ViewVC 1.1.22