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

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

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

revision 136 by guez, Wed Apr 29 15:47:56 2015 UTC revision 137 by guez, Wed May 6 15:51:03 2015 UTC
# Line 10  contains Line 10  contains
10    
11      USE dimens_m, ONLY: iim, jjm, llm      USE dimens_m, ONLY: iim, jjm, llm
12      USE paramet_m, ONLY: ip1jm, ip1jmp1, jjp1, llmm1      USE paramet_m, ONLY: ip1jm, ip1jmp1, jjp1, llmm1
13      USE filtreg_m, ONLY: filtreg      USE filtreg_scal_m, ONLY: filtreg_scal
14    
15      ! Authors: P. Le Van, F. Hourdin      ! Authors: P. Le Van, F. Hourdin
16      ! Objet: calcul de la convergence du flux de masse aux niveaux p      ! Objet: calcul de la convergence du flux de masse aux niveaux p
# Line 31  contains Line 31  contains
31      CALL convflu(pbaru, pbarv, llm, convm)      CALL convflu(pbaru, pbarv, llm, convm)
32    
33      ! Filtrage :      ! Filtrage :
34      CALL filtreg(convm, direct = .true., intensive = .false.)      CALL filtreg_scal(convm, direct = .true., intensive = .false.)
35    
36      ! Intégration de la convergence de masse de haut en bas :      ! Intégration de la convergence de masse de haut en bas :
37      DO l = llmm1, 1, -1      DO l = llmm1, 1, -1
Legend:
Removed from v.136  
changed lines
  Added in v.137
  ViewVC Help
Powered by ViewVC 1.1.21