[Date Index] [Thread Index] [Author Index]

Re: Remove Symbolize

• To: mathgroup at smc.vnet.net
• Subject: [mg116124] Re: Remove Symbolize
• From: "Dave Snead" <dsnead6 at charter.net>
• Date: Thu, 3 Feb 2011 05:27:14 -0500 (EST)
• References: <ihu8ku$1rj$1@smc.vnet.net> <ii0ptm$j35$1@smc.vnet.net> <201101300043.TAA27957@smc.vnet.net> <ii37mh$415$1@smc.vnet.net> <fb3a191a-57cb-4cb9-9303-1ec96519afa8@s28g2000prb.googlegroups.com>

Hi Maxim,

Your solution seems to do the trick.

Thanks,
Dave Snead

-----Original Message----- 
From: Maxim 
Sent: Tuesday, February 01, 2011 12:31 AM 
To: Dave Snead 
Subject: [mg116124] Re: Remove Symbolize 

On Jan 30, 2:32 am, "Dave Snead" <dsne... at charter.net> wrote:
> Hi,
>
> Is there any way to remove all of the symbols that have
> been created from the multiple use of the Symbolize command
> during a Mathematica session ?
> RemoveSymbolize["*"] doesn't work!
>
> Thanks,
> Dave

Hi Dave,

It seems that the definitions are attached to NotationMakeExpression,
so you can do something like this to clear the values of the symbols:

Cases[DownValues@NotationMakeExpression,
s_Symbol /; Context@s === "Global`" :> Clear@s, -1]

and then to clear all interpretation rules:

DownValues@NotationMakeExpression =
Take[DownValues@NotationMakeExpression, 2]

Best regards,
Maxim Rytin