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

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

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

revision 209 by guez, Wed Dec 7 17:37:21 2016 UTC revision 215 by guez, Tue Mar 28 12:46:28 2017 UTC
# Line 48  contains Line 48  contains
48      REAL delp(klon, klev) ! epaisseur de couche en pression (Pa)      REAL delp(klon, klev) ! epaisseur de couche en pression (Pa)
49      REAL radsol(klon) ! ray. net au sol (Solaire + IR) W / m2      REAL radsol(klon) ! ray. net au sol (Solaire + IR) W / m2
50      REAL, intent(inout):: albedo(:) ! (knon) albedo de la surface      REAL, intent(inout):: albedo(:) ! (knon) albedo de la surface
51      REAL, intent(inout):: snow(klon) ! hauteur de neige      REAL, intent(inout):: snow(:) ! (knon) ! hauteur de neige
52      REAL qsurf(klon) ! humidite de l'air au dessus de la surface      REAL qsurf(klon) ! humidite de l'air au dessus de la surface
53    
54      real, intent(in):: precip_rain(klon)      real, intent(in):: precip_rain(klon)
# Line 58  contains Line 58  contains
58      ! solid water mass flux (kg / m2 / s), positive down      ! solid water mass flux (kg / m2 / s), positive down
59    
60      real, intent(inout):: fder(klon)      real, intent(inout):: fder(klon)
61      real fluxlat(klon)      real, intent(out):: fluxlat(:) ! (knon)
62      real, intent(in):: pctsrf_new_sic(:) ! (klon)      real, intent(in):: pctsrf_new_sic(:) ! (klon)
63      REAL, intent(inout):: agesno(:) ! (knon)      REAL, intent(inout):: agesno(:) ! (knon)
64      REAL d_t(klon, klev) ! incrementation de "t"      REAL d_t(klon, klev) ! incrementation de "t"

Legend:
Removed from v.209  
changed lines
  Added in v.215

  ViewVC Help
Powered by ViewVC 1.1.21