f08nfc generates the real orthogonal matrix
which was determined by
f08nec when reducing a real general matrix
to Hessenberg form.
f08nfc is intended to be used following a call to
f08nec, which reduces a real general matrix
to upper Hessenberg form
by an orthogonal similarity transformation:
.
f08nec represents the matrix
as a product of
elementary reflectors. Here
and
are values determined by
f08nhc when balancing the matrix; if the matrix has not been balanced,
and
.
This function may be used to generate
explicitly as a square matrix.
has the structure:
where
occupies rows and columns
to
.
The computed matrix
differs from an exactly orthogonal matrix by a matrix
such that
where
is the
machine precision.
Please consult the
X06 Chapter Introduction for information on how to control and interrogate the OpenMP environment used within this function. Please also consult the
Users' Note for your implementation for any additional implementation-specific information.
The complex analogue of this function is
f08ntc.
This example computes the Schur factorization of the matrix
, where
Here
is general and must first be reduced to Hessenberg form by
f08nec. The program then calls
f08nfc to form
, and passes this matrix to
f08pec which computes the Schur factorization of
.