Re: display Floor in StandardForm
- To: mathgroup at smc.vnet.net
- Subject: [mg90153] Re: [mg90122] display Floor in StandardForm
- From: Carl Woll <carlw at wolfram.com>
- Date: Tue, 1 Jul 2008 06:57:07 -0400 (EDT)
- References: <200806300851.EAA09044@smc.vnet.net>
Peter Breitfeld wrote:
>In TraditionalForm Floor[x] is displayed as \[LeftFloor]x\[RightFloor]
>in both of the following cases
>
>(1) Evaluate Floor[x] then Output in pretty form
>(2) Entering Floor[x] in an InputCell an then Cell/Convert to
> TraditionalForm
>
>Now I tried to mimic this behavior for StandardForm. I did
>
>Unprotect[Floor, Ceiling];
>Format[Floor[x_/;!NumericQ[x]], StandardForm] :=
> DisplayForm[RowBox[{"\[LeftFloor]", x, "\[RightFloor]"}]]
>Protect[Floor];
>
>The case (1) above now works even with complicated expressions and
>lists, but case (2) replaces Floor[x] with DisplayForm[...]
>
>Is there a possibility to make it work as in TraditionalForm?
>
>TIA
>
>Gruss Peter
>
>
Try:
MakeBoxes[Floor[x_], StandardForm] := RowBox[{"\[LeftFloor]",
MakeBoxes[x, StandardForm], "\[RightFloor]"}]
Then, you can even do
esc lf esc x esc rf esc
where esc is the escape key to get Floor[x] in "StandardForm" without
using Cell/Convert to StandardForm.
Carl Woll
Wolfram Research