Developer Reference

  • 2020.2
  • 07/15/2020
  • Public Content
Contents

p?ormr3

Applies an orthogonal distributed matrix to a general
m
-by-
n
distributed matrix.

Syntax

call psormr3
(
side
,
trans
,
m
,
n
,
k
,
l
,
a
,
ia
,
ja
,
desca
,
tau
,
c
,
ic
,
jc
,
descc
,
work
,
lwork
,
info
)
call pdormr3
(
side
,
trans
,
m
,
n
,
k
,
l
,
a
,
ia
,
ja
,
desca
,
tau
,
c
,
ic
,
jc
,
descc
,
work
,
lwork
,
info
)
Description
p?ormr3
overwrites the general real
m
-by-
n
distributed matrix sub(
C
) =
C
(
ic
:
ic
+
m
-1,
jc
:
jc
+
n
-1) with
side
= 'L'
side
= 'R'
trans
= 'N'
Q
* sub(
C
)
sub( C )
*
Q
trans
= 'T'
Q
T
* sub(
C
)
Q
* sub(
C
)
sub(
C
) *
Q
T
where
Q
is a real orthogonal distributed matrix defined as the product of
k
elementary reflectors
Q
= H(1) H(2) . . . H(
k
)
as returned by
p?tzrzf
.
Q
is of order
m
if
side
= 'L' and of order
n
if
side
= 'R'.
Input Parameters
side
(global)
CHARACTER.
= 'L': apply
Q
or
Q
T
from the Left;
= 'R': apply
Q
or
Q
T
from the Right.
trans
(global)
CHARACTER.
= 'N': No transpose, apply
Q
;
= 'T': Transpose, apply
Q
T
.
m
(global)
INTEGER.
The number of rows to be operated on i.e the number of rows of the distributed submatrix sub(
C
).
m
>= 0.
n
(global)
INTEGER.
The number of columns to be operated on i.e the number of columns of the distributed submatrix sub(
C
).
n
>= 0.
k
(global)
INTEGER.
The number of elementary reflectors whose product defines the matrix
Q
.
If
side
= 'L',
m
>=
k
>= 0,
if
side
= 'R',
n
>=
k
>= 0.
l
(global)
INTEGER.
The columns of the distributed submatrix sub(
A
) containing the meaningful part of the Householder reflectors.
If
side
= 'L',
m
>=
l
>= 0,
if
side
= 'R',
n
>=
l
>= 0.
a
(local)
REAL
for
psormr3
DOUBLE PRECISION
for
pdormr3
Pointer into the local memory to an array of size
(
lld_a
,
LOCc
(
ja
+
m
-1))
if
side
=&#