Parent Directory | Revision Log | Patch
revision 42 by guez, Thu Mar 25 14:29:07 2010 UTC | revision 43 by guez, Fri Apr 8 12:43:31 2011 UTC | |
---|---|---|
# | Line 26 c======================================= | Line 26 c======================================= |
26 | ||
27 | ||
28 | ||
29 | REAL teta( ip1jmp1,llm ),pbaru( ip1jmp1,llm ),pbarv( ip1jm,llm) | REAL, intent(in):: teta( ip1jmp1,llm ) |
30 | real pbaru( ip1jmp1,llm ),pbarv( ip1jm,llm) | |
31 | REAL dteta( ip1jmp1,llm ) | REAL dteta( ip1jmp1,llm ) |
32 | INTEGER l,ij | INTEGER l,ij |
33 |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |