Re: Howto change TraditionalForm Output

*To*: mathgroup at smc.vnet.net*Subject*: [mg96575] Re: [mg96563] Howto change TraditionalForm Output*From*: Bob Hanlon <hanlonr at cox.net>*Date*: Mon, 16 Feb 2009 16:38:47 -0500 (EST)*Reply-to*: hanlonr at cox.net

Unprotect[Tan]; Format[Tan[x_], TraditionalForm] := "tg(" <> ToString[TraditionalForm[x]] <> ")"; Protect[Tan]; Bob Hanlon ---- Serych Jakub <Serych at panska.cz> 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