module Main where

data Foo = Foo
    deriving stock (Show)

data Bar = Bar
    deriving stock (Show, Eq)

data Bat = Bat
    deriving stock (Show)