dotproduct Interface

interface
public function dotproduct(pa, pa2, n) result(val) bind(c)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_ptr)				::	pa
type(c_ptr)				::	pa2
integer(kind=c_int),			value	::	n

Return Value real(kind=c_double)