Create NewtonMethod.hs