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

Diff of /trunk/dyn3d/dudv2.f

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

revision 254 by guez, Mon Feb 5 10:39:38 2018 UTC revision 260 by guez, Tue Mar 6 17:18:33 2018 UTC
# Line 20  contains Line 20  contains
20      REAL, INTENT(IN):: teta(ip1jmp1, llm)      REAL, INTENT(IN):: teta(ip1jmp1, llm)
21      REAL, INTENT(IN):: pkf(ip1jmp1, llm)      REAL, INTENT(IN):: pkf(ip1jmp1, llm)
22      real, INTENT(IN):: bern(ip1jmp1, llm)      real, INTENT(IN):: bern(ip1jmp1, llm)
23      real du(ip1jmp1, llm), dv(ip1jm, llm)      real, intent(inout):: du(ip1jmp1, llm), dv(ip1jm, llm)
     ! du et dv sont des arguments de sortie pour le s-pg  
24    
25      ! Local:      ! Local:
26      INTEGER l, ij      INTEGER l, ij
Legend:
Removed from v.254  
changed lines
  Added in v.260
  ViewVC Help
Powered by ViewVC 1.1.21