1 2 3 4 5 6 7 8 9 10
{-# LANGUAGE TypeOperators #-} module T4239A where data (:+++) = (:+++) | (:---) | X | Y