Re: Get rid of onion-like parentheses

*To*: mathgroup at smc.vnet.net*Subject*: [mg37180] Re: Get rid of onion-like parentheses*From*: Tom Burton <tburton at brahea.com>*Date*: Tue, 15 Oct 2002 04:17:58 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

On 10/13/02 11:24 PM, in article aodnvf$mlm$1 at smc.vnet.net, "JJJ Shen" <jushen1 at hotmail.com> wrote: > Here's the code I wrote: > f[{x_}]:=x; > f[{x_, y_, z___}]:=f[Join[{x\[CircleTimes]y},{z}]]; > > However, the output was not exactly what I expected, it looked like: > > ((a op b) op c) op d > > It seems when doing the "Join" operation, a pair of parenthesis was added. > > Can someone let me know how I can get rid of these parenthesis? SetAttributes[CircleTimes,Flat] f[{a,b,c,d}] a\[CircleTimes]b\[CircleTimes]c\[CircleTimes]d Tom Burton