source: LMDZ.3.3/trunk/libf/dyn3d/comdissnew.h @ 2

Last change on this file since 2 was 2, checked in by lmdz, 25 years ago

Initial revision

  • Property svn:eol-style set to native
  • Property svn:executable set to *
  • Property svn:keywords set to Author Date Id Revision
File size: 538 bytes
RevLine 
[2]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.