RE: Getting Symbolic Real and Imag Parts? (Once Again)

• To: mathgroup at smc.vnet.net
• Subject: [mg33498] RE: [mg33443] Getting Symbolic Real and Imag Parts? (Once Again)
• From: "Higinio Ramos" <higra at usal.es>
• Date: Sun, 24 Mar 2002 01:43:51 -0500 (EST)
• References: <200203211427.JAA18200@smc.vnet.net>
• Reply-to: "Higinio Ramos" <higra at usal.es>
• Sender: owner-wri-mathgroup at wolfram.com

```A way for doing what you want:
In[18]:=
Simplify[Re[Cosh[b] Sin[a] + I Cos[a] Sinh[b]],{a>0,b>0}]
Out[18]=
Cosh[b] Sin[a]
In[19]:=
Simplify[Im[Cosh[b] Sin[a] + I Cos[a] Sinh[b]],{a>0,b>0}]
Out[19]=
Cos[a] Sinh[b]

Higinio
----- Original Message -----
From: aes <siegman at stanford.edu>
To: mathgroup at smc.vnet.net
Subject: [mg33498] [mg33443] Getting Symbolic Real and Imag Parts? (Once Again)

> OK,  so you can use ComplexExpand expand to find the symbolic real and
imag
> parts of an expression -- e.g. the input
>
>       zComplex = ComplexExpand[ Sin[a+I b], TargetFunctions->{Re,Im}]
>
> gives as output
>
>       Cosh[b] Sin[a] + I Cos[a] Sinh[b]
>
> as desired.  But now, how do I get Mathematica to peel out the
symbolically real and
> imaginary parts of this? -- that is, what inputs
>
>       zR = ???
>
>       zI = ???
>
> will give as outputs
>
>       Cosh[b] Sin[a]
>
> and
>
>       Cos[a] Sinh[b]
>
> (Maybe an example in the ComplexExpand Help file would be helpful?)
>
>

```

• Prev by Date: Re: Getting Symbolic Real and Imag Parts? (Once Again)
• Next by Date: 2 Parts is faster than 1...
• Previous by thread: Getting Symbolic Real and Imag Parts? (Once Again)
• Next by thread: Re: Getting Symbolic Real and Imag Parts? (Once Again)