Searching in a list

[Bwec]

Hi,

I am trying to write a predicate that given two lists, will succeed if at least one element from the first list is in the second.

I.E

A = [1,2,3,4,5]
B = [3,6,7,8,9]

Would succeed.

A = [1,2,3,4,5]
B = [7,6]

Would fail.

Thanks

Ben