4 |
Notes on tags used in MITgcmUV |
Notes on tags used in MITgcmUV |
5 |
============================== |
============================== |
6 |
|
|
7 |
|
o pkg/seaice: introduce a restricted additive Schwarz (RAS) method in |
8 |
|
preconditioner for JFNK (run LSR into the overlaps as far as possible, |
9 |
|
i.e OLx/y-2, but overwrite the solution in the overlaps) |
10 |
|
- extend loop range in seaice_calc_viscosity |
11 |
|
- add new parameters SEAICE_OLx/y (default = OLx/y-2) |
12 |
|
- add flexible loop ranges to seaice_preconditioner, seaice_calc_lsr_coeffs |
13 |
|
- slightly modify loops in tridiagonal solver lsr-preconditioner |
14 |
|
- by default remove the extra exchange in seaice_preconditioner with a |
15 |
|
replacement of an undocumented CPP flag by SEAICE_PRECOND_EXTRA_EXCHANGE |
16 |
|
- modify offline_exf_seaice so that old results without RAS are reproduced |
17 |
|
for output.dyn_jfnk.txt |
18 |
|
in seaice_fgmres.F (unrelated to RAS) |
19 |
|
- add a cpp-flag option for a re-ordered mapping (potentially more |
20 |
|
efficient), but because this changes the results, turn it off by |
21 |
|
default |
22 |
|
- replace the save statement by local common blocks |
23 |
|
o utils/matlab: |
24 |
|
- fix tile-offset in rdmnc.m when output was produced using EXCH2. |
25 |
|
- update cs_grid/bk_line scripts to use load_grid.m (in utils/matlab) |
26 |
|
instead of local script "load_cs.m". |
27 |
|
o pkg/seaice: |
28 |
|
- fix a serious bug in seaice_fgmres.F, s/r seaice_scalprod, connected |
29 |
|
to the scalarProductMetric and the unrolling. By chance this does not |
30 |
|
change the verification experiment, because of the particular domain |
31 |
|
decomposition |
32 |
|
o pkg/diagnostics: |
33 |
|
- change default missing_value from UNSET_RL to -999. |
34 |
|
o pkg/layers: improve vectorization of layers_fluxcalc.F |
35 |
|
- step 1: split loops, make TatU/V 2D arrays. This alone reduces the cpu |
36 |
|
time spent in this routine by more than a factor of 3 on an NEC-SX8 |
37 |
|
- step 2: replace search algorithm by a bisection algorithm found in |
38 |
|
Press et al. Numerical Recipes in Fortran. This algorithm can be |
39 |
|
vectorized and finds the correct bin in approx. log2(Nlayers) steps. |
40 |
|
For now, use this algorithm only for TARGET_NEC_SX defined. |
41 |
|
- moved the search algorithm into a separate subroutine, that is kept |
42 |
|
within the same file for automatic inlining. |
43 |
|
- modified catching potential errors |
44 |
|
o pkg/ecco: |
45 |
|
- add compile switches ALLOW_SHALLOW_ALTIMETRY and ALLOW_HIGHLAT_ALTIMETRY. |
46 |
|
o model/src, pkg/autodiff, pkg/ctrl, pkg/grdchk : |
47 |
|
- modifications for ALLOW_GENTIM2D_CONTROL |
48 |
|
-- forward_step.F, the_main_loop.F : pass options and arrays for adjoint tapes. |
49 |
|
-- load_fields_driver.F : add call to CTRL_MAP_GENTIM2D( myTime, myIter, myThid ) |
50 |
|
-- add xx_gentim2d0/1 in ctrl_ad_check_lev1_dir.h checkpoint_lev1_directives.h etc |
51 |
|
-- use ctrl_swapffields.F (new) instead of exf_SwapFFields.F in ctrl_get_gen.F |
52 |
|
o model/src: |
53 |
|
- account for moist thermodynamics in (dry) potential temperature equation; |
54 |
|
update results of experiments: aim.5l_cs (x2), fizhi-cs (std + aqualev) |
55 |
|
and cpl_aim+ocn. |
56 |
|
- also switch to standard compiler (gfortran, was using ifort previously) |
57 |
|
for fizhi-cs experiments reference output. |
58 |
|
o pkg/ctrl: |
59 |
|
- 1st step toward generic time-varying control variable (2D) via CPP option |
60 |
|
ALLOW_GENTIM2D_CONTROL |
61 |
|
- note new namelist ctrl_nml_genarr in data.ctrl |
62 |
|
o verification/global_ocean.cs32x15: |
63 |
|
- switch off OLD_THSICE_CALL_SEQUENCE (both forward and AD code) to use new |
64 |
|
thsice calling sequence and update "output.icedyn.txt" output file. |
65 |
|
o pkg/ptracers: |
66 |
|
- from Ryan A.: code to allow to restart a tracer at regular time interval |
67 |
|
specifying a reset frequency and a reset-phase (for each tracers). |
68 |
|
o pkg/thsice: |
69 |
|
- implement new sequence of calls for thsice+seaice: |
70 |
|
previously: ice-Dyn,ice-Advect,ice-Thermo(thsice) |
71 |
|
new sequence: ice-Thermo(thsice),ice-Dyn,ice-Advect |
72 |
|
- allows (with temporary CPP option "#define OLD_THSICE_CALL_SEQUENCE" |
73 |
|
in CPP_OPTIONS.h) to recover old sequence; |
74 |
|
- update diagnostics for Intermediate State thsice diagnostics: now filled |
75 |
|
just before advection (instead of just after advection in old sequence); |
76 |
|
- update output of experiment offline_exf_seaice (standard test); |
77 |
|
- in global_ocean.cs32x15 exp., postpone output.icedyn.txt update |
78 |
|
by setting #define OLD_THSICE_CALL_SEQUENCE in CPP_OPTIONS.h |
79 |
|
o pkg/aim_v23: |
80 |
|
- use tiled array for aim_CO2 and surface wind speed for export to coupler; |
81 |
|
- use standard pkg/mdsio routines to read & write CO2 pickup file; |
82 |
|
- in-line S/R AIM_AIM2DYN_EXCHANGES in aim_do_physics.F; |
83 |
|
- Implement new sequence of calls for seaice advection (with thsice and |
84 |
|
seaice diffusion): do ice advection after ice-Thermodynamic (previously |
85 |
|
was done before); change aim_do_physics.F (split the bi,bj loops block); |
86 |
|
- use same CPP option (OLD_THSICE_CALL_SEQUENCE) to recover old sequence; |
87 |
|
o pkg/thsice: |
88 |
|
- add a missing EXCH of sIceLoad in thsice_main.F (ocean set-up) for the case |
89 |
|
where just seaice diffusion is used without seaice-dynamics. |
90 |
|
|
91 |
|
checkpoint64c (2013/01/18) |
92 |
|
o pkg/seaice: |
93 |
|
- add a parameter JFNKres_tFac that can replace JFNKres_t |
94 |
|
(= JFNKres_tFac*JFNKresidual before JFNK solver) |
95 |
|
- add a line search option to the JFNK solver |
96 |
|
- move update of u/vIce and computation of initial residual into a separate |
97 |
|
routine (same file); makes the code a little easier to read (?) |
98 |
|
- the line search requires computation of the residual and for some reason |
99 |
|
I cannot do the update of u/vIce at the beginning of the Newton loop |
100 |
|
without changing the results, so we move computation of the new residual |
101 |
|
also to the end of the Newton loop, even without the line search |
102 |
|
o pkg/mdsio: |
103 |
|
- write missing value (corresponding to undefined array value) to meta files; |
104 |
|
skip this if missing value is one (UNSET_RL would be a better value for the |
105 |
|
case of undefined missing value but it's current the default missing-value); |
106 |
|
Also update mdsio_read_meta.F (reading timeInterval & missing-value). |
107 |
|
o pkg/exf & thsice: |
108 |
|
- for diagnostics purpose, fill-up and update Qsw array (+ fill the |
109 |
|
diagnostics) even when SHORTWAVE_HEATING is #undef; |
110 |
|
o verification/cfc_example: |
111 |
|
- turn on pkg/layers with pkg/diagnostics (to test pkg/layers and to |
112 |
|
illustrate how to use it). |
113 |
|
o verification/offline_exf_seaice: |
114 |
|
in input: add SEAICErestoreUnderIce=.TRUE., and reduce size of forcing |
115 |
|
files to only one time-record. |
116 |
|
in input.thermo: narrow the 2 bands of low initial ice-concentration near |
117 |
|
N & S edges; switch on SEAICErestoreUnderIce=T; use pkg/diagnostics for |
118 |
|
snapshot output; same mcPheePiston value as in thsice with |
119 |
|
surf-current=0.2m/s. |
120 |
|
in input.thsice: similar set-up as in input.thermo (channel with same seaice |
121 |
|
initial conditions). |
122 |
|
o verification/cfc_example: |
123 |
|
- update file "data" with more standard choice (default rotationPeriod, |
124 |
|
exactConserv=T, reduce ivdc_kappa to 10, remove multiDimAdvection=F, |
125 |
|
set deltaTFreeSurf to deltaTtracer) and update the output. |
126 |
|
o pkg/layers: |
127 |
|
- fix bolus part so that it compiles with #undef GM_BOLUS_ADVEC; |
128 |
|
- ensure that "layers_bolus" is switched to False when useGMRedi=False. |
129 |
|
o verification/offline_exf_seaice: |
130 |
|
- set all {field}period to zero for constant-in-time forcing (not tested |
131 |
|
anywhere else). |
132 |
o verification/offline_exf_seaice: |
o verification/offline_exf_seaice: |
133 |
- dyn_lsr : use pkg/seaice S/R (instead of pkg/thsice) to advect sea-ice; |
- dyn_lsr : use pkg/seaice S/R (instead of pkg/thsice) to advect sea-ice; |
134 |
- dyn_jfnk : use pkg/thsice S/R (instead of pkg/seaice) to advect sea-ice. |
- dyn_jfnk : use pkg/thsice S/R (instead of pkg/seaice) to advect sea-ice. |