/[lmdze]/trunk/Sources/phylmd/transp.f
ViewVC logotype

Diff of /trunk/Sources/phylmd/transp.f

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

trunk/libf/phylmd/transp.f revision 3 by guez, Wed Feb 27 13:16:39 2008 UTC trunk/phylmd/transp.f revision 76 by guez, Fri Nov 15 18:45:49 2013 UTC
# Line 7  Line 7 
7  c  c
8        use dimens_m        use dimens_m
9        use dimphy        use dimphy
10        use YOMCST        use SUPHEC_M
11        IMPLICIT none        IMPLICIT none
12  c======================================================================  c======================================================================
13  c Auteur(s): Z.X.Li (LMD/CNRS)  c Auteur(s): Z.X.Li (LMD/CNRS)
# Line 18  c Line 18  c
18  c  c
19        REAL, intent(in):: paprs(klon,klev+1)        REAL, intent(in):: paprs(klon,klev+1)
20        real tsol(klon)        real tsol(klon)
21        REAL t(klon,klev), q(klon,klev), u(klon,klev), v(klon,klev)        REAL, INTENT (IN):: t(klon,klev)
22          real q(klon,klev), u(klon,klev), v(klon,klev)
23        REAL utran_e(klon), utran_q(klon), vtran_e(klon), vtran_q(klon)        REAL utran_e(klon), utran_q(klon), vtran_e(klon), vtran_q(klon)
24  c  c
25        INTEGER i, l        INTEGER i, l

Legend:
Removed from v.3  
changed lines
  Added in v.76

  ViewVC Help
Powered by ViewVC 1.1.21