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

Diff of /trunk/dyn3d/caldyn0.f

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

revision 66 by guez, Thu Sep 20 13:00:41 2012 UTC revision 67 by guez, Tue Oct 2 15:50:56 2012 UTC
# Line 12  contains Line 12  contains
12      ! Objet: calcul des tendances dynamiques      ! Objet: calcul des tendances dynamiques
13      ! Modif 04/93 F.Forget      ! Modif 04/93 F.Forget
14    
15        USE comgeom, ONLY : airesurg
16      USE dimens_m, ONLY : llm      USE dimens_m, ONLY : llm
     USE paramet_m, ONLY : iip1, ip1jm, ip1jmp1, jjp1, llmp1  
17      USE disvert_m, ONLY : ap, bp      USE disvert_m, ONLY : ap, bp
18      USE comgeom, ONLY : airesurg      use massdair_m, only: massdair
19        USE paramet_m, ONLY : iip1, ip1jm, ip1jmp1, jjp1, llmp1
20    
21      !   Arguments:      !   Arguments:
22      REAL, INTENT (IN) :: vcov(ip1jm, llm), ucov(ip1jmp1, llm)      REAL, INTENT (IN) :: vcov(ip1jm, llm), ucov(ip1jmp1, llm)
Legend:
Removed from v.66  
changed lines
  Added in v.67
  ViewVC Help
Powered by ViewVC 1.1.21