4 |
Notes on tags used in MITgcmUV |
Notes on tags used in MITgcmUV |
5 |
============================== |
============================== |
6 |
|
|
7 |
|
o pkg/ctrl/obcs/ecco: |
8 |
|
- remove obsolete, unused, and partially broken code: |
9 |
|
ctrl_obcsvol/ctrl_obcsbal/ctrl_volflux and code within |
10 |
|
ALLOW_CTRL_OBCS_BALANCE |
11 |
|
- put a stop statement into ecco/cost_obcsvol.F, but also add |
12 |
|
cost_obcsvol to ecco_ad_diff.list |
13 |
|
o pkg/ecco: fix counting cost function contributions for obcs (code |
14 |
|
by Matt M.) and diffkr for diagnostics |
15 |
|
o pkg/ecco, pkg/ctrl, pkg/grdchk: |
16 |
|
add cost penalty terms for initial uvel, vvel, eta controls |
17 |
|
and I/O for prior error files |
18 |
|
o pkg/mdsio: |
19 |
|
move mds_check4file.F from eesupp/src to mdsio_check4file.F ; add option |
20 |
|
(new argument) to check for tiled file in mdsioLocalDir : this fix the |
21 |
|
restart from pickup_som , pickup_dic (& dic_co2atm) with mdsioLocalDir. |
22 |
|
o pkg/ctrl: |
23 |
|
- ctrl_obcsbal.F, ctrl_obcsvol.F: replace last calls of ctrl_getrec by |
24 |
|
ctrl_get_gen_rec, put a stop statement into ctrl_getrec. Remove |
25 |
|
unused and superfluous variables |
26 |
|
- ctrl_get_gen_rec.F: catch the case of xx_genperiod=0. |
27 |
|
o pkg/ecco |
28 |
|
- enable adjoint of Stevens OB |
29 |
|
o pkg/ctrl/ecco/grdchk: |
30 |
|
- remove global declaration of tmpfldx/yz and tmpfldx/yz2. |
31 |
|
Fortunately, we do not have any tests for the numerous cpp-flagged |
32 |
|
option of "obcs as control parameters" so we will never know |
33 |
|
if this is an improvement (but at least now things compile). |
34 |
|
- remove an obsolete initialization from ecco_cost_init_barfiles.F |
35 |
|
- fix some problems within never used ifdefs to make the code compile |
36 |
o pkg/obcs: |
o pkg/obcs: |
37 |
- Refine Interior mask definition to work with more complex OB (e.g. |
- Refine Interior mask definition to work with more complex OB (e.g. |
38 |
if OB_Ie < OB_Iw); In case default setting is not sufficient, allows to |
if OB_Ie < OB_Iw); In case default setting is not sufficient, allows to |