Re: Sorting complex points

*To*: mathgroup at smc.vnet.net*Subject*: [mg55886] Re: Sorting complex points*From*: Marcus Stollsteimer <marcus314 at yahoo.com>*Date*: Sat, 9 Apr 2005 03:55:22 -0400 (EDT)*Organization*: Comp.Center (RUS), U of Stuttgart, FRG*References*: <d356km$ovn$1@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

OT wrote: > I'm trying to sort lists of random complex points on the unit circle > using their angles as criterion to sort them: I mean, if > z=Cos[a]+I*Sin[a] and w=Cos[b]+I*Sin[b]( 0<=a,b<2*Pi ), > I want z<w if a<b; > > how can i do that? Hi, try MyArg[x_] := Mod[Arg[x], 2 Pi] list={0.625162 + 0.835834 I,0.502244 + 0.43736 I} sortedlist = Sort[list, MyArg[#1] < MyArg[#2] &] Regards, Marcus -- Kant was right: The mind imposes order. It also tells you how much to tip. -- W. Allen