|
version 1.8, 2011/11/21 22:19:28
|
version 1.9, 2012/07/31 11:06:35
|
|
Line 352
|
Line 352
|
| * ===================================================================== |
* ===================================================================== |
| * |
* |
| * .. Local Parameters .. |
* .. Local Parameters .. |
| DOUBLE PRECISION ZERO, HALF, ONE, TWO |
DOUBLE PRECISION ZERO, HALF, ONE |
| PARAMETER ( ZERO = 0.0D0, HALF = 0.5D0, ONE = 1.0D0, |
PARAMETER ( ZERO = 0.0D0, HALF = 0.5D0, ONE = 1.0D0) |
| $ TWO = 2.0D0 ) |
|
| INTEGER NSWEEP |
INTEGER NSWEEP |
| PARAMETER ( NSWEEP = 30 ) |
PARAMETER ( NSWEEP = 30 ) |
| * .. |
* .. |
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to dgesvj.f CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [local] / rpl / lapack / lapack