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

Diff of /trunk/phylmd/clqh.f

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

revision 266 by guez, Thu Apr 19 17:54:55 2018 UTC revision 267 by guez, Thu May 3 16:14:08 2018 UTC
# Line 49  contains Line 49  contains
49      REAL pplay(klon, klev) ! pression au milieu de couche (Pa)      REAL pplay(klon, klev) ! pression au milieu de couche (Pa)
50      REAL delp(klon, klev) ! epaisseur de couche en pression (Pa)      REAL delp(klon, klev) ! epaisseur de couche en pression (Pa)
51    
52      REAL, intent(inout):: radsol(:) ! (knon)      REAL, intent(in):: radsol(:) ! (knon)
53      ! rayonnement net au sol (Solaire + IR) W / m2      ! rayonnement net au sol (Solaire + IR) W / m2
54    
55      REAL, intent(inout):: albedo(:) ! (knon) albedo de la surface      REAL, intent(inout):: albedo(:) ! (knon) albedo de la surface
Legend:
Removed from v.266  
changed lines
  Added in v.267
  ViewVC Help
Powered by ViewVC 1.1.21