source: LMDZ5/branches/testing/libf/dyn3dmem/ener.h @ 1695

Last change on this file since 1695 was 1669, checked in by Laurent Fairhead, 12 years ago

Version testing basée sur la r1668

http://lmdz.lmd.jussieu.fr/utilisateurs/distribution-du-modele/versions-intermediaires

Testing release based on r1668
File size: 496 bytes
Line 
1!
2! $Header$
3!
4!-----------------------------------------------------------------------
5! INCLUDE 'ener.h'
6
7      COMMON/ener/ang0,etot0,ptot0,ztot0,stot0,                          &
8     &            ang,etot,ptot,ztot,stot,rmsdpdt ,                      &
9     &            rmsv,gtot(llmm1)
10
11      REAL ang0,etot0,ptot0,ztot0,stot0,                                 &
12     &     ang,etot,ptot,ztot,stot,rmsdpdt,rmsv,gtot
13
14!-----------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.