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

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

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


Links to HEAD: (view) (download) (annotate)
Sticky Tag:

Revision 1.26 - (view) (download) (annotate) - [select for diffs]
Mon Apr 3 23:16:38 2017 UTC (7 years ago) by ou.wang
Branch: MAIN
CVS Tags: HEAD, checkpoint66f, checkpoint66g, checkpoint66h, checkpoint66i, checkpoint66j, checkpoint66k, checkpoint66l, checkpoint66m, checkpoint66n, checkpoint66o
Changes since 1.25: +5 -2 lines
Diff to previous 1.25
Add and update some files related to ECCO v4 release 3. The main changes are
 adding cost_gencost_glbmean.F to compute the costs for global mean time-series of OBP
 & SSH, splitting the profile cost to sample-mean and -anomaly parts,
 updating the cost formula for the proxy sea-ice costs, adding initial velocity
 as part of the control variables, and applying the correction of global
 mean steric height change to OBP.
- cost_gencost_glbmean.F:    compute cost for global mean OBP & SSH time-series
- cost_profiles.F:           add a CPP option (ALLOW_PROFILES_SAMPLESPLIT_COST)
                              that if defined splits the profile cost to
                              sample-mean and sample-anomaly costs.
- cost_gencost_seaicev4.F:   add a CPP option (SEAICECOST_JPL) that if defined
                             reads in the weights for the proxy sea-ice costs.
- cost_gencost_curstomize.F: if ALLOW_PSBAR_STERIC is defined, correct OBP with
                              the global mean steric ssh change to be consistent
                              with SSH.
- ecco_phys.F:               include sterGloH in a common block to be used in
                              cost_gencost_customize.F to correct OBP when
                              ALLOW_PSBAR_STERIC is defined.
- ctrl_map_ini_genarr.F:     add CPP options to include initial UV as the control
                              variables.
- cost_gencost_all.F:        changes related to cost for the global mean time-series.
- cost_gencost_bpv4.F:       minor change related to cost for the global mean time-series.
- ecco_readparms.F:          changes related to cost for the global mean time-series.
- ecco_ad_diff.list:         include the new added cost_gencost_glbmean.F.
- ctrl_get_gen.F:            check if the first seven characters of xx_tauu_file &
                              xx_tauv_filei matches "xx_tauu" or "xx_tauv".
- ecco_cost_final.F:         add modification related to the sample-mean profile cost.
- ecco_cost_init_fixed.F:    initialize the data and weights for the global mean costs
                              for OBP & SSH, if ALLOW_GENCOST_1D is defined.
- profiles_readvector.F:     read in climatology field in the profile file, and mask
                              out the weight where climatology data is flagged. Active
                              if ALLOW_PROFILES_CLIMMASK is defined.
- PROFILES_SIZE.h:           changes related to the split of profile cost to sample-mean
                              and sample-anomaly.
- profiles.h:                changes related to the split of profile cost to sample-mean
                              and sample-anomaly.
- ecco.h:                    changes related to the global mean costs
- profiles_readparms.F:      changes related to the profile cost splitting and masking
                              by climatology data.
- profiles_init_fixed.F:     changes related to the profile cost splitting.
- profiles_init_varia.F:     changes related to the profile cost splitting.


Revision 1.25 - (view) (download) (annotate) - [select for diffs]
Wed Sep 21 12:55:31 2016 UTC (7 years, 7 months ago) by gforget
Branch: MAIN
CVS Tags: checkpoint65z, checkpoint66a, checkpoint66b, checkpoint66c, checkpoint66d, checkpoint66e
Changes since 1.24: +2 -2 lines
Diff to previous 1.24
- cost_gencost_all.F: pass 'c' as argument instead of gencost_mask(k)
- cost_gencost_boxmean.F: use gencost_mask to specify masks rather than gencost_errfile
- ecco.h: increase gencost_mask length to MAX_LEN_FNAM
- ecco_check.F: checks related to gencost_mask and gencost_errfile
- ecco_readparms.F: use gencost_mask to specify masks rather than gencost_errfile,
  set default to 0 for 2D masks to avoid confusing users


