cleanup of 2dx_ctfapplyk.for with Wiener filter