function [s] = dftk(N)
k = linspace(0,N-1,N);
for l = 1:N
    s(l,:)=sin(2*pi*k*((l-1)/96));
end