Revision 1.24 - (view) (download) (annotate) - [select for diffs]
Tue Sep 20 17:15:13 2016 UTC (7 years, 7 months ago) by gforget
Branch: MAIN
Changes since 1.23: +2 -2 lines
Diff to previous 1.23
- cost_gencost_all.F: use gencost_nrec in place of gencost_nrecperiod (no effect)
- ecco_check.F: check that retired run-time options are not used
- ecco_cost_init_fixed.F, ecco_summary.F: finish retiring gencost_nrecperiod
- ecco_readparms.F: finish retiring gencost_smooth2Ddiffnbt


Revision 1.23 - (view) (download) (annotate) - [select for diffs]
Thu Nov 12 13:22:44 2015 UTC (8 years, 5 months ago) by atn
Branch: MAIN
CVS Tags: checkpoint65q, checkpoint65r, checkpoint65s, checkpoint65t, checkpoint65u, checkpoint65v, checkpoint65w, checkpoint65x, checkpoint65y
Changes since 1.22: +0 -2 lines
Diff to previous 1.22
strip compile-time ifdef block ALLOW_GENCOST_TRANSPORT


Revision 1.22 - (view) (download) (annotate) - [select for diffs]
Thu Nov 12 12:25:27 2015 UTC (8 years, 5 months ago) by atn
Branch: MAIN
Changes since 1.21: +2 -2 lines
Diff to previous 1.21
add using_cost_transp flag


Revision 1.21 - (view) (download) (annotate) - [select for diffs]
Tue Nov 10 08:05:06 2015 UTC (8 years, 5 months ago) by atn
Branch: MAIN
Changes since 1.20: +4 -1 lines
Diff to previous 1.20
add ALLOW_GENCOST_TRANSPORT block


Revision 1.20 - (view) (download) (annotate) - [select for diffs]
Fri Oct 23 14:26:16 2015 UTC (8 years, 6 months ago) by gforget
Branch: MAIN
Changes since 1.19: +19 -51 lines
Diff to previous 1.19
- cost_generic.F: remove localbar, localweight from argument list


Revision 1.19 - (view) (download) (annotate) - [select for diffs]
Thu Oct 22 02:06:01 2015 UTC (8 years, 6 months ago) by gforget
Branch: MAIN
CVS Tags: checkpoint65p
Changes since 1.18: +5 -5 lines
Diff to previous 1.18
- cost_generic.F: add variaweight option, add localerrfile argument
- cost_gencost_all.F: carry over changes in cost_generic.F


Revision 1.18 - (view) (download) (annotate) - [select for diffs]
Mon Oct 6 14:09:03 2014 UTC (9 years, 6 months ago) by gforget
Branch: MAIN
CVS Tags: checkpoint65f, checkpoint65g, checkpoint65h, checkpoint65i, checkpoint65j, checkpoint65k, checkpoint65l, checkpoint65m, checkpoint65n, checkpoint65o
Changes since 1.17: +11 -7 lines
Diff to previous 1.17
- generalized pre/post-processing parameters (_c, _i, _l arrays
  replacing scalefile) from ecco_readparms to cost_generic
- replace 16 with MAX_LEN_FNAM in defining posproc, preproc
- cost_hyd.F, cost_gencost_all.F : update cost_generic calls
- ecco_summary.F : only report relevant pre/post-processing


Revision 1.17 - (view) (download) (annotate) - [select for diffs]
Fri Oct 3 15:01:07 2014 UTC (9 years, 6 months ago) by gforget
Branch: MAIN
Changes since 1.16: +10 -5 lines
Diff to previous 1.16
o pkg/ecco/cost_averagesfields.F : depend on gencost_barskip
  rather gencost_barfile for deciding whether to write barfile
o pkg/ecco/cost_generic.F : add outname argument (output file name),
  compute and store misfit maks*(model-data) in localdif that is
  then used in cost and for output, output misfit if outlev.GT.0
o pkg/ecco/cost_hyd.F, cost_gencost_all.F : add cost_generic arg
o pkg/ecco/ecco.h : add gencost_barskip
o pkg/ecco/ecco_cost_init_fixed.F : determine gencost_barskip
  (set to false if same barfile is already taken care of
  by other gencost, or if gencost_barfile is empty)
o pkg/ecco/ecco_summary.F : add gencost_barskip to summary
o pkg/ecco/cost_gencost_all.F, cost_hyd.F : rm AD recomputation


Revision 1.16 - (view) (download) (annotate) - [select for diffs]
Thu Oct 2 22:26:17 2014 UTC (9 years, 6 months ago) by gforget
Branch: MAIN
Changes since 1.15: +10 -5 lines
Diff to previous 1.15
- ecco.h, ecco_readparms.F, cost_generic.F, cost_gencost_all.F, cost_hyd.F :
  added run time params and/or passed as arguments : gencost_posproc,
  gencost_scalefile, gencost_nrecperiod, gencost_outputlevel.
