4 |
Notes on tags used in MITgcmUV |
Notes on tags used in MITgcmUV |
5 |
============================== |
============================== |
6 |
|
|
7 |
|
o model/src and several pkgs: |
8 |
|
- change argument list of all S/R called from external_forcing.F and |
9 |
|
called from ptracers_forcing.F (renamed to ptracers_apply_forcing.F) |
10 |
|
to pass, as argument, the current level tendency array to update |
11 |
|
(instead of a direct update of the common bloc array). |
12 |
|
- change also (in the same way) argument list of PTRACERS_APPLY_FORCING; |
13 |
|
- rename taueddy_external_forcing.f to taueddy_tendency_apply.F |
14 |
o pkg/seaice/seaice_lsr.F |
o pkg/seaice/seaice_lsr.F |
15 |
- always initialize local arrays in seaice_lsr_tridiagu/v |
- always initialize local arrays in seaice_lsr_tridiagu/v |
16 |
- add more local tapes to seaice_lsr_tridiagu/v |
- add more local tapes to seaice_lsr_tridiagu/v |
17 |
- move storing u/vice(:,:,bi,bj) out of seaice_lsr_tridiagu/v, but |
- move storing u/vice(:,:,bi,bj) out of seaice_lsr_tridiagu/v, but |
18 |
keep it in bi/bj loop; this seems to be essential |
keep it in bi/bj loop; this seems to be essential |
19 |
- gradients are still wrong but only by 4-7 orders of magnitude |
- gradients are still wrong but only by 4-7 orders of magnitude |
20 |
instead of 15 orders of magnitude, lab_sea improves a little |
instead of 15 orders of magnitude, lab_sea improves a little |
25 |
in seaice_lsr_ad |
in seaice_lsr_ad |
26 |
- exclude some residual computations in seaice_lsr when |
- exclude some residual computations in seaice_lsr when |
27 |
ALLOW_AUTODIFF_TAMC is defined in order to avoid unnecessary code |
ALLOW_AUTODIFF_TAMC is defined in order to avoid unnecessary code |
28 |
in seaice_lsr_ad |
in seaice_lsr_ad |
29 |
- add more storing, a new tape (model/src/the_main_loop.F) and |
- add more storing, a new tape (model/src/the_main_loop.F) and |
30 |
another key for SEAICE_LSR_VECTORIZE_ZEBRA (the local keys ilockey |
another key for SEAICE_LSR_VECTORIZE_ZEBRA (the local keys ilockey |
31 |
and klockey should be checked by a specialist) |
and klockey should be checked by a specialist) |
32 |
- modify ( define SEAICE_VECTORIZE_LSR and SEAICE_LSR_ADJOINT_ITER ) |
- modify ( define SEAICE_VECTORIZE_LSR and SEAICE_LSR_ADJOINT_ITER ) |
33 |
and update lab_sea after previous changes in pkg/seaice below |
and update lab_sea after previous changes in pkg/seaice below |
34 |
o pkg/autodiff : |
o pkg/autodiff: |
35 |
- introduce useSmoothCorrel2DinAdMode, SEAICEapproxLevInAd, and |
- introduce useSmoothCorrel2DinAdMode, SEAICEapproxLevInAd, and |
36 |
viscFacInAd : run time parameters allowing for adjoint switches |
viscFacInAd : run time parameters allowing for adjoint switches |
37 |
note : logic for useSmoothCorrel2DinAdMode is in ctrl_readparms.F |
note : logic for useSmoothCorrel2DinAdMode is in ctrl_readparms.F |
38 |
o pkg/ecco : |
o pkg/ecco: |
39 |
- introduce cost_gencost_boxmean.F that computes a box mean |
- introduce cost_gencost_boxmean.F that computes a box mean |
40 |
temperature (for use in adjoint sensitivity studies). |
temperature (for use in adjoint sensitivity studies). |
41 |
o model/src/set_defaults.F : initialize viscFacAdj to 1. |
o model/src/set_defaults.F : initialize viscFacAdj to 1. |
42 |
o pkg/mom_common/mom_calc_visc.F : |
o pkg/mom_common/mom_calc_visc.F: |
43 |
- ifdef ALLOW_AUTODIFF then include viscFacAdj factor. |
- ifdef ALLOW_AUTODIFF then include viscFacAdj factor. |
44 |
o pkg/seaice/seaice_summary.F : |
o pkg/seaice/seaice_summary.F: |
45 |
- statement for SEAICEadjMODE now in autodiff_readparms.F |
- statement for SEAICEadjMODE now in autodiff_readparms.F |
46 |
o pkg/seaice |
o pkg/seaice: |
47 |
- remove some store directives and add new ones in an effort to get |
- remove some store directives and add new ones in an effort to get |
48 |
finally rid off the recomputation warnings. This is successful |
finally rid off the recomputation warnings. This is successful |
49 |
when SEAICE_VECTORIZE_LSR ***and*** SEAICE_LSR_ADJOINT_ITER are |
when SEAICE_VECTORIZE_LSR ***and*** SEAICE_LSR_ADJOINT_ITER are |