Fortran code for the 1D NUFFT