Add Control.Monad.Trans.Iter.untilJust