dorgl2.f

Section: LAPACK (3)
Updated: Tue Nov 14 2017
Page Index

dorgl2.f

SYNOPSIS

Functions/Subroutines

subroutine dorgl2 (M, N, K, A, LDA, TAU, WORK, INFO)
DORGL2

Function/Subroutine Documentation

subroutine dorgl2 (integer M, integer N, integer K, double precision, dimension( lda, * ) A, integer LDA, double precision, dimension( * ) TAU, double precision, dimension( * ) WORK, integer INFO)

DORGL2

Purpose:

``` DORGL2 generates an m by n real matrix Q with orthonormal rows,
which is defined as the first m rows of a product of k elementary
reflectors of order n

Q  =  H(k) . . . H(2) H(1)

as returned by DGELQF.
```

Parameters:

M

```          M is INTEGER
The number of rows of the matrix Q. M >= 0.
```

N

```          N is INTEGER
The number of columns of the matrix Q. N >= M.
```

K

```          K is INTEGER
The number of elementary reflectors whose product defines the
matrix Q. M >= K >= 0.
```

A

```          A is DOUBLE PRECISION array, dimension (LDA,N)
On entry, the i-th row must contain the vector which defines
the elementary reflector H(i), for i = 1,2,...,k, as returned
by DGELQF in the first k rows of its array argument A.
On exit, the m-by-n matrix Q.
```

LDA

```          LDA is INTEGER
The first dimension of the array A. LDA >= max(1,M).
```

TAU

```          TAU is DOUBLE PRECISION array, dimension (K)
TAU(i) must contain the scalar factor of the elementary
reflector H(i), as returned by DGELQF.
```

WORK

```          WORK is DOUBLE PRECISION array, dimension (M)
```

INFO

```          INFO is INTEGER
= 0: successful exit
< 0: if INFO = -i, the i-th argument has an illegal value
```

Author:

Univ. of Tennessee

Univ. of California Berkeley