phydev
(0 files, 0 lines)
phylmd
(0 files, 0 lines)
phymar
(0 files, 0 lines)
[root]/trunk/libf/dynlonlat_phylonlat
phydev
(0 files, 0 lines)
phylmd
(0 files, 0 lines)
phymar
(0 files, 0 lines)
| Author | Changes | Lines of Code | Lines per Change |
|---|---|---|---|
| Totals | 32 (100.0%) | 725 (100.0%) | 22.6 |
| dcugnet | 3 (9.4%) | 631 (87.0%) | 210.3 |
| lguez | 4 (12.5%) | 79 (10.9%) | 19.7 |
| emillour | 23 (71.9%) | 12 (1.7%) | 0.5 |
| fhourdin | 2 (6.3%) | 3 (0.4%) | 1.5 |
Change dynamics/physics interface directory name from dynlonlat_phylonlat to dynphy_lonlat.
EM
0 lines of code changed in 17 files:
In etat0dyn: removed few useless lines: "masque" is always known because etat0dyn is called after etat0phys.
In grid_atob: shape error in routine fine2coarse now fixed: "msk" argument and local variable mask must have the dimensions of the output grid. Working unit of dist_sphe is no longer degree, but radian.
33 lines of code changed in 1 file:
More on physics/dynamics separation and cleanup:
- Set things up so that all physics-related initializations are done via iniphysiq.
- Created a "geometry_mod.F90" module in phy_common to store information on the loacl grid (i.e. replaces comgeomphy) and moreover give these variables more obvious names (e.g.: rlond => longitude, rlatd => latitude, airephy => cell_area).
- removed obsolete comgeomphy.h and comgeomphy.F90
EM
12 lines of code changed in 5 files:
New parameterization of gravity wave drag due to front/jet systems, by
A. de la Camara and F. Lott. The new Camara-Lott parameterization
replaces the Hines parameterization so it is activated if not ok_hines
and ok_gwd_rando.
Also changed distribution of phase speeds in FLOTT_GWD_rando, from
uniform to Gaussian. Bug fix in sugwd_strato. Bug fix in the arguments
of the call to add_phys_tend for methane oxydation.
For the new Camara-Lott parameterization, we need to compute relative
vorticity in calfis and pass it as a new argument "rot" to
physiq. Interpolation of relative vorticity to the physics grid is not
optimal for now: it is not weighted by cell areas.
Alvaro de la Camara, Fran\c{}cois Lott
79 lines of code changed in 4 files:
Deplacement de fichiers sources pour la compilation 1D.
0 lines of code changed in 1 file:
In dyn3d/:
etat0dyn_netcdf.F90: "startget_dyn3d" syntax slightly simplified.
dynredem.F90: Shortcut routines (put_var*, cre_var,
dynredem_write_*, dynredem_read_u)
modified to match dyn3dmem version and put in
module dyredem_mod.F90.
dynetat0.F90 -> *.f90: Few simplifications (no usage of NC_DOUBLE
needed => no precompilation)
Add tracers initialization in the isotope case
suppressed by accident.
dynredem_mod.F90: Created to mimic dyn3dmem equivalent.
In dyn3dmem/:
dynetat0_loc.F -> *.f90: Converted into fortran 90 to match the dyn3d
version.
dynredem_loc.F -> *.F90: Converted into fortran 90.
dynredem_mod.F90: Add some shortcut routines to match the dyn3d
version.
In phylmd/:
phyredem.F90: Bug fix: nsw instead of nsoilmx was used as
Tsoil second maximum index.
Bug fix: fevap instead of snow was saved for
"SNOW".
etat0phys_netcdf.F90: "filtreg_mod" module usage suppressed.
Local variable rugo computation removed (not
used).
In dynlonlat_phylonlat/:
grid_atob_m.F90 -> *.f90 DOUBLE PRECISION variables usage removed.
Precompilation o longer needed => .F90 extension.
292 lines of code changed in 1 file:
Introduction d'un seuil sur la probabilité de non déclenchement
stochastique random_notrig_max
Si le tirage aleatoire uniforme entre 0 et 1 est > random_notrig_max
on ne déclenche pas.
random_notrig_max=1-epsilon avec epsilon petit.
Corrections dans grid_atob_m.F90 pour la compilation Linux.
A vérifier.
3 lines of code changed in 1 file:
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.
306 lines of code changed in 1 file:
Added utility routines cbrt to compute cubic roots (used by some planetary physics packages) and getin_p (to read from def files in parallel).
EM
0 lines of code changed in 1 file: