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

Diff of /trunk/Sources/dyn3d/ener.f

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

revision 82 by guez, Wed Mar 5 14:57:53 2014 UTC revision 104 by guez, Thu Sep 4 10:05:52 2014 UTC
# Line 2  module ener Line 2  module ener
2    
3    ! From ener.h, v 1.1.1.1 2004/05/19 12:53:07 lmdzadmin    ! From ener.h, v 1.1.1.1 2004/05/19 12:53:07 lmdzadmin
4    
   use dimens_m, only: llm  
     
5    implicit none    implicit none
6    
7    private llm    REAL, save:: ang0, etot0, ptot0, ztot0, stot0
   
   REAL ang0, etot0, ptot0, ztot0, stot0, ang, etot, ptot, ztot, stot, rmsdpdt  
   real rmsv  
   
   save  
8    
9  end module ener  end module ener

Legend:
Removed from v.82  
changed lines
  Added in v.104

  ViewVC Help
Powered by ViewVC 1.1.21