XLPack 7.0
XLPack Numerical Library (Excel VBA) Reference Manual
Loading...
Searching...
No Matches

◆ 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]NNumber of elements in vectors x and y. (If N <= 0, returns without computation)
[in]X_IAn 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_IAn 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