Parent Directory | Revision Log | Patch
revision 3 by guez, Wed Feb 27 13:16:39 2008 UTC | revision 31 by guez, Thu Apr 1 14:59:19 2010 UTC | |
---|---|---|
# | Line 27 c======================================= | Line 27 c======================================= |
27 | c Arguments: | c Arguments: |
28 | c ---------- | c ---------- |
29 | INTEGER iq,nt | INTEGER iq,nt |
30 | REAL pbaru( ip1jmp1,llm ),pbarv( ip1jm,llm ) | REAL, intent(in):: pbaru( ip1jmp1,llm ),pbarv( ip1jm,llm ) |
31 | REAL masse(iip1,jjp1,llm) | REAL masse(iip1,jjp1,llm) |
32 | REAL q( iip1,jjp1,llm,0:9) | REAL q( iip1,jjp1,llm,0:9) |
33 | REAL w( ip1jmp1,llm ) | REAL w( ip1jmp1,llm ) |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |