R66-50 An Algorithm for the Machine Calculation of Complex Fourier Series