Parent Directory
| 
Revision Log
| 
Revision Graph
| Links to HEAD: | (view) (download) (annotate) |
| Sticky Tag: |
- cost_generic.F: add 'factor' preprocessing option. - ecco_toolbox.F: add ecco_multfield to toolbox.
- cost_gencal.F: fix case when localstartdate.NE.modelstartdate; when yearly files are NOT found but one file without extension IS found then always assume that it is a climatology (thus retiring unused and confusing COST_GENERIC_ASSUME_CYCLIC cpp switch and allowing for daily climatogy case). - cost_generic.F: add output of weight when outlev.GT.1 - ecco_cost_final.F: bypass display of profile costs when usePROFILES is false.
add dosumsq flag
- loop over preproc/posproc options.
- resolve recent recomputations.
- move main loop to separate function cost_genloop
- cost_generic.F: remove localbar, localweight from argument list
- cost_generic.F: add variaweight option, add localerrfile argument - cost_gencost_all.F: carry over changes in cost_generic.F
- remove ALLOW_PROFILES_ANOM_COST code
(modifications contributed by Ou Wang) - cost_gencost_bpv4.F: increase smoothing scale to 750km. - pkg/profiles: add option to remove time means of T/S. - pkg/ecco: add computation of time mean T/S for pkg/profiles, additional option to omit time mean misfits in cost_generic.F - pkg/ecco/ecco_toolbox.F: addition of ecco_diffanommsk, ecco_addmask and ecco_divfield.
- remove dynamic allocation that is not f77 compliant. - note : this was leading to segmtation faults, depending on compiler.
- pass time series length (nrecloc), and preprocessing information
(preproc*) as argument to cost_genread.F
- generalize monthly climatology pre-processing to user specified
nrec (via gencost_preproc_i(1)) and rename it ('climmon') as 'clim'
o pkg/ecco : add capability to penalize full series of time steps,
(rather than daily or month;y) for use in short verification experiments.
- cost_gencost_assignperiod.F : add myiter as argument.
- cost_averagesfields.F : add ECCO_CTRL_DEPRECATED brackets,
and myiter argument to cost_gencost_assignperiod.F.
- cost_averagesgeneric.F : if (startofloc .and. endofloc)
then write current time step field.
o pkg/ecco/cost_generic.F : add smoother as post-processing capability.
- ecco_toolbox.F : add ecco_cprsrl (for masks), ecco_add, ecco_div, ecco_readbar. rename ecco_diff as ecco_diffmsk the better reflect its role. - cost_genread.F : rely on added ecco_readbar, ecco_add, ecco_div, ecco_cp; rm ladinit, eccoiter input args, mv dummy argument ahead of myThid. - cost_generic.F : update cost_genread, cost_diffmsk calls
- ecco_toolbox.F : add ecco_cp, ecco_diff, ecco_addcost to toolbox. - cost_generic.F : rely on added ecco_cp, ecco_diff, ecco_addcost. - cost_gendif.F (removed) : is now replaced by ecco_diff.
- 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
- cost_generic.F : use spzeroloc rather than hard-coded -9999. (bug fix) increase modularity (ecco_zero, cost_gencal, cost_gendif). - cost_genread.F : use ecco_zero to initialize field to 0s - cost_gencal.F (new) : determine filnames and records. - cost_gendif.F (new) : compule masked model-data; with postprocesing options to be added later (e.g. smoothing). - ecco_toolbox.F (new) : basic operations that are often used; for now, ecco_toolbox.F simply contains function ecco_zero.
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
- 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
- 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
- remove includes from pkg/ctrl, add missing CCP switches,
remove unused variable, replace optimiter with eccoiter :
cost_averagesgeneric.F, cost_gencost*.F,
cost_generic.F, ecco_check.F, ecco_phys.F
- include ecco.h rather than ecco.h : ecco_cost_driver.F,
ecco_phys.F, cost_averagesgeneric.F, cost_gencost*.F,
- rename xx_genbar_dummy as gencost_dummy : cost_averagesfields.F,
cost_averagesinit.F, cost_gencost_*.F, ecco_cost_init_barfiles.F
- cost_bp.F : modify calls to cost_bp_read (added arguments)
- cost_bp_read.F added arguments (localobsfile, localstartdate,
localobs, localmask) replacing use of common blocs
- cost_generic.F : add ALLOW_OLD_ESTIM_CODES bracket
- ecco_check.F :
use gencost_startdate rather than modelstartdate, rename
using_topex as using_tpj, add ALLOW_OLD_ESTIM_CODES brackets
- cost_gencost_all.F : remove un-necessary CPP brackets of
cost_gencost_*v4 calls, add cost_gencost_bpv4 call,
use gencost_startdate rather than modelstartdate
- cost_averagesgeneric.F : added DEBUG code
- ecco_cost_final.F : added ifdef ALLOW_ECCO
- ecco_cost_init_fixed.F : copy optimcycle to eccoiter
when ALLOW_CTRL, set eccoiter to 0 otherwise;
revise gencost conditionality
- ecco_cost_summary.F : add ALLOW_OLD_ESTIM_CODES brackets,
rename using_topex as using_tpj
- ecco_init_varia.F : initialize RHOsumGlob_0, VOLsumGlob_0
- ecco_phys.F : compute etanFull
- ecco_readparms.F : rename using_topex as using_tpj, add
bpv4-grace to gencost list, initialize added parameters
- ecco_summary.F : include SIZE.h needed for augmented ecco.h
include ECCO_OPTIONS.h instead of COST_CPPOPTIONS.h
- ecco_cost_final.F : add fc definition when pkg/cost is omitted, omit global_sum of fc when pkg/cost is included (see joint modif). - ecco_cost.h : define tbar, sbar, ubar, vbar accordingly if ALLOW_COST_TRANSPORT. - add CPP brackets around pkg/cost and pkg/ctrl includes of "CTRL_SIZE.h" "ctrl.h" "ctrl_dummy.h" "optim.h" / "cost.h" accordingly. - ALLOW_COST_ATLANTIC_HEAT vs ALLOW_COST_ATLANTIC : attempt to sort out ALLOW_COST_ATLANTIC (in ecco) vs ALLOW_COST_ATLANTIC_HEAT (in cost) that both use objf_atl (from cost). - ALLOW_COST_ATLANTIC ifdef ALLOW_ECCO_EVOLUTION : add calls to cost_atlantic (that also does the associated time averaging) in cost_averagesfields.F and ecco_cost_driver.F, along with the relevant ecco_ad_check_lev*_dir.h stores.
Init. middate
- avoid calling a S/R (in this case, cal_FullDate) with 2 time the same arg (FWD: unless both are only used as input; and for AD, unless both are not differentiable (e.g., k index))
- goals:
-- fix startdate.NE.modelstartdate cases and related model crashes.
-- alleviate the need for altimeter etc. files (of zeros) for e.g. 1948-1991.
- accross the board issues that should be fixed in the updated routines :
-- dont try to read a file that does no exist
-- take proper account of startdate (e.g. ymod .GE. yday)
-- use cal_FullDate to complete date
-- if .le. spval (not .lt. spval) then mask out
- more specific issues and updates :
-- cost_gencost_ssht4.F : hard-code startdate to 19920101 (no run time param avail).
-- cost_readscatxfields.F & cost_gencost_sstv4.F : added option for debbuging
(if ALLOW_ECCO_DEBUG is defined then to print date info to stdout)
-- cost_sla_read_yd.F : added startdate as input parameter
-- ecco_summary.F : bug fix; include AD_CONFIG.h was missing.
- set maxNumDays to 8050 (22 years). - fix cost_generic for daily data and nIter0>0 case. - complement ALLOW_DAILYSCAT_COST_CONTRIBUTION.
ecco/ecco_readparms.F if no gencost_name then copy gencost_datafile to gencost_name ecco/ecco_cost_final.F use gencost_name in print statements ecco/ecco_cost_weights.F introduce ALLOW_WSALTLEV/WTHETALEV to force read of WSALTLEV/WTHETALEV ecco/cost_generic.F introduce COST_GENERIC_ASSUME_CYCLIC to switch assumption in case we find no yearly files
bug fix
More code for GENCOST.
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 <---
add missing cvs $Header:$ or $Name:$
Compute cost even for zero multiplier.
Introduce nnztbar, nnzsbar to distinguish btw 2d/3d bar files at initialisation time.
o replace various cost routines by single generic routine cost_generic.F o add weights for SST, SSS control o bracket GAD.h for #undef ALLOW_GENERIC_ADVDIFF version
Fix default localrec for daily cost
Fix typos for TMI.
o Adding cost term for seaice obs (daily SMR vs. AREA) new seaice_cost init/weight/final routines o Modularized cost_averages routines (new cost_averagesgeneric.F)
New routine cost_generic.F should facilitate intro. of new cost terms and replace individual routines.
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.
| ViewVC Help | |
| Powered by ViewVC 1.1.22 |