MathGroup Archive 2009

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

Search the Archive

Re: Howto change TraditionalForm Output


Hi,

Unprotect[Tan]
Tan /: MakeBoxes[Tan[a_], TraditionalForm] :=
  RowBox[{"tg", "(", ToBoxes[a, TraditionalForm], ")"}]

Protect[Tan]

Regards
   Jens

Serych Jakub wrote:
> Hi x_
> 
> In some (IMHO mainly European) countries, there is tradition to use other
> names of the function then are these used in american English. For example
> here in Czech Republic we use "tg" and "cotg" in place of "tan" and "cot".
> 
> I'm trying to modify the behaviour of M7 like this:
> 
> Unprotect[Tan];
> Format[Tan[x_], TraditionalForm] := "tg(" <> ToString[x] <> ")";
> Protect[Tan] ; 
> 
> It seems to work fine in the cases:
> 
> TraditionalForm[Tan[a + b]]
> TraditionalForm[Tan[z]]
> TraditionalForm[Tan[Pi]/5]
> 
> but it doesn't work in case like:
> 
> TraditionalForm[Tan[z/5]]
> 
> Does anybody know what is the right syntax to change the Format of
> TraditionalForm?
> 
> Thx in advance
> 
> Jakub
> 


  • Prev by Date: Re: Re: Shortest Path Problem
  • Next by Date: Re: Division by zero, despite strong hint
  • Previous by thread: Re: Howto change TraditionalForm Output
  • Next by thread: Try again to send my message: problems about "for"