       Re: Getting answer out of a ConditionalExpression[]

• To: mathgroup at smc.vnet.net
• Subject: [mg132119] Re: Getting answer out of a ConditionalExpression[]
• From: Bob Hanlon <hanlonr357 at gmail.com>
• Date: Sat, 14 Dec 2013 04:03:19 -0500 (EST)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• Delivered-to: l-mathgroup@wolfram.com
• Delivered-to: mathgroup-outx@smc.vnet.net
• Delivered-to: mathgroup-newsendx@smc.vnet.net
• References: <20131212062740.49ACB69EB@smc.vnet.net>

```data = Table[x /. Solve[
(1 + Exp[I*(n*Pi/6 + x)])*
(1 + Exp[-I*(n*Pi/6 + x)]) ==
1/((1 - Exp[I*n*Pi/6])*
(1 - Exp[-I*n*Pi/6])), x],
{n, 1, 11}] /. C -> 0 // FullSimplify

{{0, -(Pi/3)}, {Pi/3, -Pi},
{(1/2)*(Pi - 2*ArcCot[
3/Sqrt]),
-((3*Pi)/2) + ArcCot[
3/Sqrt]},
{-((7*Pi)/6) - ArcTan[
5/Sqrt], -(Pi/6) +
ArcTan[5/Sqrt]},
{0, -((5*Pi)/3)},
{-ArcCot[7/Sqrt],
-2*Pi + ArcCot[7/Sqrt]},
{-(Pi/3), -2*Pi},
{-((11*Pi)/6) - ArcTan[
5/Sqrt], -((5*Pi)/6) +
ArcTan[5/Sqrt]},
{-(Pi/2) - ArcCot[3/Sqrt],
-((5*Pi)/2) + ArcCot[
3/Sqrt]},
{-Pi, -((7*Pi)/3)},
{-((5*Pi)/3), -2*Pi}}

Show[ListCurvePathPlot[data],
ListPlot[Tooltip /@ data,
PlotStyle -> Directive[Red, AbsolutePointSize]],
Frame -> True, Axes -> False]

Bob Hanlon

On Thu, Dec 12, 2013 at 1:27 AM, Roger Bagula <roger.bagula at gmail.com>wrote:

> I'm interested in getting a plot-able array out of the following:
> Clear[x]
> Table[Solve[(1 + Exp[I*(n*Pi/6 + x)])*(1 + Exp[-I*(n*Pi/6 + x)]) ==
>    1/((1 - Exp[I*n*Pi/6])*(1 - Exp[-I*n*Pi/6])), x], {n, 1, 11}]
>
> There are two problems:
> 1) getting the answers out of the
> {x -> ConditionalExpression[
>    1/6 (-\[Pi] + 6 I (-((I \[Pi])/6) + 2 I \[Pi] C)),
>    C \[Element] Integers]}
> and
> 2) removing the C terms
>
> I'm particularly interested in plotting the phase angles with log
> expressions:
> {x -> ConditionalExpression[
>    1/2 (-\[Pi] + 2 I (2 I \[Pi] C + Log[1/4 (-3 - I Sqrt)])),
>    C \[Element] Integers]}, {x ->
>   ConditionalExpression[
>    1/2 (-\[Pi] + 2 I (2 I \[Pi] C + Log[1/4 (-3 + I Sqrt)])),
>    C \[Element] Integers]}
>
> Roger Bagula
>
>

```

• Prev by Date: Re: Getting answer out of a ConditionalExpression[]
• Next by Date: Discontinuous Contour