A fourth order method for finding a simple root of univariate function