Parent Directory | Revision Log | Patch
revision 27 by guez, Thu Mar 25 14:29:07 2010 UTC | revision 55 by guez, Mon Dec 12 13:25:01 2011 UTC | |
---|---|---|
# | Line 21 c | Line 21 c |
21 | c | c |
22 | c ......... variables en arguments .............. | c ......... variables en arguments .............. |
23 | c | c |
24 | INTEGER klevel | INTEGER, intent(in):: klevel |
25 | REAL teta( ip1jmp1,klevel ), divgra( ip1jmp1,klevel ) | REAL teta( ip1jmp1,klevel ), divgra( ip1jmp1,klevel ) |
26 | c | c |
27 | c ............ variables locales .............. | c ............ variables locales .............. |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |