       Re: How can I solve this equation with Solve or Reduce or

• To: mathgroup at smc.vnet.net
• Subject: [mg128556] Re: How can I solve this equation with Solve or Reduce or
• From: Bob Hanlon <hanlonr357 at gmail.com>
• Date: Fri, 2 Nov 2012 23:52:39 -0400 (EDT)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• Delivered-to: l-mathgroup@wolfram.com
• Delivered-to: mathgroup-newout@smc.vnet.net
• Delivered-to: mathgroup-newsend@smc.vnet.net
• References: <20121102044226.32863683E@smc.vnet.net>

```Use brute force

eqn[NoOf360Rotations_] = ArcTan[Tan[
Degree*(180 - 1.5267134447254718*
(18.43494882292201 + 360*NoOf360Rotations))]] ==
0.23101849674392247 // Simplify;

Select[
Table[NoOf360Rotations -> n, {n, 0, 1000}],
eqn[#[[-1]]] &]

{NoOf360Rotations -> 108}

Bob Hanlon

On Fri, Nov 2, 2012 at 12:42 AM, Lea Rebanks <lrebanks at gmail.com> wrote:
>
> Hi All,
>
>
>
> Given that the following equation is true.
>
>
>
> Clear[NoOf360Rotations]
>
> NoOf360Rotations = 108
>
>
>
> ArcTan[Tan[Degree*(180 - 1.5267134447254718*(18.43494882292201 +
> 360*NoOf360Rotations))]] == 0.23101849674392247
>
>
>
> TRUE
>
>
>
> How can I solve this equation with Solve or Reduce or whatever for the
> required value NoOf360Rotations = 108
>
> Only want Integer return of NoOf360Rotations AND to equal 108
>
>
>
>
> Best regards,
>
> Lea=85
>
>

```

• Prev by Date: Re: Abs in the denominator
• Next by Date: Re: FDTD method to solve Maxwell equations
• Previous by thread: How can I solve this equation with Solve or Reduce or whatever for
• Next by thread: Re: How can I solve this equation with Solve or Reduce or whatever for