source: trunk/LMDZ.GENERIC/libf/dyn3d/comdissnew.h @ 1351

Last change on this file since 1351 was 135, checked in by aslmd, 14 years ago

CHANGEMENT ARBORESCENCE ETAPE 2 -- NON COMPLET

File size: 538 bytes
Line 
1c-----------------------------------------------------------------------
2c INCLUDE comdissnew.h
3
4      COMMON/comdissnew/ lstardis,nitergdiv,nitergrot,niterh,tetagdiv,
5     1                   tetagrot,tetatemp,coefdis
6
7      LOGICAL lstardis
8      INTEGER nitergdiv, nitergrot, niterh
9      REAL     tetagdiv, tetagrot,  tetatemp, coefdis
10
11c
12c ... Les parametres de ce common comdissnew sont  lues par defrun_new
13c              sur le fichier  run.def    ....
14c
15c-----------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.