function f = f1f(v,k) v = ifft(v); f = (1-abs(v).^2).*(abs(v).*2).*v;