/[lmdze]/trunk/libf/phylmd/diagetpq.f90
ViewVC logotype

Diff of /trunk/libf/phylmd/diagetpq.f90

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

revision 51 by guez, Tue Sep 20 09:14:34 2011 UTC revision 52 by guez, Fri Sep 23 12:28:01 2011 UTC
# Line 25  contains Line 25  contains
25    
26      ! Jean-Louis Dufresne, July 2002      ! Jean-Louis Dufresne, July 2002
27    
28      use dimens_m      USE dimphy, ONLY: klev, klon
29      use dimphy      USE suphec_m, ONLY: rcpd, rcpv, rcs, rcw, rg, rlstt, rlvtt
     use SUPHEC_M  
     use yoethf_m  
30    
31      ! Arguments:      ! Arguments:
32      ! airephy-------input-R- grid area      ! airephy-------input-R- grid area
Legend:
Removed from v.51  
changed lines
  Added in v.52
  ViewVC Help
Powered by ViewVC 1.1.21