/[lmdze]/trunk/libf/phylmd/aeropt.f
ViewVC logotype

Diff of /trunk/libf/phylmd/aeropt.f

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

revision 9 by guez, Wed Feb 27 13:16:39 2008 UTC revision 10 by guez, Fri Apr 18 14:45:53 2008 UTC
# Line 15  c Line 15  c
15  c Arguments:  c Arguments:
16  c  c
17        REAL, intent(in):: paprs(klon,klev+1)        REAL, intent(in):: paprs(klon,klev+1)
18        REAL pplay(klon,klev), t_seri(klon,klev)        REAL, intent(in):: pplay(klon,klev), t_seri(klon,klev)
19        REAL msulfate(klon,klev) ! masse sulfate ug SO4/m3  [ug/m^3]        REAL msulfate(klon,klev) ! masse sulfate ug SO4/m3  [ug/m^3]
20        REAL RHcl(klon,klev)     ! humidite relative ciel clair        REAL RHcl(klon,klev)     ! humidite relative ciel clair
21        REAL tau_ae(klon,klev,2) ! epaisseur optique aerosol        REAL tau_ae(klon,klev,2) ! epaisseur optique aerosol
Legend:
Removed from v.9  
changed lines
  Added in v.10
  ViewVC Help
Powered by ViewVC 1.1.21