claset(3F)

NAME
     CLASET - initialize a 2-D array A to BETA on the diagonal and ALPHA on
     the offdiagonals

SYNOPSIS
     SUBROUTINE CLASET( UPLO, M, N, ALPHA, BETA, A, LDA )

         CHARACTER      UPLO

         INTEGER        LDA, M, N

         COMPLEX        ALPHA, BETA

         COMPLEX        A( LDA, * )

PURPOSE
     CLASET initializes a 2-D array A to BETA on the diagonal and ALPHA on the
     offdiagonals.


ARGUMENTS
     UPLO    (input) CHARACTER*1
             Specifies the part of the matrix A to be set.  = 'U':      Upper
             triangular part is set. The lower triangle is unchanged.  = 'L':
             Lower triangular part is set. The upper triangle is unchanged.
             Otherwise:  All of the matrix A is set.

     M       (input) INTEGER
             On entry, M specifies the number of rows of A.

     N       (input) INTEGER
             On entry, N specifies the number of columns of A.

     ALPHA   (input) COMPLEX
             All the offdiagonal array elements are set to ALPHA.

     BETA    (input) COMPLEX
             All the diagonal array elements are set to BETA.

     A       (input/output) COMPLEX array, dimension (LDA,N)
             On entry, the m by n matrix A.  On exit, A(i,j) = ALPHA, 1 <= i
             <= m, 1 <= j <= n, i.ne.j; A(i,i) = BETA , 1 <= i <= min(m,n)

     LDA     (input) INTEGER
             The leading dimension of the array A.  LDA >= max(1,M).