source: LMDZ5/trunk/libf/dyn3d/ener.h @ 1940

Last change on this file since 1940 was 1907, checked in by lguez, 11 years ago

Added a copyright property to every file of the distribution, except
for the fcm files (which have their own copyright). Use svn propget on
a file to see the copyright. For instance:

$ svn propget copyright libf/phylmd/physiq.F90
Name of program: LMDZ
Creation date: 1984
Version: LMDZ5
License: CeCILL version 2
Holder: Laboratoire de m\'et\'eorologie dynamique, CNRS, UMR 8539
See the license file in the root directory

Also added the files defining the CeCILL version 2 license, in French
and English, at the top of the LMDZ tree.

  • Property copyright set to
    Name of program: LMDZ
    Creation date: 1984
    Version: LMDZ5
    License: CeCILL version 2
    Holder: Laboratoire de m\'et\'eorologie dynamique, CNRS, UMR 8539
    See the license file in the root directory
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 703 bytes
Line 
1!
2! $Id: ener.h 1907 2013-11-26 13:10:46Z jghattas $
3!
4!  ATTENTION!!!!: ce fichier include est compatible format fixe/format libre
5!                 veillez à n'utiliser que des ! pour les commentaires
6!                 et à bien positionner les & des lignes de continuation
7!                 (les placer en colonne 6 et en colonne 73)
8!
9! INCLUDE 'ener.h'
10
11      COMMON/ener/ang0,etot0,ptot0,ztot0,stot0,                         &
12     &            ang,etot,ptot,ztot,stot,rmsdpdt ,                     &
13     &            rmsv,gtot(llmm1)
14
15      REAL ang0,etot0,ptot0,ztot0,stot0,                                &
16     &     ang,etot,ptot,ztot,stot,rmsdpdt,rmsv,gtot
17
18!-----------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.