Lines of Code
[root]/trunk/libf/dyn3d_common
| Author | Changes | Lines of Code | Lines per Change |
|---|---|---|---|
| Totals | 375 (100.0%) | 24923 (100.0%) | 66.4 |
| lguez | 148 (39.5%) | 21144 (84.8%) | 142.8 |
| emillour | 182 (48.5%) | 2103 (8.4%) | 11.5 |
| dcugnet | 27 (7.2%) | 705 (2.8%) | 26.1 |
| crisi | 2 (0.5%) | 472 (1.9%) | 236.0 |
| fhourdin | 6 (1.6%) | 199 (0.8%) | 33.1 |
| acozic | 8 (2.1%) | 129 (0.5%) | 16.1 |
| jyg | 1 (0.3%) | 88 (0.4%) | 88.0 |
| oboucher | 1 (0.3%) | 83 (0.3%) | 83.0 |
Further convergence with planetary models:
- move vertical_layers_mod.F90 to phy_common and call init_vertical_layers in inigeomphy_mod
- add aps and bps (mid-layer coordinates) to vertical_layers_mod.F90
- same adaptations for the 1D case
EM
6 lines of code changed in 1 file:
Adding a module for stratospheric aerosols with a bin scheme.
The module gets activated with -strataer true compiling option.
May not quite work yet, more testing needed, but should not affect
the rest of LMDz as everything is under a CPP_StratAer key.
83 lines of code changed in 1 file:
Some code tidying: turn ener.h into ener_mod.F90
EM
18 lines of code changed in 11 files:
Cleanup in the dynamics: turn logic.h into module logic_mod.F90
EM
17 lines of code changed in 23 files:
Missing usage of comvert_mod in lmdzd1d since the creation of the former (r2600).
EM+MPL
4 lines of code changed in 1 file:
Cleanup in the dynamics: turn temps.h into module temps_mod.F90
EM
9 lines of code changed in 10 files:
Cleanup in the dynamics: turn comvert.h into module comvert_mod.F90
EM
138 lines of code changed in 35 files:
Cleanup in the dynamics: turn serre.h into module serre_mod.F90
EM
24 lines of code changed in 17 files:
Cleanup in the dynamics: get rid of comconst.h, make it a module comconst_mod.
EM
164 lines of code changed in 41 files:
correct a bug / hadv_inca and vadv_inca need to be defined even when we don't use inca model
3 lines of code changed in 1 file:
Now h2o tracer will be read in traceur.def even for inca configuration
71 lines of code changed in 1 file:
ngroup passe du statut de paramètre à constante.
Pour pouvoir l'ajuster en fonction de la resolution
ngroup est maintenant lu dans les .def. ngroup=3 par défaut
ngroup changed from parameter to constant
2 lines of code changed in 1 file:
Fix some minor anomalies spotted by the xlf compiler:
- infotrac : wrongly giving integer values to logicals
- surf_ocean_mod and yamada_c : should be a space between "stop" and message; but avoid using stop, use abort_physic routine instead.
- readchlorophyll: using isnan() is not standard; compare the variable to itself instead (will return .false. if NaN).
While at it, also added some missing "only" clauses when using modules.
EM
6 lines of code changed in 1 file:
Change call to inca initialisation to fit with new sections dynamique/physic
28 lines of code changed in 1 file:
several correction to use LMDZ coupled with INCA
1- add an "use" in gcm to define "klon_glo" variable
2- correct an error on a test in infotrac
3- add parents to inca's tracer in infotrac
4- change calendar name for "leap calendar" in wxios to fit with rev 2229 on gcm
8 lines of code changed in 1 file:
Fix a circular dependency introduced in previous commit: occurs when routines in phy_common use module print_control. Make them 'include "iniprint.h"' instead (not an ideal solution but will have to do for now), and therfore move iniprint.h to "misc" directory.
EM
0 lines of code changed in 1 file:
Follow-up for a cleaner separation between dynamics and physics:
- "write_field" is called from physics and dynamics but has no dependence on either so it should be in "misc"
- "write_field_phy" is common to all physics, so it goes in "phy_common"
- "init_ssrf_m" and "limit_netcdf" are only used by ce0l, so these should be in "dynlonlat_phylonlat/phylmd"
- "q_sat" is called from physics and dynamics but has no dependence on either so it should be in "misc"
EM
0 lines of code changed in 2 files:
* Add parallel capability for ce0l.
* Small bug in grid_noro fixed (smoothed topography was used instead of unsmoothed one for geopotential computation at north pole).
* Removed average of mass at poles in etat0dyn_netcdf after start_init_dyn => different results in the zoomed grid case.
* ok_etat0=n and ok_limit=y combination now works fine (if no initial state is needed, but only limit.nc file). This required:
- to move grid_noro0 and start_init_noro0 subroutines from etat0dyn_netcdf.F90 to limit_netcdf.F90
- to create init_ssrf_m.F90 file, so that sub-surfaces can be initialized from limit_netcdf.F90 without any etat0*_netcdf routines call).
* Simplified somehow the corresponding code, in particular:
1) removed obsolete flags "oldice".
2) removed flag "ibar": barycentric interpolation is used everywhere (except in start_init_subsurf, still calling grille_m - to be changed soon).
3) removed useless CPP_PHY precompilation directives, considering the possibility to run ce0l without physics is useless (ce0l is dedicated to Earth physics).
358 lines of code changed in 15 files:
Bug fix. maase, pbaru and pbarv cannot be intent(in) in caldyn0
because they are modified in caldyn0 (masse is computed by massdair
and pbaru, pbarv are computed by flumass). Also masse is already
computed in etat0dyn_netcdf, and the difference with the computation
in caldyn0 is the averaging at the poles. If we do not want to lose
this averaging, we should not overwrite masse with an output argument
from caldyn0. So the simplest thing to do is to downgrade masse from
argument to local variable of caldyn0. We also simply downgrade pbaru,
pbarv from arguments to local variables of caldyn0.
4 lines of code changed in 1 file:
Further modifications to enforce physics/dynamics separation:
- moved iniprint.h and misc_mod back to dyn3d_common, as these should only be used by dynamics.
- created print_control_mod in the physics to store flags prt_level, lunout, debug to be local to physics (should be used rather than iniprint.h)
- created abort_physic.F90 , which does the same job as abort_gcm() did, but should be used instead when in physics.
- reactivated inifis (turned it into a module, inifis_mod.F90) to initialize physical constants and print_control_mod flags.
EM
25 lines of code changed in 2 files:
Initial states creation routines have been reorganized and simplified.
As far as possible, dynamics and physics related routines have been
separated.
Some routines have been converted to fortran 90 and repeated codes sections
have been "factorized".
Array/vector arguments have become implicit in some routines to avoid usage
of "dimensions.h" ; possible for routines with explicit interfaces and if
iim and jjm can be deduced from arguments sizes.
* dynlonlat_phylonlat/ce0l.F90 calls now phylmd/etat0phys_netcdf.F90 and
dyn3d/etat0dyn_netcdf.F90 that replace phylmd/etat0_netcdf.F90.
start.nc and startphy.nc creations are now independant.
* startvar.F90 has been suppressed ; corresponding operations have been
simplified and embedded in etat0*_netcdf.F90 routines as internal
procedures.
* Routines converted to fortran 90 and "factorized":
- dyn3d_common/conf_dat_m.F90 (replaces dyn3d_common/conf_dat2d.F
and dyn3d_common/conf_dat3d.F)
- dyn3d/dynredem.F90 (replaces dyn3d/dynredem.F)
- dyn3d/dynetat0.F90 (replaces dyn3d/dynetat0.F)
- phylmd/grid_noro_m.F90 (replaces dyn3d_common/grid_noro.F)
- dynlonlat_phylonlat/grid_atob_m.F90 (replaces dyn3d_common/grid_atob.F)
- dyn3d_common/caldyn0.F90 (replaces dyn3d_common/caldyn0.F)
- dyn3d_common/covcont.F90 (replaces dyn3d_common/covcont.F)
- dyn3d_common/pression.F90 (replaces dyn3d_common/pression.F)
* phylmd/phyredem.F90 and phylmd/limit_netcdf.F90 have been slightly
factorized.
TO DO:
* little fix needed in grid_noro_m.F90 ; untouched yet to ensure results
are exactly the same as before. Unsmoothed orography is used to compute
"zphi", but smoothed (should be unsmoothed) one is used at poles.
* add the dyn3dmem versions of dynredem.F90 and dynetat0.F90
(dynredem_loc.F90 and dynetat0_loc.F90, untested yet).
* test compilation in parallel mode for a single processor.
347 lines of code changed in 12 files:
Adding isotopes in the dynamics and more generally tracers of tracers.
CRisi
472 lines of code changed in 2 files:
Correction of a bug concerning the number 'nqo' of
water phases transported by the dynamic : the
default value (= 2, corresponding to vapour and
liquid phases) was still explicitely present in
various places.
Modified files:
infotrac.F90,
physiq.F90
88 lines of code changed in 1 file:
Reorganizing physics/dynamics interface:
- what is related to dynamics-physics interface is now in a seperate directory: dynlmdz_phy*** for physics in phy***
- 1d model and related dependencies (including a couple from "dynamics", set up as symbolic links) is now in subdirectory "dyn1d" of phy***.
- "bibio" directory is now "misc" and should only contain autonomous utilities.
- "cosp" is now a subdirectory of phylmd.
EM
1261 lines of code changed in 18 files:
Correcting a problem from revision 2218. The type double precision
with option "-fdefault-real-8" of gfortran is promoted to 16-byte
precision and there is no specific procedure in arth with this
precision. Could not add a specific procedure in arth with double
precision because, with ifort, the option "-real-size 64" does not
promote the double precision, so that would make two identical
specific procedures in arth.
In module nrtype, replaced double precision by a parameterized real
kind so that the effective precision does not depend on a compiler
option.
In coefpoly, fxhyp, fyhyp and invert_zoom_x, use the parameterized
real kind defined in nrtype, instead of double precision.
Also, in module nrtype, removed unused derived types sprs2_sp and
sprs2_dp.
42 lines of code changed in 4 files:
Some cleanup: remove (unused) clesph0 from dynamics.
EM
1 lines of code changed in 2 files:
Bug fix in fxhyp. There was some bad logic for the shifting of
longitude grids rlonuv, rlonv, rlonm025 and rlonp025 toward [- pi,
pi]. In some cases, one of the four grids was not shifted and the
others were. For example, you could see the bug with: iim = 48, clon =
20, grossismx = 3, dzoomx = 0.15. The bad logic involved the variable
is2 in the loop on ik = 1, 4. The loop included some tests depending
on ik. The whole thing was quite convoluted. Rewrote fxhyp. In
particular, replaced the loop on ik by a call to a new procedure,
invert_zoom_x. fxhyp.F was in dyn3d, it is replaced by fxhyp_m.F90
which is in dyn3d_common. Removed several arguments of fxhyp: zoom
parameters are accessed through serre.h; rlonm025 and rlonp025 were
not used in inigeom; min and max of longitude steps are written inside
fxhyp.
Some simplifications and modernizations in fyhyp. In particular,
several arguments are removed: zoom parameters are accessed through
serre.h; yprimv was not used in inigeom; min and max of latitude steps
are written inside fyhyp.
Removed now useless intermediary procedure fxyhyper.
Changed default value of dzoomx and dzoomy from 0 to 0.2. dzoom[xy] is
only needed when grossism[xy] > 1 and then it should be > 0.
dzoom[xy] can no longer be the extent of the zoom in degrees: it must
be expressed as the fraction of the total domain.
788 lines of code changed in 9 files:
Follow-up of r2197; some compilers (e.g. ifort) impose that parameter types be declared before or at the same time as the associated values.
EM
3 lines of code changed in 1 file:
Added 'implicit none' statements and proper variable definitions where they were missing.
EM
140 lines of code changed in 7 files:
After checking I reload commit 2169 and 2170
6 lines of code changed in 1 file:
There are some commits that we must not do just before holiday .... so be back to rev 2168
6 lines of code changed in 1 file:
1- correct a missing in commit 2146 in infotrac
2- modify the declaration of solsym to use the same variable in differents routines
6 lines of code changed in 1 file:
Corrected a comment. See discussion on POIHL mailing list, June 30th
2014.
4 lines of code changed in 1 file:
Add nqo in type_trac = inca case
1 lines of code changed in 1 file:
The size of the dummy argument w cannot exceed the size of the correponding actual argument wg in advtrac.
1 lines of code changed in 1 file:
Control the output from ce0l.
17 lines of code changed in 1 file:
nclusion de la thermodynamique de la glace
Ice thermodynamics
(Catherine Rio)
9 lines of code changed in 1 file:
- Minor fix in dyn3dpar/leapfrog_p.F , should call geopot_p and not geopot
- Added a sanity check in iniacademic
- Added flag "resetvarc" to trigger a reset of initial values in sortvarc
- Removed "sortvarc0" since the job can now be done with "resetvarc" and
having set flag resertvarc to true.
EM
104 lines of code changed in 4 files:
Modification de la nouvelle discretisation verticale pour l'option
vert_sampling=strato_custom
Inclusion d'une version strato_correct qui correige une erreur dans strato
Modified verticale discretisation vertical for stratospheric versions.
The new version can be controled by parameter in .def files :
! Al the parameter are given in km assuming a given scalehigh
vert_scale=7. ! scale hight
vert_dzmin=0.02 ! width of first layer
vert_dzlow=1. ! dz in the low atmosphere
vert_z0low=8. ! height at which resolution recches dzlow
vert_dzmid=3. ! dz in the mid atmsophere
vert_z0mid=70. ! height at which resolution recches dzmid
vert_h_mid=20. ! width of the transition
vert_dzhig=11. ! dz in the high atmsophere
vert_z0hig=80. ! height at which resolution recches dz
vert_h_hig=20. ! width of the transition
133 lines of code changed in 1 file:
Added a "strato_custom" mode in disvert (for development purposes).
This is triggered by setting "vert_sampling=strato_custom" in a def file.
More work is needed to clean disvert (and merge it with disvert_noterre).
DC+EM
149 lines of code changed in 2 files:
(11 more)