https://hackage.haskell.org/package/streaming-0.2.3.1/docs/Streaming.html#v:untilJust > `untilJust :: (Monad m, Applicative f) => m (Maybe r) -> Stream f m r` > > Repeat a