Ignore:
Timestamp:
Dec 23, 2021, 6:54:17 PM (2 years ago)
Author:
dcugnet
Message:

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 (?).
File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/tracco2i_mod.F90

    r3857 r4050  
    3030
    3131    USE dimphy
    32     USE infotrac_phy
     32    USE infotrac_phy, ONLY: nbtr
    3333    USE geometry_mod, ONLY: cell_area
    3434    USE carbon_cycle_mod, ONLY: id_CO2, nbcf_in, fields_in, cfname_in
    … …  
    336336
    337337    USE dimphy
    338     USE infotrac_phy
     338!    USE infotrac_phy
    339339    USE geometry_mod, ONLY : cell_area
    340340    USE mod_grid_phy_lmdz
Note: See TracChangeset for help on using the changeset viewer.