% function to calculate our Fourier Transform
function fourtran = ft(Et,dt)

  fourtran = length(Et)*fftshift(ifft(fftshift(Et)))*dt/sqrt(2*pi);

return