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

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

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

trunk/libf/phylmd/calltherm.f90 revision 52 by guez, Fri Sep 23 12:28:01 2011 UTC trunk/Sources/phylmd/calltherm.f revision 134 by guez, Wed Apr 29 15:47:56 2015 UTC
# Line 12  contains Line 12  contains
12      USE dimphy, ONLY: klev, klon      USE dimphy, ONLY: klev, klon
13      USE ctherm, ONLY: l_mix_thermals, nsplit_thermals, r_aspect_thermals, &      USE ctherm, ONLY: l_mix_thermals, nsplit_thermals, r_aspect_thermals, &
14           tho_thermals, w2di_thermals           tho_thermals, w2di_thermals
15        use thermcell_m, only: thermcell
16    
17      REAL, intent(in):: dtime      REAL, intent(in):: dtime
18    
19      REAL u_seri(klon, klev), v_seri(klon, klev)      REAL, intent(inout):: u_seri(klon, klev), v_seri(klon, klev)
20      REAL, intent(inout):: t_seri(klon, klev)      REAL, intent(inout):: t_seri(klon, klev)
21      real q_seri(klon, klev)      real q_seri(klon, klev)
22      REAL, intent(in):: paprs(klon, klev+1)      REAL, intent(in):: paprs(klon, klev+1)
Legend:
Removed from v.52  
changed lines
  Added in v.134
  ViewVC Help
Powered by ViewVC 1.1.21