Started playing around with type extensions and typebound

procedures.
Merged performance fixes from trunk.
This commit is contained in:
Salvatore Filippone
2008-09-19 16:06:44 +00:00
parent 32e6a17188
commit 00c1468c6c
285 changed files with 8931 additions and 7145 deletions
+12 -12
View File
@@ -63,7 +63,7 @@ psb_genrm2s -- Generalized 1-Norm of Vector</A>
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="img24.png"
SRC="img26.png"
ALT="$x$">:
<BR><P></P>
<DIV ALIGN="CENTER">
@@ -75,19 +75,19 @@ res(i) \leftarrow \max_k |x(k,i)|
<IMG
WIDTH="147" HEIGHT="36" BORDER="0"
SRC="img36.png"
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="img24.png"
SRC="img26.png"
ALT="$x$">.
<BR>
If <IMG
WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
SRC="img24.png"
SRC="img26.png"
ALT="$x$"> is a real vector
it computes 1-norm as:
<BR><P></P>
@@ -100,14 +100,14 @@ res(i) \leftarrow \sqrt{x^T x}
<IMG
WIDTH="107" HEIGHT="28" BORDER="0"
SRC="img45.png"
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="img24.png"
SRC="img26.png"
ALT="$x$"> is a complex vector then it computes 1-norm as:
<BR><P></P>
<DIV ALIGN="CENTER">
@@ -119,7 +119,7 @@ res(i) \leftarrow \sqrt{x^H x}
<IMG
WIDTH="109" HEIGHT="28" BORDER="0"
SRC="img46.png"
SRC="img48.png"
ALT="\begin{displaymath}res(i) \leftarrow \sqrt{x^H x}\end{displaymath}">
</DIV>
<BR CLEAR="ALL">
@@ -132,7 +132,7 @@ call psb_genrm2s(res, x, desc_a, info)
<P>
<BR><P></P>
<DIV ALIGN="CENTER"><A NAME="1422"></A>
<DIV ALIGN="CENTER"><A NAME="1424"></A>
<TABLE>
<CAPTION><STRONG>Table 9:</STRONG>
Data types</CAPTION>
@@ -141,11 +141,11 @@ Data types</CAPTION>
<TABLE CELLPADDING=3 BORDER="1" ALIGN="CENTER">
<TR><TD ALIGN="LEFT"><IMG
WIDTH="26" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
SRC="img32.png"
SRC="img34.png"
ALT="$res$"></TD>
<TD ALIGN="LEFT"><IMG
WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
SRC="img24.png"
SRC="img26.png"
ALT="$x$"></TD>
<TD ALIGN="LEFT"><B>Subroutine</B></TD>
</TR>
@@ -184,7 +184,7 @@ Data types</CAPTION>
<DD>the local portion of global dense matrix
<IMG
WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
SRC="img24.png"
SRC="img26.png"
ALT="$x$">.
<BR>
@@ -217,7 +217,7 @@ Specified as: a structured data of type descdata<TT>psb_desc_type</TT>.
<DT><STRONG>res</STRONG></DT>
<DD>contains the 1-norm of (the columns of) <IMG
WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
SRC="img24.png"
SRC="img26.png"
ALT="$x$">.
<BR>
Scope: <B>global</B>