/[lmdze]/trunk/dyn3d/diverg_gam.f90
ViewVC logotype

Diff of /trunk/dyn3d/diverg_gam.f90

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

revision 3 by guez, Wed Feb 27 13:16:39 2008 UTC revision 55 by guez, Mon Dec 12 13:25:01 2011 UTC
# Line 28  c   ------------------------------------ Line 28  c   ------------------------------------
28  c  c
29  c    ..........          variables en arguments    ...................  c    ..........          variables en arguments    ...................
30  c  c
31        INTEGER klevel        INTEGER, intent(in):: klevel
32        REAL x( ip1jmp1,klevel ),y( ip1jm,klevel ),div( ip1jmp1,klevel )        REAL x( ip1jmp1,klevel ),y( ip1jm,klevel ),div( ip1jmp1,klevel )
33        REAL cuvscvgam(ip1jm),cvuscugam(ip1jmp1),unsairegam(ip1jmp1)        REAL cuvscvgam(ip1jm),cvuscugam(ip1jmp1),unsairegam(ip1jmp1)
34        REAL unsapolnga,unsapolsga        REAL unsapolnga,unsapolsga
Legend:
Removed from v.3  
changed lines
  Added in v.55
  ViewVC Help
Powered by ViewVC 1.1.21