Directory trunk/libf/dyn3d_common/

Total Files:
11
Deleted Files:
0
Lines of Code:
2097

[root]/trunk/libf/dyn3d_common

Lines of Code

trunk/libf/dyn3d_common/ Lines of Code

Developers

Author Changes Lines of Code Lines per Change
Totals 73 (100.0%) 2095 (100.0%) 28.6
dcugnet 34 (46.6%) 1445 (69.0%) 42.5
fairhead 10 (13.7%) 206 (9.8%) 20.6
fhourdin 2 (2.7%) 176 (8.4%) 88.0
lmdz-users 1 (1.4%) 129 (6.2%) 129.0
oboucher 6 (8.2%) 49 (2.3%) 8.1
acozic 6 (8.2%) 32 (1.5%) 5.3
emillour 7 (9.6%) 30 (1.4%) 4.2
lguez 4 (5.5%) 25 (1.2%) 6.2
crisi 2 (2.7%) 2 (0.1%) 1.0
lfalletti 1 (1.4%) 1 (0.0%) 1.0

Most Recent Commits

lguez 2022-09-20 16:09 Rev.: 4259

Replace `nf_put_vara_type` by `nf90_put_var`

The immediate motivation is a bug fix: `nf_put_vara_type` was called
with scalar instead of array actual arguments for dummy array
arguments start and count. Correcting this, we might as well take the
opportunity to use `nf90_put_var`, so we no longer need to test
`NC_DOUBLE` and we have half as many calls.

10 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: grilles_gcm_netcdf_sub.F90 (+10 -31)
lguez 2022-09-20 16:09 Rev.: 4258

Bug fix: correct varid

2 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: grilles_gcm_netcdf_sub.F90 (+2 -2)
lguez 2022-09-20 16:09 Rev.: 4257

Bug fix: add missing argument ierr

1 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: disvert.F90 (+1 -1)
lguez 2022-09-20 16:09 Rev.: 4253

Replace `nf_def_var` by `nf90_def_var`

The immediate motivation is a bug fix: `nf_def_var` was called with a
scalar instead of array actual argument for dummy array argument
vdims. The simplest way to correct this bug is to replace by a call to
`nf90_def_var`.

12 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: grilles_gcm_netcdf_sub.F90 (+12 -11)
fairhead 2022-07-26 15:36 Rev.: 4228

Modifications to code to introduce a new vertical axis on llm+1 levels so that fluxes can
be output on their proper levels as per the CMIP6 DataRequest?
Actually is r3853 from the IPSL-CM6A-MR branch
LF

9 lines of code changed in 4 files:

  • trunk/libf/dyn3d_common: comvert_mod.F90 (new), disvert.F90 (+6 -1)
dcugnet 2022-07-04 23:45 Rev.: 4193

* Modifications in readSections to allow a continuation line character "\":
in both "tracer.def" and "isotopes_params.def", information for a single
tracer or isotope can now be stored on several lines.
* Modifications in "dispTable" and associated routines to allow too wide tables
to be displayed as several shorter sub-tables: each sub-table is at most
"nMaxCol" characters wide (typically: number of characters displayable in a
tandard screen window) and the first "nHead" columns (typically: name, index,
etc.) are duplicated in each sub-table. A default value for nMaxCol, called
maxTableWidth (currently = 192) is available in readTracFiles_mod.
* Subroutine "readIsotopesFile" becomes a function with a boolean returned
error value "lerr" used to trigger an external aborting function (no STOP).

4 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+4 -3)
dcugnet 2022-06-29 19:40 Rev.: 4190

Fix for INCA and old "traceur.def" files

2 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+2 -6)
acozic 2022-06-29 16:48 Rev.: 4189

correct a compilator bug for inca use

8 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+8 -2)
dcugnet 2022-06-23 13:01 Rev.: 4184

Fix for the inca case with former "traceur.def" files.

2 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+2 -2)
dcugnet 2022-06-17 17:49 Rev.: 4172

* add the computation of nqINCA in the "tracer.def" case (A. Cozic)
* few fixes

3 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+3)
dcugnet 2022-06-16 20:16 Rev.: 4170

The variable "types_trac" is the equivalent of "type_trac" in case multiple sections must be read
and used in "tracer.def" file.
Tests on the "type_trac" were replaced with tests on the vector "types_trac".
Most of the time, there are two components: 'lmdz' and a second one. The later has priority on 'lmdz'
and must be used for the tests. For more components, care must be taken to execute specific parts
of the code on the right tracers ; the tracers(:)%component has been created in that respect.

11 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+11 -11)
dcugnet 2022-06-16 14:45 Rev.: 4169

* Fix for multi-sections "tracer.def" files: type_trac is no longer a coma-saparated list (","),
but is now a pipe-separated list ("|"), because the "getin" function replaces the comas by spaces.
* Small fix for INCA: keep the "config_inca" value different from "none" if ALL the sections names
differ from "inca" or "inco".

5 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+5 -5)
dcugnet 2022-05-19 10:47 Rev.: 4158

