version 1.10, 2011/11/21 22:19:34
|
version 1.11, 2012/07/31 11:06:36
|
Line 210
|
Line 210
|
* ===================================================================== |
* ===================================================================== |
* |
* |
* .. Parameters .. |
* .. Parameters .. |
DOUBLE PRECISION FOUR, MAXGROWTH1, MAXGROWTH2, ONE, QUART, TWO, |
DOUBLE PRECISION FOUR, MAXGROWTH1, MAXGROWTH2, ONE, QUART, TWO |
$ ZERO |
PARAMETER ( ONE = 1.0D0, TWO = 2.0D0, FOUR = 4.0D0, |
PARAMETER ( ZERO = 0.0D0, ONE = 1.0D0, TWO = 2.0D0, |
$ QUART = 0.25D0, |
$ FOUR = 4.0D0, QUART = 0.25D0, |
|
$ MAXGROWTH1 = 8.D0, |
$ MAXGROWTH1 = 8.D0, |
$ MAXGROWTH2 = 8.D0 ) |
$ MAXGROWTH2 = 8.D0 ) |
* .. |
* .. |