Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/libraries/HaXml/bugs/either.hs
data Either a b = Left a | Right b {-! derive: Haskell2Xml !-}