87 |
REAL yv1(klon) ! vents au premier niveau |
REAL yv1(klon) ! vents au premier niveau |
88 |
|
|
89 |
! Arguments n\'ecessaires pour les sources et puits de traceur : |
! Arguments n\'ecessaires pour les sources et puits de traceur : |
90 |
real, intent(in):: ftsol(klon, nbsrf) ! Temperature du sol (surf)(Kelvin) |
real, intent(in):: ftsol(:, :) ! (klon, nbsrf) surface temperature (K) |
91 |
real, intent(in):: pctsrf(klon, nbsrf) ! Pourcentage de sol f(nature du sol) |
real, intent(in):: pctsrf(klon, nbsrf) ! Pourcentage de sol f(nature du sol) |
92 |
|
|
93 |
! Lessivage pour le on-line |
! Lessivage pour le on-line |