- cost_generic.F, cost_genread.F :
   added preproc code ('climmon ') to replace GENERIC_BAR_MONTH
- cost_genread.F : fix array dimension
- ecco_cost_init_fixed.F : re-activate ecco_summary
- ecco_summary.F : report gencost variables


Revision 1.15 - (view) (download) (annotate) - [select for diffs]
Wed Oct 1 12:54:03 2014 UTC (9 years, 7 months ago) by gforget
Branch: MAIN
Changes since 1.14: +39 -5 lines
Diff to previous 1.14
- ecco.h : remove un-needed CCP options, add gencost_preproc, add 3D gencost
- cost_generic.F : move active_read calls to cost_genread (new) and setup
  generic pre-processing framework (via new preproc argument).
- cost_genread.F (new) : interface between cost_generic and active_read

- added 3D gencost involves : cost_averagesfields.F,
  cost_averagesinit.F, cost_gencost_all.F, ecco.h,
  ecco_check.F, ecco_cost_init_fixed.F, ecco_readparms.F
  (ALLOW_GENCOST3D, gencost_is3d, gencost_pointer3d,
   gencost_bar3d, gencost_mod3d, gencost_wei3d)
- added gencost_preproc involves : cost_gencost_all.F,
  cost_genread.F, cost_generic.F, cost_hyd.F, ecco_readparms.
  and ... pkg/seaice/seaice_cost_driver.F

- ecco_cost_driver.F : move cost_profiles here
- cost_hyd.F : remove cost_profiles from here
- ecco_cost_weights.F : remove gencost weights from here
- ecco_cost_init_fixed.F : more gencost weights here
- ecco_cost_final.F : 0. _ d 0 fixes


Revision 1.14 - (view) (download) (annotate) - [select for diffs]
Mon Sep 29 16:46:43 2014 UTC (9 years, 7 months ago) by gforget
Branch: MAIN
Changes since 1.13: +22 -35 lines
Diff to previous 1.13
- cost_gencost_customize.F : add automated fill based upon barfile name
  when it starts with eta, sst, sss, bp, taux, or tauy; rm hard coded
  gencost_modfld(i,j,bi,bj,1) = empmr(i,j,bi,bj)
- cost_gencost_assignperiod.F : revise gencost conditionality
- cost_gencost_sshv4.F : rm ALLOW_SSH_COST_CONTRIBUTION etc brackets,
  add initialization of local arrays, streamline reading of mdt,
  use gencost_barfile rather than psbarfile, use local variables
  (e.g. tpob, tpma instead of tpobs, tpmask), only include ecco.h
- cost_gencost_sstv4.F : rename igen_amsre as kgen, replace
  sstbar with gencost_barfile, rm ALLOW_DAILYSST_COST_CONTRIBUTION
- cost_gencost_boxmean.F : replace tbarfile with gencost_barfile,
  rename igen_boxmean as kgen
- cost_gencost_sstv4.F, cost_gencost_sshv4.F : rm myiter, mytime args
- cost_gencost_bpv4.F (new) : to replace cost_bp using gencost,
  added to ecco_ad_diff.list


Revision 1.13 - (view) (download) (annotate) - [select for diffs]
Fri Jun 27 14:23:19 2014 UTC (9 years, 10 months ago) by gforget
Branch: MAIN
CVS Tags: checkpoint64z, checkpoint65, checkpoint65a, checkpoint65b, checkpoint65c, checkpoint65d, checkpoint65e
Changes since 1.12: +3 -1 lines
Diff to previous 1.12
- introduce cost_gencost_boxmean.F that computes a box mean
  temperature (for use in adjoint sensitivity studies).


Revision 1.12 - (view) (download) (annotate) - [select for diffs]
Thu Mar 28 00:25:56 2013 UTC (11 years, 1 month ago) by gforget
Branch: MAIN
CVS Tags: checkpoint64f, checkpoint64g, checkpoint64h, checkpoint64i, checkpoint64j, checkpoint64k, checkpoint64l, checkpoint64m, checkpoint64n, checkpoint64o, checkpoint64p, checkpoint64q, checkpoint64r, checkpoint64s, checkpoint64t, checkpoint64u, checkpoint64v, checkpoint64w, checkpoint64x, checkpoint64y
Changes since 1.11: +6 -1 lines
Diff to previous 1.11
- added cost_gencost_seaicev4.F : seaice ice cost function for ecco v4.
- cost_gencost_seaicev4.F : call cost_gencost_seaicev4.F
- ecco_readparms.F : add using_cost_seaice as a parameter.


