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?