source: LMDZ4/trunk/libf/dyn3d/ener.h @ 4169

Last change on this file since 4169 was 524, checked in by lmdzadmin, 20 years ago

Initial revision

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 412 bytes
RevLine 
[524]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.