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