diamua Subroutine

subroutine diamua(nrow, job, a, ja, ia, diag, b, jb, ib)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	nrow
integer				::	job
real(kind=8)				::	a(*)
integer				::	ja(*)
integer				::	ia(nrow+1)
real(kind=8)				::	diag(nrow)
real(kind=8)				::	b(*)
integer				::	jb(*)
integer				::	ib(nrow+1)

Variables

Type	Visibility	Attributes		Name		Initial
real(kind=8),	public		::	scal