How to implement the following procedure using the function Maple Statistics [CrossCorrelation]?
alias(FFT = DiscreteTransforms[FourierTransform], IFFT = DiscreteTransforms[InverseFourierTransform]);
nd := Statistics:-Sample(Normal(0, 1));
xcorr := proc (x, y)
local corrLength, c;
corrLength := op(1, x)+op(1, y)-1;
c := IFFT(`~`[`*`](FFT(Vector(corrLength, x, fill = 0), normalization = none), `~`[conjugate](FFT(Vector(corrLength, y, fill = 0...