/[lmdze]/trunk/phylmd/Interface_surf/clvent.f
ViewVC logotype

Diff of /trunk/phylmd/Interface_surf/clvent.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 25  contains Line 25  contains
25      ! vent (dV/dz). La première valeur indique la valeur de Cdrag (sans      ! vent (dV/dz). La première valeur indique la valeur de Cdrag (sans
26      ! unité).      ! unité).
27    
28      REAL t(klon, klev), ven(klon, klev)      REAL, intent(in):: t(klon, klev), ven(klon, klev)
29      ! t--------input-R- temperature (K)      ! t--------input-R- temperature (K)
30      ! ven------input-R- vitesse horizontale (m/s)      ! ven------input-R- vitesse horizontale (m/s)
31      REAL paprs(klon, klev+1), pplay(klon, klev), delp(klon, klev)      REAL paprs(klon, klev+1), pplay(klon, klev), delp(klon, klev)
Legend:
Removed from v.225  
changed lines
  Added in v.227
  ViewVC Help
Powered by ViewVC 1.1.21