Purpose
=======
DLAED6 computes the positive or negative root (closest to the origin)
of
z(1) z(2) z(3)
f(x) = rho + --------- + ---------- + ---------
d(1)-x d(2)-x d(3)-x
It is assumed that
if ORGATI = .true. the root is between d(2) and d(3);
otherwise it is between d(1) and d(2)
This routine will be called by DLAED4 when necessary. In most cases,
the root sought is the smallest in magnitude, though it might not be
in some extremely rare situations.
Namespace: DotNumerics.LinearAlgebra.CSLapackAssembly: DWSIM.MathOps.DotNumerics (in DWSIM.MathOps.DotNumerics.dll) Version: 1.0.0.0 (1.0.0.0)
Syntax public void Run(
int KNITER,
bool ORGATI,
double RHO,
double[] D,
int offset_d,
double[] Z,
int offset_z,
double FINIT,
ref double TAU,
ref int INFO
)
Public Sub Run (
KNITER As Integer,
ORGATI As Boolean,
RHO As Double,
D As Double(),
offset_d As Integer,
Z As Double(),
offset_z As Integer,
FINIT As Double,
ByRef TAU As Double,
ByRef INFO As Integer
)
Request Example
View SourceParameters
- KNITER Int32
-
(input) INTEGER
Refer to DLAED4 for its significance.
- ORGATI Boolean
-
(input) LOGICAL
If ORGATI is true, the needed root is between d(2) and
d(3); otherwise it is between d(1) and d(2). See
DLAED4 for further details.
- RHO Double
-
(input) DOUBLE PRECISION
Refer to the equation f(x) above.
- D Double
-
(input) DOUBLE PRECISION array, dimension (3)
D satisfies d(1) .LT. d(2) .LT. d(3).
- offset_d Int32
-
- Z Double
-
(input) DOUBLE PRECISION array, dimension (3)
Each of the elements in z must be positive.
- offset_z Int32
-
- FINIT Double
-
(input) DOUBLE PRECISION
The value of f at 0. It is more accurate than the one
evaluated inside this routine (if someone wants to do
so).
- TAU Double
-
(output) DOUBLE PRECISION
The root of the equation f(x).
- INFO Int32
-
(output) INTEGER
= 0: successful exit
.GT. 0: if INFO = 1, failure to converge
See Also