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

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

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

trunk/Sources/phylmd/Radlwsw/swr.f revision 178 by guez, Fri Mar 11 18:47:26 2016 UTC trunk/phylmd/Radlwsw/swr.f revision 265 by guez, Tue Mar 20 09:35:59 2018 UTC
# Line 7  contains Line 7  contains
7    SUBROUTINE swr(knu, palbd, pcg, pcld, pomega, psec, ptau, &    SUBROUTINE swr(knu, palbd, pcg, pcld, pomega, psec, ptau, &
8         pcgaz, ppizaz, pray1, pray2, prefz, prj, prk, prmue, ptauaz, ptra1, &         pcgaz, ppizaz, pray1, pray2, prefz, prj, prk, prmue, ptauaz, ptra1, &
9         ptra2)         ptra2)
10      USE dimens_m      USE dimensions
11      USE dimphy      USE dimphy
12      USE raddim      USE raddim
13      USE radepsi      USE radepsi
14      USE radopt      USE radopt
15        use swde_m, only: swde
16    
17      ! ------------------------------------------------------------------      ! ------------------------------------------------------------------
18      ! PURPOSE.      ! PURPOSE.
Legend:
Removed from v.178  
changed lines
  Added in v.265
  ViewVC Help
Powered by ViewVC 1.1.21