/[lmdze]/trunk/phylmd/phytrac.f
ViewVC logotype

Diff of /trunk/phylmd/phytrac.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 225 by guez, Mon Oct 16 12:35:41 2017 UTC revision 227 by guez, Thu Nov 2 15:47:03 2017 UTC
# Line 79  contains Line 79  contains
79      REAL pen_d(klon, llm) ! flux entraine dans le panache descendant      REAL pen_d(klon, llm) ! flux entraine dans le panache descendant
80      REAL coefh(klon, llm) ! coeff melange couche limite      REAL coefh(klon, llm) ! coeff melange couche limite
81      real fm_therm(klon, llm+1), entr_therm(klon, llm) ! thermiques      real fm_therm(klon, llm+1), entr_therm(klon, llm) ! thermiques
82      REAL, intent(in):: yu1(klon), yv1(klon) ! vent au premier niveau      REAL, intent(in):: yu1(:), yv1(:) ! (klon) vent au premier niveau
83    
84      ! Arguments n\'ecessaires pour les sources et puits de traceur :      ! Arguments n\'ecessaires pour les sources et puits de traceur :
85      real, intent(in):: ftsol(:, :) ! (klon, nbsrf) surface temperature (K)      real, intent(in):: ftsol(:, :) ! (klon, nbsrf) surface temperature (K)
Legend:
Removed from v.225  
changed lines
  Added in v.227
  ViewVC Help
Powered by ViewVC 1.1.21