gb_lrscale_i(3PI) Sun Interval Performance Library gb_lrscale_i(3PI)NAMEgb_lrscale_i - Two-sided diagonal scaling.
DESCRIPTION
A = DL * A * DR with DL, DR diagonal
The routine GB_LRSCALE_I scales a general band interval matrix A on the
left side by an interval diagonal matrix DL and on the right side by a
interval diagonal matrix DR. This routine returns immediately if M or
N is equal to zero or KL is less than zero.
SYNOPSIS
SUBROUTINE GB_LRSCALE_I( DL, DR, A, M, KL )
INTERVAL, INTENT(IN) :: DL(:), DR(:)
INTERVAL, INTENT(INOUT) :: A(:,:)
INTEGER, INTENT(IN) :: M, KL
where
DL has shape (M).
DR has shape (N).
A has shape (L,N), where L > KL.
ARGUMENTS
DL (input)
Array of DIMENSION (M).
Unchanged on exit.
DR (input)
Array of DIMENSION (N).
Unchanged on exit.
A (input/output)
On entry, array of DIMENSION (L,N), where L > KL.
On exit, A = DL * A * DR.
M (input)
Number of rows in the source general matrix.
Unchanged on exit.
KL (input)
The number of the subdiagonal bands.
Unchanged on exit.
ERRORS
blas_error_alloc
A, DL or DR is unallocated array
blas_error_shape
A, DL or DR has unappropriate shape
6 Mar 2009 gb_lrscale_i(3PI)