/[lmdze]/trunk/Sources/dyn3d/adaptdt.f
ViewVC logotype

Diff of /trunk/Sources/dyn3d/adaptdt.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 31 by guez, Thu Apr 1 14:59:19 2010 UTC
# Line 13  Line 13 
13        use comgeom        use comgeom
14        use temps        use temps
15        use ener        use ener
             use comdissip  
16        IMPLICIT NONE        IMPLICIT NONE
17    
18    
# Line 22  c     Arguments Line 21  c     Arguments
21  c----------------------------------------------------------  c----------------------------------------------------------
22        INTEGER n,nadv        INTEGER n,nadv
23        REAL dtbon        REAL dtbon
24        REAL pbaru(iip1,jjp1,llm)        REAL, intent(in):: pbaru(iip1,jjp1,llm)
25        REAL masse(iip1,jjp1,llm)        REAL masse(iip1,jjp1,llm)
26  c----------------------------------------------------------      c----------------------------------------------------------    
27  c     Local  c     Local
Legend:
Removed from v.3  
changed lines
  Added in v.31
  ViewVC Help
Powered by ViewVC 1.1.21