Fixed interface to GEINS to make it look more consistent with SPINS.

docs/pdf/toolsrout.tex

@@ -564,31 +564,24 @@ Specified as: Integer scalar.
 %
 \subroutine{psb\_geins}{Dense matrix insertion routine}
 
-\syntax{call psb\_geins}{m, n, blck, x, ix, jx, desc\_a, info,dupl}
-\syntax*{call psb\_geins}{m, blck, x, ix, desc\_a, info,dupl}
+\syntax{call psb\_geins}{m, irw, val, x, desc\_a, info,dupl}
 
 \begin{description}
 \item[\bf On Entry]
-\item[m] rows number of submatrix belonging to blck to be inserted..\\
+\item[m] Number of rows in $val$  to be inserted.\\
 Scope:{\bf local}.\\
 Type:{\bf required}.\\
 Specified as: an integer value.
-\item[n] columns number of submatrix belonging to blck to be inserted
-  (only when $x$ is of rank 2).\\
+\item[irw] Indices of the rows to be inserted. Specifically, row $i$
+  of $val$ will be inserted into the local row corresponding to the
+  global row index $irw(i)$.
 Scope:{\bf local}.\\
 Type:{\bf required}.\\
-Specified as: an integer value.
-\item[blck] the dense submatrix to be inserted.\\
-Scope:{\bf local}.\\
-Type:{\bf required}.\\
-Specified as: a one or two dimensional array.
-\item[ix] x global-row corresponding to position at which blck submatrix must be inserted.\\
-Scope:{\bf local}.\\
-Type:{\bf required}.\\
-Specified as: an integer value.
-\item[jx] x global-col corresponding to position at which blck submatrix must be inserted  (only when $x$ is of rank 2).\\
+Specified as: an integer array.
+\item[val] the dense submatrix to be inserted.\\
 Scope:{\bf local}.\\
 Type:{\bf required}.\\
+Specified as: a rank 1 or 2  array.
 Specified as: an integer value.
 \item[desc\_a] the communication descriptor.\\
 Scope:{\bf local}.\\