/[lmdze]/trunk/phylmd/transp_lay.f90
ViewVC logotype

Diff of /trunk/phylmd/transp_lay.f90

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 12  SUBROUTINE transp_lay(paprs, tsol, t, q, Line 12  SUBROUTINE transp_lay(paprs, tsol, t, q,
12    ! ======================================================================    ! ======================================================================
13    
14    
15    REAL, INTENT (IN) :: paprs(klon, klev+1)    REAL, INTENT (IN):: paprs(klon, klev+1)
16    REAL tsol(klon)    REAL tsol(klon)
17    REAL, INTENT (IN) :: t(klon, klev)    REAL, INTENT (IN):: t(klon, klev)
18    REAL q(klon, klev), u(klon, klev), v(klon, klev)    REAL, INTENT (IN):: q(klon, klev), u(klon, klev), v(klon, klev)
19    REAL utran_e(klon, klev), utran_q(klon, klev)    REAL utran_e(klon, klev), utran_q(klon, klev)
20    REAL vtran_e(klon, klev), vtran_q(klon, klev)    REAL vtran_e(klon, klev), vtran_q(klon, klev)
21    
Legend:
Removed from v.82  
changed lines
  Added in v.91
  ViewVC Help
Powered by ViewVC 1.1.21