source: LMDZ6/trunk/libf/phylmd/comsoil.h @ 5248

Last change on this file since 5248 was 3974, checked in by asima, 3 years ago

In the "bucket" soil model, soil thermal inertia (formerly a constant value) can also be now a function of soil moisture "qsol"
(F Cheruy's idea; results from "Stage L3" Eve Rebouillat, with E Vignon, A Sima, F Cheruy).

The function depends on iflag_inertie, read from physiq.def (via conf_phys_m.F90), as follows :
(only in physiq.def_NPv6.1 for the time being)


# Controle de la definition de l'inertie thermique du sol dans le modele "bucket":
# 0 (default) : constant
# 1 : fonction lineaire de qsol
# 2 : 2 fonctions lineaires de qsol :
# une pour "sable" (boite lat/lon pour Sahara), une pour le reste (limons et argile)
# 3 : fonction lineaire de qsol, valeurs entre 900 pour qsol=0 et 2000 pour qsol=150

iflag_inertie=0


Relevant changes are in soil.F90 and physiq.def_NPv6.1 ; the other files are adjusted accordingly.

  • Property copyright set to
    Name of program: LMDZ
    Creation date: 1984
    Version: LMDZ5
    License: CeCILL version 2
    Holder: Laboratoire de m\'et\'eorologie dynamique, CNRS, UMR 8539
    See the license file in the root directory
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 264 bytes
RevLine 
[887]1!
2! $Header$
3!
4
[2915]5      common /comsoil/inertie_sol,inertie_sno,inertie_sic,inertie_lic,  &
[3974]6     &                iflag_sic,iflag_inertie
[2915]7      real inertie_sol,inertie_sno,inertie_sic,inertie_lic
[3974]8      integer iflag_sic,iflag_inertie
[2915]9!$OMP THREADPRIVATE(/comsoil/)
Note: See TracBrowser for help on using the repository browser.