Re: Complex Conjugation

*To*: mathgroup at smc.vnet.net*Subject*: [mg12811] Re: [mg12772] Complex Conjugation*From*: BobHanlon at aol.com*Date*: Fri, 12 Jun 1998 04:05:41 -0400*Sender*: owner-wri-mathgroup at wolfram.com

Kieran, I imagine that you want the following to evaluate Conjugate[a + I*b] Conjugate[a + I*b] This would require that a and b are real. If they are, there are a couple of approaches: altConjugate[x_] := x /. Complex[re_, im_] :> Complex[re, -im] {altConjugate[I], altConjugate[3 + 4*I], altConjugate[a + b*I]} {-I, 3 - 4*I, a - I*b} or altConjugate[x_] := ComplexExpand[Conjugate[x]] {altConjugate[I], altConjugate[3 + 4*I], altConjugate[a + b*I]} {-I, 3 - 4*I, a - I*b} Bob Hanlon In a message dated 6/10/98 7:41:02 AM, kieran at ou.edu wrote: > I *know* I've seen this done somewhere. But I can't find it in >DejaNews, or my references. > > I want a simple complex conjugation function that simply maps > > I /. -> -I > >everywhere. (The Mathematica Conjugate function often gets confused.) >But I can't >make the substitution because the imaginary constant, I, is Locked. >What's the right way?