tp_add_i(3PI) Sun Interval Performance Library tp_add_i(3PI)NAMEtp_add_i - Triangular packed matrix add and scale.
DESCRIPTION
C = ALPHA * A + BETA * B
The routine TP_ADD_I scales triangular packed interval matrices A and B
and stores the sum in the interval matrix C. This routine returns imme‐
diately if N is equal to zero.
SYNOPSIS
SUBROUTINE TP_ADD_I( A, B, C [, UPLO] [, DIAG] [, ALPHA] [, BETA] )
INTERVAL, INTENT(IN) :: A(:), B(:)
INTERVAL, INTENT(OUT) :: C(:)
INTERVAL, INTENT(IN), OPTIONAL :: ALPHA, BETA
TYPE(blas_uplo_type), INTENT(IN), OPTIONAL :: UPLO
TYPE(blas_diag_type), INTENT(IN), OPTIONAL :: DIAG
where
A, B and C all triangular packed matrices with the
same shape (N*(N+1)/2).
ARGUMENTS
A (input)
On entry, A is array of DIMENSION (N*(N+1)/2).
Unchanged on exit.
B (input)
On entry, B is array of DIMENSION (N*(N+1)/2).
Unchanged on exit.
C (output)
C is array of DIMENSION (N*(N+1)/2).
On exit, C = ALPHA * A + BETA * B
ALPHA (input)
On entry, ALPHA specifies the scalar ALPHA.
Default value is ALPHA = [1,1].
Unchanged on exit.
BETA (input)
On entry, BETA specifies the scalar BETA.
Default value is BETA = [0,0].
Unchanged on exit.
UPLO(input)
Scalar element.
Specifies if the matrix operand is an upper or
lower tringular part of the matrix.
Possible values:
UPLO = blas_upper (default)
UPLO = blas_lower
Unchanged on exit.
DIAG (input)
Scalar element.
Specifies whether or not the matrix operand
has unit diagonal entries.
Possible values:
DIAG = blas_non_unit_diag (default)
DIAG = blas_unit_diag
Unchanged on exit.
ERRORS
blas_error_alloc
A, B or C is unallocated array
blas_error_shape
shape(A) /= shape(B) /= shape(C)
6 Mar 2009 tp_add_i(3PI)