|
NAG[f01qec] NAG[nag_real_form_q] - Form columns of after factorization by f01qcc (nag_real_qr)
|
|
Calling Sequence
f01qec(wheret, ncolq, a, 'm'=m, 'n'=n, 'tda'=tda, 'zeta'=zeta, 'fail'=fail)
nag_real_form_q(. . .)
Parameters
|
wheret - String;
|
|
|
On entry: indicates where the elements of are to be found as follows:
|
|
, the elements of are in a.
|
|
, the elements of are separate from a, in zeta.
|
|
Constraint: wheret must be "Nag_ElementsIn" or "Nag_ElementsSeparate". .
|
|
|
ncolq - integer;
|
|
|
Constraint: . .
|
|
|
a - Matrix(1..m, 1..tda, datatype=float[8], order=C_order);
|
|
|
|
'm'=m - integer; (optional)
|
|
|
Default value: the first dimension of the array a.
|
|
On entry: , the number of rows of .
|
|
Constraint: . .
|
|
|
'n'=n - integer; (optional)
|
|
|
Default value: the first dimension of the array zeta.
|
|
On entry: , the number of columns of .
|
|
Constraint: . .
|
|
|
'tda'=tda - integer; (optional)
|
|
|
On entry: the second dimension of the array a as declared in the function from which nag_real_form_q (f01qec) is called.
|
|
Constraint: . .
|
|
|
'zeta'=zeta - Vector(1..n, datatype=float[8]); (optional)
|
|
|
|
'fail'=fail - table; (optional)
|
|
|
The NAG error argument, see the documentation for NagError.
|
|
|
|
Description
|
|
|
Error Indicators and Warnings
|
|
"NE_2_INT_ARG_GT"
On entry, while . These arguments must satisfy .
"NE_2_INT_ARG_LT"
On entry, while . These arguments must satisfy .
"NE_ALLOC_FAIL"
Dynamic memory allocation failed.
"NE_BAD_PARAM"
On entry, argument wheret had an illegal value.
"NE_INT_ARG_LT"
On entry, n must not be less than 0: .
|
|
Further Comments
|
|
The approximate number of floating-point operations required is given by
|
|
|
Examples
|
|
>
|
wheret := "Nag_ElementsSeparate":
m := 5:
n := 3:
ncolq := 5:
tda := 5:
a := Matrix([[-4, -2, -3, 0, 0], [0.4082482904638631, -3, -2, 0, 0], [0.3265986323710905, -0.4618802153517007, -4, 0, 0], [0.4082482904638631, -0.5773502691896258, -2.335698535613162e-18, 0, 0], [0.2449489742783178, -0.3464101615137755, -0.6324555320336759, 0, 0]], datatype=float[8], order='C_order'):
zeta := Vector([1.224744871391589, 1.154700538379251, 1.264911064067352], datatype=float[8]):
NAG:-f01qec(wheret, ncolq, a, 'm' = m, 'n' = n, 'tda' = tda, 'zeta' = zeta):
|

|
|