source: LMDZ.3.3/trunk/libf/dyn3d/comdiss.h @ 2

Last change on this file since 2 was 2, checked in by lmdz, 25 years ago

Initial revision

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