source: LMDZ4/trunk/libf/dyn3d/comdissipn.h @ 540

Last change on this file since 540 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: 480 bytes
Line 
1!
2! $Header$
3!
4c-----------------------------------------------------------------------
5c INCLUDE comdissipn.h
6
7      REAL  tetaudiv, tetaurot, tetah, cdivu, crot, cdivh
8c
9      COMMON/comdissipn/ tetaudiv(llm),tetaurot(llm),tetah(llm)   ,
10     1                        cdivu,      crot,         cdivh
11
12c
13c    Les parametres de ce common proviennent des calculs effectues dans
14c             Inidissip  .
15c
16c-----------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.