fdurastante/psblas3
1
0
Fork 0
mirror of https://github.com/sfilippone/psblas3.git synced 2026-10-16 10:52:08 +00:00
Code Issues Packages Projects Releases Wiki Activity

Updated docs with fnd_owner adn set_p_adjcncy

Browse Source
This commit is contained in:
Salvatore Filippone
2019-12-12 17:37:31 +00:00
parent acae5f9278
commit db2458dd29
327 changed files with 25044 additions and 24405 deletions
Download Patch File Download Diff File Expand all files Collapse all files
docs/html/node57.html
+174 -73
View File
@@ -3,8 +3,8 @@
<!--Converted with LaTeX2HTML 2018 (Released Feb 1, 2018) -->
<HTML>
<HEAD>
<TITLE>psb_geamaxs -- Generalized Infinity Norm</TITLE>
<META NAME="description" CONTENT="psb_geamaxs -- Generalized Infinity Norm">
<TITLE>psb_gedot -- Dot Product</TITLE>
<META NAME="description" CONTENT="psb_gedot -- Dot Product">
<META NAME="keywords" CONTENT="userhtml">
<META NAME="resource-type" CONTENT="document">
<META NAME="distribution" CONTENT="global">
@@ -16,103 +16,133 @@
<LINK REL="next" HREF="node58.html">
<LINK REL="previous" HREF="node56.html">
<LINK REL="up" HREF="node52.html">
<LINK REL="up" HREF="node55.html">
<LINK REL="next" HREF="node58.html">
</HEAD>
<BODY >
<DIV CLASS="navigation"><!--Navigation Panel-->
<A NAME="tex2html959"
<A NAME="tex2html968"
HREF="node58.html">
<IMG WIDTH="37" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="next" SRC="next.png"></A>
<A NAME="tex2html955"
HREF="node52.html">
<A NAME="tex2html964"
HREF="node55.html">
<IMG WIDTH="26" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="up" SRC="up.png"></A>
<A NAME="tex2html949"
<A NAME="tex2html958"
HREF="node56.html">
<IMG WIDTH="63" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="previous" SRC="prev.png"></A>
<A NAME="tex2html957"
<A NAME="tex2html966"
HREF="node1.html">
<IMG WIDTH="65" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="contents" SRC="contents.png"></A>
<BR>
<B> Next:</B> <A NAME="tex2html960"
HREF="node58.html">psb_norm1 1-Norm</A>
<B> Up:</B> <A NAME="tex2html956"
HREF="node52.html">Computational routines</A>
<B> Previous:</B> <A NAME="tex2html950"
HREF="node56.html">psb_normi Infinity-Norm</A>
&nbsp; <B> <A NAME="tex2html958"
<B> Next:</B> <A NAME="tex2html969"
HREF="node58.html">psb_gedots Generalized</A>
<B> Up:</B> <A NAME="tex2html965"
HREF="node55.html">Computational routines</A>
<B> Previous:</B> <A NAME="tex2html959"
HREF="node56.html">psb_geaxpby General</A>
&nbsp; <B> <A NAME="tex2html967"
HREF="node1.html">Contents</A></B>
<BR>
<BR></DIV>
<!--End of Navigation Panel-->
<H2><A NAME="SECTION00055000000000000000">
psb_geamaxs -- Generalized Infinity Norm</A>
<H2><A NAME="SECTION00052000000000000000">
psb_gedot -- Dot Product</A>
</H2>
<P>
This subroutine computes a series of infinity norms on the columns of
a dense matrix <SPAN CLASS="MATH"><IMG
WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
This function computes dot product between two vectors <SPAN CLASS="MATH"><IMG
WIDTH="13" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
SRC="img20.png"
ALT="$x$"></SPAN>:
ALT="$x$"></SPAN> and
<SPAN CLASS="MATH"><IMG
WIDTH="12" HEIGHT="29" ALIGN="MIDDLE" BORDER="0"
SRC="img21.png"
ALT="$y$"></SPAN>.
<BR>
If <SPAN CLASS="MATH"><IMG
WIDTH="13" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
SRC="img20.png"
ALT="$x$"></SPAN> and <SPAN CLASS="MATH"><IMG
WIDTH="12" HEIGHT="29" ALIGN="MIDDLE" BORDER="0"
SRC="img21.png"
ALT="$y$"></SPAN> are real vectors
it computes dot-product as:
<BR><P></P>
<DIV ALIGN="CENTER" CLASS="mathdisplay">
<!-- MATH
\begin{displaymath}
res(i) \leftarrow \max_k |x(k,i)|
dot \leftarrow x^T y
\end{displaymath}
-->
<IMG
WIDTH="147" HEIGHT="36" BORDER="0"
SRC="img34.png"
ALT="\begin{displaymath}res(i) \leftarrow \max_k \vert x(k,i)\vert \end{displaymath}">
WIDTH="74" HEIGHT="27" BORDER="0"
SRC="img24.png"
ALT="\begin{displaymath}dot \leftarrow x^T y\end{displaymath}">
</DIV>
<BR CLEAR="ALL">
<P></P>
Else if <SPAN CLASS="MATH"><IMG
WIDTH="13" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
SRC="img20.png"
ALT="$x$"></SPAN> and <SPAN CLASS="MATH"><IMG
WIDTH="12" HEIGHT="29" ALIGN="MIDDLE" BORDER="0"
SRC="img21.png"
ALT="$y$"></SPAN> are complex vectors then it computes dot-product as:
<BR><P></P>
<DIV ALIGN="CENTER" CLASS="mathdisplay">
<!-- MATH
\begin{displaymath}
dot \leftarrow x^H y
\end{displaymath}
-->
<IMG
WIDTH="75" HEIGHT="27" BORDER="0"
SRC="img25.png"
ALT="\begin{displaymath}dot \leftarrow x^H y\end{displaymath}">
</DIV>
<BR CLEAR="ALL">
<P></P>
<P>
<PRE>
call psb_geamaxs(res, x, desc_a, info)
psb_gedot(x, y, desc_a, info [,global])
</PRE>
<P>
<BR><P></P>
<DIV ALIGN="CENTER"><A NAME="2027"></A>
<DIV ALIGN="CENTER"><A NAME="2103"></A>
<TABLE>
<CAPTION><STRONG>Table 5:</STRONG>
<CAPTION><STRONG>Table 2:</STRONG>
Data types</CAPTION>
<TR><TD>
<DIV ALIGN="CENTER">
<TABLE CELLPADDING=3 BORDER="1" ALIGN="CENTER">
<TR><TD ALIGN="LEFT"><SPAN CLASS="MATH"><IMG
WIDTH="27" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
SRC="img29.png"
ALT="$res$"></SPAN></TD>
<TD ALIGN="LEFT"><SPAN CLASS="MATH"><IMG
WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
WIDTH="26" HEIGHT="15" ALIGN="BOTTOM" BORDER="0"
SRC="img26.png"
ALT="$dot$"></SPAN>, <SPAN CLASS="MATH"><IMG
WIDTH="13" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
SRC="img20.png"
ALT="$x$"></SPAN></TD>
<TD ALIGN="LEFT"><B>Subroutine</B></TD>
ALT="$x$"></SPAN>, <SPAN CLASS="MATH"><IMG
WIDTH="12" HEIGHT="29" ALIGN="MIDDLE" BORDER="0"
SRC="img21.png"
ALT="$y$"></SPAN></TD>
<TD ALIGN="LEFT"><B>Function</B></TD>
</TR>
<TR><TD ALIGN="LEFT">Short Precision Real</TD>
<TD ALIGN="LEFT">Short Precision Real</TD>
<TD ALIGN="LEFT">psb_geamaxs</TD>
<TD ALIGN="LEFT">psb_gedot</TD>
</TR>
<TR><TD ALIGN="LEFT">Long Precision Real</TD>
<TD ALIGN="LEFT">Long Precision Real</TD>
<TD ALIGN="LEFT">psb_geamaxs</TD>
<TD ALIGN="LEFT">psb_gedot</TD>
</TR>
<TR><TD ALIGN="LEFT">Short Precision Real</TD>
<TD ALIGN="LEFT">Short Precision Complex</TD>
<TD ALIGN="LEFT">psb_geamaxs</TD>
<TR><TD ALIGN="LEFT">Short Precision Complex</TD>
<TD ALIGN="LEFT">psb_gedot</TD>
</TR>
<TR><TD ALIGN="LEFT">Long Precision Real</TD>
<TD ALIGN="LEFT">Long Precision Complex</TD>
<TD ALIGN="LEFT">psb_geamaxs</TD>
<TR><TD ALIGN="LEFT">Long Precision Complex</TD>
<TD ALIGN="LEFT">psb_gedot</TD>
</TR>
</TABLE>
</DIV>
@@ -132,9 +162,9 @@ Data types</CAPTION>
<DT><STRONG>x</STRONG></DT>
<DD>the local portion of global dense matrix
<SPAN CLASS="MATH"><IMG
WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
WIDTH="13" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
SRC="img20.png"
ALT="$x$"></SPAN>.
ALT="$x$"></SPAN>.
<BR>
Scope: <B>local</B>
<BR>
@@ -142,9 +172,38 @@ Type: <B>required</B>
<BR>
Intent: <B>in</B>.
<BR>
Specified as: a rank one or two array or an object of type vdata<TT>psb_T_vect_type</TT>
Specified as: a rank one or two array or an object of type vdata<TT>psb_T_vect_type</TT>
containing numbers of type specified in
Table&nbsp;<A HREF="#tab:f90mamax">5</A>.
Table&nbsp;<A HREF="#tab:f90dot">2</A>. The rank of <SPAN CLASS="MATH"><IMG
WIDTH="13" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
SRC="img20.png"
ALT="$x$"></SPAN> must be the same of <SPAN CLASS="MATH"><IMG
WIDTH="12" HEIGHT="29" ALIGN="MIDDLE" BORDER="0"
SRC="img21.png"
ALT="$y$"></SPAN>.
</DD>
<DT><STRONG>y</STRONG></DT>
<DD>the local portion of global dense matrix
<SPAN CLASS="MATH"><IMG
WIDTH="12" HEIGHT="29" ALIGN="MIDDLE" BORDER="0"
SRC="img21.png"
ALT="$y$"></SPAN>.
<BR>
Scope: <B>local</B>
<BR>
Type: <B>required</B>
<BR>
Intent: <B>in</B>.
<BR>
Specified as: a rank one or two array or an object of type vdata<TT>psb_T_vect_type</TT>
containing numbers of type specified in
Table&nbsp;<A HREF="#tab:f90dot">2</A>. The rank of <SPAN CLASS="MATH"><IMG
WIDTH="12" HEIGHT="29" ALIGN="MIDDLE" BORDER="0"
SRC="img21.png"
ALT="$y$"></SPAN> must be the same of <SPAN CLASS="MATH"><IMG
WIDTH="13" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
SRC="img20.png"
ALT="$x$"></SPAN>.
</DD>
<DT><STRONG>desc_a</STRONG></DT>
<DD>contains data structures for communications.
@@ -157,20 +216,37 @@ Intent: <B>in</B>.
<BR>
Specified as: an object of type descdata<TT>psb_desc_type</TT>.
</DD>
<DT><STRONG><B>On Return</B></STRONG></DT>
<DD>
</DD>
<DT><STRONG>res</STRONG></DT>
<DD>is the infinity norm of the columns of <SPAN CLASS="MATH"><IMG
WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
SRC="img20.png"
ALT="$x$"></SPAN>.
<DT><STRONG>global</STRONG></DT>
<DD>Specifies whether the computation should include the
global reduction across all processes.
<BR>
Scope: <B>global</B>
<BR>
Intent: <B>out</B>.
Type: <B>optional</B>.
<BR>
Specified as: a number or a rank-one array of long precision real numbers.
Intent: <B>in</B>.
<BR>
Specified as: a logical scalar.
Default: <code>global=.true.</code>
<BR>
<P>
</DD>
<DT><STRONG><B>On Return</B></STRONG></DT>
<DD>
</DD>
<DT><STRONG>Function value</STRONG></DT>
<DD>is the dot product of vectors <SPAN CLASS="MATH"><IMG
WIDTH="13" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
SRC="img20.png"
ALT="$x$"></SPAN> and <SPAN CLASS="MATH"><IMG
WIDTH="12" HEIGHT="29" ALIGN="MIDDLE" BORDER="0"
SRC="img21.png"
ALT="$y$"></SPAN>.
<BR>
Scope: <B>global</B> unless the optional variable
<code>global=.false.</code> has been specified
<BR>
Specified as: a number of the data type indicated in Table&nbsp;<A HREF="#tab:f90dot">2</A>.
</DD>
<DT><STRONG>info</STRONG></DT>
<DD>Error code.
@@ -185,30 +261,55 @@ An integer value; 0 means no error has been detected.
</DD>
</DL>
<P>
<BIG CLASS="LARGE"><B>Notes</B></BIG>
<OL>
<LI>The computation of a global result requires a global
communication, which entails a significant overhead. It may be
necessary and/or advisable to compute multiple dot products at the same
time; in this case, it is possible to improve the runtime efficiency
by using the following scheme:
<BR>
<IMG
WIDTH="500" HEIGHT="73" ALIGN="BOTTOM" BORDER="0"
SRC="img27.png"
ALT="\begin{lstlisting}
vres(1) = psb_gedot(x1,y1,desc_a,info,global=.false.)
vres(...
...,y3,desc_a,info,global=.false.)
call psb_sum(ictxt,vres(1:3))
\end{lstlisting}">
<BR>
In this way the global communication, which for small sizes is a
latency-bound operation, is invoked only once.
</LI>
</OL>
<P>
<DIV CLASS="navigation"><HR>
<!--Navigation Panel-->
<A NAME="tex2html959"
<A NAME="tex2html968"
HREF="node58.html">
<IMG WIDTH="37" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="next" SRC="next.png"></A>
<A NAME="tex2html955"
HREF="node52.html">
<A NAME="tex2html964"
HREF="node55.html">
<IMG WIDTH="26" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="up" SRC="up.png"></A>
<A NAME="tex2html949"
<A NAME="tex2html958"
HREF="node56.html">
<IMG WIDTH="63" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="previous" SRC="prev.png"></A>
<A NAME="tex2html957"
<A NAME="tex2html966"
HREF="node1.html">
<IMG WIDTH="65" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="contents" SRC="contents.png"></A>
<BR>
<B> Next:</B> <A NAME="tex2html960"
HREF="node58.html">psb_norm1 1-Norm</A>
<B> Up:</B> <A NAME="tex2html956"
HREF="node52.html">Computational routines</A>
<B> Previous:</B> <A NAME="tex2html950"
HREF="node56.html">psb_normi Infinity-Norm</A>
&nbsp; <B> <A NAME="tex2html958"
<B> Next:</B> <A NAME="tex2html969"
HREF="node58.html">psb_gedots Generalized</A>
<B> Up:</B> <A NAME="tex2html965"
HREF="node55.html">Computational routines</A>
<B> Previous:</B> <A NAME="tex2html959"
HREF="node56.html">psb_geaxpby General</A>
&nbsp; <B> <A NAME="tex2html967"
HREF="node1.html">Contents</A></B> </DIV>
<!--End of Navigation Panel-->