/[lmdze]/trunk/phylmd/Interface_surf/clvent.f
ViewVC logotype

Diff of /trunk/phylmd/Interface_surf/clvent.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 286 by guez, Tue Jul 24 15:22:48 2018 UTC
# Line 11  contains Line 11  contains
11      ! Date: 1993/08/18      ! Date: 1993/08/18
12      ! Objet : diffusion verticale de la vitesse      ! Objet : diffusion verticale de la vitesse
13    
     USE dimphy, ONLY: klev  
14      use nr_util, only: assert      use nr_util, only: assert
15    
16        USE dimphy, ONLY: klev
17      USE suphec_m, ONLY: rd, rg      USE suphec_m, ONLY: rd, rg
18    
19      REAL, intent(in):: dtime ! intervalle de temps (en s)      REAL, intent(in):: dtime ! intervalle de temps (en s)
Legend:
Removed from v.254  
changed lines
  Added in v.286
  ViewVC Help
Powered by ViewVC 1.1.21