gb_diag_scale_i(3PI) Sun Interval Performance Library gb_diag_scale_i(3PI)NAMEgb_diag_scale_i - Diagonal scaling of an interval matrix.
DESCRIPTION
A = D * A or A = A * D with D diagonal
The routine GB_DAIG_SCALE_I scales a general band interval matrix A on
the left side or the right side by a diagonal interval matrix D. This
routine returns immediately if M or N is equal to zero or KL is less
than zero.
SYNOPSIS
SUBROUTINE GB_DAIG_SCALE_I( D, A, M, KL [, SIDE] )
INTERVAL, INTENT(IN) :: D(:)
INTERVAL, INTENT(INOUT) :: A(:,:)
INTEGER, INTENT(IN) :: M, KL
TYPE(blas_side_type), INTENT(IN), OPTIONAL :: SIDE
where
D has shape (M) if SIDE = blas_left_side, or
(N) if SIDE = blas_right_side.
A has shape (L,N), where L > KL.
ARGUMENTS
D (input)
Array of DIMENSION (P).
P = M if SIDE = blas_left_side,
P = N if SIDE = blas_right_side.
Unchanged on exit.
A (input/output)
On entry, array of DIMENSION (L,N), where L > KL.
On exit, A = D * A if SIDE = blas_left_side or
A = A * D if SIDE = blas_right_side.
M (input)
Number of rows in the source general matrix.
Unchanged on exit.
KL (input)
The number of the subdiagonal bands.
Unchanged on exit.
SIDE(input)
Scalar element. On entry, should be equal to
blas_side_type value, i.e. SIDE should take one
of the two values:
blas_left_side or blas_right_side.
Default value: blas_left_side
Unchanged on exit.
ERRORS
blas_error_alloc
A or D is unallocated array
blas_error_shape
A or D has unappropriate shape
6 Mar 2009 gb_diag_scale_i(3PI)