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

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

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

revision 195 by guez, Wed May 18 17:56:44 2016 UTC revision 196 by guez, Mon May 23 13:50:39 2016 UTC
# Line 41  contains Line 41  contains
41      real sig(klon, klev)      real sig(klon, klev)
42      real tv(klon, klev), tvp(klon, klev)      real tv(klon, klev), tvp(klon, klev)
43    
44      ! input / output:      integer, intent(out):: iflag(:) ! (ncum)
     integer iflag(klon)  
45    
46      ! outputs:      ! outputs:
47      real precip(klon)      real precip(klon)
# Line 72  contains Line 71  contains
71      !-------------------------------------------------------------      !-------------------------------------------------------------
72    
73      ncum = size(icb)      ncum = size(icb)
74        iflag = 0
75    
76      ! initialization:      ! initialization:
77    
Legend:
Removed from v.195  
changed lines
  Added in v.196
  ViewVC Help
Powered by ViewVC 1.1.21