/[lmdze]/trunk/libf/dyn3d/Dissipation/nxgrarot.f
ViewVC logotype

Diff of /trunk/libf/dyn3d/Dissipation/nxgrarot.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 25  c Line 25  c
25  c  c
26        INTEGER klevel        INTEGER klevel
27        REAL, intent(in):: xcov( ip1jmp1,klevel ), ycov( ip1jm,klevel )        REAL, intent(in):: xcov( ip1jmp1,klevel ), ycov( ip1jm,klevel )
28        REAL  grx( ip1jmp1,klevel ),  gry( ip1jm,klevel )        REAL, intent(out)::  grx( ip1jmp1,klevel ),  gry( ip1jm,klevel )
29        real, intent(in):: crot        real, intent(in):: crot
30  c  c
31        REAL rot(ip1jm,llm)        REAL rot(ip1jm,llm)
Legend:
Removed from v.55  
changed lines
  Added in v.56
  ViewVC Help
Powered by ViewVC 1.1.21