21 Jun
2014
21 Jun
'14
2:13 a.m.
Today (at NeilB's) I was testing a nine-variable theta-fn conjecture: In[531]:=Det[%519/.SetPrecision[ Join[{s -> RandomChoice[Range[4]]}, {q -> RandomReal[.999]*E^(I*RandomReal[2*\[Pi]])}, Thread[{t, u, v, w, x, y, z} -> RandomComplex[{-6 - 9*I, 9 + 6*I}, 7]]], 99]] Out[531]= 1.7947822160078335895630499053244455396741527880586403925848897324738*10^2147 - 2.480887366402951261629114856034958605850308048123481310444081443215*10^2147 I (Should be 0.) This had to be the worst conjecture I ever made. But it seemed so plausible. Without a shred of optimism, I upped 99 to 1999. And never saw another positive exponent. --rwg