/[lmdze]/trunk/phylmd/CV_routines/cv_compress.f
ViewVC logotype

Diff of /trunk/phylmd/CV_routines/cv_compress.f

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

trunk/phylmd/CV_routines/cv_compress.f90 revision 76 by guez, Fri Nov 15 18:45:49 2013 UTC trunk/phylmd/CV_routines/cv_compress.f revision 97 by guez, Fri Apr 25 14:58:31 2014 UTC
# Line 13  Line 13 
13    
14    
15  ! inputs:  ! inputs:
16        integer len,ncum,nd,nloc        integer, intent(in):: len,ncum,nd,nloc
17        integer iflag1(len),nk1(len),icb1(len)        integer iflag1(len),nk1(len),icb1(len)
18        real cbmf1(len),plcl1(len),tnk1(len),qnk1(len),gznk1(len)        real cbmf1(len),plcl1(len),tnk1(len),qnk1(len),gznk1(len)
19        real, intent(in):: t1(len,nd)        real, intent(in):: t1(len,nd)
20        real q1(len,nd),qs1(len,nd),u1(len,nd),v1(len,nd)        real, intent(in):: q1(len,nd),qs1(len,nd),u1(len,nd),v1(len,nd)
21        real gz1(len,nd),h1(len,nd),lv1(len,nd),cpn1(len,nd)        real gz1(len,nd),h1(len,nd),lv1(len,nd),cpn1(len,nd)
22        real p1(len,nd),ph1(len,nd+1),tv1(len,nd),tp1(len,nd)        real p1(len,nd),ph1(len,nd+1),tv1(len,nd),tp1(len,nd)
23        real tvp1(len,nd),clw1(len,nd)        real tvp1(len,nd),clw1(len,nd)
Legend:
Removed from v.76  
changed lines
  Added in v.97
  ViewVC Help
Powered by ViewVC 1.1.21