/[lmdze]/trunk/libf/phylmd/cvltr.f
ViewVC logotype

Diff of /trunk/libf/phylmd/cvltr.f

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

revision 6 by guez, Wed Feb 27 13:16:39 2008 UTC revision 7 by guez, Mon Mar 31 12:24:17 2008 UTC
# Line 13  c======================================= Line 13  c=======================================
13  c  c
14        include "YOECUMF.h"        include "YOECUMF.h"
15  c  c
16        REAL pdtime        REAL, intent(in):: pdtime
17        REAL, intent(in):: paprs(klon,klev+1) ! pression aux 1/2 couches (bas en haut)        REAL, intent(in):: paprs(klon,klev+1) ! pression aux 1/2 couches (bas en haut)
18        REAL pplay(klon,klev)  ! pression pour le milieu de chaque couche        REAL pplay(klon,klev)  ! pression pour le milieu de chaque couche
19        REAL x(klon,klev)        ! q de traceur (bas en haut)        REAL x(klon,klev)        ! q de traceur (bas en haut)
Legend:
Removed from v.6  
changed lines
  Added in v.7
  ViewVC Help
Powered by ViewVC 1.1.21