Revision 1.11 - (view) (download) (annotate) - [select for diffs]
Tue Oct 2 01:40:03 2012 UTC (11 years, 7 months ago) by gforget
Branch: MAIN
CVS Tags: checkpoint64, checkpoint64a, checkpoint64b, checkpoint64c, checkpoint64d, checkpoint64e
Changes since 1.10: +2 -8 lines
Diff to previous 1.10
- introduce gencost_flag(k) that is currently one of 3 values :
   0  if cost term k is not used
   1  if cost term is fully interactive (i.e. uses gencost_datafile)
  -1  if ocst term is pre-specified (i.e. uses gencost_name)
- introduce using_gencost(k) logical in line with using_topex etc.

- ecco_readparms.F : assign using_gencost(k) & gencost_flag(k) based
  on gencost_datafile(k).NE.' ' (fully interactive cost terms)
  or on gencost_name(k) (for pre-specified generic cost terms)
- throughout : replace "if ( gencost_datafile(num_var) .ne. ' ' )"
  with "if ( using_gencost(num_var) ) then"
- throughout : rm ALLOW_GENCOST_FREEFORM CPP option. The same
  thing is now achieved dynamically based on gencost_flag.
- ecco_check.F : add gencost checks, account for "data"startdate
  in ecco_check_files, add topexmean check.


Revision 1.10 - (view) (download) (annotate) - [select for diffs]
Sun Sep 30 20:33:55 2012 UTC (11 years, 7 months ago) by gforget
Branch: MAIN
Changes since 1.9: +7 -5 lines
Diff to previous 1.9
ecco_cost.h
        - add using_cost_altim, using_cost_sst,using_cost_bp,using_cost_scat
          to allow for run time switch of main cost terms. Those switches
          are further reset to false if files are missing (ecco_check.F)
cost_gencost_all.F
        - using_cost_altim, using_cost_sst
cost_hyd.F
        - using_cost_sst
ecco_check.F
        - restrict maxNumDays test to relevant cases
        - add ECCO_CHECK_FILES S\R that test whether the input binary files
          are there, and otherwise switch off the corresponding run
          time flag. Rather than do the full run then crash in ecco_cost_driver.
        - thus reset using_cost_bp, using_cost_altim, using_cost_sst,
          using_cost_scat if necessary.
ecco_cost_driver.F
        - using_cost_altim, using_cost_bp, using_cost_scat
ecco_cost_init_fixed.F
        - remove tpTimeMask etc. bloc when not needed (i.e. undef ALLOW_NEW_SSH_COST)
ecco_cost_weights.F
        - dont try to read data_errfile if it is not there
        - using_cost_sst, using_cost_altim, using_cost_bp, using_cost_scat
ecco_readparms.F
        - activate using_cost_sst, using_cost_altim, using_cost_bp, using_cost_scat
        - also activate using_topex, using_ers, and using_gfo


Revision 1.9 - (view) (download) (annotate) - [select for diffs]
Fri Aug 10 19:45:26 2012 UTC (11 years, 8 months ago) by jmc
Branch: MAIN
CVS Tags: checkpoint63r, checkpoint63s
Changes since 1.8: +6 -6 lines
Diff to previous 1.8
include ECCO_OPTIONS.h instead of COST_CPPOPTIONS.h


Revision 1.8 - (view) (download) (annotate) - [select for diffs]
Tue Jul 31 16:07:32 2012 UTC (11 years, 9 months ago) by heimbach
Branch: MAIN
Changes since 1.7: +2 -1 lines
Diff to previous 1.7
Attempt at adding CTRL_SIZE.h


