Re: limit
- To: mathgroup at smc.vnet.net
- Subject: [mg78649] Re: limit
- From: chuck009 <dmilioto at comcast.com>
- Date: Fri, 6 Jul 2007 03:21:43 -0400 (EDT)
I believe in the complex variable sense, the limit does not exist. In the real sense, I suspect the limit from the left is -1/8. I kicked it up a notch:
In[42]:=
Print[Block[{$MaxExtraPrecision=75},
N[(formula/.s\[Rule]1-#)&/@ Table[10^(-n),{n,11,20,1}],30]
]]
>From In[42]:=
{-0.125000000002887604520403672683,-0.125000000000288760452037943792,-0.\
125000000000028876045203770144,-0.125000000000002887604520376772,-0.\
125000000000000288760452037675,-0.125000000000000028876045203767,-0.\
125000000000000002887604520377,-0.125000000000000000288760452038,-0.\
125000000000000000028876045204,-0.125000000000000000002887604520}
Here's one way out there:
In[44]:=
Block[{$MaxExtraPrecision=75},
N[formula/.s\[Rule]1-10^(-50),70]
]
Out[44]=
-0.1250000000000000000000000000000000000000000000000028876045203767451677
Would nice to see a proof of this though :)