refactoring Levinson.hs, wrapper function of Numerical Recipes