/[lmdze]/trunk/Sources/phylmd/Radlwsw/swclr.f
ViewVC logotype

Diff of /trunk/Sources/phylmd/Radlwsw/swclr.f

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

revision 178 by guez, Fri Mar 11 18:47:26 2016 UTC revision 208 by guez, Wed Dec 7 16:44:53 2016 UTC
# Line 4  module swclr_m Line 4  module swclr_m
4    
5  contains  contains
6    
7    SUBROUTINE swclr(knu, flag_aer, tauae, pizae, cgae, palbp, pdsig, &    SUBROUTINE swclr(knu, flag_aer, tauae, pizae, cgae, palbp, pdsig, prayl, &
8         prayl, psec, pcgaz, ppizaz, pray1, pray2, prefz, prj, prk, prmu0, ptauaz, &         psec, pcgaz, ppizaz, pray1, pray2, prefz, prj, prk, prmu0, ptauaz, &
9         ptra1, ptra2)         ptra1, ptra2)
10      USE dimens_m      
11      USE dimphy      USE raddim, only: kdlon, kflev
12      USE raddim      USE radepsi, only: repsct, zepsec
13      USE radepsi      USE radopt, only: novlp
     USE radopt  
14    
15      ! ------------------------------------------------------------------      ! ------------------------------------------------------------------
16      ! PURPOSE.      ! PURPOSE.
Legend:
Removed from v.178  
changed lines
  Added in v.208
  ViewVC Help
Powered by ViewVC 1.1.21