mirror of
https://github.com/sfilippone/psblas3.git
synced 2026-10-06 22:55:08 +00:00
psblas:
base/modules/psb_desc_mod.F90 docs/html/footnode.html docs/html/img100.png docs/html/img101.png docs/html/img102.png docs/html/img103.png docs/html/img104.png docs/html/img105.png docs/html/img106.png docs/html/img107.png docs/html/img108.png docs/html/img109.png docs/html/img110.png docs/html/img111.png docs/html/img112.png docs/html/img113.png docs/html/img114.png docs/html/img115.png docs/html/img116.png docs/html/img117.png docs/html/img118.png docs/html/img119.png docs/html/img120.png docs/html/img121.png docs/html/img122.png docs/html/img123.png docs/html/img124.png docs/html/img125.png docs/html/img126.png docs/html/img127.png docs/html/img128.png docs/html/img129.png docs/html/img130.png docs/html/img131.png docs/html/img132.png docs/html/img133.png docs/html/img134.png docs/html/img135.png docs/html/img136.png docs/html/img137.png docs/html/img138.png docs/html/img139.png docs/html/img140.png docs/html/img141.png docs/html/img142.png docs/html/img143.png docs/html/img144.png docs/html/img145.png docs/html/img146.png docs/html/img147.png docs/html/img148.png docs/html/img149.png docs/html/img150.png docs/html/img151.png docs/html/img152.png docs/html/img153.png docs/html/img154.png docs/html/img155.png docs/html/img156.png docs/html/img157.png docs/html/img158.png docs/html/img159.png docs/html/img160.png docs/html/img161.png docs/html/img162.png docs/html/img163.png docs/html/img164.png docs/html/img165.png docs/html/img20.png docs/html/img25.png docs/html/img28.png docs/html/img29.png docs/html/img33.png docs/html/img34.png docs/html/img38.png docs/html/img39.png docs/html/img42.png docs/html/img45.png docs/html/img46.png docs/html/img53.png docs/html/img54.png docs/html/img55.png docs/html/img56.png docs/html/img57.png docs/html/img58.png docs/html/img59.png docs/html/img60.png docs/html/img61.png docs/html/img62.png docs/html/img63.png docs/html/img64.png docs/html/img65.png docs/html/img66.png docs/html/img67.png docs/html/img68.png docs/html/img69.png docs/html/img70.png docs/html/img71.png docs/html/img72.png docs/html/img73.png docs/html/img74.png docs/html/img75.png docs/html/img76.png docs/html/img77.png docs/html/img78.png docs/html/img79.png docs/html/img80.png docs/html/img81.png docs/html/img82.png docs/html/img83.png docs/html/img84.png docs/html/img85.png docs/html/img86.png docs/html/img87.png docs/html/img88.png docs/html/img89.png docs/html/img90.png docs/html/img91.png docs/html/img92.png docs/html/img93.png docs/html/img94.png docs/html/img95.png docs/html/img96.png docs/html/img97.png docs/html/img98.png docs/html/img99.png docs/html/index.html docs/html/node1.html docs/html/node10.html docs/html/node100.html docs/html/node101.html docs/html/node102.html docs/html/node103.html docs/html/node104.html docs/html/node105.html docs/html/node106.html docs/html/node107.html docs/html/node108.html docs/html/node109.html docs/html/node11.html docs/html/node110.html docs/html/node111.html docs/html/node112.html docs/html/node113.html docs/html/node114.html docs/html/node115.html docs/html/node116.html docs/html/node117.html docs/html/node118.html docs/html/node119.html docs/html/node12.html docs/html/node120.html docs/html/node121.html docs/html/node122.html docs/html/node123.html docs/html/node124.html docs/html/node125.html docs/html/node126.html docs/html/node127.html docs/html/node128.html docs/html/node13.html docs/html/node14.html docs/html/node15.html docs/html/node16.html docs/html/node17.html docs/html/node18.html docs/html/node19.html docs/html/node2.html docs/html/node20.html docs/html/node21.html docs/html/node22.html docs/html/node23.html docs/html/node24.html docs/html/node25.html docs/html/node26.html docs/html/node27.html docs/html/node28.html docs/html/node29.html docs/html/node3.html docs/html/node30.html docs/html/node31.html docs/html/node32.html docs/html/node33.html docs/html/node34.html docs/html/node35.html docs/html/node36.html docs/html/node37.html docs/html/node38.html docs/html/node39.html docs/html/node4.html docs/html/node40.html docs/html/node41.html docs/html/node42.html docs/html/node43.html docs/html/node44.html docs/html/node45.html docs/html/node46.html docs/html/node47.html docs/html/node48.html docs/html/node49.html docs/html/node5.html docs/html/node50.html docs/html/node51.html docs/html/node52.html docs/html/node53.html docs/html/node54.html docs/html/node55.html docs/html/node56.html docs/html/node57.html docs/html/node58.html docs/html/node59.html docs/html/node6.html docs/html/node60.html docs/html/node61.html docs/html/node62.html docs/html/node63.html docs/html/node64.html docs/html/node65.html docs/html/node66.html docs/html/node67.html docs/html/node68.html docs/html/node69.html docs/html/node7.html docs/html/node70.html docs/html/node71.html docs/html/node72.html docs/html/node73.html docs/html/node74.html docs/html/node75.html docs/html/node76.html docs/html/node77.html docs/html/node78.html docs/html/node79.html docs/html/node8.html docs/html/node80.html docs/html/node81.html docs/html/node82.html docs/html/node83.html docs/html/node84.html docs/html/node85.html docs/html/node86.html docs/html/node87.html docs/html/node88.html docs/html/node89.html docs/html/node9.html docs/html/node90.html docs/html/node91.html docs/html/node92.html docs/html/node93.html docs/html/node94.html docs/html/node95.html docs/html/node96.html docs/html/node97.html docs/html/node98.html docs/html/node99.html docs/html/userhtml.html docs/psblas-3.4.pdf docs/src/datastruct.tex util/psb_d_genpde_impl.f90 util/psb_s_genpde_impl.f90 Defined new get_global_indices() method for DESC. Use it in GENPDE. Update docs
This commit is contained in:
+142
-186
@@ -7,8 +7,8 @@ original version by: Nikos Drakos, CBLU, University of Leeds
|
||||
Jens Lippmann, Marek Rouchal, Martin Wilck and others -->
|
||||
<HTML>
|
||||
<HEAD>
|
||||
<TITLE>psb_spsm -- Triangular System Solve</TITLE>
|
||||
<META NAME="description" CONTENT="psb_spsm -- Triangular System Solve">
|
||||
<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">
|
||||
@@ -18,77 +18,111 @@ original version by: Nikos Drakos, CBLU, University of Leeds
|
||||
|
||||
<LINK REL="STYLESHEET" HREF="userhtml.css">
|
||||
|
||||
<LINK REL="next" HREF="node61.html">
|
||||
<LINK REL="previous" HREF="node59.html">
|
||||
<LINK REL="up" HREF="node47.html">
|
||||
<LINK REL="up" HREF="node48.html">
|
||||
<LINK REL="next" HREF="node61.html">
|
||||
</HEAD>
|
||||
|
||||
<BODY >
|
||||
<!--Navigation Panel-->
|
||||
<A NAME="tex2html974"
|
||||
<A NAME="tex2html979"
|
||||
HREF="node61.html">
|
||||
<IMG WIDTH="37" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="next" SRC="next.png"></A>
|
||||
<A NAME="tex2html970"
|
||||
HREF="node47.html">
|
||||
<A NAME="tex2html975"
|
||||
HREF="node48.html">
|
||||
<IMG WIDTH="26" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="up" SRC="up.png"></A>
|
||||
<A NAME="tex2html966"
|
||||
<A NAME="tex2html969"
|
||||
HREF="node59.html">
|
||||
<IMG WIDTH="63" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="previous" SRC="prev.png"></A>
|
||||
<A NAME="tex2html972"
|
||||
<A NAME="tex2html977"
|
||||
HREF="node1.html">
|
||||
<IMG WIDTH="65" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="contents" SRC="contents.png"></A>
|
||||
<BR>
|
||||
<B> Next:</B> <A NAME="tex2html975"
|
||||
HREF="node61.html">Communication routines</A>
|
||||
<B> Up:</B> <A NAME="tex2html971"
|
||||
HREF="node47.html">Computational routines</A>
|
||||
<B> Previous:</B> <A NAME="tex2html967"
|
||||
HREF="node59.html">psb_spmm Sparse</A>
|
||||
<B> <A NAME="tex2html973"
|
||||
<B> Next:</B> <A NAME="tex2html980"
|
||||
HREF="node61.html">psb_spsm Triangular</A>
|
||||
<B> Up:</B> <A NAME="tex2html976"
|
||||
HREF="node48.html">Computational routines</A>
|
||||
<B> Previous:</B> <A NAME="tex2html970"
|
||||
HREF="node59.html">psb_normi Infinity</A>
|
||||
<B> <A NAME="tex2html978"
|
||||
HREF="node1.html">Contents</A></B>
|
||||
<BR>
|
||||
<BR>
|
||||
<!--End of Navigation Panel-->
|
||||
|
||||
<H2><A NAME="SECTION000513000000000000000">
|
||||
psb_spsm -- Triangular System Solve</A>
|
||||
<H2><A NAME="SECTION000512000000000000000">
|
||||
psb_spmm -- Sparse Matrix by Dense Matrix
|
||||
Product</A>
|
||||
</H2>
|
||||
|
||||
<P>
|
||||
This subroutine computes the Triangular System Solve:
|
||||
This subroutine computes the Sparse Matrix by Dense Matrix Product:
|
||||
|
||||
<P>
|
||||
<P></P>
|
||||
<DIV ALIGN="CENTER">
|
||||
<BR>
|
||||
<DIV ALIGN="RIGHT">
|
||||
|
||||
<!-- MATH
|
||||
\begin{eqnarray*}
|
||||
y &\leftarrow& \alpha T^{-1} x + \beta y\\
|
||||
y &\leftarrow& \alpha D T^{-1} x + \beta y\\
|
||||
y &\leftarrow& \alpha T^{-1} D x + \beta y\\
|
||||
y &\leftarrow& \alpha T^{-T} x + \beta y\\
|
||||
y &\leftarrow& \alpha D T^{-T} x + \beta y\\
|
||||
y &\leftarrow& \alpha T^{-T} D x + \beta y\\
|
||||
y &\leftarrow& \alpha T^{-H} x + \beta y\\
|
||||
y &\leftarrow& \alpha D T^{-H} x + \beta y\\
|
||||
y &\leftarrow& \alpha T^{-H} D x + \beta y\\
|
||||
\end{eqnarray*}
|
||||
\begin{equation}
|
||||
y \leftarrow \alpha A x + \beta y
|
||||
\end{equation}
|
||||
-->
|
||||
<IMG
|
||||
WIDTH="160" HEIGHT="239" BORDER="0"
|
||||
SRC="img50.png"
|
||||
ALT="\begin{eqnarray*}
|
||||
y &\leftarrow& \alpha T^{-1} x + \beta y\\
|
||||
y &\leftarrow& \al...
|
||||
...-H} x + \beta y\\
|
||||
y &\leftarrow& \alpha T^{-H} D x + \beta y\\
|
||||
\end{eqnarray*}"></DIV>
|
||||
<BR CLEAR="ALL"><P></P>
|
||||
<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 WIDTH=10 ALIGN="RIGHT">
|
||||
(1)</TD></TR>
|
||||
</TABLE>
|
||||
<BR CLEAR="ALL"></DIV><P></P>
|
||||
<BR>
|
||||
<DIV ALIGN="RIGHT">
|
||||
|
||||
<!-- MATH
|
||||
\begin{equation}
|
||||
y \leftarrow \alpha A^T x + \beta y
|
||||
\end{equation}
|
||||
-->
|
||||
<TABLE WIDTH="100%" ALIGN="CENTER">
|
||||
<TR VALIGN="MIDDLE"><TD ALIGN="CENTER" NOWRAP><A NAME="eq:f90spmm_tra"></A><IMG
|
||||
WIDTH="112" HEIGHT="27" BORDER="0"
|
||||
SRC="img45.png"
|
||||
ALT="\begin{displaymath}
|
||||
y \leftarrow \alpha A^T x + \beta y
|
||||
\end{displaymath}"></TD>
|
||||
<TD WIDTH=10 ALIGN="RIGHT">
|
||||
(2)</TD></TR>
|
||||
</TABLE>
|
||||
<BR CLEAR="ALL"></DIV><P></P>
|
||||
<BR>
|
||||
<DIV ALIGN="RIGHT">
|
||||
|
||||
<!-- MATH
|
||||
\begin{equation}
|
||||
y \leftarrow \alpha A^H x + \beta y
|
||||
\end{equation}
|
||||
-->
|
||||
<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 WIDTH=10 ALIGN="RIGHT">
|
||||
(3)</TD></TR>
|
||||
</TABLE>
|
||||
<BR CLEAR="ALL"></DIV><P></P>
|
||||
|
||||
<P>
|
||||
where:
|
||||
<DL>
|
||||
<DT><STRONG><IMG
|
||||
WIDTH="14" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
|
||||
WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
|
||||
SRC="img20.png"
|
||||
ALT="$x$"></STRONG></DT>
|
||||
<DD>is the global dense matrix <IMG
|
||||
@@ -107,50 +141,34 @@ where:
|
||||
</DD>
|
||||
<DT><STRONG><IMG
|
||||
WIDTH="16" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
|
||||
SRC="img51.png"
|
||||
ALT="$T$"></STRONG></DT>
|
||||
<DD>is the global sparse block triangular submatrix <IMG
|
||||
SRC="img1.png"
|
||||
ALT="$A$"></STRONG></DT>
|
||||
<DD>is the global sparse matrix <IMG
|
||||
WIDTH="16" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
|
||||
SRC="img51.png"
|
||||
ALT="$T$">
|
||||
</DD>
|
||||
<DT><STRONG><IMG
|
||||
WIDTH="17" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
|
||||
SRC="img52.png"
|
||||
ALT="$D$"></STRONG></DT>
|
||||
<DD>is the scaling diagonal matrix.
|
||||
SRC="img1.png"
|
||||
ALT="$A$">
|
||||
</DD>
|
||||
</DL>
|
||||
|
||||
<P>
|
||||
<PRE>
|
||||
call psb_spsm(alpha, t, x, beta, y, desc_a, info)
|
||||
call psb_spsm(alpha, t, x, beta, y, desc_a, info,&
|
||||
& trans, unit, choice, diag, work)
|
||||
</PRE>
|
||||
|
||||
<P>
|
||||
<BR><P></P>
|
||||
<DIV ALIGN="CENTER"><A NAME="1825"></A>
|
||||
<DIV ALIGN="CENTER"><A NAME="1858"></A>
|
||||
<TABLE>
|
||||
<CAPTION><STRONG>Table 13:</STRONG>
|
||||
<CAPTION><STRONG>Table 12:</STRONG>
|
||||
Data types</CAPTION>
|
||||
<TR><TD>
|
||||
<DIV ALIGN="CENTER">
|
||||
<TABLE CELLPADDING=3 BORDER="1" ALIGN="CENTER">
|
||||
<TR><TD ALIGN="LEFT"><IMG
|
||||
WIDTH="16" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
|
||||
SRC="img51.png"
|
||||
ALT="$T$">, <IMG
|
||||
WIDTH="14" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
|
||||
SRC="img1.png"
|
||||
ALT="$A$">, <IMG
|
||||
WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
|
||||
SRC="img20.png"
|
||||
ALT="$x$">, <IMG
|
||||
WIDTH="13" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
|
||||
SRC="img21.png"
|
||||
ALT="$y$">, <IMG
|
||||
WIDTH="17" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
|
||||
SRC="img52.png"
|
||||
ALT="$D$">, <IMG
|
||||
WIDTH="14" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
|
||||
SRC="img22.png"
|
||||
ALT="$\alpha$">, <IMG
|
||||
@@ -160,16 +178,16 @@ Data types</CAPTION>
|
||||
<TD ALIGN="LEFT"><B>Subroutine</B></TD>
|
||||
</TR>
|
||||
<TR><TD ALIGN="LEFT">Short Precision Real</TD>
|
||||
<TD ALIGN="LEFT">psb_spsm</TD>
|
||||
<TD ALIGN="LEFT">psb_spmm</TD>
|
||||
</TR>
|
||||
<TR><TD ALIGN="LEFT">Long Precision Real</TD>
|
||||
<TD ALIGN="LEFT">psb_spsm</TD>
|
||||
<TD ALIGN="LEFT">psb_spmm</TD>
|
||||
</TR>
|
||||
<TR><TD ALIGN="LEFT">Short Precision Complex</TD>
|
||||
<TD ALIGN="LEFT">psb_spsm</TD>
|
||||
<TD ALIGN="LEFT">psb_spmm</TD>
|
||||
</TR>
|
||||
<TR><TD ALIGN="LEFT">Long Precision Complex</TD>
|
||||
<TD ALIGN="LEFT">psb_spsm</TD>
|
||||
<TD ALIGN="LEFT">psb_spmm</TD>
|
||||
</TR>
|
||||
</TABLE>
|
||||
</DIV>
|
||||
@@ -178,6 +196,13 @@ Data types</CAPTION>
|
||||
</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>
|
||||
@@ -199,14 +224,14 @@ Type: <B>required</B>
|
||||
Intent: <B>in</B>.
|
||||
<BR>
|
||||
Specified as: a number of the data type indicated in
|
||||
Table <A HREF="#tab:f90spsm">13</A>.
|
||||
Table <A HREF="#tab:f90spmm">12</A>.
|
||||
</DD>
|
||||
<DT><STRONG>t</STRONG></DT>
|
||||
<DD>the global portion of the sparse matrix
|
||||
<DT><STRONG>a</STRONG></DT>
|
||||
<DD>the local portion of the sparse matrix
|
||||
<IMG
|
||||
WIDTH="16" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
|
||||
SRC="img51.png"
|
||||
ALT="$T$">.
|
||||
SRC="img1.png"
|
||||
ALT="$A$">.
|
||||
<BR>
|
||||
Scope: <B>local</B>
|
||||
<BR>
|
||||
@@ -214,13 +239,12 @@ Type: <B>required</B>
|
||||
<BR>
|
||||
Intent: <B>in</B>.
|
||||
<BR>
|
||||
Specified as: an object type specified in
|
||||
§ <A HREF="node9.html#sec:datastruct">3</A>.
|
||||
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
|
||||
<IMG
|
||||
WIDTH="14" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
|
||||
WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
|
||||
SRC="img20.png"
|
||||
ALT="$x$">.
|
||||
|
||||
@@ -233,8 +257,8 @@ 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:f90spsm">13</A>. The rank of <IMG
|
||||
WIDTH="14" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
|
||||
Table <A HREF="#tab:f90spmm">12</A>. The rank of <IMG
|
||||
WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
|
||||
SRC="img20.png"
|
||||
ALT="$x$"> must be the same of <IMG
|
||||
WIDTH="13" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
|
||||
@@ -253,7 +277,7 @@ Type: <B>required</B>
|
||||
<BR>
|
||||
Intent: <B>in</B>.
|
||||
<BR>
|
||||
Specified as: a number of the data type indicated in Table <A HREF="#tab:f90spsm">13</A>.
|
||||
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
|
||||
@@ -271,11 +295,11 @@ 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:f90spsm">13</A>. The rank of <IMG
|
||||
Table <A HREF="#tab:f90spmm">12</A>. The rank of <IMG
|
||||
WIDTH="13" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
|
||||
SRC="img21.png"
|
||||
ALT="$y$"> must be the same of <IMG
|
||||
WIDTH="14" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
|
||||
WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
|
||||
SRC="img20.png"
|
||||
ALT="$x$">.
|
||||
</DD>
|
||||
@@ -291,16 +315,18 @@ Intent: <B>in</B>.
|
||||
Specified as: an object of type descdata<TT>psb_desc_type</TT>.
|
||||
</DD>
|
||||
<DT><STRONG>trans</STRONG></DT>
|
||||
<DD>specify with <EM>unitd</EM> the operation to perform.
|
||||
<DD>indicates what kind of operation to perform.
|
||||
<DL>
|
||||
<DT><STRONG>trans = 'N'</STRONG></DT>
|
||||
<DD>the operation is with no transposed matrix
|
||||
<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 with transposed matrix.
|
||||
<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 with conjugate transposed matrix.
|
||||
<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>
|
||||
@@ -315,82 +341,11 @@ Default: <IMG
|
||||
ALT="$trans = N$">
|
||||
<BR>
|
||||
Specified as: a character variable.
|
||||
</DD>
|
||||
<DT><STRONG>unitd</STRONG></DT>
|
||||
<DD>specify with <EM>trans</EM> the operation to perform.
|
||||
<DL>
|
||||
<DT><STRONG>unitd = 'U'</STRONG></DT>
|
||||
<DD>the operation is with no scaling
|
||||
</DD>
|
||||
<DT><STRONG>unitd = 'L'</STRONG></DT>
|
||||
<DD>the operation is with left scaling
|
||||
</DD>
|
||||
<DT><STRONG>unitd = 'R'</STRONG></DT>
|
||||
<DD>the operation is with right scaling.
|
||||
</DD>
|
||||
</DL>
|
||||
Scope: <B>global</B>
|
||||
<BR>
|
||||
Type: <B>optional</B>
|
||||
<BR>
|
||||
Intent: <B>in</B>.
|
||||
<BR>
|
||||
Default: <IMG
|
||||
WIDTH="76" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
|
||||
SRC="img53.png"
|
||||
ALT="$unitd = U$">
|
||||
<BR>
|
||||
Specified as: a character variable.
|
||||
</DD>
|
||||
<DT><STRONG>choice</STRONG></DT>
|
||||
<DD>specifies the update of overlap elements to be performed
|
||||
on exit:
|
||||
<DL>
|
||||
<DT></DT>
|
||||
<DD><code>psb_none_</code>
|
||||
</DD>
|
||||
<DT></DT>
|
||||
<DD><code>psb_sum_</code>
|
||||
</DD>
|
||||
<DT></DT>
|
||||
<DD><code>psb_avg_</code>
|
||||
</DD>
|
||||
<DT></DT>
|
||||
<DD><code>psb_square_root_</code>
|
||||
</DD>
|
||||
</DL>
|
||||
Scope: <B>global</B>
|
||||
<BR>
|
||||
Type: <B>optional</B>
|
||||
<BR>
|
||||
Intent: <B>in</B>.
|
||||
<BR>
|
||||
Default: <code>psb_avg_</code>
|
||||
<BR>
|
||||
Specified as: an integer variable.
|
||||
</DD>
|
||||
<DT><STRONG>diag</STRONG></DT>
|
||||
<DD>the diagonal scaling matrix.
|
||||
<BR>
|
||||
Scope: <B>local</B>
|
||||
<BR>
|
||||
Type: <B>optional</B>
|
||||
<BR>
|
||||
Intent: <B>in</B>.
|
||||
<BR>
|
||||
Default: <!-- MATH
|
||||
$diag(1) = 1 (no scaling)$
|
||||
-->
|
||||
<IMG
|
||||
WIDTH="165" HEIGHT="32" ALIGN="MIDDLE" BORDER="0"
|
||||
SRC="img54.png"
|
||||
ALT="$diag(1) = 1 (no scaling)$">
|
||||
<BR>
|
||||
Specified as: a rank one array containing numbers of the type
|
||||
indicated in Table <A HREF="#tab:f90spsm">13</A>.
|
||||
|
||||
<P>
|
||||
</DD>
|
||||
<DT><STRONG>work</STRONG></DT>
|
||||
<DD>a work array.
|
||||
<DD>work array.
|
||||
<BR>
|
||||
Scope: <B>local</B>
|
||||
<BR>
|
||||
@@ -399,10 +354,13 @@ Type: <B>optional</B>
|
||||
Intent: <B>inout</B>.
|
||||
<BR>
|
||||
Specified as: a rank one array of the same type of <IMG
|
||||
WIDTH="14" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
|
||||
WIDTH="13" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
|
||||
SRC="img20.png"
|
||||
ALT="$x$"> with the
|
||||
TARGET attribute.
|
||||
ALT="$x$"> and <IMG
|
||||
WIDTH="13" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
|
||||
SRC="img21.png"
|
||||
ALT="$y$"> with
|
||||
the TARGET attribute.
|
||||
|
||||
<P>
|
||||
</DD>
|
||||
@@ -410,12 +368,10 @@ TARGET attribute.
|
||||
<DD>
|
||||
</DD>
|
||||
<DT><STRONG>y</STRONG></DT>
|
||||
<DD>the local portion of global dense matrix
|
||||
<IMG
|
||||
<DD>the local portion of result matrix <IMG
|
||||
WIDTH="13" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
|
||||
SRC="img21.png"
|
||||
ALT="$y$">.
|
||||
|
||||
ALT="$y$">.
|
||||
<BR>
|
||||
Scope: <B>local</B>
|
||||
<BR>
|
||||
@@ -425,7 +381,7 @@ Intent: <B>inout</B>.
|
||||
<BR>
|
||||
Specified as: an array of rank one or two
|
||||
containing numbers of type specified in
|
||||
Table <A HREF="#tab:f90spsm">13</A>.
|
||||
Table <A HREF="#tab:f90spmm">12</A>.
|
||||
</DD>
|
||||
<DT><STRONG>info</STRONG></DT>
|
||||
<DD>Error code.
|
||||
@@ -443,26 +399,26 @@ An integer value; 0 means no error has been detected.
|
||||
<P>
|
||||
<HR>
|
||||
<!--Navigation Panel-->
|
||||
<A NAME="tex2html974"
|
||||
<A NAME="tex2html979"
|
||||
HREF="node61.html">
|
||||
<IMG WIDTH="37" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="next" SRC="next.png"></A>
|
||||
<A NAME="tex2html970"
|
||||
HREF="node47.html">
|
||||
<A NAME="tex2html975"
|
||||
HREF="node48.html">
|
||||
<IMG WIDTH="26" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="up" SRC="up.png"></A>
|
||||
<A NAME="tex2html966"
|
||||
<A NAME="tex2html969"
|
||||
HREF="node59.html">
|
||||
<IMG WIDTH="63" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="previous" SRC="prev.png"></A>
|
||||
<A NAME="tex2html972"
|
||||
<A NAME="tex2html977"
|
||||
HREF="node1.html">
|
||||
<IMG WIDTH="65" HEIGHT="24" ALIGN="BOTTOM" BORDER="0" ALT="contents" SRC="contents.png"></A>
|
||||
<BR>
|
||||
<B> Next:</B> <A NAME="tex2html975"
|
||||
HREF="node61.html">Communication routines</A>
|
||||
<B> Up:</B> <A NAME="tex2html971"
|
||||
HREF="node47.html">Computational routines</A>
|
||||
<B> Previous:</B> <A NAME="tex2html967"
|
||||
HREF="node59.html">psb_spmm Sparse</A>
|
||||
<B> <A NAME="tex2html973"
|
||||
<B> Next:</B> <A NAME="tex2html980"
|
||||
HREF="node61.html">psb_spsm Triangular</A>
|
||||
<B> Up:</B> <A NAME="tex2html976"
|
||||
HREF="node48.html">Computational routines</A>
|
||||
<B> Previous:</B> <A NAME="tex2html970"
|
||||
HREF="node59.html">psb_normi Infinity</A>
|
||||
<B> <A NAME="tex2html978"
|
||||
HREF="node1.html">Contents</A></B>
|
||||
<!--End of Navigation Panel-->
|
||||
|
||||
|
||||
Reference in New Issue
Block a user