source: LMDZ4/branches/V3_test/libf/dyn3dpar/ener.h @ 5065

Last change on this file since 5065 was 709, checked in by Laurent Fairhead, 18 years ago

Nouvelles versions de la dynamique YM
LF

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 412 bytes
RevLine 
[630]1!
2! $Header$
3!
4c-----------------------------------------------------------------------
5c 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     s     ang,etot,ptot,ztot,stot,rmsdpdt,rmsv,gtot
13
14c-----------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.