Revision 1.7 - (view) (download) (annotate) - [select for diffs]
Tue Sep 7 21:20:39 2010 UTC (13 years, 7 months ago) by gforget
Branch: MAIN
CVS Tags: checkpoint62k, checkpoint62l, checkpoint62m, checkpoint62n, checkpoint62o, checkpoint62p, checkpoint62q, checkpoint62r, checkpoint62s, checkpoint62t, checkpoint62u, checkpoint62v, checkpoint62w, checkpoint62x, checkpoint62y, checkpoint62z, checkpoint63, checkpoint63a, checkpoint63b, checkpoint63c, checkpoint63d, checkpoint63e, checkpoint63f, checkpoint63g, checkpoint63h, checkpoint63i, checkpoint63j, checkpoint63k, checkpoint63l, checkpoint63m, checkpoint63n, checkpoint63o, checkpoint63p, checkpoint63q
Changes since 1.6: +19 -1 lines
Diff to previous 1.6
Pointwise vs Large-Scale cost function terms for
MDT and bin averaged daily SLA (cost_gencost_sshv4.F)
and bin averaged daily SST (cost_gencost_sstv4.F)
within the gencost framework.

note:
  cost_gencost_sshv4.F v1.1 is the same as
  cost_sshv4.F v1.5 except that it
  takes advantage of the gencost framework.


Revision 1.6 - (view) (download) (annotate) - [select for diffs]
Sat Mar 13 23:12:48 2010 UTC (14 years, 1 month ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint62d, checkpoint62e, checkpoint62f, checkpoint62g, checkpoint62h, checkpoint62i, checkpoint62j
Changes since 1.5: +8 -19 lines
Diff to previous 1.5
Updating gencost code
* merge B. Cheng's changes
* bug fixes (especially cost_generic_all.F)


Revision 1.5 - (view) (download) (annotate) - [select for diffs]
Tue Feb 16 02:08:16 2010 UTC (14 years, 2 months ago) by gforget
Branch: MAIN
CVS Tags: checkpoint62c
Changes since 1.4: +3 -1 lines
Diff to previous 1.4
bug fixes


Revision 1.4 - (view) (download) (annotate) - [select for diffs]
Sat Feb 6 11:30:16 2010 UTC (14 years, 2 months ago) by heimbach
Branch: MAIN
Changes since 1.3: +2 -2 lines
Diff to previous 1.3
More code for GENCOST.


Revision 1.3 - (view) (download) (annotate) - [select for diffs]
Sat Feb 6 02:43:03 2010 UTC (14 years, 2 months ago) by heimbach
Branch: MAIN
Changes since 1.2: +41 -5 lines
Diff to previous 1.2
Preparing usage of generic cost function terms.
Enable with CPP option
#ifdef ALLOW_GENCOST_CONTRIBUTION
First usage is adding air-sea flux constraints when using bulk controls.
---> NOT YET READY FOR PRIME TIME <---


Revision 1.2 - (view) (download) (annotate) - [select for diffs]
Tue Oct 9 00:02:50 2007 UTC (16 years, 6 months ago) by jmc
Branch: MAIN
CVS Tags: checkpoint59i, checkpoint59j, checkpoint59k, checkpoint59l, checkpoint59m, checkpoint59n, checkpoint59o, checkpoint59p, checkpoint59q, checkpoint59r, checkpoint60, checkpoint61, checkpoint61a, checkpoint61b, checkpoint61c, checkpoint61d, checkpoint61e, checkpoint61f, checkpoint61g, checkpoint61h, checkpoint61i, checkpoint61j, checkpoint61k, checkpoint61l, checkpoint61m, checkpoint61n, checkpoint61o, checkpoint61p, checkpoint61q, checkpoint61r, checkpoint61s, checkpoint61t, checkpoint61u, checkpoint61v, checkpoint61w, checkpoint61x, checkpoint61y, checkpoint61z, checkpoint62, checkpoint62a, checkpoint62b
Changes since 1.1: +2 -0 lines
Diff to previous 1.1
add missing cvs $Header:$ or $Name:$


Revision 1.1 - (view) (download) (annotate) - [select for diffs]
Fri Sep 7 22:41:13 2007 UTC (16 years, 7 months ago) by gforget
Branch: MAIN
CVS Tags: checkpoint59g, checkpoint59h
allow user defined cost function contributions
	CPP: ALLOW_GENCOST_CONTRIBUTION
	USAGE: compute contributions in cost_gencost_all.F


This form allows you to request diffs between any two revisions of this file. For each of the two "sides" of the diff, select a symbolic revision name using the selection box, or choose 'Use Text Field' and enter a numeric revision.

  Diffs between and
  Type of Diff should be a

Sort log by:

  ViewVC Help
Powered by ViewVC 1.1.22