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

Diff of /trunk/dyn3d/PVtheta.f

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

trunk/libf/dyn3d/PVtheta.f revision 44 by guez, Wed Apr 13 12:29:18 2011 UTC trunk/dyn3d/PVtheta.f revision 79 by guez, Fri Feb 28 17:52:47 2014 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          use tourabs_m, only: tourabs
10        IMPLICIT none        IMPLICIT none
11    
12  c=======================================================================  c=======================================================================
# Line 52  c variables Input Line 53  c variables Input
53  c  c
54        INTEGER ilon        INTEGER ilon
55        integer, intent(in):: ilev        integer, intent(in):: ilev
56        REAL pvcov(iip1,jjm,ilev)        REAL, intent(in):: pvcov(iip1,jjm,ilev)
57        REAL pucov(iip1,jjp1,ilev)        REAL, intent(in):: pucov(iip1,jjp1,ilev)
58        REAL, intent(in):: pteta(iip1,jjp1,ilev)        REAL, intent(in):: pteta(iip1,jjp1,ilev)
59        REAL ztfi(ilon,ilev)        REAL ztfi(ilon,ilev)
60        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.79
  ViewVC Help
Powered by ViewVC 1.1.21