Parent Directory | Revision Log | Patch
revision 33 by guez, Fri Apr 9 10:56:14 2010 UTC | revision 43 by guez, Fri Apr 8 12:43:31 2011 UTC | |
---|---|---|
# | Line 23 contains | Line 23 contains |
23 | ||
24 | ! Arguments: | ! Arguments: |
25 | INTEGER, INTENT (IN) :: itau | INTEGER, INTENT (IN) :: itau |
26 | REAL :: ucov(ip1jmp1, llm), teta(ip1jmp1, llm), masse(ip1jmp1, llm) | REAL :: ucov(ip1jmp1, llm), masse(ip1jmp1, llm) |
27 | real, intent(in):: teta(ip1jmp1, llm) | |
28 | REAL :: ps(ip1jmp1), phis(ip1jmp1) | REAL :: ps(ip1jmp1), phis(ip1jmp1) |
29 | REAL :: vorpot(ip1jm, llm) | REAL :: vorpot(ip1jm, llm) |
30 | REAL :: phi(ip1jmp1, llm), bern(ip1jmp1, llm) | REAL :: phi(ip1jmp1, llm), bern(ip1jmp1, llm) |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |