source: LMDZ6/trunk/libf/dyn3d_common/comdissip.h @ 5077

Last change on this file since 5077 was 5077, checked in by abarral, 4 months ago

Fix incorrect alignment of variables in COMMON block comdissip.h
Replace obsolete DO with shared termination in advx.F, advxp.F
(minor) replace obsolete bool operators

  • 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: 385 bytes
RevLine 
[524]1!
2! $Header$
3!
[1146]4!-----------------------------------------------------------------------
5! INCLUDE comdissip.h
[524]6
[1146]7      COMMON/comdissip/                                                 &
[5077]8     &    coefdis,tetavel,tetatemp,gamdissip,niterdis
[524]9
10
11      INTEGER niterdis
12
13      REAL tetavel,tetatemp,coefdis,gamdissip
14
[1146]15!-----------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.