1 2 3 4 5 6
-- Pattern synonyms {-# LANGUAGE PatternSynonyms #-} module ShouldCompile where pattern P = 42