1 |
! |
2 |
! $Header: /home/cvsroot/LMDZ4/libf/dyn3d/comdissipn.h,v 1.1.1.1 2004/05/19 12:53:06 lmdzadmin Exp $ |
3 |
! |
4 |
c----------------------------------------------------------------------- |
5 |
c INCLUDE comdissipn.h |
6 |
|
7 |
REAL tetaudiv, tetaurot, tetah, cdivu, crot, cdivh |
8 |
c |
9 |
COMMON/comdissipn/ tetaudiv(llm),tetaurot(llm),tetah(llm) , |
10 |
1 cdivu, crot, cdivh |
11 |
|
12 |
c |
13 |
c Les parametres de ce common proviennent des calculs effectues dans |
14 |
c Inidissip . |
15 |
c |
16 |
c----------------------------------------------------------------------- |