refactoring Parser.papillon

cons x xs -> x : xs etc