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

Diff of /trunk/phylmd/cltracrn.f

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

revision 82 by guez, Wed Mar 5 14:57:53 2014 UTC revision 104 by guez, Thu Sep 4 10:05:52 2014 UTC
# Line 50  contains Line 50  contains
50      REAL u1lay(klon), v1lay(klon)      REAL u1lay(klon), v1lay(klon)
51      REAL coef(klon, klev)      REAL coef(klon, klev)
52      REAL, intent(in):: t(klon, klev) ! temperature (K)      REAL, intent(in):: t(klon, klev) ! temperature (K)
53      real ftsol(klon, nbsrf), pctsrf(klon, nbsrf)      real, intent(in):: ftsol(klon, nbsrf), pctsrf(klon, nbsrf)
54      REAL tr(klon, klev), trs(klon)      REAL tr(klon, klev), trs(klon)
55      REAL, intent(in):: paprs(klon, klev+1)      REAL, intent(in):: paprs(klon, klev+1)
56      real, intent(in):: pplay(klon, klev)      real, intent(in):: pplay(klon, klev)
Legend:
Removed from v.82  
changed lines
  Added in v.104
  ViewVC Help
Powered by ViewVC 1.1.21