Parent Directory
| 
Revision Log
| 
Patch
| revision 44 by guez, Wed Apr 13 12:29:18 2011 UTC | revision 68 by guez, Wed Nov 14 16:59:30 2012 UTC | |
|---|---|---|
| # | Line 11 SUBROUTINE fluxstokenc(pbaru, pbarv, mas | Line 11 SUBROUTINE fluxstokenc(pbaru, pbarv, mas |
| 11 | IMPLICIT NONE | IMPLICIT NONE |
| 12 | ||
| 13 | REAL pbaru(ip1jmp1, llm), pbarv(ip1jm, llm) | REAL pbaru(ip1jmp1, llm), pbarv(ip1jm, llm) |
| 14 | REAL masse(ip1jmp1, llm), phi(ip1jmp1, llm) | REAL masse(ip1jmp1, llm) |
| 15 | real, intent(in):: phi(ip1jmp1, llm) | |
| 16 | real, intent(in):: teta(ip1jmp1, llm) | real, intent(in):: teta(ip1jmp1, llm) |
| 17 | REAL phis(ip1jmp1) | REAL phis(ip1jmp1) |
| 18 | REAL, intent(in):: time_step | REAL, intent(in):: time_step |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.21 |