Aprod1_f Interface

interface
private subroutine Aprod1_f(m, n, x, y)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ip),	intent(in)			::	m
integer(kind=ip),	intent(in)			::	n
real(kind=dp),	intent(in)			::	x(n)
real(kind=dp),	intent(inout)			::	y(m)

Description

y := y + A*x