wer
          triangular matrix L.
          On exit, if UPLO = 'U', the leading N-by-N upper
          triangular part of this array contains the upper
          triangular part of the product U' * U. The strictly lower
          triangular part is not referenced.
          On exit, if UPLO = 'L', the leading N-by-N lower
          triangular part of this array contains the lower
          triangular part of the product L * L'. The strictly upper
          triangular part is not referenced.

  LDA     INTE