Re: Redefine Arg to return a value from 0 to 2 pi
- To: mathgroup at smc.vnet.net
- Subject: [mg80463] Re: Redefine Arg to return a value from 0 to 2 pi
- From: dh <dh at metrohm.ch>
- Date: Thu, 23 Aug 2007 01:03:24 -0400 (EDT)
- References: <faeash$f5i$1@smc.vnet.net>
Hi Chuck,
it is bad practise to redefine built in funcions, you may run into
troubles you did not anticipate. I think it is better to write your own
version, what can be done e.g. by
myArg[x_]:=Mod[Arg[x],2Pi]
hope this helps, Daniel
chuck009 wrote:
> I'm trying to redefine Arg to return a value from 0 to 2 pi. However when I do so and then try and plot Arg[z], Mathematica seems to still use the old definition. Can anybody help me? This is my code:
>
> (* redefine Arg to return a value from 0 to 2 pi *)
>
> Unprotect[Arg]
> Arg[z_] := Module[{z0 = z}, If[Im[z0] < 0,
> ArcTan[Re[z0], Im[z0]] + 2*Pi, ArcTan[Re[z0],
> Im[z0]]]];
> Protect[Arg]
>
> (* check new definition -- this is correct *)
>
> ListPlot[Table[{t, Arg[2*Exp[I*t]]}, {t, 0, 4*Pi, 0.1}]]
>
> (* try and plot new definition of Arg -- Plot used the old definition (-pi to pi) *)
>
> Plot[Arg[2*Exp[I*t]], {t, 0, 4*Pi}]
>
> (* resore old definition of Arg *)
>
> Unprotect[Arg]
> Arg[z_] =.
> Protect[Arg]
>