data SomeStatusCode
= ∀sc. StatusCode sc ⇒ SomeStatusCode sc
instance Show SomeStatusCode where
show (SomeStatusCode sc) = show sc
data SomeStatusCode
= ∀sc. StatusCode sc ⇒ SomeStatusCode sc
instance Show SomeStatusCode where
show (SomeStatusCode sc) = show sc