|
|
NAG[f16tec] NAG[nag_ztr_copy] - Matrix copy, complex triangular matrix
|
|
Calling Sequence
f16tec(uplo, trans, diag, a, b, 'n'=n, 'fail'=fail)
nag_ztr_copy(. . .)
Parameters
|
|
uplo - String;
|
|
|
|
On entry: specifies whether the upper or lower triangular part of  is stored.
|
|
|
 The upper triangular part of  is stored.
|
|
|
 The lower triangular part of  is stored.
|
|
|
Constraint:   "Nag_Upper" or "Nag_Lower". .
|
|
|
|
trans - String;
|
|
|
|
On entry: specifies the operation to be performed.
|
|
|
  .
|
|
|
  .
|
|
|
  .
|
|
|
Constraint:   "Nag_NoTrans", "Nag_Trans" or "Nag_ConjTrans". .
|
|
|
|
diag - String;
|
|
|
|
On entry: specifies whether  has non-unit or unit diagonal elements.
|
|
|
 The diagonal elements are stored explicitly.
|
|
|
 The diagonal elements are assumed to be 1 and are not referenced.
|
|
|
Constraint:   "Nag_NonUnitDiag" or "Nag_UnitDiag". .
|
|
|
|
a - Matrix(1..dim1, 1..dim2, datatype=complex[8], order=order);
|
|
|
|
Note: this array may be supplied in Fortran_order or C_order , as specified by order. All array parameters must use a consistent order.
|
|
|
If  ,  is upper triangular and the elements of the array below the diagonal are not referenced.
|
|
|
If  ,  is lower triangular and the elements of the array above the diagonal are not referenced.
|
|
|
|
b - Matrix(1..dim1, 1..dim2, datatype=complex[8], order=order);
|
|
|
|
Note: this array may be supplied in Fortran_order or C_order , as specified by order. All array parameters must use a consistent order.
|
|
|
If  ,  is upper triangular and the elements of the array below the diagonal are not set.
|
|
|
If  ,  is lower triangular and the elements of the array above the diagonal are not set.
|
|
|
|
'n'=n - integer; (optional)
|
|
|
|
Default value: the dimension of the arrays a, b.
|
|
|
Constraint:  . .
|
|
|
|
'fail'=fail - table; (optional)
|
|
|
|
The NAG error argument, see the documentation for NagError.
|
|
|
|
|
Description
|
|
|
|
Purpose
|
|
nag_ztr_copy (f16tec) copies a complex triangular matrix.
|
|
|
Description
|
|
nag_ztr_copy (f16tec) performs the triangular matrix copy operations
where  and  are  by  complex triangular matrices.
|
|
|
Error Indicators and Warnings
|
|
"NE_BAD_PARAM"
On entry, argument  had an illegal value.
"NE_INT"
On entry,  . Constraint:  .
|
|
|
Accuracy
|
|
The BLAS standard requires accurate implementations which avoid unnecessary over/underflow (see Section 2.7 of The BLAS Technical Forum Standard (2001)).
|
|
|
|
Examples
|
|
|
>
|
uplo := "Nag_Lower":
trans := "Nag_NoTrans":
diag := "Nag_NonUnitDiag":
a := Matrix([[1+I, 0, 0 ], [1-I, 2 + I, 0], [2 - I, 3 + I, 3 - I]],
datatype=complex[8],
order='C_order'):
b := Matrix(3, 3, datatype=complex[8], order='C_order'):
NAG:-f16tec(uplo, trans, diag, a, b):
|
|
|
