moving_average Function

public recursive function moving_average(indata, num) result(outdata)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(in)			::	indata(:)
integer(kind=int32),	intent(in),	optional		::	num

Return Value real(kind=real64), allocatable, (:)