/[lmdze]/trunk/dyn3d/caladvtrac.f
ViewVC logotype

Diff of /trunk/dyn3d/caladvtrac.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 3 by guez, Wed Feb 27 13:16:39 2008 UTC revision 10 by guez, Fri Apr 18 14:45:53 2008 UTC
# Line 14  SUBROUTINE caladvtrac(q, pbaru, pbarv, p Line 14  SUBROUTINE caladvtrac(q, pbaru, pbarv, p
14    IMPLICIT NONE    IMPLICIT NONE
15    
16    REAL pbaru(ip1jmp1, llm), pbarv((iim + 1) * jjm, llm), masse(ip1jmp1, llm)    REAL pbaru(ip1jmp1, llm), pbarv((iim + 1) * jjm, llm), masse(ip1jmp1, llm)
17    REAL p(ip1jmp1, llm + 1), q(ip1jmp1, llm, nqmx)    REAL, intent(in):: p(ip1jmp1, llm + 1)
18      real q(ip1jmp1, llm, nqmx)
19    
20    real, intent(out):: dq(ip1jmp1, llm, 2)    real, intent(out):: dq(ip1jmp1, llm, 2)
21    ! (n'est utilisé et dimensionné que pour l'eau vapeur et liquide)    ! (n'est utilisé et dimensionné que pour l'eau vapeur et liquide)
Legend:
Removed from v.3  
changed lines
  Added in v.10
  ViewVC Help
Powered by ViewVC 1.1.21