! using locals : select-by-artist ( seq artist -- seq' ) [let :> artist [ artist>> artist = ] filter ] ; ! using the compositional combinator "with" to return a curry : select-by-artist2 ( seq artist -- seq' ) swap [ artist>> = ] with filter ; ! using fried quotations : select-by-artist3 ( seq artist -- seq' ) '[ artist>> _ = ] filter ;