/[lmdze]/trunk/dyn3d/advect.f
ViewVC logotype

Diff of /trunk/dyn3d/advect.f

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

revision 264 by guez, Mon Feb 5 10:39:38 2018 UTC revision 265 by guez, Tue Mar 20 09:35:59 2018 UTC
# Line 11  contains Line 11  contains
11      ! Objet : calcul des termes d'advection verticale pour u, v, teta.      ! Objet : calcul des termes d'advection verticale pour u, v, teta.
12      ! Ces termes sont ajoutés à du, dv, dteta.      ! Ces termes sont ajoutés à du, dv, dteta.
13    
14      USE dimens_m, ONLY : iim, llm      USE dimensions, ONLY : iim, llm
15      USE paramet_m, ONLY : iip1, iip2, ip1jm, ip1jmp1      USE paramet_m, ONLY : iip1, iip2, ip1jm, ip1jmp1
16    
17      REAL, intent(in):: ucov(ip1jmp1, llm), vcov(ip1jm, llm)      REAL, intent(in):: ucov(ip1jmp1, llm), vcov(ip1jm, llm)
Legend:
Removed from v.264  
changed lines
  Added in v.265
  ViewVC Help
Powered by ViewVC 1.1.21