simple=function(g, x0, nlim, eps)
{
        iterno = 0
        repeat {      
            iterno = iterno + 1
            if(iterno > nlim) {
                cat(" Iteration Limit Exceeded: Current = ",iterno, fill = T)
                x1=NA
                break
              }
            else
            {
            x1=g(x0)
            cat("****Iter. No: ", iterno, "    Current Iterate = ", x1, fill = T) 
            if(abs(x1-x0) < eps||abs(x1-g(x1))<.1e-10)
                        break
            x0=x1
            }
        }
        return(x1)
}