source: LMDZ6/trunk/libf/dyn3d_common/ener_mod.f90 @ 5456

Last change on this file since 5456 was 5285, checked in by abarral, 2 months ago

As discussed internally, remove generic ONLY: ... for new _mod_h modules

  • 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: 227 bytes
RevLine 
[524]1!
[1454]2! $Id: ener_mod.f90 5285 2024-10-28 13:33:29Z aborella $
[524]3!
[2622]4MODULE ener_mod
[524]5
[5271]6USE dimensions_mod, ONLY: iim, jjm, llm, ndm
[5285]7USE paramet_mod_h
[5271]8IMPLICIT NONE
[524]9
[5271]10
[524]11
[5272]12
[2622]13      REAL ang0,etot0,ptot0,ztot0,stot0,                        &
14                ang,etot,ptot,ztot,stot,rmsdpdt,rmsv,gtot(llmm1)
15
16
17END MODULE ener_mod
Note: See TracBrowser for help on using the repository browser.