* include new type "tracer.def" tracers description files in DefLists/
* Remove the old code (lOldCode=.TRUE.)
* Remove the hard-coded part in isotopes_mod that was ensuring the convergence
=> this version will not converge with previous isotopic physics, but the
difference, only due to round off errors on "tdifrel", is acceptable.

1 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+1 -288)
dcugnet 2022-05-18 15:56 Rev.: 4154

Fixes needed because gfortran is not as permissive as ifort is with scalar pointers.

15 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+15 -11)
dcugnet 2022-05-18 14:58 Rev.: 4153

Switch to the new tracers files "tracer.def".
Still working for the older "traceur.def" files.
The "isotope_params.def" file is now needed ; contains most of the constants formerly hard-coded in isotopes_mod.
Still contains few hard-coded lines for the "tdifrel" parameters, needed for reproductibilite the code is highly sensitive to this parameter: a difference not visible on 16 digits is enough to change the two last digits of deltaD after a one day run.

1 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+1 -1)
fairhead 2022-05-10 18:50 Rev.: 4146

Source code and xml files needed for XIOS output in the LMDZ LonLat dynamical core.
One flag controls everything: ok_dyn_xios. Parameters controlling outputs need to be put in the xml
files, nothing is set in the code
Work to follow on the dynzon file and the modipsl/libIGCM framework.
ok_dyn_xios = n should not change anything

1 lines of code changed in 2 files:

  • trunk/libf/dyn3d_common: control_mod.F90 (new)
dcugnet 2022-05-09 12:35 Rev.: 4143

* Some variables are renamed or replaced by direct equivalents:
- iso_indnum -> tracers(:)%iso_iName
- niso_possibles -> niso
- iqiso -> iqIsoPha ; index_trac -> itZonIso
- ok_iso_verif -> isoCheck
- ntraceurs_zone -> nzone ; ntraciso -> ntiso
- qperemin -> min_qparent ; masseqmin -> min_qmass ; ratiomin -> min_ratio
* Some renamed variables are only aliased with the older name (using USE <module>, ONLY: <oldName> => <newName>) in routines where they are repeated many times.
* Few hard-coded indexes are now computed (examples: ilic, iso, ivap, irneb, iq_vap, iq_liq, iso_H2O, iso_HDO, iso_HTO, iso_O17, iso_O18).
* The IF(isoCheck) test is now embedded in the check_isotopes_seq and check_isotopes_loc routines (lighter calling).

20 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+20 -68)
acozic 2022-04-20 14:20 Rev.: 4130

remove two variables not used anymore and not declared

1 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+1 -1)
acozic 2022-04-20 11:01 Rev.: 4127

modify lmdz code in order to transfer to inca model all infomations necessary for the coupling with dynamico

2 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+2 -2)
dcugnet 2022-04-08 16:47 Rev.: 4124

Remove solsym, ok_isotopes (=niso>0), ok_isotrac (=nzone>0)

9 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+9 -14)
dcugnet 2022-04-05 17:52 Rev.: 4122

Fix when no isotopic tagging tracers are used.

3 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+3 -1)
dcugnet 2022-04-05 15:44 Rev.: 4120

* New water names: H2Ov, H2Ol, H2Oi, H2Or -> H2O_g, H2O_l, H2O_s, H2O_r.
* Corrections for the lOldCode=.FALSE., not activated yet.

259 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+259 -326)
emillour 2022-02-28 10:37 Rev.: 4082

Bug fix in infotrac (introduced in r4063), nbtr and related arrays were not properly initialized.
Tests notheless show there is still an issue between serial and parallel handling of (non-water) tracers that needs be fixed.
EM

10 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+10 -5)
acozic 2022-02-04 17:17 Rev.: 4078

add missing cpp key

2 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+2)
acozic 2022-02-04 16:23 Rev.: 4077

modification to run with INCA :
1- modify deallocate for an array use after
2- change definition for allocate component for each tracer
3- modify definition of isInPhysics (H2O in INCA need to be in Physic)
4- modify test to check calcul of nqttotr

11 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+11 -5)
acozic 2022-02-02 12:24 Rev.: 4073

Made some correction to allow compilation with inca (Anne)

8 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+8 -8)
dcugnet 2022-01-31 22:20 Rev.: 4071

* Fix for unadvected tracers (iadv==0)
* The key %isH2Ofamily, from the derived type "trac_type", is replaced with the more general
key %isInPhysics, which is TRUE for tracers both in "qx" and "tr_seri".
Currently, FALSE for tracers descending on H2O (isotopes and tagging tracers included). Could be set to FALSE
for interactive CO2 (type_trac=='inco') or ice supersaturated cloud content (tranfered to "rneb_seri")
* Parser routines taken from version 10 of https://svn.lmd.jussieu.fr/tracers-parser

9 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+9 -9)
dcugnet 2022-01-29 20:22 Rev.: 4068

FIx for last version: function version of strReduce crashes with gfortran (but not for ifort) => back to subroutine version.

10 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+10 -5)
dcugnet 2022-01-27 21:47 Rev.: 4067

