|
NAG[f16udc] NAG[nag_zhp_norm] - -norm, -norm, Frobenius norm, largest absolute element, complex Hermitian matrix, packed storage
|
|
Calling Sequence
f16udc(norm_type, uplo, ap, r, 'n'=n, 'fail'=fail)
nag_zhp_norm(. . .)
Parameters
|
norm_type - String;
|
|
|
On entry: specifies the value to be returned.
|
|
or "Nag_OneNorm" The 1-norm.
|
|
The -norm.
|
|
The Frobenius (or Euclidean) norm.
|
|
The value (not a norm).
|
|
Constraint: "Nag_OneNorm", "Nag_InfNorm", "Nag_FrobeniusNorm" or "Nag_MaxNorm". .
|
|
|
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". .
|
|
|
ap - Vector(1..dim, datatype=complex[8]);
|
|
|
Note: the dimension, dim, of the array ap must be at least .
|
|
|
r - assignable;
|
|
|
Note: On exit the variable r will have a value of type float.
|
|
On exit: the value of the norm specified by norm.
|
|
|
'n'=n - integer; (optional)
|
|
|
Default value: the first dimension of the array ap.
|
|
On entry: , the order of the matrix .
|
|
Constraint: . .
|
|
|
'fail'=fail - table; (optional)
|
|
|
The NAG error argument, see the documentation for NagError.
|
|
|
|
Description
|
|
|
Purpose
|
|
nag_zhp_norm (f16udc) calculates the value of the 1-norm, the -norm, the Frobenius norm or the maximum absolute value of the elements of a complex by Hermitian matrix, stored in packed form.
|
|
Description
|
|
Given a complex by Hermitian matrix, , in packed storage, nag_zhp_norm (f16udc) calculates one of the values given by
or
Note that, since is symmetric, .
|
|
Error Indicators and Warnings
|
|
"NE_ALLOC_FAIL"
Dynamic memory allocation failed.
"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
|
|
>
|
norm_type := "Nag_OneNorm":
uplo := "Nag_Lower":
n := 4:
ap := Vector([3.23 +0*I, 1.51 +1.92*I, 3.58 +0*I, 1.9 -0.84*I, -0.23 -1.11*I, 4.09 +0*I, 0.42 -2.5*I, -1.18 -1.37*I, 2.33 +0.14*I, 4.29 +0*I], datatype=complex[8], order='C_order'):
NAG:-f16udc(norm_type, uplo, ap, r, 'n' = n):
|
|
|