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

Diff of /trunk/dyn3d/laplacien.f

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

revision 102 by guez, Wed Mar 5 14:57:53 2014 UTC revision 103 by guez, Fri Aug 29 13:00:05 2014 UTC
# Line 10  contains Line 10  contains
10      ! P. Le Van      ! P. Le Van
11      ! Calcul de div(grad) de teta.      ! Calcul de div(grad) de teta.
12    
     USE dimens_m, ONLY: llm  
13      use divergf_m, only: divergf      use divergf_m, only: divergf
14      use filtreg_m, only: filtreg      use filtreg_m, only: filtreg
15      use grad_m, only: grad      use grad_m, only: grad
# Line 20  contains Line 19  contains
19      REAL, intent(inout):: teta(ip1jmp1, klevel)      REAL, intent(inout):: teta(ip1jmp1, klevel)
20    
21      ! Variables locales:      ! Variables locales:
22      REAL ghy(ip1jm, llm), ghx(ip1jmp1, llm)      REAL ghy(ip1jm, klevel), ghx(ip1jmp1, klevel)
23    
24      !-----------------------------------------------------------------      !-----------------------------------------------------------------
25    
Legend:
Removed from v.102  
changed lines
  Added in v.103
  ViewVC Help
Powered by ViewVC 1.1.21