op_mem : ('a -> 'a -> bool) -> 'a -> 'a list -> bool
- op_mem aconv (Term `\x. x /\ y`) [T, Term `\z. z /\ y`, F]; > val it = true : bool