Re: Number of zeros finite or infinite?
- To: mathgroup at smc.vnet.net
- Subject: [mg115461] Re: Number of zeros finite or infinite?
- From: Christopher Arthur <aarthur at tx.rr.com>
- Date: Tue, 11 Jan 2011 19:21:56 -0500 (EST)
Maybe this...
If[Position[_Element,#]!={},Do for finite,Do for infinite]
since the answer wont have the keyword for finite cases...
Chris
James a =E9crit :
> Hello everyone,
>
> I'm working on a program that deals with zeros of functions and would
> like to know if the zeros are finite or not. For example, in the finite
> case :
>
> testcase1 = Reduce[2*x^2 + 3*x - 1 == 0, x]
> x == (1/4)*(-3 - Sqrt[17]) || x == (1/4)*(-3 + Sqrt[17])
>
> and in the infinite case for example, I would obtain something like:
>
> thezeros = Reduce[1 - 4*Sin[z]^2 == 0, z]
>
> Element[C[1], Integers] && (z == -(Pi/6) + 2*Pi*C[1] || z == (7*Pi)/6 + 2*Pi*C[1] || z == Pi/6 + 2*Pi*C[1] || z == (5*Pi)/6 + 2*Pi*C[1])
>
> Can someone please help me distinguish the two cases so that I can then process them differently? For example, in pseudo code:
>
> If(finite) do onething, else doanotherthing
>
> Thanks guys,
>
>
>
>