/[MITgcm]/MITgcm/pkg/seaice/seaice_cost_sss.F
ViewVC logotype

Diff of /MITgcm/pkg/seaice/seaice_cost_sss.F

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

revision 1.9 by gforget, Mon Oct 20 03:20:57 2014 UTC revision 1.10 by gforget, Mon Mar 23 21:04:59 2015 UTC
# Line 80  c     == routine arguments == Line 80  c     == routine arguments ==
80        character*(MAX_LEN_FNAM) localobsfile        character*(MAX_LEN_FNAM) localobsfile
81    
82  #if (defined (ALLOW_ECCO) && defined (ALLOW_COST))  #if (defined (ALLOW_ECCO) && defined (ALLOW_COST))
83    #ifdef ALLOW_SEAICE_COST_SMR_AREA
84    
85  c     == local variables ==  c     == local variables ==
86    
87        integer bi,bj        integer bi,bj
# Line 368  c--   End of second loop over records. Line 370  c--   End of second loop over records.
370    
371  c--   End of mult_local or localobsfile  c--   End of mult_local or localobsfile
372        endif        endif
373    
374    #endif /* ALLOW_SEAICE_COST_SMR_AREA */
375  #endif /* ifdef ALLOW_COST */  #endif /* ifdef ALLOW_COST */
376    
377        end        end
Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10
  ViewVC Help
Powered by ViewVC 1.1.22