# Is RemoveSymbolize the reverse of Symbolize?

why cann't I use

RemoveSymbolize[ParsedBoxWrapper[SubscriptBox["_", "_"]]]

to remove all subscripts? Just like

Symbolize[ParsedBoxWrapper[SubscriptBox["_", "_"]]]

After RemoveSymbolize[], q1 should be subscript, why isn't?

-

Because the package begins with ClearAll["NotationPrivate*"] but there is no Unprotect["NotationPrivate*"] before that line. After you run the package the first time everything in this context is protected so without the Unprotect you get the warning when running a second time. You can either add the Unprotect line or just ignore it. None of this alters the answer. – Mike Honeychurch Feb 19 '13 at 22:25