The Math Forum

Search All of the Math Forum:

Views expressed in these public forums are not endorsed by NCTM or The Math Forum.

Math Forum » Discussions » Inactive » comp.soft-sys.math.mathematica

Notice: We are no longer accepting new posts, but the forums will continue to be readable.

Topic: Subscript on plus expression
Replies: 16   Last Post: Dec 3, 2012 3:18 AM

Advanced Search

Back to Topic List Back to Topic List Jump to Tree View Jump to Tree View   Messages: [ Previous | Next ]
David Park

Posts: 1,560
Registered: 5/19/07
Re: Subscript on plus expression
Posted: Nov 19, 2012 7:18 PM
  Click to see the message monospaced in plain text Plain Text   Click to reply to this topic Reply

How about this?

MakeBoxes[Subscript[(head : (Plus | Times))[args__], k_],
form : (StandardForm | TraditionalForm)] :=
InterpretationBox[#1, #2] & @@
{SubscriptBox[RowBox[{"(", ToBoxes[head[args], form], ")"}],
ToBoxes[k, form]], Subscript[head[args], k]}


Subscript[a + b, k]

Subscript[a x, k]

David Park

From: Dave Snead []


Mathematica fails to parenthesize the a+b in Subscript[Plus[a,b],k]

so the output looks identical to

Is this a bug?
Is there an option to force the parentheses?

Thanks in advance,
Dave Snead

Point your RSS reader here for a feed of the latest messages in this topic.

[Privacy Policy] [Terms of Use]

© The Math Forum at NCTM 1994-2018. All Rights Reserved.