NAG FL Interfacef06rdf (dlansp)

▸▿ Contents

Settings help

FL Name Style:

FL Specification Language:

1Purpose

f06rdf returns, via the function name, the value of the $1$-norm, the $\infty$-norm, the Frobenius norm, or the maximum absolute value of the elements of a real $n×n$ symmetric matrix, stored in packed form.

2Specification

Fortran Interface
 Function f06rdf ( norm, uplo, n, ap, work)
 Real (Kind=nag_wp) :: f06rdf Integer, Intent (In) :: n Real (Kind=nag_wp), Intent (In) :: ap(*) Real (Kind=nag_wp), Intent (Inout) :: work(*) Character (1), Intent (In) :: norm, uplo
C Header Interface
#include <nag.h>
 double f06rdf_ (const char *norm, const char *uplo, const Integer *n, const double ap[], double work[], const Charlen length_norm, const Charlen length_uplo)
The routine may be called by the names f06rdf or nagf_blas_dlansp.

None.

None.

5Arguments

1: $\mathbf{norm}$Character(1) Input
On entry: specifies the value to be returned.
${\mathbf{norm}}=\text{'1'}$ or $\text{'O'}$
The $1$-norm.
${\mathbf{norm}}=\text{'I'}$
The $\infty$-norm (= the $1$-norm for a symmetric matrix).
${\mathbf{norm}}=\text{'F'}$ or $\text{'E'}$
The Frobenius (or Euclidean) norm.
${\mathbf{norm}}=\text{'M'}$
The value ${\mathrm{max}}_{i,j}|{a}_{ij}|$ (not a norm).
Constraint: ${\mathbf{norm}}=\text{'1'}$, $\text{'O'}$, $\text{'I'}$, $\text{'F'}$, $\text{'E'}$ or $\text{'M'}$.
2: $\mathbf{uplo}$Character(1) Input
On entry: specifies whether the upper or lower triangular part of $A$ is stored.
${\mathbf{uplo}}=\text{'U'}$
The upper triangular part of $A$ is stored.
${\mathbf{uplo}}=\text{'L'}$
The lower triangular part of $A$ is stored.
Constraint: ${\mathbf{uplo}}=\text{'U'}$ or $\text{'L'}$.
3: $\mathbf{n}$Integer Input
On entry: $n$, the order of the matrix $A$.
When ${\mathbf{n}}=0$, f06rdf returns zero.
Constraint: ${\mathbf{n}}\ge 0$.
4: $\mathbf{ap}\left(*\right)$Real (Kind=nag_wp) array Input
Note: the dimension of the array ap must be at least ${\mathbf{n}}×\left({\mathbf{n}}+1\right)/2$.
On entry: the $n×n$ symmetric matrix $A$, packed by columns.
More precisely,
• if ${\mathbf{uplo}}=\text{'U'}$, the upper triangle of $A$ must be stored with element ${A}_{ij}$ in ${\mathbf{ap}}\left(i+j\left(j-1\right)/2\right)$ for $i\le j$;
• if ${\mathbf{uplo}}=\text{'L'}$, the lower triangle of $A$ must be stored with element ${A}_{ij}$ in ${\mathbf{ap}}\left(i+\left(2n-j\right)\left(j-1\right)/2\right)$ for $i\ge j$.
5: $\mathbf{work}\left(*\right)$Real (Kind=nag_wp) array Workspace
Note: the dimension of the array work must be at least $\mathrm{max}\phantom{\rule{0.125em}{0ex}}\left(1,{\mathbf{n}}\right)$ if ${\mathbf{norm}}=\text{'1'}$, $\text{'O'}$ or $\text{'I'}$, and at least $1$ otherwise.

None.

Not applicable.

8Parallelism and Performance

Background information to multithreading can be found in the Multithreading documentation.
f06rdf is not threaded in any implementation.

None.

None.