/[lmdze]/trunk/phylmd/Radlwsw/radlwsw.f
ViewVC logotype

Diff of /trunk/phylmd/Radlwsw/radlwsw.f

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

revision 254 by guez, Mon Feb 5 10:39:38 2018 UTC revision 308 by guez, Tue Sep 18 15:14:40 2018 UTC
# Line 60  contains Line 60  contains
60      ! refroidissement infrarouge ciel clair      ! refroidissement infrarouge ciel clair
61    
62      real, intent(out):: radsol(klon)      real, intent(out):: radsol(klon)
63      ! bilan radiatif net au sol (W/m**2) (+ vers le bas)      ! bilan radiatif net au sol (W/m**2), positif vers le bas
64    
65      real, intent(out):: albpla(klon) ! albedo planetaire (entre 0 et 1)      real, intent(out):: albpla(klon) ! albedo planetaire (entre 0 et 1)
66      real, intent(out):: topsw(klon) ! flux solaire net au sommet de l'atm.      real, intent(out):: topsw(klon) ! flux solaire net au sommet de l'atm.
# Line 71  contains Line 71  contains
71      real, intent(out):: solsw(klon) ! flux solaire net à la surface      real, intent(out):: solsw(klon) ! flux solaire net à la surface
72    
73      real, intent(out):: sollw(klon)      real, intent(out):: sollw(klon)
74      ! rayonnement infrarouge montant à la surface      ! rayonnement infrarouge net à la surface
75    
76      real, intent(out):: sollwdown(klon)      real, intent(out):: sollwdown(klon)
77      real, intent(out):: topsw0(klon)      real, intent(out):: topsw0(klon)

Legend:
Removed from v.254  
changed lines
  Added in v.308

  ViewVC Help
Powered by ViewVC 1.1.21