bicgstab_COO Subroutine

public subroutine bicgstab_COO(a, index_i, index_j, x, b, itrmax, er, debug, locked)

$OMP parallel do private(i) $OMP end parallel do $OMP parallel do reduction(+:y) private(i) $OMP end parallel do

$OMP parallel do reduction(+:v) private(i) $OMP end parallel do

$OMP parallel do private(i) $OMP end parallel do

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(inout)			::	a(:)
integer(kind=int32),	intent(inout)			::	index_i(:)
integer(kind=int32),	intent(inout)			::	index_j(:)
real(kind=real64),	intent(inout)			::	x(:)
real(kind=real64),	intent(inout)			::	b(:)
integer(kind=int32),	intent(inout)			::	itrmax
real(kind=real64),	intent(inout)			::	er
logical,	intent(in),	optional		::	debug
logical,	intent(in),	optional		::	locked(:)