1 2 3 4 5 6 7 8 9
{-# LANGUAGE PatternSynonyms #-} module BundleExport(P(.., A), Q(B)) where data P = P data Q = Q pattern A = P pattern B = Q