dqform.f
SUBROUTINE DQFORM (M, N, Q, LDQ, WA)
C***BEGIN PROLOGUE DQFORM
....
....
Warning: this routine is not intended to be user-callable.
....
....
C***SUBSIDIARY
C***PURPOSE Subsidiary to DNSQ and DNSQE
C***LIBRARY SLATEC
C***TYPE DOUBLE PRECISION (QFORM-S, DQFORM-D)
C***AUTHOR (UNKNOWN)
C***DESCRIPTION
C
C This subroutine proceeds from the computed QR factorization of
C an M by N matrix A to accumulate the M by M orthogonal matrix
C Q from its factored form.
C
C The subroutine statement is
C
C SUBROUTINE DQFORM(M,N,Q,LDQ,WA)
C
C where
C
C M is a positive integer input variable set to the number
C of rows of A and the order of Q.
C
C N is a positive integer input variable set to the number
C of columns of A.
C
C Q is an M by M array. On input the full lower trapezoid in
C the first MIN(M,N) columns of Q contains the factored form.
C On output Q has been accumulated into a square matrix.
C
C LDQ is a positive integer input variable not less than M
C which specifies the leading dimension of the array Q.
C
C WA is a work array of length M.
C
C***SEE ALSO DNSQ, DNSQE
C***ROUTINES CALLED (NONE)
C***REVISION HISTORY (YYMMDD)
C 800301 DATE WRITTEN
C 890531 Changed all specific intrinsics to generic. (WRB)
C 890831 Modified array declarations. (WRB)
C 891214 Prologue converted to Version 4.0 format. (BAB)
C 900326 Removed duplicate information from DESCRIPTION section.
C (WRB)
C 900328 Added TYPE section. (WRB)
C***END PROLOGUE DQFORM