/[lmdze]/trunk/libf/dyn3d/PVtheta.f
ViewVC logotype

Diff of /trunk/libf/dyn3d/PVtheta.f

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

revision 44 by guez, Wed Apr 13 12:29:18 2011 UTC revision 71 by guez, Mon Jul 8 18:12:18 2013 UTC
# Line 4  Line 4 
4        use dimens_m        use dimens_m
5        use paramet_m        use paramet_m
6        use comconst        use comconst
7        use comvert        use disvert_m
8        use comgeom        use comgeom
9        IMPLICIT none        IMPLICIT none
10    
# Line 52  c variables Input Line 52  c variables Input
52  c  c
53        INTEGER ilon        INTEGER ilon
54        integer, intent(in):: ilev        integer, intent(in):: ilev
55        REAL pvcov(iip1,jjm,ilev)        REAL, intent(in):: pvcov(iip1,jjm,ilev)
56        REAL pucov(iip1,jjp1,ilev)        REAL, intent(in):: pucov(iip1,jjp1,ilev)
57        REAL, intent(in):: pteta(iip1,jjp1,ilev)        REAL, intent(in):: pteta(iip1,jjp1,ilev)
58        REAL ztfi(ilon,ilev)        REAL ztfi(ilon,ilev)
59        REAL, intent(in):: zplay(ilon,ilev), zplev(ilon,ilev+1)        REAL, intent(in):: zplay(ilon,ilev), zplev(ilon,ilev+1)
Legend:
Removed from v.44  
changed lines
  Added in v.71
  ViewVC Help
Powered by ViewVC 1.1.21