Services & ResourcesWolfram ForumsMathGroup Archive

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

SetAttributes[CenterDot, Flat]

• To: mathgroup at smc.vnet.net
• Subject: [mg113848] SetAttributes[CenterDot, Flat]
• From: "Dave Snead" <dsnead6 at charter.net>
• Date: Mon, 15 Nov 2010 05:52:12 -0500 (EST)
• References: <ibl9g2$b8a$1@smc.vnet.net> <4CDF2000.5080209@12000.org> <201011141110.GAA15677@smc.vnet.net>

Hi,

Setting the Flat attribute for CenterDot seems to cause iteration problems.
By my definitions CenterDot[x] and CenterDot[x,y] should just evaluate
to x and CenterDot[x,y] not the iteration mess below.
Is this a bug?

Thanks,
Dave Snead

In[1]:= $IterationLimit = 20

Out[1]= 20

In[2]:= SetAttributes[CenterDot, Flat]

In[3]:= CenterDot[] := 1

In[4]:= CenterDot[a_] := a

In[5]:= CenterDot[x, y]

During evaluation of In[5]:= $IterationLimit::itlim: Iteration limit of 20 
exceeded. >>

Out[5]= Hold[
1\[CenterDot]1\[CenterDot]1\[CenterDot]1\[CenterDot]1\[CenterDot]1\
\[CenterDot]1\[CenterDot]1\[CenterDot]1\[CenterDot]1\[CenterDot]1\
\[CenterDot]1\[CenterDot]1\[CenterDot]1\[CenterDot]1\[CenterDot]1\
\[CenterDot]1\[CenterDot]1\[CenterDot]1\[CenterDot]1\[CenterDot]x\
\[CenterDot]y]

In[6]:= CenterDot[x]

During evaluation of In[6]:= $IterationLimit::itlim: Iteration limit of 20 
exceeded. >>

Out[6]= Hold[
1\[CenterDot]1\[CenterDot]1\[CenterDot]1\[CenterDot]1\[CenterDot]1\
\[CenterDot]1\[CenterDot]1\[CenterDot]1\[CenterDot]1\[CenterDot]1\
\[CenterDot]1\[CenterDot]1\[CenterDot]1\[CenterDot]1\[CenterDot]1\
\[CenterDot]1\[CenterDot]1\[CenterDot]1\[CenterDot]1\[CenterDot]x]

In[7]:= CenterDot[]

Out[7]= 1 

• References:
  • Re: Sort a List, in a List of Lists of Lists
    • From: "Nasser M. Abbasi" <nma@12000.org>