[MITgcm-cvs] MITgcm/pkg/ecco CVS Commit

Gael Forget gforget at baudelaire.csail.mit.edu
Mon Oct 1 21:40:03 EDT 2012


Update of /u/gcmpack/MITgcm/pkg/ecco
In directory baudelaire:/srv/scratch/gforget/MITgcm/pkg/ecco

Modified Files:
	cost_gencost_all.F cost_gencost_assignperiod.F 
	cost_gencost_sshv4.F cost_gencost_sstv4.F ecco_check.F 
	ecco_cost.h ecco_cost_init_fixed.F ecco_cost_summary.F 
	ecco_readparms.F 
Log Message:

- 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.





More information about the MITgcm-cvs mailing list