'to sphere' giving eliptical shape
The problem is due to the mesh having been resized without applyig the new scale and the solution is to Apply Scale. This can be achieved by selecting the object (in Object mode), pressing Ctrl-A and selecting Scale.