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

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