/[lmdze]/trunk/Sources/dyn3d/massbarxy.f
ViewVC logotype

Diff of /trunk/Sources/dyn3d/massbarxy.f

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

trunk/dyn3d/massbarxy.f90 revision 78 by guez, Wed Feb 5 17:51:07 2014 UTC trunk/Sources/dyn3d/massbarxy.f revision 164 by guez, Tue Jul 28 14:53:31 2015 UTC
# Line 9  contains Line 9  contains
9      ! From LMDZ4/libf/dyn3d/massbarxy.F, version 1.1.1.1 2004/05/19 12:53:07      ! From LMDZ4/libf/dyn3d/massbarxy.F, version 1.1.1.1 2004/05/19 12:53:07
10    
11      ! Calcule les moyennes en x et y de la masse d'air dans chaque maille.      ! Calcule les moyennes en x et y de la masse d'air dans chaque maille.
12      ! Auteurs : P. Le Van, F. Hourdin.      ! Authors: P. Le Van, F. Hourdin.
13    
14        USE comgeom, ONLY: alpha1, alpha2, alpha3, alpha4
15      USE dimens_m, ONLY: iim, llm      USE dimens_m, ONLY: iim, llm
16      USE paramet_m, ONLY: iip1, iip2, ip1jm, ip1jmp1      USE paramet_m, ONLY: iip1, iip2, ip1jm, ip1jmp1
     USE comgeom, ONLY: alpha1, alpha2, alpha3, alpha4  
17    
18      REAL, intent(in):: masse(ip1jmp1, llm)      REAL, intent(in):: masse(ip1jmp1, llm)
19      real, intent(out):: massebxy(ip1jm, llm)      real, intent(out):: massebxy(ip1jm, llm)
Legend:
Removed from v.78  
changed lines
  Added in v.164
  ViewVC Help
Powered by ViewVC 1.1.21