Re: display Floor in StandardForm
- To: mathgroup at smc.vnet.net
- Subject: [mg90168] Re: [mg90122] display Floor in StandardForm
- From: DrMajorBob <drmajorbob at att.net>
- Date: Tue, 1 Jul 2008 06:59:57 -0400 (EDT)
- References: <28688943.1214820745072.JavaMail.root@m08>
- Reply-to: drmajorbob at longhorns.com
I do it this way (in my init file): Unprotect[Floor, Ceiling]; Floor /: MakeBoxes[Floor[expr_], StandardForm] := RowBox[{"\[LeftFloor]", MakeBoxes[expr, StandardForm], "\[RightFloor]"}] Ceiling /: MakeBoxes[Ceiling[expr_], StandardForm] := RowBox[{"\[LeftCeiling]", MakeBoxes[expr, StandardForm], "\[RightCeiling]"}] Protect[Floor, Ceiling]; Bobby On Mon, 30 Jun 2008 03:51:03 -0500, Peter Breitfeld <phbrf at t-online.de> 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 -- DrMajorBob at longhorns.com