--Basic deriving test
data T = A | B deriving Show
show A