|
|
◆ Drotm()
| Sub Drotm |
( |
N As |
Long, |
|
|
X_I As |
Double, |
|
|
Y_I As |
Double, |
|
|
P() As |
Double, |
|
|
Optional IncX As |
Long = 1, |
|
|
Optional IncY As |
Long = 1 |
|
) |
| |
Apply modified Givens plane rotation (BLAS 1)
- Purpose
- This routine applies the modified Givens plane rotation constructed by drotmg.
- Parameters
-
| [in] | N | Number of elements in vectors x and y. (If N <= 0, returns without computation) |
| [in] | X_I | An element X(I) of the array X().
[in] Starting from this location, vector x is stored with element spacing IncX.
[out] Starting from this location, vector x after rotation is stored with element spacing IncX. x(i) after rotation = H*x(i) + H*y(i) (i = 1 to N) |
| [in] | Y_I | An element Y(I) of the array Y().
[in] Starting from this location, vector y is stored with element spacing IncY.
[out] Starting from this location, vector y after rotation is stored with element spacing IncY. y(i) after rotation = H*y(i) - H*x(i) (i = 1 to N) |
| [in] | P() | Array P(LP - 1) (LP >= 5)
Rotation matrix H
P(0): -1, 0, 1 or -2.
P(1), P(2), P(3), P(4): H11, H21, H12, H22 values. |
| [in] | IncX | (Optional)
Element spacing of vector x in the array X(). (default = 1) |
| [in] | IncY | (Optional)
Element spacing of vector y in the array Y(). (default = 1) |
- Reference
- BLAS
|