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

Diff of /trunk/dyn3d/grad.f

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 16  c Line 16  c
16        use paramet_m        use paramet_m
17        IMPLICIT NONE        IMPLICIT NONE
18  c  c
19        INTEGER klevel        INTEGER, intent(in):: klevel
20        REAL  pg( ip1jmp1,klevel )        REAL  pg( ip1jmp1,klevel )
21        REAL pgx( ip1jmp1,klevel ) , pgy( ip1jm,klevel )        REAL pgx( ip1jmp1,klevel ) , pgy( ip1jm,klevel )
22        INTEGER  l,ij        INTEGER  l,ij

Legend:
Removed from v.3  
changed lines
  Added in v.55

  ViewVC Help
Powered by ViewVC 1.1.21