Functions/Subroutines
subroutine	opass (OP, X, W, IW, Y, IY, LIMVOI, MXPTVS, NPMAX)

Function/Subroutine Documentation

◆ opass()

subroutine opass	(	character(len=8), intent(in)	OP,
		double precision, dimension(*), intent(inout)	X,
		double precision, dimension(*), intent(in)	W,
		integer, dimension(npmax,*), intent(in)	IW,
		double precision, dimension(*), intent(in)	Y,
		integer, dimension(npmax,*), intent(in)	IY,
		integer, dimension(11,2), intent(in)	LIMVOI,
		integer, intent(in)	MXPTVS,
		integer, intent(in)	NPMAX
	)

Parameters

[in]	npmax	IW Addresses in w
[in]	IY	Addresses in y
[in]	LIMVOI	Limvoi(n,1): lower rank of points with n neighbours LIMVOI(N,2): UPPER RANK OF POINTS WITH N NEIGHBOURS
[in]	MXPTVS	Maximum number of neighbours of a point
[in]	NPMAX	Maximum number of points
[in]	OP	Operation to be done (see above)
[in]	W	Off-diagonal terms of matrix
[in,out]	X	Final assembled vector
[in]	Y	X=ay where off-diagonal terms of a are here w
[in]	mxptvs	IW Addresses in w
[in]	IY	Addresses in y
[in]	LIMVOI	Limvoi(n,1): lower rank of points with n neighbours LIMVOI(N,2): UPPER RANK OF POINTS WITH N NEIGHBOURS
[in]	MXPTVS	Maximum number of neighbours of a point
[in]	NPMAX	Maximum number of points
[in]	OP	Operation to be done (see above)
[in]	W	Off-diagonal terms of matrix
[in,out]	X	Final assembled vector
[in]	Y	X=ay where off-diagonal terms of a are here w

Definition at line 7 of file opass.f.

Here is the caller graph for this function: