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

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

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

revision 1.18 by heimbach, Fri Nov 20 22:29:08 2009 UTC revision 1.19 by heimbach, Sat Feb 6 02:43:03 2010 UTC
# Line 72  c     == end of interface == Line 72  c     == end of interface ==
72        localperiod = 0.        localperiod = 0.
73        call cost_generic(        call cost_generic(
74       &     nnzbar, tbarfile, tbar, xx_tbar_mean_dummy,       &     nnzbar, tbarfile, tbar, xx_tbar_mean_dummy,
75       &     nnzobs, sstdatfile, sstdat, mult_sst,       &     nnzobs, sstdatfile, mult_sst,
76       &     nmonsrec, modelstartdate, localperiod,       &     nmonsrec, modelstartdate, localperiod,
77       &     maskC, wsst,       &     maskC, wsst,
78       &     spminloc, spmaxloc, spzeroloc,       &     spminloc, spmaxloc, spzeroloc,
# Line 93  c Line 93  c
93        localperiod = 86400.        localperiod = 86400.
94        call cost_generic(        call cost_generic(
95       &     nnzbar, sstbarfile, sstbar, xx_sstbar_mean_dummy,       &     nnzbar, sstbarfile, sstbar, xx_sstbar_mean_dummy,
96       &     nnzobs, sstdatfile, sstdat, mult_sst,       &     nnzobs, sstdatfile, mult_sst,
97       &     nrecloc, modelstartdate, localperiod,       &     nrecloc, modelstartdate, localperiod,
98       &     maskC, wsst,       &     maskC, wsst,
99       &     spminloc, spmaxloc, spzeroloc,       &     spminloc, spmaxloc, spzeroloc,
# Line 135  cph      call cost_sst   ( myiter, mytim Line 135  cph      call cost_sst   ( myiter, mytim
135        localperiod = 0.        localperiod = 0.
136        call cost_generic(        call cost_generic(
137       &     nnzbar, tbarfile, tbar, xx_tbar_mean_dummy,       &     nnzbar, tbarfile, tbar, xx_tbar_mean_dummy,
138       &     nnzobs, tmidatfile, tmidat, mult_tmi,       &     nnzobs, tmidatfile, mult_tmi,
139       &     nmonsrec, tmistartdate, localperiod,       &     nmonsrec, tmistartdate, localperiod,
140       &     maskC, wsst,       &     maskC, wsst,
141       &     spminloc, spmaxloc, spzeroloc,       &     spminloc, spmaxloc, spzeroloc,
# Line 156  cph      call cost_tmi( myiter, mytime, Line 156  cph      call cost_tmi( myiter, mytime,
156        localperiod = 0.        localperiod = 0.
157        call cost_generic(        call cost_generic(
158       &     nnzbar, sbarfile, sbar, xx_sbar_mean_dummy,       &     nnzbar, sbarfile, sbar, xx_sbar_mean_dummy,
159       &     nnzobs, sssdatfile, sssdat,  mult_sss,       &     nnzobs, sssdatfile, mult_sss,
160       &     nmonsrec, modelstartdate, localperiod,       &     nmonsrec, modelstartdate, localperiod,
161       &     maskC, wsss,       &     maskC, wsss,
162       &     spminloc, spmaxloc, spzeroloc,       &     spminloc, spmaxloc, spzeroloc,

Legend:
Removed from v.1.18  
changed lines
  Added in v.1.19

  ViewVC Help
Powered by ViewVC 1.1.22