mirror of
https://github.com/sfilippone/psblas3.git
synced 2026-10-20 21:02:26 +00:00
Started playing around with type extensions and typebound
procedures. Merged performance fixes from trunk.
This commit is contained in:
+10
-10
@@ -63,12 +63,12 @@ psb_geamax -- Infinity-Norm of Vector</A>
|
||||
This function computes
|
||||
the infinity-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 infinity norm as:
|
||||
<BR><P></P>
|
||||
@@ -81,14 +81,14 @@ amax \leftarrow \max_i |x_i|
|
||||
|
||||
<IMG
|
||||
WIDTH="118" HEIGHT="36" BORDER="0"
|
||||
SRC="img33.png"
|
||||
SRC="img35.png"
|
||||
ALT="\begin{displaymath}amax \leftarrow \max_i \vert x_i\vert\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 infinity-norm as:
|
||||
<BR><P></P>
|
||||
<DIV ALIGN="CENTER">
|
||||
@@ -100,7 +100,7 @@ amax \leftarrow \max_i {(|re(x_i)| + |im(x_i)|)}
|
||||
|
||||
<IMG
|
||||
WIDTH="233" HEIGHT="36" BORDER="0"
|
||||
SRC="img34.png"
|
||||
SRC="img36.png"
|
||||
ALT="\begin{displaymath}amax \leftarrow \max_i {(\vert re(x_i)\vert + \vert im(x_i)\vert)}\end{displaymath}">
|
||||
</DIV>
|
||||
<BR CLEAR="ALL">
|
||||
@@ -113,7 +113,7 @@ psb_geamax(x, desc_a, info)
|
||||
|
||||
<P>
|
||||
<BR><P></P>
|
||||
<DIV ALIGN="CENTER"><A NAME="1417"></A>
|
||||
<DIV ALIGN="CENTER"><A NAME="1419"></A>
|
||||
<TABLE>
|
||||
<CAPTION><STRONG>Table 4:</STRONG>
|
||||
Data types</CAPTION>
|
||||
@@ -122,11 +122,11 @@ Data types</CAPTION>
|
||||
<TABLE CELLPADDING=3 BORDER="1" ALIGN="CENTER">
|
||||
<TR><TD ALIGN="LEFT"><IMG
|
||||
WIDTH="44" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
|
||||
SRC="img35.png"
|
||||
SRC="img37.png"
|
||||
ALT="$amax$"></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>Function</B></TD>
|
||||
</TR>
|
||||
@@ -165,7 +165,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>
|
||||
@@ -198,7 +198,7 @@ Specified as: a structured data of type descdata<TT>psb_desc_type</TT>.
|
||||
<DT><STRONG>Function value</STRONG></DT>
|
||||
<DD>is the infinity norm of subvector <IMG
|
||||
WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
|
||||
SRC="img24.png"
|
||||
SRC="img26.png"
|
||||
ALT="$x$">.
|
||||
<BR>
|
||||
Scope: <B>global</B>
|
||||
|
||||
Reference in New Issue
Block a user