op(box(x)) --> box, but is(op(box(x)) = box) --> false.



op(box(x)) --> box, but is(op(box(x)) = box) --> false.
 
Also is(op(box(x)) = 'box) --> false,
and is(op(box(x)) = "box") --> false.
 
How can I programmatically detect that op(expression) is box?