Purpose
To store by symmetry the upper or lower triangle of a symmetric matrix, given the other triangle.Specification
SUBROUTINE MA02ED( UPLO, N, A, LDA )
C .. Scalar Arguments ..
CHARACTER UPLO
INTEGER LDA, N
C .. Array Arguments ..
DOUBLE PRECISION A(LDA,*)
Arguments
Mode Parameters
UPLO CHARACTER*1
Specifies which part of the matrix is given as follows:
= 'U': Upper triangular part;
= 'L': Lower triangular part.
For all other values, the array A is not referenced.
Input/Output Parameters
N (input) INTEGER
The order of the matrix A. N >= 0.
A (input/output) DOUBLE PRECISION array, dimension (LDA,N)
On entry, the leading N-by-N upper triangular part
(if UPLO = 'U'), or lower triangular part (if UPLO = 'L'),
of this array must contain the corresponding upper or
lower triangle of the symmetric matrix A.
On exit, the leading N-by-N part of this array contains
the symmetric matrix A with all elements stored.
LDA INTEGER
The leading dimension of the array A. LDA >= max(1,N).
Further Comments
NoneExample
Program Text
NoneProgram Data
NoneProgram Results
None