--- trunk/phylmd/Interface_surf/calcul_fluxs.f	2014/03/05 14:57:53	82
+++ trunk/phylmd/Interface_surf/calcul_fluxs.f	2014/07/02 18:39:15	99
@@ -11,8 +11,8 @@
        petAcoef, peqAcoef, petBcoef, peqBcoef,  &
        tsurf_new, evap, fluxlat, fluxsens, dflux_s, dflux_l)
 
-    ! Cette routine calcule les fluxs en h et q a l'interface et eventuellement
-    ! une temperature de surface (au cas ou ok_veget = false)
+    ! Cette routine calcule les fluxs en h et q à l'interface et une
+    ! température de surface.
 
     ! L. Fairhead 4/2000