Last change
on this file since 701 was
630,
checked in by Laurent Fairhead, 20 years ago
|
Import d'une version parallele de la dynamique YM
LF
|
-
Property svn:eol-style set to
native
-
Property svn:keywords set to
Author Date Id Revision
|
File size:
553 bytes
|
Rev | Line | |
---|
[630] | 1 | ! |
---|
| 2 | ! $Header$ |
---|
| 3 | ! |
---|
| 4 | c----------------------------------------------------------------------- |
---|
| 5 | c INCLUDE comdissnew.h |
---|
| 6 | |
---|
| 7 | COMMON/comdissnew/ lstardis,nitergdiv,nitergrot,niterh,tetagdiv, |
---|
| 8 | 1 tetagrot,tetatemp,coefdis |
---|
| 9 | |
---|
| 10 | LOGICAL lstardis |
---|
| 11 | INTEGER nitergdiv, nitergrot, niterh |
---|
| 12 | REAL tetagdiv, tetagrot, tetatemp, coefdis |
---|
| 13 | |
---|
| 14 | c |
---|
| 15 | c ... Les parametres de ce common comdissnew sont lues par defrun_new |
---|
| 16 | c sur le fichier run.def .... |
---|
| 17 | c |
---|
| 18 | c----------------------------------------------------------------------- |
---|
Note: See
TracBrowser
for help on using the repository browser.