refactoring: PapillonCore.hs by hlint