Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/PreludeText/Show_Unit.hs
module Prelude(Show(..)) where instance Show () where showsPrec p () = showString "()" showsType a = showString "()"