Fixes mainly for isotopes (more to be done).
Fix (to be confirmed) in physiq to avoid attempting to send a non-transported (iadv==0) tracer to the physics.

43 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+43 -25)
dcugnet 2022-01-25 20:14 Rev.: 4064

* minor fixes (unused variables suppressed, comas after a WRITE() statement, etc.)
* parser routines taken from version 7 of https://svn.lmd.jussieu.fr/tracers-parser
* few changes in infotrac, and few fixes of (at least) the sequential version:
- uadv and vadv were deallocated twice (fix was lost by mistake just before last commit)
- in [( dum(im), im=1, nm)] implicit loops, ifort evaluates "dum(im)" even if nm==0,
resulting in a crash, "im" being unitialized.

30 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+30 -25)
dcugnet 2022-01-25 02:01 Rev.: 4063

Except if the bench fails, last commit before switching to the new parser.
* parser routines taken from version 6 of https://svn.lmd.jussieu.fr/tracers-parser
* significant changes in "infotrac", now close to its target version.
Modified old code is active (hard-coded flag: lOldCode=.TRUE.).
New code will be activated in the next commit, then old code will be suppressed.
* probably problems with the isotopic version, to be fixed after tgcc maintenance...

775 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+775 -655)
dcugnet 2022-01-13 00:16 Rev.: 4057

Temporarly removing the test on nqtottr.
Will be included later, when tracers(:)%iso_iName will be defined.

2 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+2 -2)
dcugnet 2022-01-12 23:54 Rev.: 4056

Most of the changes are intended to help to eventually remove the constraints about the tracers assumptions, in particular water tracers.
- Remove index tables itr_indice and niadv, replaced by tracers(:)%isAdvected and tracers(:)%isH2OFamily.
Most of the loops are now from 1 to nqtot:
* DO iq=nqo+1,nqtot loops are replaced with:
DO iq=1,nqtot
IF(tracers(iq)%isH2Ofamily) CYCLE
* DO it=1,nbtr; iq=niadv(it+nqo)
and DO it=1,nqtottr; iq=itr_indice(it) loops are replaced with:
it = 0
DO iq = 1, nqtot
IF(.NOT.tracers(iq)%isAdvected .OR. tracers(iq)%isH2Ofamily) CYCLE
it = it+1
- Move some StratAer related code from infotrac to infotrac_phy
- Remove "nqperes" variable:
DO iq=1,nqpere loops are replaced with:
DO iq=1,nqtot
IF(tracers(iq)%parent/='air') CYCLE
- Cosmetic changes (justification, SELECT CASE instead of multiple IF...) mostly in advtrac* routines.

136 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+136 -330)
dcugnet 2021-12-26 23:27 Rev.: 4052

Fixes for previous commit:
* few tracers(:)%nqChilds were errouneously replaced with tarcers(:)%nqDesc
* minor changes

3 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+3)
dcugnet 2021-12-24 18:29 Rev.: 4051

Fix for the previous commit.

1 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+1 -1)
dcugnet 2021-12-23 19:54 Rev.: 4050

Second commit for new tracers.
* include most of the keys in the tracers descriptor vector "tracers(:)".
* fix in phylmdiso/cv3_routines: fq_* variables were used where their fxt_* counterparts were expected.
* multiple IF(nqdesc(iq)>0) and IF(nqfils(iq)>0) tests suppressed, because they are not needed:
"do ... enddo" loops with 0 upper bound are not executed.
* remove French accents from comments (encoding problem) in phylmdiso/cv3_routines and phylmdiso/cv30_routines.
* modifications in "isotopes_verif_mod", where the call to function "iso_verif_tag17_q_deltad_chn" in "iso_verif_tag17_q_deltad_chn" was not detected at linking stage, although defined in the same module (?).

66 lines of code changed in 3 files:

  • trunk/libf/dyn3d_common: infotrac.F90 (+65 -96), iso_verif_dyn.F (new)
dcugnet 2021-12-16 00:18 Rev.: 4046

First commit for new tracers.
* parser routines readTracFiles, strings_mod and tracer_types added in misc using revision 4 of
https://svn.lmd.jussieu.fr/tracers-parser
* tested in sequential and parallel mode using ioipsl.
* for now, only two fields of "tracers(:)" derived type vector are used: "name" and "longName".

35 lines of code changed in 9 files:

  • trunk/libf/dyn3d_common: infotrac.F90 (+23 -22), initdynav.F90 (+3 -2), inithist.F (new), writedynav.F90 (new), writehist.F (+3 -3)
crisi 2021-12-01 09:28 Rev.: 4039

juste une modif sans consequence dans ratiomin

1 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+1 -1)
crisi 2021-11-30 14:59 Rev.: 4032

de detail: qperemin=1e-30,masseqmin=1e-18,ratiomin=1e-6

1 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+1 -1)
emillour 2021-11-29 09:28 Rev.: 4027

Fix (temporary?) for isotopes, set threshold on qperemin to zero.
EM

1 lines of code changed in 1 file:

  • trunk/libf/dyn3d_common: infotrac.F90 (+1 -1)

(16 more)

Generated by StatSVN 0.7.0