clean Data.Polynomial a bit