labelled_axpy Subroutine

public subroutine labelled_axpy(coeffs, g, label, a, b, c, n_label, n_f, n, n_i, n_groups_pad, n_j)

a, b, c += coeffs(1:3, l)*g at the points labelled l.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	coeffs(3,n_label)
real(kind=dp),	intent(in)			::	g(SZ,n_f,n_groups_pad*n_i)
real(kind=dp),	intent(in)			::	label(SZ,n_f,n_groups_pad*n_i)
real(kind=dp),	intent(inout)			::	a(SZ,n_f,n_groups_pad*n_i)
real(kind=dp),	intent(inout)			::	b(SZ,n_f,n_groups_pad*n_i)
real(kind=dp),	intent(inout)			::	c(SZ,n_f,n_groups_pad*n_i)
integer,	intent(in)			::	n_label
integer,	intent(in)			::	n_f
integer,	intent(in)			::	n
integer,	intent(in)			::	n_i
integer,	intent(in)			::	n_groups_pad
integer,	intent(in)			::	n_j