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