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

Diff of /trunk/dyn3d/covnat.f

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

trunk/libf/dyn3d/covnat.f90 revision 61 by guez, Fri Apr 20 14:58:43 2012 UTC trunk/dyn3d/covnat.f revision 261 by guez, Wed Mar 7 13:33:15 2018 UTC
# Line 8  contains Line 8  contains
8    
9      ! From LMDZ4/libf/dyn3d/covnat.F, version 1.1.1.1 2004/05/19 12:53:07      ! From LMDZ4/libf/dyn3d/covnat.F, version 1.1.1.1 2004/05/19 12:53:07
10    
     USE paramet_m, ONLY: iip1, iip2, ip1jm, ip1jmp1  
11      USE comgeom, ONLY: cu, cv      USE comgeom, ONLY: cu, cv
12        USE paramet_m, ONLY: iip1, iip2, ip1jm, ip1jmp1
13    
14      ! Authors: F. Hourdin, Phu Le Van      ! Authors: F. Hourdin, Phu Le Van
15    
16      ! Objet : calcul des composantes naturelles à partir des      ! Objet : calcul des composantes naturelles du vent  à partir des
17      ! composantes covariantes.      ! composantes covariantes.
18    
19      INTEGER, intent(in):: klevel      INTEGER, intent(in):: klevel
Legend:
Removed from v.61  
changed lines
  Added in v.261
  ViewVC Help
Powered by ViewVC 1.1.21