/[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 3 by guez, Wed Feb 27 13:16:39 2008 UTC revision 10 by guez, Fri Apr 18 14:45:53 2008 UTC
# Line 36  c   ---------- Line 36  c   ----------
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),pdt
39        REAL p(ip1jmp1,llmp1),teta(ip1jmp1,llm),pk(ip1jmp1,llm)        REAL, intent(in):: p(ip1jmp1,llmp1)
40          real teta(ip1jmp1,llm),pk(ip1jmp1,llm)
41  c  c
42  c      Local  c      Local
43  c   ---------  c   ---------
Legend:
Removed from v.3  
changed lines
  Added in v.10
  ViewVC Help
Powered by ViewVC 1.1.21