/[lmdze]/trunk/Sources/phylmd/CV_routines/cv_unsat.f
ViewVC logotype

Diff of /trunk/Sources/phylmd/CV_routines/cv_unsat.f

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

trunk/phylmd/CV_routines/cv_unsat.f90 revision 76 by guez, Fri Nov 15 18:45:49 2013 UTC trunk/phylmd/CV_routines/cv_unsat.f revision 103 by guez, Fri Aug 29 13:00:05 2014 UTC
# Line 3  Line 3 
3                          ,h,lv,ep,sigp,clw,m,ment,elij &                          ,h,lv,ep,sigp,clw,m,ment,elij &
4                          ,iflag,mp,qp,up,vp,wt,water,evap)                          ,iflag,mp,qp,up,vp,wt,water,evap)
5              use cvthermo              use cvthermo
6              use cvparam              use cv_param
7        implicit none        implicit none
8    
9    
10    
11  ! inputs:  ! inputs:
12        integer ncum, nd, nloc        integer, intent(in):: ncum, nd, nloc
13        integer inb(nloc)        integer inb(nloc)
14        real t(nloc,nd), q(nloc,nd), qs(nloc,nd)        real t(nloc,nd), q(nloc,nd), qs(nloc,nd)
15        real gz(nloc,nd), u(nloc,nd), v(nloc,nd)        real gz(nloc,nd), u(nloc,nd), v(nloc,nd)
Legend:
Removed from v.76  
changed lines
  Added in v.103
  ViewVC Help
Powered by ViewVC 1.1.21