[135] | 1 | == 17/09/08 == |
---|
| 2 | >>> Build a version with new soil but old radiative transfer, |
---|
| 3 | but keeping possibility of switching back to new radiative transfer), |
---|
| 4 | which incorporates changes & improvements currently included in the |
---|
| 5 | 'reference version' GCM (see /u/emlmd/LMDZ.MARS.mixdyn) |
---|
| 6 | |
---|
| 7 | >>> start by modifying makegcm as in /u/emlmd/LMDZ.MARS.mixdyn, so that it runs |
---|
| 8 | without environment variables and set LIBOGCM to /tmp15/emlmd/libo |
---|
| 9 | |
---|
| 10 | >>> directory contents of 'aeronomars', 'grid' and 'filtrez' are simillar |
---|
| 11 | to those in /u/emlmd/LMDZ.MARS.mixdyn |
---|
| 12 | |
---|
| 13 | >>> in bibio , only file mxva.F needed be upgraded |
---|
| 14 | |
---|
| 15 | >>> get phymars and dyn3d contents from /u/emlmd/LMDZ.MARS.mixdyn |
---|
| 16 | (and remove all *old files) |
---|
| 17 | |
---|
| 18 | >>> check differences between dyn3d and /u/emlmd/LMDZ.MARS.170908/libf/dyn3d |
---|
| 19 | and upgrade when necessary: |
---|
| 20 | - removed 'netcdf.inc' file (has nothing to do there!) |
---|
| 21 | - comgeom.h and comgeom.h : made fortran90 compliant |
---|
| 22 | - control.h : made fortran90 compliant |
---|
| 23 | - dynredem.F : more read/write controls + comments in english |
---|
| 24 | - ini_archive.F : new soil/thermal inertia changes |
---|
| 25 | - integrd.F : added additional information to output when crashing |
---|
| 26 | - lect_start_archive.F : new soil/thermal inertia changes |
---|
| 27 | - newstart.F : new soil/thermal inertia changes + comments in english |
---|
| 28 | - start2archive.F : new soil/thermal inertia changes |
---|
| 29 | - vanleer.F : removed inapropriate 'external' statement |
---|
| 30 | - write_archive.F : enable writting a subterranean field |
---|
| 31 | |
---|
| 32 | >>> check differences between phymars and /u/emlmd/LMDZ.MARS.170908/libf/phymars |
---|
| 33 | and upgrade when necessary: |
---|
| 34 | New soil stuff: |
---|
| 35 | - added comsoil.h |
---|
| 36 | - iniwrite.F : new soil changes |
---|
| 37 | - added iniwritesoil.F90 and writediagsoil.F90 for subterranean fields |
---|
| 38 | - added interp_line.F (for subterranean grid interpolation) |
---|
| 39 | - adapted phyetat0.F for subterranean temperature & inertia |
---|
| 40 | - adapted physdem1.F to include new soil stuff |
---|
| 41 | - physiq.F : added calls to writediagsoil |
---|
| 42 | - soil.F : new routine (fixed vertical grid + variable thermal inertia) |
---|
| 43 | - added soil_settings.F (to read/initialize/interpolate soil properties) |
---|
| 44 | - updated surfdat.h (since thermal inertia is now in comsoil.h) |
---|
| 45 | - updated tabfi.F : include new soil properties |
---|
| 46 | - updated testphys1d.F |
---|
| 47 | - updated dimphys.h (set nsoil=18 as default) |
---|
| 48 | |
---|
| 49 | == 18/09/08 == |
---|
| 50 | >>> add the possibility of easily switching to Tran radiative transfert |
---|
| 51 | - updated aerdust.h.ocke97 (changed some variables name) so it can |
---|
| 52 | replace aerdust.h (which is currently the same as aerdust.h.clan91). |
---|
| 53 | - imported Tran's 'gfluxv.F' routine |
---|
| 54 | - imported Trans' version of 'swr.F' routine, saved it as 'swr.F.toon' |
---|
| 55 | |
---|
| 56 | >>> Backup of 'old' Morcrette swr.F is 'swr.F.morc' |
---|
| 57 | NB: to switch from one radiative transfer to the other, just copy |
---|
| 58 | swr.F.morc or swr.F.toon to swr.F (and eventually 'touch swr.F' so that |
---|
| 59 | makegcm recompiles swr.F) |
---|
| 60 | No other dependencies (swr.F.toon uses 'gfluxv.F' and swr.F.morc uses |
---|
| 61 | 'dedd.F'). |
---|
| 62 | |
---|
| 63 | >>> Changed the latter, so that users can switch from one to the other |
---|
| 64 | - modified swr.F.toon to become swr_toon.F (and to include gfluxv.F) |
---|
| 65 | - modified swr.F.morc to become swr_fouquart.F (and to include dedd.F) |
---|
| 66 | - added a flag in callkeys.h, swrtype (parameter to be set/changed by |
---|
| 67 | the user 1=Fouquart and 2=Toon) |
---|
| 68 | - update readtesassim so that the coefficient by which opacity |
---|
| 69 | is multiplied is set according to the 'swrtype' parameter |
---|
| 70 | |
---|
| 71 | == 25/09/08 == |
---|
| 72 | >>> Implement the use of tracer-by-name in physics |
---|
| 73 | - in phymars/tracer.h set 'noms' length to 20 (instead of 10) |
---|
| 74 | - in phymars/callsedim2q.F and phymars/callsedim.F, use tracers by name |
---|
| 75 | - in phymars/dustopacity.F, use tracers by name |
---|
| 76 | - in phymars/vdifc.F, use tracers by name |
---|
| 77 | |
---|
| 78 | == 26/09/08 == |
---|
| 79 | >>> Change implementation strategy (for now); don't move surface tracer around |
---|
| 80 | i.e.: surface ice remains equivalent to qsurf(nqmx)=qsurf(i_h2o_vap) |
---|
| 81 | and likewise for surface tendencies ... |
---|
| 82 | - modified vdifc.F and callsedim.F back |
---|
| 83 | - modified initracer.F (so that water names are h2o_vap & h2o_ice) |
---|
| 84 | |
---|
| 85 | == 29/09/08 == |
---|
| 86 | - modified aeronomars/init_chimie_B (cosmetics) |
---|
| 87 | - corrected aeronomars/moldiff.F internal routine tridag; changed |
---|
| 88 | "pause" error messages to 'stop' messages |
---|
| 89 | - modified phymars/watercloud.F to use tracers by name |
---|
| 90 | - corrected aeronomars/molvis.F (undefined 'fac' and 'Akk' written to |
---|
| 91 | output at first call) |
---|
| 92 | |
---|
| 93 | == 30/09/08 == |
---|
| 94 | - modified aeronomars/calchim.F to use tracers by name |
---|
| 95 | - adapted aeronomars/photochemist_B.F to use tracers by name |
---|
| 96 | - adapted aeronomars/chemtermos.F to use tracers by name |
---|
| 97 | - adapted aeronomars/concentrations.F to use tracers by name |
---|
| 98 | - corrected aeronomars/conduction.F (undefined 'Akk' written to output |
---|
| 99 | at first call) |
---|
| 100 | - adapted aeronomars/euvheat.F to use tracers by name |
---|
| 101 | - adapted aeronomars/moldiff.F and moldiffcoeff.F to use tracers by name |
---|
| 102 | |
---|
| 103 | == 01/10/08 == |
---|
| 104 | - For more compatibility with LMDZ4; mimic reading a 'traceur.def' file |
---|
| 105 | in the dynamics via a call to a routine 'iniadvtrac.F' and saving |
---|
| 106 | tracers names in 'advtrac.h' |
---|
| 107 | -> created 'iniadvtrac.F', 'advtrac.h' and modified gcm.F |
---|
| 108 | - modified 'dynetat0.F' so that tracers are loaded from 'start.nc' by name |
---|
| 109 | - modified 'dynredem.F' so that tracers are written to 'restart.nc' |
---|
| 110 | by name |
---|
| 111 | - modified 'initracer.F' tu use tracers by name |
---|
| 112 | |
---|
| 113 | == 02/10/08 == |
---|
| 114 | - removed use of 'nqchem_min' everywhere: |
---|
| 115 | adapted 'euvheat.F','inifis.F','physiq.F' |
---|
| 116 | (leave 'inichim.F' for later) |
---|
| 117 | - updated 'phyetat0' and 'physdem1.F' to read/write surface tracers by name |
---|
| 118 | - modify things so that surface water ice index is the same as |
---|
| 119 | atmospheric water ice (except when running without water ice; then |
---|
| 120 | simply set i_h2o_ice=i_h2o_vap). |
---|
| 121 | NB: the easiest is to have global storage of tracer names/indexes in |
---|
| 122 | tracer.h |
---|
| 123 | => changed initracer.F & tracer.h to have global igcm_something indexes |
---|
| 124 | |
---|
| 125 | == 03/10/08 == |
---|
| 126 | - adaptations for surface ice index, modified files: |
---|
| 127 | phyetat0.F : if there is a dynamical tracer 'h2o_vap' then load |
---|
| 128 | surface tracer called 'h2o_ice' instead |
---|
| 129 | initracer.F : in 'old' tracer name case: move qsurf(nqmx)->qsurf(nqmx-1) |
---|
| 130 | and set i_h2o_ice=i_h2o_vap if iceparty=.false. |
---|
| 131 | physdem1.F : if old tracer names: move qsurf(nqmx-1)->qsurf(nqmx) |
---|
| 132 | if iceparty=.false., write surface tracer 'h2o_ice' |
---|
| 133 | (and not 'h2o_vap') to file. |
---|
| 134 | adapted vdifc.F, callsedim.F & watercloud.F & physiq.F so that surface |
---|
| 135 | ice is now identified as qsurf(i_h2o_ice) |
---|
| 136 | - updated aeronomars/perosat.F (cosmetics) |
---|
| 137 | |
---|
| 138 | == 06/10/08 == |
---|
| 139 | - modify newstart.F and lect_start_archive.F to use tracers by name |
---|
| 140 | == 07/10/08 == |
---|
| 141 | - adapted inichim_newstart.F (added qsurf to arguments) |
---|
| 142 | and inichim_readcallphys.F |
---|
| 143 | == 08/10/08 == |
---|
| 144 | - implement reading traceur.def in dyn3d/iniadvtrac.F |
---|
| 145 | |
---|
| 146 | == 16/10/08== |
---|
| 147 | -small change in inifis.F (only warn if too many tracers, compared |
---|
| 148 | to the expected number, not stop). |
---|
| 149 | - corrected bug in initracer.F |
---|
| 150 | == 21/10/08 == |
---|
| 151 | - modified newstart.F to load B.Diez subsurface ice maps. |
---|
| 152 | - corrected small bug (uninitialized variable) in interp_horiz.F |
---|
| 153 | == 22/10/08 == |
---|
| 154 | - updated iniwritediagsoil.F so that thermal inertia is written to |
---|
| 155 | diagsoil.nc |
---|
| 156 | == 31/10/08 == |
---|
| 157 | - changed xvik.F program so it works even if we don't have atmospheric |
---|
| 158 | temperature at hand (then it uses a 10km reference scale height) and so |
---|
| 159 | that it does surface pressure interpolation log-wise. |
---|
| 160 | == 03/11/08 == |
---|
| 161 | - modified physiq to compute (and output) co2 column. |
---|
| 162 | - added improvement by Francois in newcondens.F about computing CO2 |
---|
| 163 | partial pressure. This behavior is turned on by setting internal logical |
---|
| 164 | flag 'improved_ztcond' to '.true.' (and running with a co2 tracer) |
---|
| 165 | - updated 'start2archive' to work with 'new' gcm output (soil, tracers ...) |
---|
| 166 | == 04/11/08 == |
---|
| 167 | - upgraded xvik program to look for temperature in 7th layer variable if |
---|
| 168 | there is no global atmospheric temperature field at hand. |
---|
| 169 | == 05/11/08 == |
---|
| 170 | - more modifs to newcondens.F: added another internal flag 'bound_qco2' to |
---|
| 171 | enforce (if set to .true.) that co2 mass mixing ratio remains bounded. |
---|
| 172 | == 07/11/08 == |
---|
| 173 | - corrected 'writediagfi' & 'writediagsoil' so that an error message is |
---|
| 174 | issued if called with a variable name which is too long. |
---|
| 175 | == 18/12/08 == |
---|
| 176 | - corrected bug in dyn3d 'addfi.F', (dimensions of local array p()) |
---|
| 177 | == 23/02/09 == |
---|
| 178 | - modified "aeronomars/param_read.F" to do strictly fortran data |
---|
| 179 | initialization (otherwise xlf compiler complains) |
---|
| 180 | - changed a few '1.e-30' to '1.d-30' in aeronomars/photochemist_B.F |
---|
| 181 | so that max functions has 2 doubles as arguments (otherwise xlf |
---|
| 182 | compiler complains) |
---|
| 183 | |
---|
| 184 | ==07/04/09 == |
---|
| 185 | -cosmetic changes/minor improvements in the handling of tracers in: |
---|
| 186 | aeronomars/photochemist_B.F |
---|
| 187 | aeronomars/perosat.F |
---|
| 188 | aeronomoars/euvheat.F |
---|
| 189 | aeronomars/moldiffcoeff.F |
---|
| 190 | aeronomars/moldiff.F |
---|
| 191 | aeronomars/cocentrations.F |
---|
| 192 | aeronomars/chemtermos.F |
---|
| 193 | aeronomars/calchim.F |
---|
| 194 | |
---|
| 195 | --> NB: still there are differences in outputs when order of tracers is changed |
---|
| 196 | |
---|
| 197 | == 09/04/09 == |
---|
| 198 | >>> fixed problem in 'vdifc.F' which lead to different results when moving |
---|
| 199 | tracers around. |
---|
| 200 | |
---|
| 201 | == 10/04/09 == |
---|
| 202 | >>> corrected small bug in diagnostic outputs of 'watercloud.F' (tendencies were |
---|
| 203 | not added to tracer values). |
---|
| 204 | |
---|
| 205 | == 21/04/09 == |
---|
| 206 | >>> corrected small bug in "physdem1.F" about writing water ice surface tracer |
---|
| 207 | to file |
---|
| 208 | |
---|
| 209 | == 07/05/09 == |
---|
| 210 | >>> very minor correction (firstcall not set to true after first call |
---|
| 211 | if no tracers) in convadj.F |
---|
| 212 | |
---|
| 213 | == 30/06/09 == |
---|
| 214 | >>> Implement reading *def files with IOIPSL ersatz 'getin' function |
---|
| 215 | - import "ioipsl_errioipsl.F90","ioipsl_getincom.F90","ioipsl_stringop.F90" |
---|
| 216 | in bibio |
---|
| 217 | - adapted 'dyn3d/defrun_new.F' to use "getin" function |
---|
| 218 | - adapted 'phymars/inifis.F' to use "getin" function |
---|
| 219 | |
---|
| 220 | == 01/07/09 == |
---|
| 221 | >>> Adapted 'create_make_gcm' so that the "use" in *.F files is identified and |
---|
| 222 | corresponding dependencies included in the makefile rules. |
---|
| 223 | |
---|
| 224 | >>> Added the 3D scattering from aerosols by JB Madeleine: |
---|
| 225 | - minor changes in aerave.F |
---|
| 226 | - added the calls to aeropacity.F, and aeroptproperties.F in callradite.F |
---|
| 227 | - changed the calls to lwu.F and swr.F in lwmain.F and swmain.F, respectively |
---|
| 228 | - added 3D scattering properties in lwu.F and swr.F |
---|
| 229 | - added the new aeroptproperties.F, aeropacity.F and suaer.F90 routines |
---|
| 230 | (removed dustopacity.F) |
---|
| 231 | - updated aeropacity.F with new tracer names |
---|
| 232 | - changed the call to callradite.F in physiq.F, added the initialization |
---|
| 233 | of reffrad and nueffrad (aerosol effective radius and variance) |
---|
| 234 | - removed all the lines relative to the old "activice" option, including |
---|
| 235 | temperature variation due to latent heat release (now in comments) |
---|
| 236 | - renamed nsize into naersize in watercloud.F, watersat.F and newsedim.F, |
---|
| 237 | to avoid conflicts with another "nsize" variable in the radiative transfer |
---|
| 238 | - added the statement of nuice in watercloud.F, which is the effective variance |
---|
| 239 | of the log-normal distribution for ice |
---|
| 240 | - updated yomaer.h and removed aerice.h (and corresponding "includes") |
---|
| 241 | |
---|
| 242 | == 02/07/09 == |
---|
| 243 | >>> Adapted 'aeronomars/inichim_readcallphys.F' (called by newstart) |
---|
| 244 | to use "getin" routine. |
---|
| 245 | + minor correction in 'inifis.F' (close 'iradia.def' file) |
---|
| 246 | >>> Minor correction in 'dyn3d/dynetat0.F' and 'phymars/phyetat0.F'; do not |
---|
| 247 | attempt to reindex tracers if none were found. |
---|
| 248 | |
---|
| 249 | >>> in 'deftank' added examples of 'traceur.def' files (traceur.def.co2 : 1 |
---|
| 250 | co2 tracer; traceur.def.watercycle : 2 traceurs, water vapour and water ice |
---|
| 251 | tracer.def.chemistry : all 15 species) |
---|
| 252 | |
---|
| 253 | == 06/07/09 == |
---|
| 254 | >>> Modified 'makegcm' and makegcm_g95' so that modules files are put |
---|
| 255 | with libraries (and not in current directory) |
---|
[426] | 256 | |
---|
| 257 | == |
---|
| 258 | == WORK FOR GENERIC MODEL STARTS HERE |
---|
| 259 | == |
---|
[135] | 260 | |
---|
| 261 | == 01/08/09 == |
---|
| 262 | >>> Old Martian radiative transfer removed completely, new correlated-k |
---|
| 263 | scheme implemented in its place. Central function is callcorrk.F. |
---|
| 264 | Radiative properties are no longer stored in dimradmars.h, but in the two |
---|
| 265 | files radinc_h.F90 and radcommon_h.F90. 3D aerosol scheme |
---|
| 266 | incorporated into callcorrk.F. dustopacity.F renamed aeropacity.F |
---|
| 267 | and substantially simplified. For now the option to include dust |
---|
| 268 | as an aerosol has been removed. |
---|
| 269 | |
---|
| 270 | >>> newcondense.F replaced by condense_co2cloud.F90. This is basically |
---|
| 271 | Francois' routine from the old model, adapted to work with the new |
---|
| 272 | generalised tracer scheme. |
---|
| 273 | |
---|
| 274 | >>> Options added in physiq.F and tabfi.F to allow for planets with |
---|
| 275 | varying orbital parameters, radii, gravity etc. For the moment we |
---|
| 276 | select the planet using the variable 'planettype' in |
---|
| 277 | callphys.def. This could probably be improved in the future. |
---|
| 278 | |
---|
| 279 | >>> Many new options added to callphys.def. |
---|
| 280 | |
---|
| 281 | |
---|
| 282 | |
---|
| 283 | |
---|
| 284 | |
---|
| 285 | == 25/11/2009 == |
---|
| 286 | >>>> List of changes and modifications |
---|
| 287 | - modified watercloud.F: added sanity check (i.e. do we have a water tracer?) |
---|
| 288 | - modified dyn3d/dynetat0.F --> removed possibility of reindexing tracers |
---|
| 289 | - modified phyetat0.F --> removed possibility of reindexing tracers |
---|
| 290 | |
---|
| 291 | -- removed using a "co2ice" array to store surface CO2 ice |
---|
| 292 | -> adapted surfini.F & physiq.F to use qsurf(:,igcm_co2_ice) |
---|
| 293 | instead of co2ice(:) |
---|
| 294 | -> modified initracer.F & tracer.h to properly initialize (and store) |
---|
| 295 | a "co2_ice" tracer. |
---|
| 296 | -> removed 'co2ice' from vdifc.F (it was not used there anyway) |
---|
| 297 | and from phsdem1.F |
---|
| 298 | -> removed possibility of calling 'newcondens' from physiq.F |
---|
| 299 | -> cleaned up newstart.F, lect_start_archive.F, start2archive.F to not use |
---|
| 300 | "co2ice" field but qsurf(igcm_co2_ice) |
---|
| 301 | |
---|
| 302 | -- adapted 'create_make_gcm' and 'makegcm' scripts so that we don't need |
---|
| 303 | to have and (unused) 'aeronomars' directory around. |
---|
| 304 | |
---|
| 305 | -- shifted to reading traceur.def (dyn3d/iniadvtrac.F) in an Earth-LMDZ4-like |
---|
| 306 | fashion: |
---|
| 307 | first line == number of tracers |
---|
| 308 | and then tracer name (1 per line; later we'll also add advection scheme type) |
---|
| 309 | -- NOTE BY RW: Here would be a good place to also note which tracer (if any) is |
---|
| 310 | the 'variable gas' in the radiative transfer |
---|
| 311 | |
---|
| 312 | -- Made some changes in tabfi.F to let user change planet parameters |
---|
| 313 | such as rotation rate, molar mass of atmosphere, ... |
---|
| 314 | (NB: note however that we seem to lose dynamics/physics coherence ... |
---|
| 315 | we should probably read these values from a planet.def file) |
---|
| 316 | |
---|
| 317 | -- Changed condens_co2cloud.F : added a check for presence of CO2 gas and output |
---|
| 318 | of corresponding tendency. |
---|
| 319 | |
---|
| 320 | |
---|
| 321 | == 15/12/2009 == |
---|
| 322 | >>> Correlated-k radiative transfer now reads spectral bands and p-T |
---|
| 323 | matrix values from ascii files; the code checks that the number of |
---|
| 324 | bands and matrix elements in the files match those written in |
---|
| 325 | radinc.F90 on the first call. |
---|
| 326 | |
---|
| 327 | >>> Water vapour tracer coupled to variable gas species in radiative |
---|
| 328 | transfer; option also given to run with fixed relative humidity |
---|
| 329 | profiles. 'Variable gas species' option added to callphys.def. |
---|
| 330 | |
---|
| 331 | >>> Surface albedo updated to be one band everywhere. |
---|
| 332 | |
---|
| 333 | >>> suaer_corrk.F90 modified to use different ep, omeg, g variables in |
---|
| 334 | the visible and infrared. This is necessary because the number of |
---|
| 335 | bands is, in general, different. |
---|
| 336 | |
---|
| 337 | >>> suaer_corrk.F90 has an option to accept Francois' new CO2 ice |
---|
| 338 | values (and convert wvl to metres!!). |
---|
| 339 | |
---|
| 340 | >>> optci.F --> optci.F90 so that water vapour continuum subroutine |
---|
| 341 | can be included. |
---|
| 342 | |
---|
| 343 | == 08/01/10 == |
---|
| 344 | >>> Option to change pref for hybrid coordinates added to newstart.F. |
---|
| 345 | |
---|
| 346 | |
---|
| 347 | == 15/01/2010 == |
---|
| 348 | >>> Upgraded newstart.F: added possibility to reset refrence surface pressure |
---|
| 349 | "preff" (and pa) |
---|
| 350 | >>> tabfi.F: added possibility of changing value of "year_day" |
---|
| 351 | >>> cosmetic change in callphys.def : separate "universal" parameters |
---|
| 352 | and planet-specific parameters (in a separate file, e.g. earlymars.def) |
---|
| 353 | |
---|
| 354 | == 22/01/2010 == |
---|
| 355 | ==> call this version LMDZ.GENERIC |
---|
| 356 | >>> Some cleanup & upgrades: |
---|
| 357 | -- split parameters in callphys.def into generic stuff (stays in callphys.def) |
---|
| 358 | and another more specific file (e.g. earlymars.def). |
---|
| 359 | -- added 'output_olr' key (in callkeys.h; read in physiq.F) to trigger |
---|
| 360 | output of fluxes in ascii file 'olr.txt' |
---|
| 361 | -- removed (non-generic) 'kastprof' and 'nearcond' keys/options in physiq.F |
---|
| 362 | (also removed file kastprof_fn.F) |
---|
| 363 | -- had to set 'fixh2ovap =.false. in callcorrk.F to avoid |
---|
| 364 | "out of range subscript" pb in callcorrk.F |
---|
| 365 | ==> this should be improved / better controlled in the future |
---|
| 366 | -- updated newsedim.F to use "molrad, visc, avogado values from comcstfi.h |
---|
| 367 | (and not local versions of these constants) |
---|
| 368 | -- fixed buggy -O option in makegcm (and makegcm_g95); |
---|
| 369 | |
---|
| 370 | == 22/02/2010 == |
---|
| 371 | ==> call this version LMDZ.GENERIC.v0.31 |
---|
| 372 | -- rain.F, manabe.F and largescale.F subroutines added to water cycle |
---|
| 373 | -- several new toggles added to earlymars.def |
---|
| 374 | |
---|
| 375 | == 28/03/2010 == |
---|
| 376 | ==> call this version LMDZ.GENERIC.v0.4 |
---|
| 377 | -- many changes for this version! |
---|
| 378 | -- radiative transfer -- |
---|
| 379 | A new system was implemented that automatically reads the p, T, g, |
---|
| 380 | Q and band values from files. The dataset required is now specified |
---|
| 381 | in callphys.def. We still need to edit radinc_h when the corrk array |
---|
| 382 | sizes change - think about improving this in the future. |
---|
| 383 | -- water cycle -- |
---|
| 384 | A watercommon_h mod file was created, several files were renamed |
---|
| 385 | and moist convection and precipitation subroutines were added. |
---|
| 386 | Still needs some testing! |
---|
| 387 | -- OLR -- |
---|
| 388 | Two new functions were added: one to produce .nc files of the OLR |
---|
| 389 | by band, and the other to save the upgoing radiation by band in 1D |
---|
| 390 | as a .txt file. |
---|
| 391 | -- general structure -- |
---|
| 392 | tabfi.F, newstart.F etc. cleaned up + it was checked that they pass |
---|
| 393 | variables correctly. Several new options added to run.def for 1D, |
---|
| 394 | in order to allow truly arbitrary planet simulations. The |
---|
| 395 | 'planettype' option has been removed as it screwed things up completely. |
---|
| 396 | -- energy conservation -- |
---|
| 397 | I found that the planckir function in the radiative transfer did not |
---|
| 398 | always produce values that summed to sigma T^4. A new test was implemented |
---|
| 399 | to check for this problem and the standard band widths in the IR |
---|
| 400 | were increased. |
---|
| 401 | |
---|
| 402 | == 31/03/2010 == |
---|
[253] | 403 | ==> call this version LMDZ.GENERIC.v0.5 |
---|
[135] | 404 | -- OLR -- |
---|
| 405 | The .nc functions were implemented and tested. It was necessary to add |
---|
| 406 | new functions 'writediagspec.F' and 'iniwrite_spec.F'. |
---|
| 407 | -- CO2 condensation -- |
---|
| 408 | In 1D we now exit automatically if CO2 is condensing on the |
---|
| 409 | surface. |
---|
| 410 | -- G1D -- |
---|
| 411 | We can now choose at the beginning of physiq.F, using saveG1D, how |
---|
| 412 | many times we want to save per day in 1D (rather than every single |
---|
| 413 | time that physiq is called). |
---|
| 414 | -- water cycle -- |
---|
| 415 | I corrected a nasty bug in callcorrk involving varfixed, real*8 and |
---|
| 416 | epsi. I corrected a simple bug in the writing of qsurf in g1d.dat. |
---|
| 417 | rain.F has been tested and the algorithm for precipitation evaporation |
---|
| 418 | modified to that written in the manual of Larent Li. Cloud fraction |
---|
| 419 | variable is now included. activice and iceparty are gone, ~replaced |
---|
| 420 | by watercond and waterrain. |
---|
| 421 | -- orbit -- |
---|
| 422 | nres and tlocked were added as basic options to callphys.def |
---|
| 423 | -- radiative transfer -- |
---|
| 424 | I added error checking for out-of-bounds temperature in |
---|
| 425 | callcorrk.F. I added a new file calc_rayleigh.F90 to calculate |
---|
| 426 | Rayleigh scattering using a weighted mean, as opposed to simply the |
---|
| 427 | midpoint band values. Band discretisation is now even more |
---|
| 428 | automated than before: the coefficients are stored in directories |
---|
| 429 | like /earth/32x36/, and we can compile the GCM like this: |
---|
| 430 | makegcm -d 32x24x20 -b 32x36 -p std gcm. |
---|
| 431 | A bug was fixed involving emissivity not being properly passed from |
---|
| 432 | newstart.e to the main part of the code. |
---|
| 433 | Stellar spectra are now calculated automatically for any range of |
---|
| 434 | bands from high resolution data (originally from the VPL website). |
---|
| 435 | -- vertical discretisation -- |
---|
| 436 | I corrected a bug in testphys1d that used a fixed value of |
---|
| 437 | temperature to compute the altitude levels in the model. Now we use |
---|
| 438 | the scale height from z2sig.def instead. Values of preff and pa are |
---|
| 439 | no longer defined in testphys1d (they're not needed). |
---|
| 440 | -- Non-ideal gases -- |
---|
| 441 | I have replaced cpp in many places with cpp_3D in physiq. This is a |
---|
| 442 | major change, but there are enough cases where it will be useful to |
---|
| 443 | make it worthwhile in the universal code. I have done the same with rcp. |
---|
[253] | 444 | |
---|
| 445 | == 10/10/2010 == |
---|
| 446 | ==> call this version LMDZ.GENERIC.v0.6 |
---|
| 447 | -- startup -- |
---|
| 448 | We now check water tracers exist in newstart.F before all watery initialisation options. |
---|
| 449 | Added an option 'autozlevs' to run.def (and logic.h). When true this recalculates the scale |
---|
| 450 | height in z2sig.def in order to get the same minimum pressure for any resolution. |
---|
| 451 | Currently, this is only useful for one-d simulations. |
---|
| 452 | Pressure is now distributed better in newstart.F. There was a bug before when the global mean of phi |
---|
| 453 | was not equal to zero and the surface pressure was changed with topography still present. |
---|
| 454 | In initracer, we no longer automatically set h2o_vap=h2o_ice. |
---|
| 455 | |
---|
| 456 | -- general -- |
---|
| 457 | periheli, apheli --> periastr, apoastr. Note this necessitates a change in start_planet too. |
---|
| 458 | testphys1d.F --> rcm1d.F |
---|
| 459 | physiq.F, callcorrk.F upgraded to Fortran 90 to remove evil zerophys. |
---|
| 460 | I cleaned up the method of displaying energy balance and temperature range in the model a bit. |
---|
| 461 | Pure H2 atmospheres are now permitted, although the code is _untested_. Rayleigh scattering, |
---|
| 462 | specific heat capacities and molar masses are varied, and the H2-H2 collision-induced data |
---|
| 463 | of Grushka et al. is used for the radiative transfer. |
---|
| 464 | |
---|
| 465 | -- boundary layer -- |
---|
| 466 | An improved version of vdifc.F has been created that includes the latent heat effect of water vapor, |
---|
| 467 | following the method used in 'clmain' in the LMDZ terrestrial model. |
---|
| 468 | |
---|
| 469 | -- water cycle -- |
---|
| 470 | Benjamin's improvements have been added, namely the hydrology, and reevaporation. |
---|
| 471 | Variable cloud fractions are allowed, or a global fixed value may be chosen |
---|
| 472 | for use in aeropacity. Surface wetness (beta) is now calculated in a simple way, and |
---|
| 473 | outputed as a diagnostic, along with the atmospheric relative humidity. |
---|
| 474 | |
---|
| 475 | mol/mol to kg/kg bug in callcorrk corrected. |
---|
| 476 | |
---|
| 477 | -- radiative transfer -- |
---|
| 478 | A major bug in gfluxv.F was corrected. It involved BSURF, the radiation reflected upwards from |
---|
| 479 | the ground. |
---|
| 480 | In aeropacity, we now set the cloud opacity in the top layer of the atmosphere to zero. This solves |
---|
| 481 | an instability problem that was occurring when CO2 clouds formed. |
---|
| 482 | Dust is back! Only fixed profiles allowed for now. It is assigned "naerkind=3" in aeropacity.F90. |
---|
| 483 | If 'CLFvarying' is enabled, the corrk subroutine is now called twice per timestep - once for clear |
---|
| 484 | skies and once for cloudy. This slows things down but is effective for Earth-like simulations. |
---|
| 485 | An optional Newtonian cooling scheme has been implemented that can replace the correlated-k method |
---|
| 486 | for dynamical tests etc. It is pretty experimental and has not been extensively tested. |
---|
| 487 | |
---|
| 488 | -- Dynamics -- |
---|
| 489 | callgroupeun in gcm.F has been set to FALSE, as it does not conserve tracers. |
---|
| 490 | The coefficient facup has been set to 1 in inidissip.F. We may need to mess |
---|
| 491 | with this later if it makes the model too unstable. |
---|
| 492 | |
---|
| 493 | == 1/08/2011 == |
---|
| 494 | ==> call this version LMDZ.GENERIC.v0.7 |
---|
| 495 | |
---|
| 496 | Main change: a new file 'gases.def' now required at startup. This tells us which gases are in |
---|
| 497 | the planet's atmosphere. It is used to calculate fundamental quantities like cpp and mugaz. |
---|
| 498 | A check is made against the radiative transfer data to make sure they correspond. |
---|
| 499 | |
---|
| 500 | Code has been tested successfully using the 'gfortran compiler'. |
---|
| 501 | |
---|
| 502 | -- startup -- |
---|
| 503 | a bug involving tsoil interpolation in lect_start_archive.F was corrected. |
---|
| 504 | |
---|
| 505 | -- aerosols -- |
---|
| 506 | gauss integration number 5-->10 in aeroptproperties.F90 |
---|
| 507 | |
---|
| 508 | -- water cycle -- |
---|
| 509 | Big fat bug in rain.F90 corrected. The routine internally updated the temperature |
---|
| 510 | with new tendencies before it was supposed to happen! |
---|
| 511 | Bug in oborealis where phi not properly updated was corrected. |
---|
| 512 | Improvements to hydrol.F90: zdtsurf_hyd --> pdtsurf_hyd |
---|
| 513 | A 'sourceevol' option was added (accessed in callphys.def) that allows us to track the |
---|
| 514 | evolution of the surface distribution over time. |
---|
| 515 | Another bug in rain corrected involving evaporation - it was heating the atmosphere |
---|
| 516 | rather than cooling it... |
---|
| 517 | |
---|
| 518 | -- convection -- |
---|
| 519 | I found a bug in convadj.F that breaks tracer conservation when convection stops at one layer |
---|
| 520 | and immediately restarts in the next one. |
---|
| 521 | |
---|
| 522 | -- diagnostics -- |
---|
| 523 | Some bugs corrected in the computation of 3D averages for the H2O / energy conservation |
---|
| 524 | diagnostics. |
---|
| 525 | |
---|
| 526 | -- radiative transfer -- |
---|
| 527 | A bug involving continuum opacities (variable DCONT) was corrected in optci.F90 and optcv.F0. |
---|
| 528 | H2-H2 warming now in theory reliable and correct (60-1000 K). |
---|
| 529 | A bug involving the definition of the Planck function boundaries was corrected in sfluxi.F90 |
---|
| 530 | and gfluxi.F. |
---|
[323] | 531 | |
---|
| 532 | == 21/10/2011 == EM |
---|
| 533 | - added FF's upgrade of writediagfi. Now, if at runtime there is a diagfi.def |
---|
| 534 | file, it should contain the list of variables (1 per line) than will be put |
---|
| 535 | in the diagfi.nc file. If there is no diagfi.def file, then all variables |
---|
| 536 | are put in the diagfi.nc file (as was the case before). |
---|
[371] | 537 | |
---|
| 538 | === 10/11/2011 == EM |
---|
| 539 | - Updated the makegcm(s) so that default behaviour is to set LMDGCM env variable |
---|
| 540 | to be the directory in which the makegcm script is. Updated the makegcm_* |
---|
| 541 | to use "SOURCE" to identify code and be compatible with latest |
---|
| 542 | 'create_make_gcm'. |
---|
| 543 | |
---|
[374] | 544 | == 10/11/2011 == EM |
---|
| 545 | - Upgrade: The location of the 'datagcm' directory can now be given in the |
---|
| 546 | callphys.def file ( datadir = /absolute/path/to/datagcm ). Changed |
---|
| 547 | "datafile.h" into a F90 module "datafile_mod.F90" and spread this change |
---|
| 548 | to all routines that used to use "datafile.h". |
---|
[375] | 549 | |
---|
| 550 | == 10/11/2011 == EM |
---|
| 551 | - Upgrade of the 'create_make_gcm' script: objects are removed from the |
---|
| 552 | libraries before compilation, which enforces that the gcm will fail to |
---|
| 553 | compile if any routine failed to compile. |
---|
[470] | 554 | |
---|
| 555 | == 12/12/2011 == AS |
---|
| 556 | - Use of allocatable arrays to set corrk stuff through reading *.dat files, without the need to change radinc_h manually. |
---|
| 557 | - Allocation is done in sugas_corrk which is within firstcall loop in callcorrk. |
---|
| 558 | - Note that N_LGAUSS is still a parameter. It is not supposed to change much. |
---|
| 559 | - Compiles fine. Tested with debugging options through pgdbg. Runs fine. Exact same results in Early Mars test case. |
---|
| 560 | |
---|
| 561 | Modified files: |
---|
| 562 | M 469 libf/phystd/physiq.F90 |
---|
| 563 | M 469 libf/phystd/sugas_corrk.F90 |
---|
| 564 | M 469 libf/phystd/callcorrk.F90 |
---|
| 565 | M 469 libf/phystd/radinc_h.F90 |
---|
| 566 | M 469 libf/phystd/radcommon_h.F90 |
---|
[471] | 567 | |
---|
| 568 | == 13/12/2011 == AS |
---|
| 569 | - Same spirit as previous commit, but for ngasmx which is now read in gases.def -- before arrays w/ dim ngasmx are allocated dynamically |
---|
| 570 | - Allocation is done in su_gases.F90 which is called in inifis |
---|
| 571 | - Outside su_gases.F90, very few modifications to the code : the new module "gases_h.F90" simply replaces the old common "gases.h" ! |
---|
| 572 | - Compiles fine. Tested with debugging options through pgdbg. Runs fine. Exact same results in Early Mars test case. |
---|
[484] | 573 | |
---|
| 574 | == 20/12/2011 == JL + AS |
---|
| 575 | - Allocatable gastype in sugas_corrk instead of hardcoded (it was a problem for more than 4 gases!) |
---|
[527] | 576 | |
---|
| 577 | == 13/02/2012 == JL + AS |
---|
| 578 | - All outputs are now in netCDF format. Even in 1D (No more G1D) |
---|
| 579 | - Clean up of the call to callcorrk when CLFvarying=true |
---|
| 580 | - Corrects a bug in writediagspecIR/VI. Output are now in W/m2/cm-1 as a function of the wavenumber in cm-1 |
---|
| 581 | - Enable writediagspecIR/V to work in the CLFvarying=true case (output now done in Physiq after writediagfi) |
---|
| 582 | - Add a simple treatment for the supersaturation of CO2 (see forget et al 2012) |
---|
| 583 | - corrects a small bug when no clouds are present in aeropacity |
---|
| 584 | |
---|
[533] | 585 | == 16/02/2012 == JL + EM |
---|
| 586 | - Mesh area now present in 1d diag files. |
---|
| 587 | - Spectral Bandwidth included in the diagspec files |
---|
| 588 | - Correction of a initialzation bug on day_step and ecritphy in rcm1d |
---|
[527] | 589 | |
---|
[540] | 590 | == 17/02/2012 == RW |
---|
| 591 | - qsurf bug in variable species rad. tran. removed |
---|
| 592 | - line to update kappa in newstart.F added - necessary to synchronise dynamics and physics |
---|
| 593 | - three obsolete files removed from dyn3d/ directory |
---|
| 594 | - calc_cpp_mugaz --> check_cpp_mugaz, with override option in callphys.def |
---|
| 595 | - kcm1d no longer consistent with new code, but I haven't updated as I'm still working on it |
---|
| 596 | and as far as I know noone else uses it. If that changes let me know. |
---|
[543] | 597 | |
---|
| 598 | == 27/02/2012 == AS |
---|
| 599 | - Temperature grid for Planck calculations can now be refined through the parameter NTfac in radinc_h. |
---|
| 600 | Default is NTfac = 1.0D-1, i.e. Delta T = 0.1 K |
---|
[588] | 601 | |
---|
| 602 | == 16/03/2012 == JL |
---|
| 603 | - Removed cpp3D and nonideal stuff. |
---|
| 604 | |
---|
| 605 | == 19/03/2012 == EM |
---|
| 606 | Some cleanup and bug fixing: |
---|
| 607 | - "cloudfrac" was not well written to restartfi (wrong size). |
---|
| 608 | - missing save attribute for "reffrad" in physiq.F90. |
---|
| 609 | - cleanup recomputation of surface pressure in newstart and change loop order |
---|
| 610 | in interp_horiz (which "fixes" an odd behaviour which fills some arrays with |
---|
| 611 | zeros, but only when using some versions of ifort!) |
---|
[589] | 612 | |
---|
| 613 | == 19/03/2012 == AS |
---|
| 614 | - Cleaned rcm1d.F and made it truly generic by asking for planetary constants without any default values. |
---|
| 615 | - Settings are now needed in a rcm1d.def file. Unbeknown to the user, we create a minimal run.def file, read parameters, then remove this dummy run.def. |
---|
| 616 | - Introduced a keyword force_cpp if the user wants to give values for cpp and mugaz in def files. |
---|
[590] | 617 | |
---|
| 618 | == 19/03/2012 == AS+FF |
---|
| 619 | - Introduced global1d in callcorrk so that global (using sza) or local (using latitude) 1D simulations can be carried out. |
---|
| 620 | - Converted all astronomical distances in AU instead of Mkm. |
---|
| 621 | - This might cause problems with old start files. So added a test in iniorbit. A quite dirty test, but that'll do the job. |
---|
[594] | 622 | |
---|
| 623 | == 22/03/2012 == JL |
---|
| 624 | - New turbulent diffusion scheme solving "most" energy conservation problems: |
---|
| 625 | - Turbulent energy created by buoyancy effects is now dissipated back into enthalpy |
---|
| 626 | - the scheme is now written in an enthalpy conservative way |
---|
| 627 | - Turbulent diffusion now treated in routine turbdiff (in F90). |
---|
| 628 | - Temporarily, for comparison, the old vdifc can be used |
---|
| 629 | by setting UseTurbDiff=.false. in physiq.F90 |
---|
| 630 | - The sensible heat flux is now an output |
---|
[595] | 631 | - Corrected evaporation at the surface when all the surface water is evaporated (JL+BC). |
---|
| 632 | - Added new energy conservation diagnostic variables and output |
---|
[594] | 633 | |
---|
[596] | 634 | == 26/03/2012 == JL |
---|
| 635 | - Added double gray case (if graybody=true in callphys.def): |
---|
| 636 | - opacities are set to a constant value in sugas_corrk. |
---|
| 637 | - the values are kappa_IR m^2/kg in the infrared (to be read in callphys.def) |
---|
| 638 | kappa_VI m^2/kg in the visible (to be read in callphys.def) |
---|
| 639 | - Cleaned continuum part in optc* |
---|
| 640 | - Added .def files for a typical 1d earth case in deftank (dry case for the moment) |
---|
[597] | 641 | - Corrects a bug on potential temperature calculation in physic |
---|
[600] | 642 | |
---|
| 643 | == 27/03/2012 == JL |
---|
| 644 | - Corrects the computation of planck function at the surface in sfluxi |
---|
| 645 | so that its integral is equal to sigma Tsurf^4. |
---|
| 646 | - This ensure that no flux is lost due to: |
---|
| 647 | -truncation of the planck function at high/low wavenumber |
---|
| 648 | -numerical error during first spectral computation of the planck function |
---|
| 649 | -discrepancy between Tsurf and NTS/NTfac in sfluxi |
---|
| 650 | - OLR now equal to LW net heating/cooling at equilibrium! |
---|
| 651 | - As much as possible, only the value of the stephan boltzmann constant defined in racommon_h (and the |
---|
| 652 | corresponding variable, sigma) should be used. Now done in physics, vdifc and turbdiff. |
---|
| 653 | |
---|
[622] | 654 | == 16/04/2012 == JL |
---|
| 655 | - Added consistency checks for calculations including water and global1d+diurnal. |
---|
[649] | 656 | - Corrected small bugs in precipitation scheme |
---|
[622] | 657 | |
---|
[649] | 658 | == 04/05/2012 == JL |
---|
| 659 | - Correction a huge bug in newstart: rcp and cpp can now be changed in start.nc files and are the same as in startfi.nc; |
---|
| 660 | Even when starting from start and startfi files. |
---|
| 661 | - rcp, cpp and mugaz can now be computed using gases.def in newstart |
---|
| 662 | - Correction of a bug arising in gcm.F when the solar days are long (thanks Melanie V.) |
---|
[650] | 663 | - Corrected the temperature used to differentiate sublimation and evaporation in watersat_grad |
---|
| 664 | - Minor name changes in watercommon |
---|
| 665 | - Better physical parametrization of the effective radius of liquid and icy water cloud particles in callcorrk |
---|
| 666 | (for radfixed=true) |
---|
| 667 | - Added consistency check in inifis |
---|
| 668 | - Moved 1d water initialization from physiqu to rcm1d |
---|
[651] | 669 | - All enertests in physiq written in a matricial (F90) way. The rest of physiqu should follow soon |
---|
[671] | 670 | |
---|
| 671 | == 25/05/2012 == EM |
---|
| 672 | - Significant update on how the number of scatterers is managed: |
---|
| 673 | Instead of having to manualy change 'nearkind' in radinc_h.F90, the |
---|
| 674 | number of scatterers must now be set when compiling, using makegcm |
---|
| 675 | "makegcm -s 1" for one scatterer or "makegcm -s 2" for two (e.g. dust |
---|
| 676 | and water ice), default behaviour (ie not specifying -s #) is -s 1 |
---|
| 677 | Modified phystd/radinc_h.F90 , added directory phystd/scatterers |
---|
| 678 | with script make_scatterers , and adapted makegcm* scripts. |
---|
[699] | 679 | |
---|
| 680 | == 06/06/2012 == EM |
---|
| 681 | - Corrected the polar mesh surface area which was wrong in the physics (changes |
---|
| 682 | in phyetat0.F, calfis.F and newstart.F) |
---|
| 683 | - Some cleanup in newstart.F (removed some obsolete "Mars" options: mons_ice,..) |
---|
| 684 | and also added option "q=profile" to initialize a tracer with a profile |
---|
| 685 | read from file "profile_tracername" |
---|