--- trunk/Sources/phylmd/phytrac.f 2017/02/27 15:44:55 213 +++ trunk/Sources/phylmd/phytrac.f 2017/04/25 15:31:48 222 @@ -87,7 +87,7 @@ REAL yv1(klon) ! vents au premier niveau ! Arguments n\'ecessaires pour les sources et puits de traceur : - real, intent(in):: ftsol(klon, nbsrf) ! Temperature du sol (surf)(Kelvin) + real, intent(in):: ftsol(:, :) ! (klon, nbsrf) surface temperature (K) real, intent(in):: pctsrf(klon, nbsrf) ! Pourcentage de sol f(nature du sol) ! Lessivage pour le on-line