(fne & rest)
Define an anonymous goal fn. Supports pattern matching. All patterns will be tried. See conde.
(run 10 [q]
((fne [x y]
([[h . t] t]))
[1 2 3] q)) ; => ((2 3))
(run 10 [q]
((fne [x y]
([[o? 2 _ 4 5]] (== y o?))
([[1 2 _ . o?]] (== y o?)))
[1 2 3 4 5] q))