-- | Convert an 'Int' to a 'String' by showing it.
strShow :: Exp Int -> Exp String
strShow = fmap (Value . fromValue)
strShow :: Exp Int -> Exp String
strShow = fmap (Value . fromValue)
strShow = fmap (Value . fromValue)