source: LMDZ5/branches/testing/libf/dyn3dmem/comdissipn.h @ 1669

Last change on this file since 1669 was 1669, checked in by Laurent Fairhead, 12 years ago

Version testing basée sur la r1668

http://lmdz.lmd.jussieu.fr/utilisateurs/distribution-du-modele/versions-intermediaires


Testing release based on r1668

File size: 480 bytes
RevLine 
[1632]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.