--- trunk/Sources/phylmd/phystokenc.f 2017/04/20 14:44:47 221 +++ trunk/Sources/phylmd/phystokenc.f 2017/04/25 15:31:48 222 @@ -51,7 +51,7 @@ ! Arguments necessaires 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) ! Coefficients de lessivage: