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?