source: LMDZ5/branches/testing/libf/dyn3d_common/ener_mod.F90 @ 2641

Last change on this file since 2641 was 2641, checked in by Laurent Fairhead, 8 years ago

Merged trunk changes r2593:2640 into testing branch

  • 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: 207 bytes
Line 
1!
2! $Id: ener_mod.F90 2641 2016-09-29 21:26:46Z fairhead $
3!
4MODULE ener_mod
5
6IMPLICIT NONE 
7
8include "dimensions.h"
9include "paramet.h"
10
11      REAL ang0,etot0,ptot0,ztot0,stot0,                        &
12                ang,etot,ptot,ztot,stot,rmsdpdt,rmsv,gtot(llmm1)
13
14
15END MODULE ener_mod
Note: See TracBrowser for help on using the repository browser.