Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2008

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: display Floor in StandardForm

  • To: mathgroup at smc.vnet.net
  • Subject: [mg90179] Re: display Floor in StandardForm
  • From: Szabolcs Horvát <szhorvat at gmail.com>
  • Date: Tue, 1 Jul 2008 07:01:59 -0400 (EDT)
  • References: <g4a6pi$8qg$1@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?

Hello Peter,

Try this:

MakeBoxes[Floor[x_], StandardForm] :=
  RowBox[{"\[LeftFloor]", MakeBoxes[x], "\[RightFloor]"}]


  • Prev by Date: Re: How to plot discontinuous functions?
  • Next by Date: Re: How to plot discontinuous functions?
  • Previous by thread: Re: On the built-in function "Compile"
  • Next by thread: Re: display Floor in StandardForm