/[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

revision 82 by guez, Wed Mar 5 14:57:53 2014 UTC revision 91 by guez, Wed Mar 26 17:18:58 2014 UTC
# Line 19  SUBROUTINE transp(paprs, tsol, t, q, u, Line 19  SUBROUTINE transp(paprs, tsol, t, q, u,
19    REAL, INTENT (IN) :: paprs(klon, klev+1)    REAL, INTENT (IN) :: paprs(klon, klev+1)
20    REAL tsol(klon)    REAL tsol(klon)
21    REAL, INTENT (IN) :: t(klon, klev)    REAL, INTENT (IN) :: t(klon, klev)
22    REAL q(klon, klev), u(klon, klev), v(klon, klev)    REAL, INTENT (IN) :: 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    
25    INTEGER i, l    INTEGER i, l
Legend:
Removed from v.82  
changed lines
  Added in v.91
  ViewVC Help
Powered by ViewVC 1.1.21