Re: Output of left-hand side of expression
- To: mathgroup at smc.vnet.net
- Subject: [mg35541] Re: [mg35509] Output of left-hand side of expression
- From: "Jonathan Rockmann" <MTheory at msn.com>
- Date: Thu, 18 Jul 2002 03:06:42 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Hi JM,
You can copy and paste the following expression into your notebook and if
you evaluate it at the very beginning you will get polynomials in their
standard book form including your c+1.
Unprotect[Plus]; Format[Literal[Plus[p__]]]:=Module[{s1,s2},s1=Hold[p];s2=Reverse[s1]; ReplacePart[HoldForm[Evaluate[s2]],Plus,{1,0}]/; OrderedQ[s1]&& s1=!=s2]
Jonathan Rockmann
mtheory at msn.com
----- Original Message -----
From: news.eircom.net
Subject: [mg35541] [mg35509] Output of left-hand side of expression
Hello
This is really simple but I cannot find in manuals. (Honestly!)
Q. How do I display the left-hand side of an expression
currently I do
In[148]:=
M=C+1
Out[148]=
1+C
but I want
Out[xxx]=
M=1+C
I need this so that I can copy/paste the entire expression into a doc. so
that it is complete - not just the right hand side or result.
Is there some magic command that can do this? or system default?
Thankyou.