source: trunk/LMDZ.MARS/libf/dyn3d/comdissipn.h @ 277

Last change on this file since 277 was 38, checked in by emillour, 14 years ago

Ajout du modè Martien (mon LMDZ.MARS.BETA, du 28/01/2011) dans le rértoire mars, pour pouvoir suivre plus facilement les modifs.
EM

File size: 465 bytes
Line 
1c-----------------------------------------------------------------------
2c INCLUDE comdissipn.h
3
4      REAL  tetaudiv, tetaurot, tetah, cdivu, crot, cdivh
5c
6      COMMON/comdissipn/ tetaudiv(llm),tetaurot(llm),tetah(llm)   ,
7     1                        cdivu,      crot,         cdivh
8
9c
10c    Les parametres de ce common proviennent des calculs effectues dans
11c             Inidissip  .
12c
13c-----------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.