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

Diff of /trunk/dyn3d/vlspltqs.f

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

revision 10 by guez, Fri Apr 18 14:45:53 2008 UTC revision 28 by guez, Fri Mar 26 18:33:04 2010 UTC
# Line 35  c   ---------- Line 35  c   ----------
35        REAL masse(ip1jmp1,llm),pente_max        REAL masse(ip1jmp1,llm),pente_max
36        REAL pbaru( ip1jmp1,llm ),pbarv( ip1jm,llm)        REAL pbaru( ip1jmp1,llm ),pbarv( ip1jm,llm)
37        REAL q(ip1jmp1,llm)        REAL q(ip1jmp1,llm)
38        REAL w(ip1jmp1,llm),pdt        REAL w(ip1jmp1,llm)
39          real, intent(in):: pdt
40        REAL, intent(in):: p(ip1jmp1,llmp1)        REAL, intent(in):: p(ip1jmp1,llmp1)
41        real teta(ip1jmp1,llm),pk(ip1jmp1,llm)        real teta(ip1jmp1,llm),pk(ip1jmp1,llm)
42  c  c
Legend:
Removed from v.10  
changed lines
  Added in v.28
  ViewVC Help
Powered by ViewVC 1.1.21