You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
428 lines
11 KiB
HTML
428 lines
11 KiB
HTML
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
|
|
|
|
<!--Converted with LaTeX2HTML 2017.2 (Released Jan 23, 2017) -->
|
|
<HTML>
|
|
<HEAD>
|
|
<TITLE>psb_spmm -- Sparse Matrix by Dense Matrix Product</TITLE>
|
|
<META NAME="description" CONTENT="psb_spmm -- Sparse Matrix by Dense Matrix Product">
|
|
<META NAME="keywords" CONTENT="userhtml">
|
|
<META NAME="resource-type" CONTENT="document">
|
|
<META NAME="distribution" CONTENT="global">
|
|
|
|
<META NAME="Generator" CONTENT="LaTeX2HTML v2017.2">
|
|
<META HTTP-EQUIV="Content-Style-Type" CONTENT="text/css">
|
|
|
|
<LINK REL="STYLESHEET" HREF="userhtml.css">
|
|
|
|
<LINK REL="next" HREF="node65.html">
|
|
<LINK REL="previous" HREF="node63.html">
|
|
<LINK REL="up" HREF="node52.html">
|
|
<LINK REL="next" HREF="node65.html">
|
|
</HEAD>
|
|
|
|
<BODY >
|
|
|
|
<DIV CLASS="navigation"><!--Navigation Panel-->
|
|
<A NAME="tex2html1042"
|
|
HREF="node65.html">
|
|
<IMG WIDTH="37" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="next" SRC="next.png"></A>
|
|
<A NAME="tex2html1038"
|
|
HREF="node52.html">
|
|
<IMG WIDTH="26" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="up" SRC="up.png"></A>
|
|
<A NAME="tex2html1032"
|
|
HREF="node63.html">
|
|
<IMG WIDTH="63" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="previous" SRC="prev.png"></A>
|
|
<A NAME="tex2html1040"
|
|
HREF="node1.html">
|
|
<IMG WIDTH="65" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="contents" SRC="contents.png"></A>
|
|
<BR>
|
|
<B> Next:</B> <A NAME="tex2html1043"
|
|
HREF="node65.html">psb_spsm Triangular</A>
|
|
<B> Up:</B> <A NAME="tex2html1039"
|
|
HREF="node52.html">Computational routines</A>
|
|
<B> Previous:</B> <A NAME="tex2html1033"
|
|
HREF="node63.html">psb_normi Infinity</A>
|
|
<B> <A NAME="tex2html1041"
|
|
HREF="node1.html">Contents</A></B>
|
|
<BR>
|
|
<BR></DIV>
|
|
<!--End of Navigation Panel-->
|
|
|
|
<H2><A NAME="SECTION000512000000000000000">
|
|
psb_spmm -- Sparse Matrix by Dense Matrix
|
|
Product</A>
|
|
</H2>
|
|
|
|
<P>
|
|
This subroutine computes the Sparse Matrix by Dense Matrix Product:
|
|
|
|
<P>
|
|
<BR>
|
|
<DIV ALIGN="RIGHT" CLASS="mathdisplay">
|
|
|
|
<!-- MATH
|
|
\begin{equation}
|
|
y \leftarrow \alpha A x + \beta y
|
|
\end{equation}
|
|
-->
|
|
<A NAME="eq:f90spmm_no_tra"></A>
|
|
<TABLE WIDTH="100%" ALIGN="CENTER">
|
|
<TR VALIGN="MIDDLE"><TD ALIGN="CENTER" NOWRAP><A NAME="eq:f90spmm_no_tra"></A><IMG
|
|
WIDTH="102" HEIGHT="27" BORDER="0"
|
|
SRC="img44.png"
|
|
ALT="\begin{displaymath}
|
|
y \leftarrow \alpha A x + \beta y
|
|
\end{displaymath}"></TD>
|
|
<TD CLASS="eqno" WIDTH=10 ALIGN="RIGHT">
|
|
(<SPAN CLASS="arabic">1</SPAN>)</TD></TR>
|
|
</TABLE>
|
|
<BR CLEAR="ALL"></DIV><P></P>
|
|
<BR>
|
|
<DIV ALIGN="RIGHT" CLASS="mathdisplay">
|
|
|
|
<!-- MATH
|
|
\begin{equation}
|
|
y \leftarrow \alpha A^T x + \beta y
|
|
\end{equation}
|
|
-->
|
|
<A NAME="eq:f90spmm_tra"></A>
|
|
<TABLE WIDTH="100%" ALIGN="CENTER">
|
|
<TR VALIGN="MIDDLE"><TD ALIGN="CENTER" NOWRAP><A NAME="eq:f90spmm_tra"></A><IMG
|
|
WIDTH="111" HEIGHT="27" BORDER="0"
|
|
SRC="img45.png"
|
|
ALT="\begin{displaymath}
|
|
y \leftarrow \alpha A^T x + \beta y
|
|
\end{displaymath}"></TD>
|
|
<TD CLASS="eqno" WIDTH=10 ALIGN="RIGHT">
|
|
(<SPAN CLASS="arabic">2</SPAN>)</TD></TR>
|
|
</TABLE>
|
|
<BR CLEAR="ALL"></DIV><P></P>
|
|
<BR>
|
|
<DIV ALIGN="RIGHT" CLASS="mathdisplay">
|
|
|
|
<!-- MATH
|
|
\begin{equation}
|
|
y \leftarrow \alpha A^H x + \beta y
|
|
\end{equation}
|
|
-->
|
|
<A NAME="eq:f90spmm_con"></A>
|
|
<TABLE WIDTH="100%" ALIGN="CENTER">
|
|
<TR VALIGN="MIDDLE"><TD ALIGN="CENTER" NOWRAP><A NAME="eq:f90spmm_con"></A><IMG
|
|
WIDTH="114" HEIGHT="27" BORDER="0"
|
|
SRC="img46.png"
|
|
ALT="\begin{displaymath}
|
|
y \leftarrow \alpha A^H x + \beta y
|
|
\end{displaymath}"></TD>
|
|
<TD CLASS="eqno" WIDTH=10 ALIGN="RIGHT">
|
|
(<SPAN CLASS="arabic">3</SPAN>)</TD></TR>
|
|
</TABLE>
|
|
<BR CLEAR="ALL"></DIV><P></P>
|
|
|
|
<P>
|
|
where:
|
|
<DL>
|
|
<DT><STRONG><SPAN CLASS="MATH"><IMG
|
|
WIDTH="13" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
|
|
SRC="img20.png"
|
|
ALT="$x$"></SPAN></STRONG></DT>
|
|
<DD>is the global dense matrix <SPAN CLASS="MATH"><IMG
|
|
WIDTH="25" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
|
|
SRC="img47.png"
|
|
ALT="$x_{:, :}$"></SPAN>
|
|
</DD>
|
|
<DT><STRONG><SPAN CLASS="MATH"><IMG
|
|
WIDTH="13" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
|
|
SRC="img21.png"
|
|
ALT="$y$"></SPAN></STRONG></DT>
|
|
<DD>is the global dense matrix <SPAN CLASS="MATH"><IMG
|
|
WIDTH="23" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
|
|
SRC="img48.png"
|
|
ALT="$y_{:, :}$"></SPAN>
|
|
</DD>
|
|
<DT><STRONG><SPAN CLASS="MATH"><IMG
|
|
WIDTH="16" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
|
|
SRC="img1.png"
|
|
ALT="$A$"></SPAN></STRONG></DT>
|
|
<DD>is the global sparse matrix <SPAN CLASS="MATH"><IMG
|
|
WIDTH="16" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
|
|
SRC="img1.png"
|
|
ALT="$A$"></SPAN>
|
|
</DD>
|
|
</DL>
|
|
|
|
<P>
|
|
<BR><P></P>
|
|
<DIV ALIGN="CENTER"><A NAME="1988"></A>
|
|
<TABLE>
|
|
<CAPTION><STRONG>Table 12:</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="16" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
|
|
SRC="img1.png"
|
|
ALT="$A$"></SPAN>, <SPAN CLASS="MATH"><IMG
|
|
WIDTH="13" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
|
|
SRC="img20.png"
|
|
ALT="$x$"></SPAN>, <SPAN CLASS="MATH"><IMG
|
|
WIDTH="13" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
|
|
SRC="img21.png"
|
|
ALT="$y$"></SPAN>, <SPAN CLASS="MATH"><IMG
|
|
WIDTH="14" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
|
|
SRC="img22.png"
|
|
ALT="$\alpha$"></SPAN>, <SPAN CLASS="MATH"><IMG
|
|
WIDTH="14" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
|
|
SRC="img23.png"
|
|
ALT="$\beta$"></SPAN></TD>
|
|
<TD ALIGN="LEFT"><B>Subroutine</B></TD>
|
|
</TR>
|
|
<TR><TD ALIGN="LEFT">Short Precision Real</TD>
|
|
<TD ALIGN="LEFT">psb_spmm</TD>
|
|
</TR>
|
|
<TR><TD ALIGN="LEFT">Long Precision Real</TD>
|
|
<TD ALIGN="LEFT">psb_spmm</TD>
|
|
</TR>
|
|
<TR><TD ALIGN="LEFT">Short Precision Complex</TD>
|
|
<TD ALIGN="LEFT">psb_spmm</TD>
|
|
</TR>
|
|
<TR><TD ALIGN="LEFT">Long Precision Complex</TD>
|
|
<TD ALIGN="LEFT">psb_spmm</TD>
|
|
</TR>
|
|
</TABLE>
|
|
</DIV>
|
|
</TD></TR>
|
|
</TABLE>
|
|
</DIV><P></P>
|
|
<BR>
|
|
|
|
<P>
|
|
<PRE>
|
|
call psb_spmm(alpha, a, x, beta, y, desc_a, info)
|
|
call psb_spmm(alpha, a, x, beta, y,desc_a, info, &
|
|
& trans, work)
|
|
</PRE>
|
|
|
|
<P>
|
|
<DL>
|
|
<DT><STRONG>Type:</STRONG></DT>
|
|
<DD>Synchronous.
|
|
</DD>
|
|
<DT><STRONG><B>On Entry</B></STRONG></DT>
|
|
<DD>
|
|
</DD>
|
|
<DT><STRONG>alpha</STRONG></DT>
|
|
<DD>the scalar <SPAN CLASS="MATH"><IMG
|
|
WIDTH="14" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
|
|
SRC="img22.png"
|
|
ALT="$\alpha$"></SPAN>.
|
|
<BR>
|
|
Scope: <B>global</B>
|
|
<BR>
|
|
Type: <B>required</B>
|
|
<BR>
|
|
Intent: <B>in</B>.
|
|
<BR>
|
|
Specified as: a number of the data type indicated in
|
|
Table <A HREF="#tab:f90spmm">12</A>.
|
|
</DD>
|
|
<DT><STRONG>a</STRONG></DT>
|
|
<DD>the local portion of the sparse matrix
|
|
<SPAN CLASS="MATH"><IMG
|
|
WIDTH="16" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
|
|
SRC="img1.png"
|
|
ALT="$A$"></SPAN>.
|
|
<BR>
|
|
Scope: <B>local</B>
|
|
<BR>
|
|
Type: <B>required</B>
|
|
<BR>
|
|
Intent: <B>in</B>.
|
|
<BR>
|
|
Specified as: an object of type spdata<TT>psb_Tspmat_type</TT>.
|
|
</DD>
|
|
<DT><STRONG>x</STRONG></DT>
|
|
<DD>the local portion of global dense matrix
|
|
<SPAN CLASS="MATH"><IMG
|
|
WIDTH="13" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
|
|
SRC="img20.png"
|
|
ALT="$x$"></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 <A HREF="#tab:f90spmm">12</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="13" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
|
|
SRC="img21.png"
|
|
ALT="$y$"></SPAN>.
|
|
</DD>
|
|
<DT><STRONG>beta</STRONG></DT>
|
|
<DD>the scalar <SPAN CLASS="MATH"><IMG
|
|
WIDTH="14" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
|
|
SRC="img23.png"
|
|
ALT="$\beta$"></SPAN>.
|
|
<BR>
|
|
Scope: <B>global</B>
|
|
<BR>
|
|
Type: <B>required</B>
|
|
<BR>
|
|
Intent: <B>in</B>.
|
|
<BR>
|
|
Specified as: a number of the data type indicated in Table <A HREF="#tab:f90spmm">12</A>.
|
|
</DD>
|
|
<DT><STRONG>y</STRONG></DT>
|
|
<DD>the local portion of global dense matrix
|
|
<SPAN CLASS="MATH"><IMG
|
|
WIDTH="13" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
|
|
SRC="img21.png"
|
|
ALT="$y$"></SPAN>.
|
|
|
|
<BR>
|
|
Scope: <B>local</B>
|
|
<BR>
|
|
Type: <B>required</B>
|
|
<BR>
|
|
Intent: <B>inout</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 <A HREF="#tab:f90spmm">12</A>. The rank of <SPAN CLASS="MATH"><IMG
|
|
WIDTH="13" HEIGHT="30" 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.
|
|
<BR>
|
|
Scope: <B>local</B>
|
|
<BR>
|
|
Type: <B>required</B>
|
|
<BR>
|
|
Intent: <B>in</B>.
|
|
<BR>
|
|
Specified as: an object of type descdata<TT>psb_desc_type</TT>.
|
|
</DD>
|
|
<DT><STRONG>trans</STRONG></DT>
|
|
<DD>indicates what kind of operation to perform.
|
|
<DL>
|
|
<DT><STRONG>trans = N</STRONG></DT>
|
|
<DD>the operation is specified by equation <A HREF="#eq:f90spmm_no_tra">1</A>
|
|
</DD>
|
|
<DT><STRONG>trans = T</STRONG></DT>
|
|
<DD>the operation is specified by equation
|
|
<A HREF="#eq:f90spmm_tra">2</A>
|
|
</DD>
|
|
<DT><STRONG>trans = C</STRONG></DT>
|
|
<DD>the operation is specified by equation
|
|
<A HREF="#eq:f90spmm_con">3</A>
|
|
</DD>
|
|
</DL>
|
|
Scope: <B>global</B>
|
|
<BR>
|
|
Type: <B>optional</B>
|
|
<BR>
|
|
Intent: <B>in</B>.
|
|
<BR>
|
|
Default: <SPAN CLASS="MATH"><IMG
|
|
WIDTH="79" HEIGHT="15" ALIGN="BOTTOM" BORDER="0"
|
|
SRC="img49.png"
|
|
ALT="$trans = N$"></SPAN>
|
|
<BR>
|
|
Specified as: a character variable.
|
|
|
|
<P>
|
|
</DD>
|
|
<DT><STRONG>work</STRONG></DT>
|
|
<DD>work array.
|
|
<BR>
|
|
Scope: <B>local</B>
|
|
<BR>
|
|
Type: <B>optional</B>
|
|
<BR>
|
|
Intent: <B>inout</B>.
|
|
<BR>
|
|
Specified as: a rank one array of the same type of <SPAN CLASS="MATH"><IMG
|
|
WIDTH="13" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
|
|
SRC="img20.png"
|
|
ALT="$x$"></SPAN> and <SPAN CLASS="MATH"><IMG
|
|
WIDTH="13" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
|
|
SRC="img21.png"
|
|
ALT="$y$"></SPAN> with
|
|
the TARGET attribute.
|
|
|
|
<P>
|
|
</DD>
|
|
<DT><STRONG><B>On Return</B></STRONG></DT>
|
|
<DD>
|
|
</DD>
|
|
<DT><STRONG>y</STRONG></DT>
|
|
<DD>the local portion of result matrix <SPAN CLASS="MATH"><IMG
|
|
WIDTH="13" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
|
|
SRC="img21.png"
|
|
ALT="$y$"></SPAN>.
|
|
<BR>
|
|
Scope: <B>local</B>
|
|
<BR>
|
|
Type: <B>required</B>
|
|
<BR>
|
|
Intent: <B>inout</B>.
|
|
<BR>
|
|
Specified as: an array of rank one or two
|
|
containing numbers of type specified in
|
|
Table <A HREF="#tab:f90spmm">12</A>.
|
|
</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>
|
|
|
|
<DIV CLASS="navigation"><HR>
|
|
<!--Navigation Panel-->
|
|
<A NAME="tex2html1042"
|
|
HREF="node65.html">
|
|
<IMG WIDTH="37" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="next" SRC="next.png"></A>
|
|
<A NAME="tex2html1038"
|
|
HREF="node52.html">
|
|
<IMG WIDTH="26" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="up" SRC="up.png"></A>
|
|
<A NAME="tex2html1032"
|
|
HREF="node63.html">
|
|
<IMG WIDTH="63" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="previous" SRC="prev.png"></A>
|
|
<A NAME="tex2html1040"
|
|
HREF="node1.html">
|
|
<IMG WIDTH="65" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="contents" SRC="contents.png"></A>
|
|
<BR>
|
|
<B> Next:</B> <A NAME="tex2html1043"
|
|
HREF="node65.html">psb_spsm Triangular</A>
|
|
<B> Up:</B> <A NAME="tex2html1039"
|
|
HREF="node52.html">Computational routines</A>
|
|
<B> Previous:</B> <A NAME="tex2html1033"
|
|
HREF="node63.html">psb_normi Infinity</A>
|
|
<B> <A NAME="tex2html1041"
|
|
HREF="node1.html">Contents</A></B> </DIV>
|
|
<!--End of Navigation Panel-->
|
|
|
|
</BODY>
|
|
</HTML>
|