/[lmdze]/trunk/libf/dyn3d/dissip.f90
ViewVC logotype

Diff of /trunk/libf/dyn3d/dissip.f90

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 35  c   Arguments: Line 35  c   Arguments:
35  c   ----------  c   ----------
36    
37        REAL vcov(ip1jm,llm),ucov(ip1jmp1,llm),teta(ip1jmp1,llm)        REAL vcov(ip1jm,llm),ucov(ip1jmp1,llm),teta(ip1jmp1,llm)
38        REAL  p( ip1jmp1,llmp1 )        REAL, intent(in):: p( ip1jmp1,llmp1 )
39        REAL dv(ip1jm,llm),du(ip1jmp1,llm),dh(ip1jmp1,llm)        REAL dv(ip1jm,llm),du(ip1jmp1,llm),dh(ip1jmp1,llm)
40    
41  c   Local:  c   Local:
Legend:
Removed from v.3  
changed lines
  Added in v.10
  ViewVC Help
Powered by ViewVC 1.1.21