SISVAT_TS2 Subroutine

subroutine SISVAT_TS2()

Uses

  • proc~~sisvat_ts2~2~~UsesGraph proc~sisvat_ts2~2 SISVAT_TS2 module~yomcst_mod_h yomcst_mod_h proc~sisvat_ts2~2->module~yomcst_mod_h module~vartsv VARtSV proc~sisvat_ts2~2->module~vartsv module~varphy VARphy proc~sisvat_ts2~2->module~varphy module~comsoil_mod_h comsoil_mod_h proc~sisvat_ts2~2->module~comsoil_mod_h module~varysv VARySV proc~sisvat_ts2~2->module~varysv module~vardsv~2 VARdSV proc~sisvat_ts2~2->module~vardsv~2 module~yoethf_mod_h yoethf_mod_h proc~sisvat_ts2~2->module~yoethf_mod_h module~indice_sol_mod indice_sol_mod proc~sisvat_ts2~2->module~indice_sol_mod module~varxsv VARxSV proc~sisvat_ts2~2->module~varxsv module~var_sv VAR_SV proc~sisvat_ts2~2->module~var_sv module~vartsv->module~var_sv module~varysv->module~var_sv module~vardsv~2->module~var_sv module~varxsv->module~var_sv module~dimsoil_mod_h dimsoil_mod_h module~var_sv->module~dimsoil_mod_h

======================================================================= I. First part: corresponds to soil.F90 in LMDZ =======================================================================

use arithmetic center between layers to derive dz1 for snow layers for simplicity:

1) Calculation of Cgrf and Dgrd coefficients using soil temperature from previous time step.

These variables are recalculated on the local compressed grid instead of saved in restart file.

2) Computation of the soil temperatures using the Cgrd and Dgrd coefficient computed above

Extrapolate surface Temperature !hj check write(,)min(max(isnoSV(ig),0),1),max(1-isnoSV(ig),0)

Surface temperature Other temperatures

3) Calculate the Cgrd and Dgrd coefficient corresponding to actual soil temperature

4) Computation of the surface diffusive flux from ground and calorific capacity of the ground

(pfluxgrd) (pcapcal) ======================================================================= II. Second part: corresponds to calcul_fluxs_mod.F90 in LMDZ =======================================================================

zx_qs = qsat en kg/kg **********x***

      write(*,*)'ig',ig,'Tsrf',Tsrf(ig)

=== Calcul de la temperature de surface === zx_sl = chaleur latente d'evaporation ou de sublimation

Q H surface temperature == flux_q est le flux de vapeur d'eau: kg/(m2 s) positive vers bas == flux_t est le flux de cpt (energie sensible): j/(m2 s) Derives des flux dF/dTs (W m-2 K-1): Nouvelle valeure de l'humidite au dessus du sol

Arguments

None

Calls

proc~~sisvat_ts2~2~~CallsGraph proc~sisvat_ts2~2 SISVAT_TS2 foeew foeew proc~sisvat_ts2~2->foeew qsatl qsatl proc~sisvat_ts2~2->qsatl dqsatl dqsatl proc~sisvat_ts2~2->dqsatl qsats qsats proc~sisvat_ts2~2->qsats foede foede proc~sisvat_ts2~2->foede dqsats dqsats proc~sisvat_ts2~2->dqsats

Contents

None