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

psblas3:

Browse Source 
base/comm/psb_cgather.f90
 base/comm/psb_dgather.f90
 base/comm/psb_sgather.f90
 base/comm/psb_zgather.f90
 base/modules/psb_c_comm_mod.f90
 base/modules/psb_d_comm_mod.f90
 base/modules/psb_s_comm_mod.f90
 base/modules/psb_z_comm_mod.f90


Fixed ALLOCATABLE attribute of globx.
Also updated docs.
This commit is contained in:
Salvatore Filippone
2012-03-16 21:03:02 +00:00
parent 205d2af765
commit 53a7db871a
200 changed files with 1326 additions and 1254 deletions
Download Patch File Download Diff File Expand all files Collapse all files
docs/html/node52.html
+14 -14
View File
@@ -77,16 +77,16 @@ x \leftarrow Q x
where:
<DL>
<DT><STRONG><IMG
WIDTH="14" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
WIDTH="14" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
SRC="img25.png"
ALT="$x$"></STRONG></DT>
<DD>is the global dense submatrix <IMG
WIDTH="14" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
WIDTH="14" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
SRC="img25.png"
ALT="$x$">
</DD>
<DT><STRONG><IMG
WIDTH="16" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
WIDTH="17" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
SRC="img65.png"
ALT="$Q$"></STRONG></DT>
<DD>is the overlap operator; it is the composition of two
@@ -94,7 +94,7 @@ operators <IMG
WIDTH="22" HEIGHT="30" ALIGN="MIDDLE" BORDER="0"
SRC="img66.png"
ALT="$ P_a$"> and <IMG
WIDTH="26" HEIGHT="20" ALIGN="BOTTOM" BORDER="0"
WIDTH="27" HEIGHT="20" ALIGN="BOTTOM" BORDER="0"
SRC="img67.png"
ALT="$ P^{T}$">.
</DD>
@@ -110,7 +110,7 @@ Data types</CAPTION>
<DIV ALIGN="CENTER">
<TABLE CELLPADDING=3 BORDER="1" ALIGN="CENTER">
<TR><TD ALIGN="LEFT"><IMG
WIDTH="14" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
WIDTH="14" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
SRC="img25.png"
ALT="$x$"></TD>
<TD ALIGN="LEFT"><B>Subroutine</B></TD>
@@ -150,7 +150,7 @@ call psb_ovrl(x, desc_a, info, update=update_type, work=work)
</DD>
<DT><STRONG>x</STRONG></DT>
<DD>global dense matrix <IMG
WIDTH="14" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
WIDTH="14" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
SRC="img25.png"
ALT="$x$">.
<BR>
@@ -183,13 +183,13 @@ Specified as: a structured data of type descdata<TT>psb_desc_type</TT>.
</DD>
<DT><STRONG>update = psb_add_</STRONG></DT>
<DD>Sum overlap entries, i.e. apply <IMG
WIDTH="27" HEIGHT="20" ALIGN="BOTTOM" BORDER="0"
WIDTH="26" HEIGHT="20" ALIGN="BOTTOM" BORDER="0"
SRC="img68.png"
ALT="$P^T$">;
</DD>
<DT><STRONG>update = psb_avg_</STRONG></DT>
<DD>Average overlap entries, i.e. apply <IMG
WIDTH="44" HEIGHT="35" ALIGN="MIDDLE" BORDER="0"
WIDTH="45" HEIGHT="35" ALIGN="MIDDLE" BORDER="0"
SRC="img69.png"
ALT="$P_aP^T$">;
</DD>
@@ -220,7 +220,7 @@ Type: <B>optional</B>
Intent: <B>inout</B>.
<BR>
Specified as: a one dimensional array of the same type of <IMG
WIDTH="14" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
WIDTH="14" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
SRC="img25.png"
ALT="$x$">.
@@ -231,7 +231,7 @@ Specified as: a one dimensional array of the same type of <IMG
</DD>
<DT><STRONG>x</STRONG></DT>
<DD>global dense result matrix <IMG
WIDTH="14" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
WIDTH="14" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
SRC="img25.png"
ALT="$x$">.
<BR>
@@ -266,11 +266,11 @@ An integer value; 0 means no error has been detected.
the descriptor, no operations are performed;
</LI>
<LI>The operator <IMG
WIDTH="26" HEIGHT="20" ALIGN="BOTTOM" BORDER="0"
WIDTH="27" HEIGHT="20" ALIGN="BOTTOM" BORDER="0"
SRC="img67.png"
ALT="$ P^{T}$"> performs the reduction sum of overlap
elements; it is a ``prolongation'' operator <IMG
WIDTH="27" HEIGHT="20" ALIGN="BOTTOM" BORDER="0"
WIDTH="26" HEIGHT="20" ALIGN="BOTTOM" BORDER="0"
SRC="img68.png"
ALT="$P^T$"> that
replicates overlap elements, accounting for the physical replication
@@ -295,7 +295,7 @@ Sample discretization mesh.</CAPTION>
<TR><TD>
<DIV ALIGN="CENTER">
<IMG
WIDTH="533" HEIGHT="454" ALIGN="BOTTOM" BORDER="0"
WIDTH="533" HEIGHT="453" ALIGN="BOTTOM" BORDER="0"
SRC="img72.png"
ALT="\includegraphics[scale=0.65]{figures/try8x8_ov.eps}">
@@ -320,7 +320,7 @@ distribution is such that each process will own 40 entries in the
index space, with an overlap of 16 entries placed at local indices 25
through 40; the halo will run from local index 41 through local index 48.. If process 0 assigns an initial value of 1 to its entries
in the <IMG
WIDTH="14" HEIGHT="14" ALIGN="BOTTOM" BORDER="0"
WIDTH="14" HEIGHT="13" ALIGN="BOTTOM" BORDER="0"
SRC="img25.png"
ALT="$x$"> vector, and process 1 assigns a value of 2, then after a
call to <code>psb_ovrl</code> with <code>psb_avg_</code> and a call to