/[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.4 by heimbach, Tue Mar 23 15:05:46 2010 UTC revision 1.7 by heimbach, Fri Nov 9 22:15:18 2012 UTC
# Line 33  c     == global variables == Line 33  c     == global variables ==
33  # endif  # endif
34  # ifdef ALLOW_SEAICE  # ifdef ALLOW_SEAICE
35  #  include "SEAICE_COST.h"  #  include "SEAICE_COST.h"
36    #  include "SEAICE_SIZE.h"
37  #  include "SEAICE_PARAMS.h"  #  include "SEAICE_PARAMS.h"
38  # endif  # endif
39  #endif  #endif
# Line 51  c     == routine arguments == Line 52  c     == routine arguments ==
52    
53        _RL localobs   (1-olx:snx+olx,1-oly:sny+oly,nnzobs,nsx,nsy)        _RL localobs   (1-olx:snx+olx,1-oly:sny+oly,nnzobs,nsx,nsy)
54        _RL localweight(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)        _RL localweight(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
55        _RL localmask  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)        _RS localmask  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
56        _RL xx_localbar_mean_dummy        _RL xx_localbar_mean_dummy
57        _RL xx_areabar_mean_dummy        _RL xx_areabar_mean_dummy
58        _RL mult_local        _RL mult_local
# Line 67  c     == routine arguments == Line 68  c     == routine arguments ==
68        character*(MAX_LEN_FNAM) localbarfile        character*(MAX_LEN_FNAM) localbarfile
69        character*(MAX_LEN_FNAM) localobsfile        character*(MAX_LEN_FNAM) localobsfile
70    
71  #ifdef ALLOW_COST  #if (defined (ALLOW_ECCO) && defined (ALLOW_COST))
72  c     == local variables ==  c     == local variables ==
73    
74        integer bi,bj        integer bi,bj
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.7
  ViewVC Help
Powered by ViewVC 1.1.22