--- trunk/phylmd/physiq.f 2018/09/27 16:29:06 310 +++ trunk/phylmd/physiq.f 2018/12/10 15:54:30 313 @@ -35,7 +35,7 @@ USE dimphy, ONLY: klon USE dimsoil, ONLY: nsoilmx use drag_noro_m, only: drag_noro - use dynetat0_m, only: day_ref, annee_ref + use dynetat0_chosen_m, only: day_ref, annee_ref USE fcttre, ONLY: foeew use fisrtilp_m, only: fisrtilp USE hgardfou_m, ONLY: hgardfou @@ -152,7 +152,7 @@ REAL, save:: ftsoil(klon, nsoilmx, nbsrf) ! soil temperature of surface fraction - REAL fluxlat(klon, nbsrf) + REAL fluxlat(klon, nbsrf) ! flux de chaleur latente, en W m-2 REAL, save:: fqsurf(klon, nbsrf) ! humidite de l'air au contact de la surface