wwghts Interface

interface
public function wwghts(n, h, kermom)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=I4B),	intent(in)			::	n
real(kind=SP),	intent(in)			::	h
function kermom(y, m) Arguments Type Intent Optional Attributes Name real(kind=DP), intent(in) :: y integer(kind=I4B), intent(in) :: m Return Value real(kind=DP), DIMENSION(m)

Return Value real(kind=SP), DIMENSION(n)