/[lmdze]/trunk/phylmd/diagetpq.f
ViewVC logotype

Diff of /trunk/phylmd/diagetpq.f

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

revision 52 by guez, Fri Sep 23 12:28:01 2011 UTC revision 62 by guez, Thu Jul 26 14:37:37 2012 UTC
# Line 30  contains Line 30  contains
30    
31      ! Arguments:      ! Arguments:
32      ! airephy-------input-R- grid area      ! airephy-------input-R- grid area
     ! tit-----imput-A15- Comment added in PRINT (CHARACTER*15)  
33      ! iprt----input-I- PRINT level ( <=1 : no PRINT)      ! iprt----input-I- PRINT level ( <=1 : no PRINT)
34      ! idiag---input-I- indice dans lequel sera range les nouveaux      ! idiag---input-I- indice dans lequel sera range les nouveaux
35      ! bilans d' entalpie et de masse      ! bilans d' entalpie et de masse
# Line 65  contains Line 64  contains
64    
65      ! Input variables      ! Input variables
66      real airephy(klon)      real airephy(klon)
67      CHARACTER(len=15) tit      CHARACTER(len=*), intent(in):: tit ! comment added in PRINT
68      INTEGER iprt, idiag, idiag2      INTEGER iprt, idiag, idiag2
69      REAL, intent(in):: dtime      REAL, intent(in):: dtime
70      REAL, intent(in):: t(klon, klev)      REAL, intent(in):: t(klon, klev)
Legend:
Removed from v.52  
changed lines
  Added in v.62
  ViewVC Help
Powered by ViewVC 1.1.21