<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN"> <!--Converted with LaTeX2HTML 2002-2-1 (1.71) original version by: Nikos Drakos, CBLU, University of Leeds * revised and updated by: Marcus Hennecke, Ross Moore, Herb Swan * with significant contributions from: Jens Lippmann, Marek Rouchal, Martin Wilck and others --> <HTML> <HEAD> <TITLE>psb_genrm2s -- Generalized 1-Norm of Vector</TITLE> <META NAME="description" CONTENT="psb_genrm2s -- Generalized 1-Norm of Vector"> <META NAME="keywords" CONTENT="userhtml"> <META NAME="resource-type" CONTENT="document"> <META NAME="distribution" CONTENT="global"> <META NAME="Generator" CONTENT="LaTeX2HTML v2002-2-1"> <META HTTP-EQUIV="Content-Style-Type" CONTENT="text/css"> <LINK REL="STYLESHEET" HREF="userhtml.css"> <LINK REL="next" HREF="node34.html"> <LINK REL="previous" HREF="node32.html"> <LINK REL="up" HREF="node25.html"> <LINK REL="next" HREF="node34.html"> </HEAD> <BODY > <!--Navigation Panel--> <A NAME="tex2html581" HREF="node34.html"> <IMG WIDTH="37" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="next" SRC="file:/usr/share/latex2html/icons/next.png"></A> <A NAME="tex2html577" HREF="node25.html"> <IMG WIDTH="26" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="up" SRC="file:/usr/share/latex2html/icons/up.png"></A> <A NAME="tex2html571" HREF="node32.html"> <IMG WIDTH="63" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="previous" SRC="file:/usr/share/latex2html/icons/prev.png"></A> <A NAME="tex2html579" HREF="node1.html"> <IMG WIDTH="65" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="contents" SRC="file:/usr/share/latex2html/icons/contents.png"></A> <BR> <B> Next:</B> <A NAME="tex2html582" HREF="node34.html">psb_spnrmi Infinity</A> <B> Up:</B> <A NAME="tex2html578" HREF="node25.html">Computational routines</A> <B> Previous:</B> <A NAME="tex2html572" HREF="node32.html">psb_geasums Generalized</A> <B> <A NAME="tex2html580" HREF="node1.html">Contents</A></B> <BR> <BR> <!--End of Navigation Panel--> <H2><A NAME="SECTION00058000000000000000"> psb_genrm2s -- Generalized 1-Norm of Vector</A> </H2> <P> This subroutine computes a series of 1-norms on the columns of a dense matrix <IMG WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0" SRC="img26.png" ALT="$x$">: <BR><P></P> <DIV ALIGN="CENTER"> <!-- MATH \begin{displaymath} res(i) \leftarrow \max_k |x(k,i)| \end{displaymath} --> <IMG WIDTH="147" HEIGHT="36" BORDER="0" SRC="img38.png" ALT="\begin{displaymath}res(i) \leftarrow \max_k \vert x(k,i)\vert \end{displaymath}"> </DIV> <BR CLEAR="ALL"> <P></P> This function computes the 1-norm of a vector <IMG WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0" SRC="img26.png" ALT="$x$">. <BR> If <IMG WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0" SRC="img26.png" ALT="$x$"> is a real vector it computes 1-norm as: <BR><P></P> <DIV ALIGN="CENTER"> <!-- MATH \begin{displaymath} res(i) \leftarrow \sqrt{x^T x} \end{displaymath} --> <IMG WIDTH="107" HEIGHT="28" BORDER="0" SRC="img47.png" ALT="\begin{displaymath}res(i) \leftarrow \sqrt{x^T x}\end{displaymath}"> </DIV> <BR CLEAR="ALL"> <P></P> else if <IMG WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0" SRC="img26.png" ALT="$x$"> is a complex vector then it computes 1-norm as: <BR><P></P> <DIV ALIGN="CENTER"> <!-- MATH \begin{displaymath} res(i) \leftarrow \sqrt{x^H x} \end{displaymath} --> <IMG WIDTH="109" HEIGHT="28" BORDER="0" SRC="img48.png" ALT="\begin{displaymath}res(i) \leftarrow \sqrt{x^H x}\end{displaymath}"> </DIV> <BR CLEAR="ALL"> <P></P> <P> <PRE> call psb_genrm2s(res, x, desc_a, info) </PRE> <P> <BR><P></P> <DIV ALIGN="CENTER"><A NAME="1424"></A> <TABLE> <CAPTION><STRONG>Table 9:</STRONG> Data types</CAPTION> <TR><TD> <DIV ALIGN="CENTER"> <TABLE CELLPADDING=3 BORDER="1" ALIGN="CENTER"> <TR><TD ALIGN="LEFT"><IMG WIDTH="26" HEIGHT="13" ALIGN="BOTTOM" BORDER="0" SRC="img34.png" ALT="$res$"></TD> <TD ALIGN="LEFT"><IMG WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0" SRC="img26.png" ALT="$x$"></TD> <TD ALIGN="LEFT"><B>Subroutine</B></TD> </TR> <TR><TD ALIGN="LEFT">Short Precision Real</TD> <TD ALIGN="LEFT">Short Precision Real</TD> <TD ALIGN="LEFT">psb_genrm2s</TD> </TR> <TR><TD ALIGN="LEFT">Long Precision Real</TD> <TD ALIGN="LEFT">Long Precision Real</TD> <TD ALIGN="LEFT">psb_genrm2s</TD> </TR> <TR><TD ALIGN="LEFT">Short Precision Real</TD> <TD ALIGN="LEFT">Short Precision Complex</TD> <TD ALIGN="LEFT">psb_genrm2s</TD> </TR> <TR><TD ALIGN="LEFT">Long Precision Real</TD> <TD ALIGN="LEFT">Long Precision Complex</TD> <TD ALIGN="LEFT">psb_genrm2s</TD> </TR> </TABLE> </DIV> </TD></TR> </TABLE> </DIV><P></P> <BR> <P> <DL> <DT><STRONG>Type:</STRONG></DT> <DD>Synchronous. </DD> <DT><STRONG><B>On Entry</B></STRONG></DT> <DD> </DD> <DT><STRONG>x</STRONG></DT> <DD>the local portion of global dense matrix <IMG WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0" SRC="img26.png" ALT="$x$">. <BR> Scope: <B>local</B> <BR> Type: <B>required</B> <BR> Intent: <B>in</B>. <BR> Specified as: a rank one or two array containing numbers of type specified in Table <A HREF="#tab:f90nrm2s">9</A>. </DD> <DT><STRONG>desc_a</STRONG></DT> <DD>contains data structures for communications. <BR> Scope: <B>local</B> <BR> Type: <B>required</B> <BR> Intent: <B>in</B>. <BR> Specified as: a structured data of type descdata<TT>psb_desc_type</TT>. <P> </DD> <DT><STRONG><B>On Return</B></STRONG></DT> <DD> </DD> <DT><STRONG>res</STRONG></DT> <DD>contains the 1-norm of (the columns of) <IMG WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0" SRC="img26.png" ALT="$x$">. <BR> Scope: <B>global</B> <BR> Intent: <B>out</B>. <BR> Specified as: a long precision real number. </DD> <DT><STRONG>info</STRONG></DT> <DD>Error code. <BR> Scope: <B>local</B> <BR> Type: <B>required</B> <BR> Intent: <B>out</B>. <BR> An integer value; 0 means no error has been detected. </DD> </DL> <P> <HR> <!--Navigation Panel--> <A NAME="tex2html581" HREF="node34.html"> <IMG WIDTH="37" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="next" SRC="file:/usr/share/latex2html/icons/next.png"></A> <A NAME="tex2html577" HREF="node25.html"> <IMG WIDTH="26" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="up" SRC="file:/usr/share/latex2html/icons/up.png"></A> <A NAME="tex2html571" HREF="node32.html"> <IMG WIDTH="63" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="previous" SRC="file:/usr/share/latex2html/icons/prev.png"></A> <A NAME="tex2html579" HREF="node1.html"> <IMG WIDTH="65" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="contents" SRC="file:/usr/share/latex2html/icons/contents.png"></A> <BR> <B> Next:</B> <A NAME="tex2html582" HREF="node34.html">psb_spnrmi Infinity</A> <B> Up:</B> <A NAME="tex2html578" HREF="node25.html">Computational routines</A> <B> Previous:</B> <A NAME="tex2html572" HREF="node32.html">psb_geasums Generalized</A> <B> <A NAME="tex2html580" HREF="node1.html">Contents</A></B> <!--End of Navigation Panel--> </BODY> </HTML>