find* ( ... seq quot: ( ... elt -- ... ? ) -- ... elt i/f )


Vocabulary
sequences.extras

Inputs
seqan object
quota quotation with stack effect ( ... elt -- ... ? )


Outputs
eltan object
i/fan object


Definition


: find*
( ... seq quot: ( ... elt -- ... ? ) -- ... elt i/f )
[ 0 ] 2dip do-find-from element/index ; inline