Do we have functions that can conveniently implement these? ```haskell foo :: Ur [a] %1-> [Ur a] bar :: [Ur a] %1-> Ur [a] ```