BSset_diag(3)			 BlockSolve95			 BSset_diag(3)

NAME
       BSset_diag - Set the diagonal of A to a constant

INPUT PARAMETERS
       A      - a sparse matrix
       my_alpha
	      - the constant
       procinfo
	      - the usual processor stuff

OUTPUT PARAMETERS
       A      - a sparse matrix with the diagonal set to my_alpha

RETURNS
       void

       Notes:	In  the	 nonsymmetric  case  we	 set  the diagonal +/-my_alpha
       depending on the sign of the diagonal.

SYNOPSIS
       /* Set the diagonal of the matrix to my_alpha */
       void BSset_diag(BSpar_mat *A, FLOAT my_alpha, BSprocinfo *procinfo)

LOCATION
	BlockSolve95/src/BSset_diag.c

				  12/14/1995			 BSset_diag(3)

Vote for polarhome