psb_genrm2s -- Generalized 1-Norm of Vector

This subroutine computes a series of 1-norms on the columns of a dense matrix $x$:

$$res(i) \leftarrow \max_k \vert x(k,i)\vert$$

This function computes the 1-norm of a vector $x$.
If $x$ is a real vector it computes 1-norm as:

$$res(i) \leftarrow \sqrt{x^T x}$$

else if $x$ is a complex vector then it computes 1-norm as:

$$res(i) \leftarrow \sqrt{x^H x}$$

call psb_genrm2s(res, x, desc_a, info)

Table 9: Data types

$res$	$x$	Subroutine
Short Precision Real	Short Precision Real	psb_genrm2s
Long Precision Real	Long Precision Real	psb_genrm2s
Short Precision Real	Short Precision Complex	psb_genrm2s
Long Precision Real	Long Precision Complex	psb_genrm2s

Type:

Synchronous.

On Entry

x

the local portion of global dense matrix $x$.
Scope: local
Type: required
Intent: in.
Specified as: a rank one or two array containing numbers of type specified in Table 9.

desc_a

contains data structures for communications.
Scope: local
Type: required
Intent: in.
Specified as: a structured data of type descdatapsb_desc_type.

On Return

res

contains the 1-norm of (the columns of) $x$.
Scope: global
Intent: out.
Specified as: a long precision real number.

info

Error code.
Scope: local
Type: required
Intent: out.
An integer value; 0 means no error has been detected.