Parent Directory | Revision Log | Patch
revision 28 by guez, Fri Mar 26 18:33:04 2010 UTC | revision 31 by guez, Thu Apr 1 14:59:19 2010 UTC | |
---|---|---|
# | Line 33 c | Line 33 c |
33 | c Arguments: | c Arguments: |
34 | c ---------- | c ---------- |
35 | REAL masse(ip1jmp1,llm),pente_max | REAL masse(ip1jmp1,llm),pente_max |
36 | REAL pbaru( ip1jmp1,llm ),pbarv( ip1jm,llm) | REAL, intent(in):: pbaru( ip1jmp1,llm ),pbarv( ip1jm,llm) |
37 | REAL q(ip1jmp1,llm) | REAL q(ip1jmp1,llm) |
38 | REAL w(ip1jmp1,llm) | REAL w(ip1jmp1,llm) |
39 | real, intent(in):: pdt | real, intent(in):: pdt |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |