Word description Call quot, which should output an object and a bool, and collect the objects in seq of type exemplar until quot outputs f. Do collect the last object.
Examples
USING: sequences.extras prettyprint io.encodings.binary
random random.mersenne-twister kernel math ;
! Get random numbers until one of them is greater than 5
! but also output the last number
123 <mersenne-twister> [
[
10 random dup 5 >
] V{ } loop>sequence*
] with-random . V{ 6 7 2 }