Fixed cartesianToPolar, add Util.hs