let unfold init ~f = unfoldi init ~f:(const f)