JacobiPreconditionerCRS Subroutine

public subroutine JacobiPreconditionerCRS(val, row_ptr, col_idx, rhs)

$OMP atomic $OMP end do $OMP end parallel

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(inout)			::	val(:)
integer(kind=int64),	intent(inout)			::	row_ptr(:)
integer(kind=int32),	intent(inout)			::	col_idx(:)
real(kind=real64),	intent(inout)			::	rhs(:)