source: LMDZ4/trunk/libf/dyn3d/comdiss.h @ 802

Last change on this file since 802 was 524, checked in by lmdzadmin, 21 years ago

Initial revision

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 389 bytes
Line 
1!
2! $Header$
3!
4c-----------------------------------------------------------------------
5c INCLUDE 'comdiss.h'
6
7      INTEGER niter
8      REAL tetau(llm),tetah(llm),cdivu,cdivh,crot
9      LOGICAL dissipst
10
11      COMMON/comdissi/niter
12      COMMON/comdissr/tetau,tetah,cdivu,cdivh,crot
13      COMMON/comdissl/dissipst
14
15c-----------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.