/[lmdze]/trunk/dyn3d/Dissipation/nxgraro2.f
ViewVC logotype

Diff of /trunk/dyn3d/Dissipation/nxgraro2.f

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

revision 55 by guez, Mon Dec 12 13:25:01 2011 UTC revision 56 by guez, Tue Jan 10 19:02:02 2012 UTC
# Line 24  c    ......  variables en arguments  ... Line 24  c    ......  variables en arguments  ...
24  c  c
25        INTEGER klevel        INTEGER klevel
26        REAL, intent(in):: xcov( ip1jmp1,klevel ), ycov( ip1jm,klevel )        REAL, intent(in):: xcov( ip1jmp1,klevel ), ycov( ip1jm,klevel )
27        REAL  grx( ip1jmp1,klevel ),  gry( ip1jm,klevel )        REAL, intent(out)::  grx( ip1jmp1,klevel ),  gry( ip1jm,klevel )
28        real, intent(in):: crot        real, intent(in):: crot
29  c  c
30  c    ......   variables locales     ........  c    ......   variables locales     ........

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

  ViewVC Help
Powered by ViewVC 1.1.21