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

Diff of /trunk/dyn3d/flumass.f

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

trunk/dyn3d/flumass.f90 revision 78 by guez, Wed Feb 5 17:51:07 2014 UTC trunk/dyn3d/flumass.f revision 265 by guez, Tue Mar 20 09:35:59 2018 UTC
# Line 11  contains Line 11  contains
11      ! Auteurs : P. Le Van, F. Hourdin      ! Auteurs : P. Le Van, F. Hourdin
12      ! Objet: calcul du flux de masse aux niveaux s      ! Objet: calcul du flux de masse aux niveaux s
13    
     USE dimens_m, ONLY: iim, llm  
     USE paramet_m, ONLY: iip1, iip2, ip1jm, ip1jmi1, ip1jmp1  
14      USE comgeom, ONLY: aire, aireu      USE comgeom, ONLY: aire, aireu
15        USE dimensions, ONLY: iim, llm
16        USE paramet_m, ONLY: iip1, iip2, ip1jm, ip1jmi1, ip1jmp1
17    
18      REAL, intent(in):: massebx(ip1jmp1, llm), masseby(ip1jm, llm)      REAL, intent(in):: massebx(ip1jmp1, llm), masseby(ip1jm, llm)
19      real, intent(in):: vcont(ip1jm, llm), ucont(ip1jmp1, llm)      real, intent(in):: vcont(ip1jm, llm), ucont(ip1jmp1, llm)
Legend:
Removed from v.78  
changed lines
  Added in v.265
  ViewVC Help
Powered by ViewVC 1.1.21