/[lmdze]/trunk/Sources/phylmd/CV30_routines/cv30_uncompress.f
ViewVC logotype

Diff of /trunk/Sources/phylmd/CV30_routines/cv30_uncompress.f

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

revision 97 by guez, Fri Apr 25 14:58:31 2014 UTC revision 99 by guez, Wed Jul 2 18:39:15 2014 UTC
# Line 38  contains Line 38  contains
38      real upwd1(len, nd), dnwd1(len, nd), dnwd01(len, nd)      real upwd1(len, nd), dnwd1(len, nd), dnwd01(len, nd)
39      real qcondc1(nloc, nd)      real qcondc1(nloc, nd)
40      real wd1(nloc), cape1(nloc)      real wd1(nloc), cape1(nloc)
41      real da1(nloc, nd), phi1(nloc, nd, nd), mp1(nloc, nd)      real, intent(inout):: da1(nloc, nd), phi1(nloc, nd, nd), mp1(nloc, nd)
42    
43      ! local variables:      ! local variables:
44      integer i, k, j      integer i, k, j
Legend:
Removed from v.97  
changed lines
  Added in v.99
  ViewVC Help
Powered by ViewVC 1.1.21