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

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

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

revision 57 by guez, Mon Jan 30 12:54:02 2012 UTC revision 66 by guez, Thu Sep 20 13:00:41 2012 UTC
# Line 11  contains Line 11  contains
11      ! Author: P. Le Van      ! Author: P. Le Van
12      ! Objet: incrémentation des tendances dynamiques      ! Objet: incrémentation des tendances dynamiques
13    
14      USE comvert, ONLY : ap, bp      USE disvert_m, ONLY : ap, bp
15      USE comgeom, ONLY : aire, apoln, apols      USE comgeom, ONLY : aire, apoln, apols
16      USE dimens_m, ONLY : iim, jjm, llm      USE dimens_m, ONLY : iim, jjm, llm
17      USE filtreg_m, ONLY : filtreg      USE filtreg_m, ONLY : filtreg
# Line 100  contains Line 100  contains
100      CALL massdair(p, masse)      CALL massdair(p, masse)
101    
102      finvmasse = masse      finvmasse = masse
103      CALL filtreg(finvmasse, jjp1, llm, -2, 2, .TRUE., 1)      CALL filtreg(finvmasse, jjp1, llm, -2, 2, .TRUE.)
104    
105      ! integration de ucov, vcov, h      ! integration de ucov, vcov, h
106    
Legend:
Removed from v.57  
changed lines
  Added in v.66
  ViewVC Help
Powered by ViewVC 1.1.21