Parent Directory
|
Revision Log
|
Patch
trunk/libf/dyn3d/rotat_nfil.f revision 3 by guez, Wed Feb 27 13:16:39 2008 UTC | trunk/dyn3d/rotat_nfil.f revision 76 by guez, Fri Nov 15 18:45:49 2013 UTC | |
---|---|---|
# | Line 20 c | Line 20 c |
20 | c | c |
21 | c ..... variables en arguments ...... | c ..... variables en arguments ...... |
22 | c | c |
23 | INTEGER klevel | INTEGER, intent(in):: klevel |
24 | REAL rot( ip1jm,klevel ) | REAL rot( ip1jm,klevel ) |
25 | REAL x( ip1jmp1,klevel ), y( ip1jm,klevel ) | REAL x( ip1jmp1,klevel ), y( ip1jm,klevel ) |
26 | c | c |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |