MATLAB vs FinSimMath II - revenge of the Fanboys

Discussion in 'Physics & Math' started by rpenner, Sep 4, 2013.

  1. rpenner Fully Wired Valued Senior Member

    Messages:
    4,833
    Moderator note - First 174 posts in this thread are a sidetrack from [thread=136037]Recommendations re math software (curve fitting, data modeling & analysis, etc.)[/thread]

    Tach, it is not clear from the OP if they type of simulation they want to do is the type your recommended tool is optimized for. Also, it seems to be an add-on package to Verilog-language CAD tool FinSim not a stand-alone software platform like MatLab and Mathematica.

    Both MatLab and FinSimMath support many of the same matrix operations, including sparse arrays, so I cannot find support that as a strictly true statement that FinSimMath can (on the same hardware) " handle matrices much , much larger than Matlab" nor do I see that as necessarily relevant to the OP. It may be that you got advice from someone who was more comfortable with FinSimMath or somewhat ignorant of features of MatLab or it may be that FinSimMath has disk-based array support that MatLab does not have. Could you clarify and support this claim?
     
    Last edited by a moderator: Sep 26, 2013
  2. Google AdSense Guest Advertisement



    to hide all adverts.
  3. youreyes amorphous ocean Valued Senior Member

    Messages:
    2,830
    At this point I need a job and the purpose is to have it look good on my resume so than when I do get the job I will most likely use FinSimMath to find those eigen values secretly.

    @rpenner

    from FinSinMath site they claim that they can do 240,000 by 240,000 inverse matrices in 7 seconds using 2.3 GhZ computer.
     
    Last edited by a moderator: Sep 26, 2013
  4. Google AdSense Guest Advertisement



    to hide all adverts.
  5. Tach Banned Banned

    Messages:
    5,265
    I'm a user. See here.
     
  6. Google AdSense Guest Advertisement



    to hide all adverts.
  7. rpenner Fully Wired Valued Senior Member

    Messages:
    4,833
    Yes, but it is a sparse real matrix with just 359,999 non-zero elements and all the elements on the diagonal or on one side of it. And they hide that their inverse is extra easy and they don't seriously play fair.
    Here is the analogous 6x6 matrix (or it's transpose -- I don't have time to figure out the row-column conventions being used).
    \(\begin{pmatrix} 1 & 0 & 0 & 0 & 0 & 0 \\ 0 & 1 & 0 & 7 & 0 & 0 \\ 0 & 0 & 1 & 0 & 0 & 7 \\ 0 & 0 & 0 & 1 & 0 & 0 \\ 0 & 0 & 0 & 0 & 1 & 0 \\ 0 & 0 & 0 & 0 & 0 & 1 \end{pmatrix}^{-1} = \begin{pmatrix} 1 & 0 & 0 & 0 & 0 & 0 \\ 0 & 1 & 0 & -7 & 0 & 0 \\ 0 & 0 & 1 & 0 & 0 & -7 \\ 0 & 0 & 0 & 1 & 0 & 0 \\ 0 & 0 & 0 & 0 & 1 & 0 \\ 0 & 0 & 0 & 0 & 0 & 1 \end{pmatrix}\)

    So color me unimpressed. (Now, I am being a little unfair, since an 8x8 matrix would hint at a more complex dynamic than is on display here, but the peculiarities of this matrix are extreme as it recursively decomposes into the form \(\begin{pmatrix} A & B \\ 0 & 1 \end{pmatrix}^{-1} = \begin{pmatrix} A^{\tiny -1} & -A^{\tiny -1} B \\ 0 & I \end{pmatrix}\).)
     
  8. przyk squishy Valued Senior Member

    Messages:
    3,203
    For fun I thought I'd try the same thing on Matlab, just with its standard routines for manipulating sparse matrices. You can generate a sparse matrix similar[sup]*[/sup] to the one they used with

    Code:
    function [ S ] = gen_sparse(size)
        hsize = floor(size / 2);
    
        ind1 = (1 : hsize);
        a1 = 7 * ones(1, hsize);
    
        ind2 = (1 : size);
        a2 = ones(1, size);
    
        S = sparse([2*ind1, ind2], [ind1, ind2], [a1, a2]);
    end
    Time to invert a 240,000 x 240,000 sparse matrix of this type on my machine (Intel i7 2620M, 2.7 GHZ, 3.4 GHz turbo), including the time to generate the matrix:

    Code:
    >> tic; A = gen_sparse(240000); B = inv(A); toc
    Elapsed time is 0.134083 seconds.
    Doing a few trials like this, I got execution times as low as about 85 milliseconds.

    Check that the first 6 x 6 block looks sensible:

    Code:
    >> full(A(1:6, 1:6))
    
    ans =
    
         1     0     0     0     0     0
         7     1     0     0     0     0
         0     0     1     0     0     0
         0     7     0     1     0     0
         0     0     0     0     1     0
         0     0     7     0     0     1
    
    >> full(B(1:6, 1:6))
    
    ans =
    
         1     0     0     0     0     0
        -7     1     0     0     0     0
         0     0     1     0     0     0
        49    -7     0     1     0     0
         0     0     0     0     1     0
         0     0    -7     0     0     1

    [sup]*[/sup]Matlab starts arrays at element index 1. FinsimMath apparently starts at index 0. I didn't bother translating exactly what they did.
     
  9. Tach Banned Banned

    Messages:
    5,265
    I noticed that you glossed over the real-time nature of the simulation (something that Matlab does not support).
    Try this exercise in Matlab.
    Then try this exercise using Matlab.
    If you are a chip designer (I take it that you are not), the advantages of not having to bounce between Matlab and Verilog are paramount. You don't have to code your simulation twice, nor do you have to deal with the incompatiblities between the two languages.
     
  10. rpenner Fully Wired Valued Senior Member

    Messages:
    4,833
    I noted it and left it up to the OP to clarify what their intended use was. Simulation means many things to many different people, not just Verilog.

    http://www.fintronic.com/roots.html
    Numerically solving \(30 x^{5130} + 3 \sum_{k=4131}^{5129} x^k + 4 x^{4130} + 3 \sum_{k=2}^{4129} x^k + 6 x - 12 = 0\) does not make it "real time."
    and indeed, it looks like MatLab has the same functionality. http://www.mathworks.com/help/matlab/ref/roots.html

    Likewise, MatLab does Eigenvectors and Eigenvalues just fine.
     
  11. Tach Banned Banned

    Messages:
    5,265
    I didn't claimed that, I challenged you to solve the same using Matlab.


    Yes, it does, try using it in order to find the roots. This is what I challenged you.


    Yes, it does, try using it in finding the eigenvalues for the case I challenged you.
     
  12. przyk squishy Valued Senior Member

    Messages:
    3,203
    Matlab finds the roots just fine:

    Code:
    >> ord = 5130;
    >> c = 1.5 * ones(1, ord+1);
    >> c(1) = 15;
    >> c(1001) = 2;
    >> c(ord) = 3;
    >> c(ord+1) = -6;
    >> tic; r = roots(c); toc
    Elapsed time is 115.654575 seconds.
    No idea how the evaluation time compares with Finsim, because they don't actually say. Check that we got good roots for some values:

    Code:
    >> ex = ord : -1 : 0;
    >> f = @(k) dot(c, r(k).^ex);
    >> f(1)
    
    ans =
    
       8.4609e-10 + 3.2123e-11i
    
    >> f(2)
    
    ans =
    
       8.4609e-10 - 3.2123e-11i
    
    >> f(1000)
    
    ans =
    
       2.0275e-09 + 1.4720e-10i
    
    >> f(5000)
    
    ans =
    
       4.5258e-09 + 5.6110e-08i
    Find the worst:

    Code:
    >> p_k = arrayfun(f, 1:ord);
    >> max(abs(p_k))
    
    ans =
    
       5.9338e-07
    In other words, when we evaluate the polynomial on all the roots we found, the worst result we get is less than 6 x 10[sup]-7[/sup] in absolute value.

    The poly() function which reconstructs the polynomial from its roots gets results that blow up:

    Code:
    >> p = poly(r);
    >> p = c(1) * p;
    >> p(1)
    
    ans =
    
        15
    
    >> p(2)
    
    ans =
    
        1.5000
    
    >> p(ord)
    
    ans =
    
        3.0000
    
    >> p(ord+1)
    
    ans =
    
       -6.0000
    
    >> p(1000)
    
    ans =
    
      6.1076e+240
    
    >> p(2000)
    
    ans =
    
       NaN
    but since we already have the polynomial and we have its roots, we don't particularly care.
     
    Last edited: Sep 5, 2013
  13. przyk squishy Valued Senior Member

    Messages:
    3,203
    One has to wonder just where you got the idea diagonalising a 3 x 3 matrix would pose a problem for Matlab.

    Code:
    >> A = [1+i, -1-i, 2+2*i; 0, i, 2; 0, -1, 3+i]
    
    A =
    
       1.0000 + 1.0000i  -1.0000 - 1.0000i   2.0000 + 2.0000i
            0                  0 + 1.0000i   2.0000          
            0            -1.0000             3.0000 + 1.0000i
    
    >> [V, D] = eig(A)
    
    V =
    
       1.0000            -0.2357 - 0.2357i   0.7071          
            0             0.8433             0.3536 - 0.3536i
            0             0.4216             0.3536 - 0.3536i
    
    
    D =
    
       1.0000 + 1.0000i        0                  0          
            0             1.0000 + 1.0000i        0          
            0                  0             2.0000 + 1.0000i
    
    >> norm(A*V - V*D, 1)
    
    ans =
    
       1.0426e-15
    Notice that for all three problems (sparse matrix inversion, polynomial root finding, and finding eigenvalues and eigenvectors), inputting the problem seems much easier in Matlab than in Finsim.


    Most people are not chip designers. Why are you suggesting software that is clearly intended for a highly niche application?
     
  14. Tach Banned Banned

    Messages:
    5,265
    Actually, you should care. Given the roots, Matlab failed the simple task of evaluating the polynomial coefficients.
     
  15. przyk squishy Valued Senior Member

    Messages:
    3,203
    So file a bug report.
     
  16. Tach Banned Banned

    Messages:
    5,265
    So, Matlab failed miserably on a simple task. Now, how would you know that the roots it returned are valid?

    Please Register or Log in to view the hidden image!

     
  17. przyk squishy Valued Senior Member

    Messages:
    3,203
    Because I evaluated the polynomial on all the roots Matlab found. That's what this part did:

    Code:
    >> ex = ord : -1 : 0;
    >> f = @(k) dot(c, r(k).^ex);
    
    [...]
    
    >> p_k = arrayfun(f, 1:ord);
    >> max(abs(p_k))
    
    ans =
    
       5.9338e-07
    The first two lines define a function f() that returns the value of the polynomial evaluated on the kth root that the Matlab roots() function found. The third and fourth lines evaluate the polynomial on all the computed roots and find the result that was furthest from zero by absolute value.

    In other words, if you call the polynomial \(P\) and the roots \(\{r_{k}\}\), then Matlab found that \(| P(r_{k}) | \,\leq\, 6 \,\cdot\, 10^{-7}\,,\quad \forall k\).


    EDIT: Turns out Matlab has a function for polynomial evaluation in the documentation, so I could, for instance, just have defined f() with

    Code:
    >> f = @(k) polyval(c, r(k));
     
  18. Dinosaur Rational Skeptic Valued Senior Member

    Messages:
    4,885
    I am surprised that nobody mentioned MathCad. It is almost as good as Mathematica & more user friendly.
     
  19. Tach Banned Banned

    Messages:
    5,265
    The roots returned by Matlab don't look right, this may be why Matlab bombed in the attempt of reconstructing the original polynomial from the roots. By contrast, FinsimMath produced very different roots from Matlab and reconstructed the coefficients of the original polynomial with a very high accuracy. If you are a mathematician, you should really worry about Matlab's abilities to solve this type of problem. There are other problems that make Matlab bomb , I'll get to them once we are done with this exercise. One last thing: FinSim produced the results on a computer running at 1400MHz in 61 seconds. I am including the results of the FinsimMath run (the coefficients are divided by 2):


    Super FinSim - Verilog Simulator. Version Sim.10.07.95.64 (Fintronic) Fri Sep 6 15:39:27 2013
    Copyright (C) 1990-2007 by Fintronic USA, Inc. All rights reserved.

    Creating key file 'finsim.key'.

    Command name:
    TOP.sim

    Command arguments:

    Loading name mapping data ...
    Building design image data structure ... Fri Sep 6 15:39:27 2013
    Highest level modules:
    top
    Simulator is running in the accelerated mode.
    Optimization level is 1.
    Simulation data structure has been built. Fri Sep 6 15:39:27 2013
    Initializing simulation data structure ...
    Starting at time 0s. Fri Sep 6 15:39:27 2013
    Simulating until no event ...
    r[ 0].Re=-9.998859440845405677222856866137590e-1, .Im= 0.0

    r[ 1].Re= 7.6393202250021030597082472013426010e-1, .Im= 0.0

    r[ 2].Re=-4.99914473106181589390217823165585275e-1, .Im= 8.6593989934968629285094721126370130e-1

    r[ 3].Re=-4.99914473106181589390217823165585275e-1, .Im=-8.6593989934968629285094721126370130e-1

    r[ 4].Re= 4.99985207241952334111800837490591200e-1, .Im= 8.6586336846171729764165547749144025e-1

    r[ 5].Re= 4.99985207241952334111800837490591200e-1, .Im=-8.6586336846171729764165547749144025e-1

    r[ 6].Re= 2.50259230179367742064044932703836800e-1, .Im= 9.6803110112895385253040103634702970e-1

    r[ 7].Re= 2.50259230179367742064044932703836800e-1, .Im=-9.6803110112895385253040103634702970e-1

    r[ 8].Re=-1.020364508134066344746671006760152500e-1, .Im= 9.9464810532102110318675158850965090e-1

    r[ 9].Re=-1.020364508134066344746671006760152500e-1, .Im=-9.9464810532102110318675158850965090e-1

    r[ 10].Re=-8.9788866478218631872465493870549835e-1, .Im= 4.39991968092042773363914420770015550e-1

    r[ 11].Re=-8.9788866478218631872465493870549835e-1, .Im=-4.39991968092042773363914420770015550e-1

    r[ 12].Re= 9.7406769086945932389909330595401115e-1, .Im= 2.25733057752750043700729065676569000e-1

    r[ 13].Re= 9.7406769086945932389909330595401115e-1, .Im=-2.25733057752750043700729065676569000e-1

    r[ 14].Re=-9.819243872647958060184691930771805e-1, .Im= 1.886986026572540220413998213189188375e-1

    r[ 15].Re=-9.819243872647958060184691930771805e-1, .Im=-1.886986026572540220413998213189188375e-1

    r[ 16].Re= 4.8399623168679552220883266500095487500e-2, .Im= 9.9869215365779795412493058393010865e-1

    r[ 17].Re= 4.8399623168679552220883266500095487500e-2, .Im=-9.9869215365779795412493058393010865e-1

    r[ 18].Re= 8.4337395990053520833384936850052325e-1, .Im= 5.3702968676580753459859352005878460e-1

    r[ 19].Re= 8.4337395990053520833384936850052325e-1, .Im=-5.3702968676580753459859352005878460e-1

    r[ 20].Re=-5.5634269286259821485352006220637121875e-2, .Im= 9.9831242936082709160672266079927790e-1

    r[ 21].Re=-5.5634269286259821485352006220637121875e-2, .Im=-9.9831242936082709160672266079927790e-1

    r[ 22].Re=-7.2431590389349587155720655573531985e-1, .Im= 6.8929293978643535467654146486893295e-1

    r[ 23].Re=-7.2431590389349587155720655573531985e-1, .Im=-6.8929293978643535467654146486893295e-1

    r[ 24].Re= 8.8739704257475848780956084738136265e-1, .Im= 4.60662586165827170336939389017061325e-1

    r[ 25].Re= 8.8739704257475848780956084738136265e-1, .Im=-4.60662586165827170336939389017061325e-1

    r[ 26].Re= 3.8625659646649213030400460411328821875e-2, .Im= 9.9911237890939941230783460923703385e-1

    r[ 27].Re= 3.8625659646649213030400460411328821875e-2, .Im=-9.9911237890939941230783460923703385e-1

    r[ 28].Re= 9.9414667374103982133703993895323945e-1, .Im= 1.0748200409442568159512632064434000625e-1

    r[ 29].Re= 9.9414667374103982133703993895323945e-1, .Im=-1.0748200409442568159512632064434000625e-1

    r[ 30].Re=-9.3916914581868471412207100001978685e-1, .Im= 3.43139263320489829034443118871422475e-1

    r[ 31].Re=-9.3916914581868471412207100001978685e-1, .Im=-3.43139263320489829034443118871422475e-1

    r[ 32].Re=-6.4595902318874065528575556527357545e-1, .Im= 7.6321788309642168979252119243028570e-1

    r[ 33].Re=-6.4595902318874065528575556527357545e-1, .Im=-7.6321788309642168979252119243028570e-1

    r[ 34].Re= 6.6906985397436502527312995880492960e-1, .Im= 7.4299088462908868812917262403061610e-1

    r[ 35].Re= 6.6906985397436502527312995880492960e-1, .Im=-7.4299088462908868812917262403061610e-1

    r[ 36].Re=-8.1107022784411608729016052166116420e-1, .Im= 5.8476981370057523612615568708861245e-1

    r[ 37].Re=-8.1107022784411608729016052166116420e-1, .Im=-5.8476981370057523612615568708861245e-1

    r[ 38].Re= 7.5803153962605773763527849951060485e-1, .Im= 6.5196214035352839655246270922361870e-1

    r[ 39].Re= 7.5803153962605773763527849951060485e-1, .Im=-6.5196214035352839655246270922361870e-1

    r[ 40].Re=-3.61991628110413021790492393847671325e-1, .Im= 9.3204021048372898139433573305723255e-1

    r[ 41].Re=-3.61991628110413021790492393847671325e-1, .Im=-9.3204021048372898139433573305723255e-1

    r[ 42].Re= 9.3358125881474762763900798745453355e-1, .Im= 3.57958168422293221411223385075572875e-1

    r[ 43].Re= 9.3358125881474762763900798745453355e-1, .Im=-3.57958168422293221411223385075572875e-1

    r[ 44].Re= 4.03938096797316292807522586372215300e-1, .Im= 9.1462030339729316619212795558269135e-1

    r[ 45].Re= 4.03938096797316292807522586372215300e-1, .Im=-9.1462030339729316619212795558269135e-1

    r[ 46].Re=-7.642043035183335164539641937153646250e-2, .Im= 9.9693821470243604299099615673185325e-1

    r[ 47].Re=-7.642043035183335164539641937153646250e-2, .Im=-9.9693821470243604299099615673185325e-1

    r[ 48].Re=-9.9771475224113570501316416994086465e-1, .Im= 6.608531238925970108244456469037686250e-2

    r[ 49].Re=-9.9771475224113570501316416994086465e-1, .Im=-6.608531238925970108244456469037686250e-2

    r[ 50].Re=-4.4636813406866579501119929318520006250e-2, .Im= 9.9886263463285196451124647865071890e-1

    r[ 51].Re=-4.4636813406866579501119929318520006250e-2, .Im=-9.9886263463285196451124647865071890e-1

    r[ 52].Re= 1.045483438806665311970878207148416484375e-2, .Im= 9.9981289345496215936748285457724705e-1

    r[ 53].Re= 1.045483438806665311970878207148416484375e-2, .Im=-9.9981289345496215936748285457724705e-1

    r[ 54].Re= 9.9917359846249254040628784423461180e-1, .Im= 4.0365104527353166952163832092992378125e-2

    r[ 55].Re= 9.9917359846249254040628784423461180e-1, .Im=-4.0365104527353166952163832092992378125e-2

    r[ 56].Re= 6.1850943624801979492389136794372460e-1, .Im= 7.8557335852493015426745159857091490e-1

    r[ 57].Re= 6.1850943624801979492389136794372460e-1, .Im=-7.8557335852493015426745159857091490e-1

    r[ 58].Re=-9.7179537967440166035260062926681710e-1, .Im= 2.353565534604873388246915055788122000e-1

    r[ 59].Re=-9.7179537967440166035260062926681710e-1, .Im=-2.353565534604873388246915055788122000e-1

    r[ 60].Re=-5.8122336540257846237977901182603090e-1, .Im= 8.136007740764129581023667014960665e-1

    r[ 61].Re=-5.8122336540257846237977901182603090e-1, .Im=-8.136007740764129581023667014960665e-1

    r[ 62].Re=-8.4859723148945220838612613079021680e-1, .Im= 5.2883494714673329184506656019948420e-1

    r[ 63].Re=-8.4859723148945220838612613079021680e-1, .Im=-5.2883494714673329184506656019948420e-1

    r[ 64].Re= 7.7763577203639722146277790670865215e-1, .Im= 6.2845463683156232992388368074898605e-1

    r[ 65].Re= 7.7763577203639722146277790670865215e-1, .Im=-6.2845463683156232992388368074898605e-1

    r[ 66].Re=-2.13823910810035482110702531599599750000e-2, .Im= 9.9964259004999822533221731646335680e-1

    r[ 67].Re=-2.13823910810035482110702531599599750000e-2, .Im=-9.9964259004999822533221731646335680e-1

    r[ 68].Re=-1.79227163450276110769066040262487148437500e-3, .Im= 9.9986396877363015178730165644083170e-1

    r[ 69].Re=-1.79227163450276110769066040262487148437500e-3, .Im=-9.9986396877363015178730165644083170e-1

    r[ 70].Re= 9.5447850956142477052424055727897210e-1, .Im= 2.97806471390818783273601866312674225e-1

    r[ 71].Re= 9.5447850956142477052424055727897210e-1, .Im=-2.97806471390818783273601866312674225e-1

    r[ 72].Re=-9.2124187214965824743728717294288795e-1, .Im= 3.88729834717593480952757545310305425e-1

    r[ 73].Re=-9.2124187214965824743728717294288795e-1, .Im=-3.88729834717593480952757545310305425e-1

    r[ 74].Re= 5.5407692696999499837318126083118840e-1, .Im= 8.3228964143914996309803200347232630e-1

    r[ 75].Re= 5.5407692696999499837318126083118840e-1, .Im=-8.3228964143914996309803200347232630e-1

    r[ 76].Re=-7.0287667190257585581036892108386380e-1, .Im= 7.1114110628459203944373712147353215e-1

    r[ 77].Re=-7.0287667190257585581036892108386380e-1, .Im=-7.1114110628459203944373712147353215e-1

    r[ 78].Re= 8.7467422708153985677625996686401775e-1, .Im= 4.84405549552906322663403670958359725e-1

    r[ 79].Re= 8.7467422708153985677625996686401775e-1, .Im=-4.84405549552906322663403670958359725e-1

    r[ 80].Re=-4.49259754022128587891415918420534575e-1, .Im= 8.9326037498593990893169802802731280e-1

    r[ 81].Re=-4.49259754022128587891415918420534575e-1, .Im=-8.9326037498593990893169802802731280e-1

    r[ 82].Re=-9.9985263566444682048484082770301025e-1, .Im= 9.79474920646244973099214803369250078125e-3

    r[ 83].Re=-9.9985263566444682048484082770301025e-1, .Im=-9.79474920646244973099214803369250078125e-3

    r[ 84].Re= 5.8526884216443619823877497765352015e-1, .Im= 8.1065730929528267978412259253673255e-1

    r[ 85].Re= 5.8526884216443619823877497765352015e-1, .Im=-8.1065730929528267978412259253673255e-1

    r[ 86].Re= 9.8264780321249189931620549032231790e-1, .Im= 1.849822199672042366547231040385668125e-1

    r[ 87].Re= 9.8264780321249189931620549032231790e-1, .Im=-1.849822199672042366547231040385668125e-1

    r[ 88].Re=-7.6515085706941898813226998754544180e-1, .Im= 6.4368048590999327185357969938195310e-1

    r[ 89].Re=-7.6515085706941898813226998754544180e-1, .Im=-6.4368048590999327185357969938195310e-1

    r[ 90].Re= 3.03198293042617861292598036015988325e-1, .Im= 9.5276647134959080442939693966764025e-1

    r[ 91].Re= 3.03198293042617861292598036015988325e-1, .Im=-9.5276647134959080442939693966764025e-1

    r[ 92].Re= 3.67779380671609923414422382847988025e-1, .Im= 9.2974553628536615867972159321652725e-1

    r[ 93].Re= 3.67779380671609923414422382847988025e-1, .Im=-9.2974553628536615867972159321652725e-1

    r[ 94].Re=-9.5700089137278865347724376988480795e-1, .Im= 2.89707421038929435752606877940706900e-1

    r[ 95].Re=-9.5700089137278865347724376988480795e-1, .Im=-2.89707421038929435752606877940706900e-1

    r[ 96].Re=-5.355190838907742945096401854243595e-1, .Im= 8.4437348892153862855991519609233360e-1

    r[ 97].Re=-5.355190838907742945096401854243595e-1, .Im=-8.4437348892153862855991519609233360e-1

    r[ 98].Re= 9.1689100109450472064764880997245195e-1, .Im= 3.98762456279504684530934355279896400e-1

    r[ 99].Re= 9.1689100109450472064764880997245195e-1, .Im=-3.98762456279504684530934355279896400e-1

    r[ 100].Re=-3.45968031448362911550731269016978325e-1, .Im= 9.3811200810865014165784714350593275e-1

    r[ 101].Re=-3.45968031448362911550731269016978325e-1, .Im=-9.3811200810865014165784714350593275e-1

    r[ 102].Re= 7.31078967140890378928475001885090e-1, .Im= 6.8207153696167444056897011250839565e-1

    r[ 103].Re= 7.31078967140890378928475001885090e-1, .Im=-6.8207153696167444056897011250839565e-1

    r[ 104].Re= 1.857179529672242923599156938507803625e-1, .Im= 9.8245877367438982918912415698287075e-1

    r[ 105].Re= 1.857179529672242923599156938507803625e-1, .Im=-9.8245877367438982918912415698287075e-1

    r[ 106].Re=-8.575291605001061912005866361141670e-1, .Im= 5.1420661460462491199052692536497485e-1

    r[ 107].Re=-8.575291605001061912005866361141670e-1, .Im=-5.1420661460462491199052692536497485e-1

    r[ 108].Re=-8.387399112751617868966036439815070e-1, .Im= 5.4433885070576792930552301186253315e-1

    r[ 109].Re=-8.387399112751617868966036439815070e-1, .Im=-5.4433885070576792930552301186253315e-1

    r[ 110].Re= 9.9003596412129768467025314748752860e-1, .Im= 1.402888576640571038911531331905280125e-1

    r[ 111].Re= 9.9003596412129768467025314748752860e-1, .Im=-1.402888576640571038911531331905280125e-1

    r[ 112].Re=-3.94865534149658914397917897076695225e-1, .Im= 9.1861137204193232808080438189790580e-1

    r[ 113].Re=-3.94865534149658914397917897076695225e-1, .Im=-9.1861137204193232808080438189790580e-1

    r[ 114].Re= 6.9854955766233328695591353607596825e-1, .Im= 7.1533286823409703014675642407382835e-1

    r[ 115].Re= 6.9854955766233328695591353607596825e-1, .Im=-7.1533286823409703014675642407382835e-1

    r[ 116].Re=-9.9164278403046135501597291295183820e-1, .Im= 1.28242766898384513707398468795872750e-1

    r[ 117].Re=-9.9164278403046135501597291295183820e-1, .Im=-1.28242766898384513707398468795872750e-1

    r[ 118].Re= 4.61333615153962817156951814467902275e-1, .Im= 8.8706082642214423295001779479207470e-1

    r[ 119].Re= 4.61333615153962817156951814467902275e-1, .Im=-8.8706082642214423295001779479207470e-1

    r[ 120].Re=-2.71428254765952725602318196251871975e-1, .Im= 9.6232671740148278960447214558371340e-1

    r[ 121].Re=-2.71428254765952725602318196251871975e-1, .Im=-9.6232671740148278960447214558371340e-1

    r[ 122].Re= 9.2957443196016764641598228990915230e-1, .Im= 3.68217419492610942288735031979740575e-1

    r[ 123].Re= 9.2957443196016764641598228990915230e-1, .Im=-3.68217419492610942288735031979740575e-1

    r[ 124].Re=-6.4783637455965747964370393674471415e-1, .Im= 7.6162263757700454647192600532434880e-1

    r[ 125].Re=-6.4783637455965747964370393674471415e-1, .Im=-7.6162263757700454647192600532434880e-1

    r[ 126].Re= 8.0166885341674232190456450553028840e-1, .Im= 5.9749117018574882109760437742806970e-1

    r[ 127].Re= 8.0166885341674232190456450553028840e-1, .Im=-5.9749117018574882109760437742806970e-1

    r[ 128].Re= 2.181065907549930571462937223259359500e-1, .Im= 9.7577045508963189401896443087025545e-1

    r[ 129].Re= 2.181065907549930571462937223259359500e-1, .Im=-9.7577045508963189401896443087025545e-1

    r[ 130].Re=-9.7033694486676691504101199825527145e-1, .Im= 2.413034021961037445258568823192035750e-1

    r[ 131].Re=-9.7033694486676691504101199825527145e-1, .Im=-2.413034021961037445258568823192035750e-1

    r[ 132].Re=-5.478847527094854452656136345467530e-1, .Im= 8.3641404137786035111190585666918195e-1

    r[ 133].Re=-5.478847527094854452656136345467530e-1, .Im=-8.3641404137786035111190585666918195e-1

    r[ 134].Re= 3.93831228939884259165893354293075375e-1, .Im= 9.1902880439856204919379933926393275e-1

    r[ 135].Re= 3.93831228939884259165893354293075375e-1, .Im=-9.1902880439856204919379933926393275e-1

    r[ 136].Re= 9.9794828934088697369730880382121540e-1, .Im= 6.358021025976479112529204940074123125e-2

    r[ 137].Re= 9.9794828934088697369730880382121540e-1, .Im=-6.358021025976479112529204940074123125e-2

    r[ 138].Re=-8.0238856888696563629537195083685215e-1, .Im= 5.9661373711402954089777495028101835e-1

    r[ 139].Re=-8.0238856888696563629537195083685215e-1, .Im=-5.9661373711402954089777495028101835e-1

    r[ 140].Re=-2.52521583270626959194515848139417350e-1, .Im= 9.6746493096654517795940364521811715e-1

    r[ 141].Re=-2.52521583270626959194515848139417350e-1, .Im=-9.6746493096654517795940364521811715e-1

    r[ 142].Re= 8.4535502899911862950688146156608125e-1, .Im= 5.3391968910233156275779720090213230e-1

    r[ 143].Re= 8.4535502899911862950688146156608125e-1, .Im=-5.3391968910233156275779720090213230e-1

    r[ 144].Re= 5.3766479105630315959984955043182705e-1, .Im= 8.4298287389946757741654437268152830e-1

    r[ 145].Re= 5.3766479105630315959984955043182705e-1, .Im=-8.4298287389946757741654437268152830e-1

    r[ 146].Re= 1.240261718264349249940536878966668125e-1, .Im= 9.9213535767979843527086813992355015e-1

    r[ 147].Re= 1.240261718264349249940536878966668125e-1, .Im=-9.9213535767979843527086813992355015e-1

    r[ 148].Re=-9.3048601789770091219367031953879630e-1, .Im= 3.66043430881822562383831609622575325e-1

    r[ 149].Re=-9.3048601789770091219367031953879630e-1, .Im=-3.66043430881822562383831609622575325e-1

    r[ 150].Re= 9.6607218428494934236994140519527715e-1, .Im= 2.57814232375322860413291436998406425e-1

    r[ 151].Re= 9.6607218428494934236994140519527715e-1, .Im=-2.57814232375322860413291436998406425e-1

    r[ 152].Re=-9.9875915928259917375697796160238790e-1, .Im= 4.774115051969798906306152730394387500e-2

    r[ 153].Re=-9.9875915928259917375697796160238790e-1, .Im=-4.774115051969798906306152730394387500e-2

    r[ 154].Re=-4.30552340813200540292626783411833450e-1, .Im= 9.0242536031521636274987940851133315e-1

    r[ 155].Re=-4.30552340813200540292626783411833450e-1, .Im=-9.0242536031521636274987940851133315e-1

    r[ 156].Re=-2.132325474948591204071846050283056625e-1, .Im= 9.7686694493544146133956473931903015e-1

    r[ 157].Re=-2.132325474948591204071846050283056625e-1, .Im=-9.7686694493544146133956473931903015e-1

    r[ 158].Re= 8.8909824298182993373984572826884685e-1, .Im= 4.5739378678063208338855361034802625e-1

    r[ 159].Re= 8.8909824298182993373984572826884685e-1, .Im=-4.5739378678063208338855361034802625e-1

    r[ 160].Re=-7.5480802439790373181693894366617310e-1, .Im= 6.5576673905119020613341263015172440e-1

    r[ 161].Re=-7.5480802439790373181693894366617310e-1, .Im=-6.5576673905119020613341263015172440e-1

    r[ 162].Re= 6.4694332097374984691384725010721010e-1, .Im= 7.6232182898486533506599016618565655e-1

    r[ 163].Re= 6.4694332097374984691384725010721010e-1, .Im=-7.6232182898486533506599016618565655e-1

    r[ 164].Re= 3.22977051944808579708734441737760775e-1, .Im= 9.4625716483186628202872725523775440e-1

    r[ 165].Re= 3.22977051944808579708734441737760775e-1, .Im=-9.4625716483186628202872725523775440e-1

    r[ 166].Re=-9.4288535659536465427521534365951080e-1, .Im= 3.32770425467963426591211373306578025e-1

    r[ 167].Re=-9.4288535659536465427521534365951080e-1, .Im=-3.32770425467963426591211373306578025e-1

    r[ 168].Re=-7.0026757392063598839371252324781380e-1, .Im= 7.1373089315726923054228336695814505e-1

    r[ 169].Re=-7.0026757392063598839371252324781380e-1, .Im=-7.1373089315726923054228336695814505e-1

    r[ 170].Re= 9.9987201837504702250924992767977525e-1, .Im= 1.59041764091724276142247873622181937500e-2

    r[ 171].Re= 9.9987201837504702250924992767977525e-1, .Im=-1.59041764091724276142247873622181937500e-2

    r[ 172].Re=-3.99370547408981646508863150302204300e-1, .Im= 9.1666175103755942465966199961258095e-1

    r[ 173].Re=-3.99370547408981646508863150302204300e-1, .Im=-9.1666175103755942465966199961258095e-1

    r[ 174].Re= 6.5438796297826473669090319162933155e-1, .Im= 7.5596037622206746497965923481388015e-1

    r[ 175].Re= 6.5438796297826473669090319162933155e-1, .Im=-7.5596037622206746497965923481388015e-1

    r[ 176].Re=-8.868386443223010839886910616769455e-1, .Im= 4.61856785330007901801963043908472150e-1

    r[ 177].Re=-8.868386443223010839886910616769455e-1, .Im=-4.61856785330007901801963043908472150e-1

    r[ 178].Re= 8.2099727308275505244239411695161830e-1, .Im= 5.7066244321677894735245217816554940e-1

    r[ 179].Re= 8.2099727308275505244239411695161830e-1, .Im=-5.7066244321677894735245217816554940e-1

    r[ 180].Re=-1.832257216387587206440912268590182000e-1, .Im= 9.8294233111130457913873215147759765e-1

    r[ 181].Re=-1.832257216387587206440912268590182000e-1, .Im=-9.8294233111130457913873215147759765e-1

    r[ 182].Re= 1.470873218479913369094447261886671125e-1, .Im= 9.8898941203671597577340435236692425e-1

    r[ 183].Re= 1.470873218479913369094447261886671125e-1, .Im=-9.8898941203671597577340435236692425e-1

    r[ 184].Re=-9.8705702001295136938097130041569470e-1, .Im= 1.597487928163412174153990008562686750e-1

    r[ 185].Re=-9.8705702001295136938097130041569470e-1, .Im=-1.597487928163412174153990008562686750e-1

    r[ 186].Re= 9.4411307985541348397617866794462315e-1, .Im= 3.29208541256353182102856180790695350e-1

    r[ 187].Re= 9.4411307985541348397617866794462315e-1, .Im=-3.29208541256353182102856180790695350e-1

    r[ 188].Re=-6.078074966478864693542050190444570e-1, .Im= 7.9392746451205331581491009274031965e-1

    r[ 189].Re=-6.078074966478864693542050190444570e-1, .Im=-7.9392746451205331581491009274031965e-1

    r[ 190].Re= 4.68908122213172406933523461702861800e-1, .Im= 8.8307773475113571226557951376889830e-1

    r[ 191].Re= 4.68908122213172406933523461702861800e-1, .Im=-8.8307773475113571226557951376889830e-1

    r[ 192].Re=-7.6358050296982538096557391327223740e-1, .Im= 6.4554133272772518115090178980608470e-1

    r[ 193].Re=-7.6358050296982538096557391327223740e-1, .Im=-6.4554133272772518115090178980608470e-1

    r[ 194].Re= 4.01682680833266969600003903906326725e-1, .Im= 9.1561247999915129636150368241942485e-1

    r[ 195].Re= 4.01682680833266969600003903906326725e-1, .Im=-9.1561247999915129636150368241942485e-1

    r[ 196].Re= 9.7882438120636061640311709197703745e-1, .Im= 2.041958680327247421804059968053479625e-1

    r[ 197].Re= 9.7882438120636061640311709197703745e-1, .Im=-2.041958680327247421804059968053479625e-1

    r[ 198].Re= 2.109238578740227909591453681059647250e-1, .Im= 9.773520813754745795165490562794730e-1

    r[ 199].Re= 2.109238578740227909591453681059647250e-1, .Im=-9.773520813754745795165490562794730e-1

    r[ 200].Re=-9.9533073970618279879829515266465020e-1, .Im= 9.538913620185963948561180814067483750e-2

    r[ 201].Re=-9.9533073970618279879829515266465020e-1, .Im=-9.538913620185963948561180814067483750e-2

    r[ 202].Re=-2.98441392611680178514887984420056450e-1, .Im= 9.5429479349738377536027655878569930e-1

    r[ 203].Re=-2.98441392611680178514887984420056450e-1, .Im=-9.5429479349738377536027655878569930e-1

    r[ 204].Re= 8.7408130384350057884290663423598740e-1, .Im= 4.85467395772200438486265738902147850e-1

    r[ 205].Re= 8.7408130384350057884290663423598740e-1, .Im=-4.85467395772200438486265738902147850e-1

    r[ 206].Re= 7.9874151974511964358072191316750830e-1, .Im= 6.0141450439245136561083882043021730e-1

    r[ 207].Re= 7.9874151974511964358072191316750830e-1, .Im=-6.0141450439245136561083882043021730e-1

    r[ 208].Re=-8.7466965075606639690164456624188460e-1, .Im= 4.84508875953029882754918844511848850e-1

    r[ 209].Re=-8.7466965075606639690164456624188460e-1, .Im=-4.84508875953029882754918844511848850e-1

    r[ 210].Re=-4.86048128992720929186788225706550275e-1, .Im= 8.7379192097678326511811519594630225e-1

    r[ 211].Re=-4.86048128992720929186788225706550275e-1, .Im=-8.7379192097678326511811519594630225e-1

    r[ 212].Re= 1.361681818816503075630919283867115125e-1, .Im= 9.9054394193535288959395757046877405e-1

    r[ 213].Re= 1.361681818816503075630919283867115125e-1, .Im=-9.9054394193535288959395757046877405e-1

    r[ 214].Re= 9.3226271807453675588561736731207925e-1, .Im= 3.61372021735031689892991835222346700e-1

    r[ 215].Re= 9.3226271807453675588561736731207925e-1, .Im=-3.61372021735031689892991835222346700e-1

    r[ 216].Re=-6.2133196659632228264769082670682105e-1, .Im= 7.8340051450648962028111554900533515e-1

    r[ 217].Re=-6.2133196659632228264769082670682105e-1, .Im=-7.8340051450648962028111554900533515e-1

    r[ 218].Re=-5.3138524029495459721772476768819615e-1, .Im= 8.4698513758693028119495238570380020e-1

    r[ 219].Re=-5.3138524029495459721772476768819615e-1, .Im=-8.4698513758693028119495238570380020e-1

    r[ 220].Re= 6.8884263338623996641985058886348265e-1, .Im= 7.2468205903849547411255116458050905e-1

    r[ 221].Re= 6.8884263338623996641985058886348265e-1, .Im=-7.2468205903849547411255116458050905e-1

    r[ 222].Re=-9.7675072891235636962647959080641155e-1, .Im= 2.138907617414224915375342561674187875e-1

    r[ 223].Re=-9.7675072891235636962647959080641155e-1, .Im=-2.138907617414224915375342561674187875e-1

    r[ 224].Re= 2.86825137782375949591084918210981400e-1, .Im= 9.5783447811612087985366770226391960e-1

    r[ 225].Re= 2.86825137782375949591084918210981400e-1, .Im=-9.5783447811612087985366770226391960e-1

    r[ 226].Re= 9.9319210651315037452491196745540945e-1, .Im= 1.1600219681326222331829711720274644375e-1

    r[ 227].Re= 9.9319210651315037452491196745540945e-1, .Im=-1.1600219681326222331829711720274644375e-1

    r[ 228].Re=-9.0787703914253381487498018032056275e-1, .Im= 4.18969277555065855445093347952933975e-1

    r[ 229].Re=-9.0787703914253381487498018032056275e-1, .Im=-4.18969277555065855445093347952933975e-1

    r[ 230].Re=-1.627121903973537953014272261498263000e-1, .Im= 9.8653365000405301987740358526934865e-1

    r[ 231].Re=-1.627121903973537953014272261498263000e-1, .Im=-9.8653365000405301987740358526934865e-1

    r[ 232].Re= 6.0299131612521816858674128525308330e-1, .Im= 7.9754293052936076069414639277965760e-1

    r[ 233].Re= 6.0299131612521816858674128525308330e-1, .Im=-7.9754293052936076069414639277965760e-1

    r[ 234].Re=-1.976393237896819088383892903948435500e-1, .Im= 9.8014705082464814722698065452277660e-1

    r[ 235].Re=-1.976393237896819088383892903948435500e-1, .Im=-9.8014705082464814722698065452277660e-1

    r[ 236].Re= 9.8766488527097151539635433437069875e-1, .Im= 1.560195419958009532823695053593837625e-1

    r[ 237].Re= 9.8766488527097151539635433437069875e-1, .Im=-1.560195419958009532823695053593837625e-1

    r[ 238].Re=-9.9383173665964441578779542396659960e-1, .Im= 1.0999942500399718936510140565587789375e-1

    r[ 239].Re=-9.9383173665964441578779542396659960e-1, .Im=-1.0999942500399718936510140565587789375e-1

    r[ 240].Re=-9.2868039808223223907646115549141540e-1, .Im= 3.70607629101618096800763169085257675e-1

    r[ 241].Re=-9.2868039808223223907646115549141540e-1, .Im=-3.70607629101618096800763169085257675e-1

    r[ 242].Re= 5.1685332221287516585306320848758330e-1, .Im= 8.5590427582056816113720287830801680e-1

    r[ 243].Re= 5.1685332221287516585306320848758330e-1, .Im=-8.5590427582056816113720287830801680e-1

    r[ 244].Re=-1.2271292570031804014529797086652251875e-1, .Im= 9.9231659455533205438371169293532145e-1

    r[ 245].Re=-1.2271292570031804014529797086652251875e-1, .Im=-9.9231659455533205438371169293532145e-1

    r[ 246].Re= 7.4510915355376428070854899488040245e-1, .Im= 6.6669694703978210625905376218724995e-1

    r[ 247].Re= 7.4510915355376428070854899488040245e-1, .Im=-6.6669694703978210625905376218724995e-1

    r[ 248].Re=-6.843507008796476664969077319256030e-1, .Im= 7.2898516385120037952560778649058190e-1

    r[ 249].Re=-6.843507008796476664969077319256030e-1, .Im=-7.2898516385120037952560778649058190e-1

    r[ 250].Re= 3.81416606850813189044657747217570425e-1, .Im= 9.2424513908298211450897952090599570e-1

    r[ 251].Re= 3.81416606850813189044657747217570425e-1, .Im=-9.2424513908298211450897952090599570e-1

    r[ 252].Re=-6.5434335951771860351300347247160970e-1, .Im= 7.5605445876459720366824512893799690e-1

    r[ 253].Re=-6.5434335951771860351300347247160970e-1, .Im=-7.5605445876459720366824512893799690e-1

    r[ 254].Re= 9.0684294489833461305750006431480865e-1, .Im= 4.21097937336347649672774196005775575e-1

    r[ 255].Re= 9.0684294489833461305750006431480865e-1, .Im=-4.21097937336347649672774196005775575e-1

    r[ 256].Re=-9.0056676728907580908867203106638040e-1, .Im= 4.3448373556847313947670841116632800e-1

    r[ 257].Re=-9.0056676728907580908867203106638040e-1, .Im=-4.3448373556847313947670841116632800e-1

    r[ 258].Re= 6.3851179692958837108562875073403120e-1, .Im= 7.6940884792649455459212504138122310e-1

    r[ 259].Re= 6.3851179692958837108562875073403120e-1, .Im=-7.6940884792649455459212504138122310e-1

    r[ 260].Re=-3.21723295403483267040911641743150525e-1, .Im= 9.4669569037352174767363521823426705e-1

    r[ 261].Re=-3.21723295403483267040911641743150525e-1, .Im=-9.4669569037352174767363521823426705e-1

    r[ 262].Re= 9.5945782932532686082538475602632385e-1, .Im= 2.81402065007445245647943465883145100e-1

    r[ 263].Re= 9.5945782932532686082538475602632385e-1, .Im=-2.81402065007445245647943465883145100e-1

    r[ 264].Re=-8.18173858633002848428361630794825e-1, .Im= 5.7479058521099524181607876016641965e-1

    r[ 265].Re=-8.18173858633002848428361630794825e-1, .Im=-5.7479058521099524181607876016641965e-1

    r[ 266].Re= 9.725800137446286020015406847960548125e-2, .Im= 9.9512758827834169039761036401614545e-1

    r[ 267].Re= 9.725800137446286020015406847960548125e-2, .Im=-9.9512758827834169039761036401614545e-1

    r[ 268].Re= 7.0466247278140370369214906531851735e-1, .Im= 7.0933078626974832570084572580526580e-1

    r[ 269].Re= 7.0466247278140370369214906531851735e-1, .Im=-7.0933078626974832570084572580526580e-1

    r[ 270].Re=-9.6347583330986241723081775489845310e-1, .Im= 2.673691551129109278406303928932175e-1

    r[ 271].Re=-9.6347583330986241723081775489845310e-1, .Im=-2.673691551129109278406303928932175e-1

    r[ 272].Re= 7.652537236194177638903823890359490000e-2, .Im= 9.9692656279157976229043924831785260e-1

    r[ 273].Re= 7.652537236194177638903823890359490000e-2, .Im=-9.9692656279157976229043924831785260e-1

    r[ 274].Re= 9.9649824705269485214387259475188325e-1, .Im= 8.311346591314204557132683248710236250e-2

    r[ 275].Re= 9.9649824705269485214387259475188325e-1, .Im=-8.311346591314204557132683248710236250e-2

    r[ 276].Re=-4.63416544469117730464802207279717525e-1, .Im= 8.8600669236003948281421571664395740e-1

    r[ 277].Re=-4.63416544469117730464802207279717525e-1, .Im=-8.8600669236003948281421571664395740e-1

    r[ 278].Re=-7.8298188598566309526205486690741960e-1, .Im= 6.2185810073904312922365988924866540e-1

    r[ 279].Re=-7.8298188598566309526205486690741960e-1, .Im=-6.2185810073904312922365988924866540e-1

    r[ 280].Re= 8.2722822071295132317914067243691530e-1, .Im= 5.6157301460616881882970119477249680e-1

    r[ 281].Re= 8.2722822071295132317914067243691530e-1, .Im=-5.6157301460616881882970119477249680e-1

    r[ 282].Re=-1.518359820955324235303152136111748375e-1, .Im= 9.8827354806398004516410082942456935e-1

    r[ 283].Re=-1.518359820955324235303152136111748375e-1, .Im=-9.8827354806398004516410082942456935e-1

    r[ 284].Re= 1.168068165190408458364856869593495468750e-2, .Im= 9.9979041590504180714304993671248665e-1

    r[ 285].Re= 1.168068165190408458364856869593495468750e-2, .Im=-9.9979041590504180714304993671248665e-1

    r[ 286].Re=-9.9958746889180860595303101945319210e-1, .Im= 2.44871715859322040820256205506666437500e-2

    r[ 287].Re=-9.9958746889180860595303101945319210e-1, .Im=-2.44871715859322040820256205506666437500e-2

    r[ 288].Re= 9.6885671528281891440315121144521980e-1, .Im= 2.471397464657908160656774043673067250e-1

    r[ 289].Re= 9.6885671528281891440315121144521980e-1, .Im=-2.471397464657908160656774043673067250e-1

    r[ 290].Re= 4.76467038690813859957984277571085825e-1, .Im= 8.7901145400977054311653091644984665e-1

    r[ 291].Re= 4.76467038690813859957984277571085825e-1, .Im=-8.7901145400977054311653091644984665e-1

    r[ 292].Re=-7.5641582534634388412797534329001790e-1, .Im= 6.5392978166999915501378382032271470e-1

    r[ 293].Re=-7.5641582534634388412797534329001790e-1, .Im=-6.5392978166999915501378382032271470e-1

    r[ 294].Re= 2.70349487104257435454712776845553875e-1, .Im= 9.6261886472164148731422983473748895e-1

    r[ 295].Re= 2.70349487104257435454712776845553875e-1, .Im=-9.6261886472164148731422983473748895e-1

    r[ 296].Re=-4.08321090222661442492579908503103050e-1, .Im= 9.1269588444066318544400928658433255e-1

    r[ 297].Re=-4.08321090222661442492579908503103050e-1, .Im=-9.1269588444066318544400928658433255e-1

    r[ 298].Re= 9.0321272309474820438879305584123355e-1, .Im= 4.28856397402731459589375617724726900e-1

    r[ 299].Re= 9.0321272309474820438879305584123355e-1, .Im=-4.28856397402731459589375617724726900e-1

    r[ 300].Re=-9.518994957813278201541606904356740e-1, .Im= 3.06083584258605323480395554724964300e-1

    r[ 301].Re=-9.518994957813278201541606904356740e-1, .Im=-3.06083584258605323480395554724964300e-1

    r[ 302].Re= 5.6826699878969599843969717767322435e-1, .Im= 8.2265439821940833375890633760718625e-1

    r[ 303].Re= 5.6826699878969599843969717767322435e-1, .Im=-8.2265439821940833375890633760718625e-1

    r[ 304].Re=-5.7021538697261209271971438283799215e-1, .Im= 8.2135974811021950081624254380585625e-1

    r[ 305].Re=-5.7021538697261209271971438283799215e-1, .Im=-8.2135974811021950081624254380585625e-1

    r[ 306].Re= 7.7066619169713246328967670706333590e-1, .Im= 6.3697900056590484041407762560993430e-1

    r[ 307].Re= 7.7066619169713246328967670706333590e-1, .Im=-6.3697900056590484041407762560993430e-1

    r[ 308].Re=-2.99393106870227410087892394585651343750e-2, .Im= 9.9941643375641309177126458962447940e-1

    r[ 309].Re=-2.99393106870227410087892394585651343750e-2, .Im=-9.9941643375641309177126458962447940e-1

    r[ 310].Re=-9.8606015100976041054536835872568190e-1, .Im= 1.657919269905193115910435608384432250e-1

    r[ 311].Re=-9.8606015100976041054536835872568190e-1, .Im=-1.657919269905193115910435608384432250e-1

    r[ 312].Re= 9.9168840369873878515249998599756505e-1, .Im= 1.281550020547872759113516849538427750e-1

    r[ 313].Re= 9.9168840369873878515249998599756505e-1, .Im=-1.281550020547872759113516849538427750e-1

    r[ 314].Re= 3.72327169042652172947782673873007275e-1, .Im= 9.2794197617814555556492450705263760e-1

    r[ 315].Re= 3.72327169042652172947782673873007275e-1, .Im=-9.2794197617814555556492450705263760e-1

    r[ 316].Re=-8.6986554142567085179393870930653065e-1, .Im= 4.93052232761771958013952144028735325e-1

    r[ 317].Re=-8.6986554142567085179393870930653065e-1, .Im=-4.93052232761771958013952144028735325e-1

    r[ 318].Re=-2.87899981129204840524238306898041625e-1, .Im= 9.5753653438634855898925479777972210e-1

    r[ 319].Re=-2.87899981129204840524238306898041625e-1, .Im=-9.5753653438634855898925479777972210e-1

    r[ 320].Re= 8.6315194316535726049011145732947625e-1, .Im= 5.0462600735911944394018746606889180e-1

    r[ 321].Re= 8.6315194316535726049011145732947625e-1, .Im=-5.0462600735911944394018746606889180e-1

    r[ 322].Re=-6.9411602074690192942796329589327795e-1, .Im= 7.1969596193319129717735904705477875e-1

    r[ 323].Re=-6.9411602074690192942796329589327795e-1, .Im=-7.1969596193319129717735904705477875e-1

    r[ 324].Re= 4.28431480950988596845263600698672225e-1, .Im= 9.0341683139790451839701290737139060e-1

    r[ 325].Re= 4.28431480950988596845263600698672225e-1, .Im=-9.0341683139790451839701290737139060e-1

    r[ 326].Re= 9.999991657059023042464218633540440e-1, .Im= 1.22333514810707617327667495743526152343750e-3

    r[ 327].Re= 9.999991657059023042464218633540440e-1, .Im=-1.22333514810707617327667495743526152343750e-3

    r[ 328].Re=-5.2305546733209906662409593991469590e-1, .Im= 8.5216540539951157740006237872876225e-1

    r[ 329].Re=-5.2305546733209906662409593991469590e-1, .Im=-8.5216540539951157740006237872876225e-1

    r[ 330].Re=-9.9225551328425398711630123216309580e-1, .Im= 1.2337368156286183940029133054849807500e-1

    r[ 331].Re=-9.9225551328425398711630123216309580e-1, .Im=-1.2337368156286183940029133054849807500e-1

    r[ 332].Re= 7.2011669557778301697936740310979075e-1, .Im= 6.9361300896288879958007100867689585e-1

    r[ 333].Re= 7.2011669557778301697936740310979075e-1, .Im=-6.9361300896288879958007100867689585e-1

    r[ 334].Re=-2.358939908651433436936883936141384750e-1, .Im= 9.7164055230131951557126512852846640e-1

    r[ 335].Re=-2.358939908651433436936883936141384750e-1, .Im=-9.7164055230131951557126512852846640e-1

    r[ 336].Re=-8.4534330552574776795893285452621055e-1, .Im= 5.3402290543989561211191130496445110e-1

    r[ 337].Re=-8.4534330552574776795893285452621055e-1, .Im=-5.3402290543989561211191130496445110e-1

    r[ 338].Re= 1.760968458882456455505405301664723000e-1, .Im= 9.8422585654362948481832518154988065e-1

    r[ 339].Re= 1.760968458882456455505405301664723000e-1, .Im=-9.8422585654362948481832518154988065e-1

    r[ 340].Re= 9.231330325881682563604613278585020e-1, .Im= 3.84099728154852992911827413990977200e-1

    r[ 341].Re= 9.231330325881682563604613278585020e-1, .Im=-3.84099728154852992911827413990977200e-1

    r[ 342].Re= 5.0949249946728425442188381566666065e-1, .Im= 8.6029030685842056147549783418071455e-1

    r[ 343].Re= 5.0949249946728425442188381566666065e-1, .Im=-8.6029030685842056147549783418071455e-1

    r[ 344].Re=-3.55129268098902328709698394959559650e-1, .Im= 9.3468222308924864272228205663850530e-1

    r[ 345].Re=-3.55129268098902328709698394959559650e-1, .Im=-9.3468222308924864272228205663850530e-1

    r[ 346].Re=-9.4689012263202565478081851324532180e-1, .Im= 3.21199273284756670054918004097999050e-1

    r[ 347].Re=-9.4689012263202565478081851324532180e-1, .Im=-3.21199273284756670054918004097999050e-1

    r[ 348].Re= 9.5152611099284678530807468632701780e-1, .Im= 3.07138945155470799441843610111391150e-1

    r[ 349].Re= 9.5152611099284678530807468632701780e-1, .Im=-3.07138945155470799441843610111391150e-1

    r[ 350].Re= 2.347993240350876587019257613064837625e-1, .Im= 9.7189660537991229283250049775233490e-1

    r[ 351].Re= 2.347993240350876587019257613064837625e-1, .Im=-9.7189660537991229283250049775233490e-1

    r[ 352].Re=-7.3768822647425824623468315621721555e-1, .Im= 6.7496298708929491905195163781172595e-1

    r[ 353].Re=-7.3768822647425824623468315621721555e-1, .Im=-6.7496298708929491905195163781172595e-1

    r[ 354].Re= 8.2792411163021395470451579967630095e-1, .Im= 5.6056194712672080537885221929172985e-1

    r[ 355].Re= 8.2792411163021395470451579967630095e-1, .Im=-5.6056194712672080537885221929172985e-1

    r[ 356].Re=-9.7978072230002188902631132805254310e-1, .Im= 1.995014881119081540106208194629289125e-1

    r[ 357].Re=-9.7978072230002188902631132805254310e-1, .Im=-1.995014881119081540106208194629289125e-1

    r[ 358].Re= 4.331260796307849492148278613967704296875e-3, .Im= 9.998572102763776392464478703914210e-1

    r[ 359].Re= 4.331260796307849492148278613967704296875e-3, .Im=-9.998572102763776392464478703914210e-1

    r[ 360].Re=-5.9705315919558465953542736315284855e-1, .Im= 8.0205008574946312638331846756045705e-1

    r[ 361].Re=-5.9705315919558465953542736315284855e-1, .Im=-8.0205008574946312638331846756045705e-1

    r[ 362].Re= 9.8376474545966208218317206046776845e-1, .Im= 1.789606798420962929796473872556816750e-1

    r[ 363].Re= 9.8376474545966208218317206046776845e-1, .Im=-1.789606798420962929796473872556816750e-1

    r[ 364].Re=-8.2790859481818313003742559885722585e-1, .Im= 5.6066551159805411153058685158612205e-1

    r[ 365].Re=-8.2790859481818313003742559885722585e-1, .Im=-5.6066551159805411153058685158612205e-1

    r[ 366].Re= 6.1077934105641595863289694534614680e-1, .Im= 7.9161153253735583312789003684883935e-1

    r[ 367].Re= 6.1077934105641595863289694534614680e-1, .Im=-7.9161153253735583312789003684883935e-1

    r[ 368].Re= 3.3798805019562810914024453268211800e-1, .Im= 9.4098745001569195078872098747524430e-1

    r[ 369].Re= 3.3798805019562810914024453268211800e-1, .Im=-9.4098745001569195078872098747524430e-1

    r[ 370].Re=-4.75309135528598214470719085511518625e-1, .Im= 8.7967680974126138959690024421433915e-1

    r[ 371].Re=-4.75309135528598214470719085511518625e-1, .Im=-8.7967680974126138959690024421433915e-1

    r[ 372].Re= 8.0965290194138028745385327056283130e-1, .Im= 5.866365999379260509627442843338940e-1

    r[ 373].Re= 8.0965290194138028745385327056283130e-1, .Im=-5.866365999379260509627442843338940e-1

    r[ 374].Re=-9.8585180586088438925429500159225425e-1, .Im= 1.669919275564611116369206911258515875e-1

    r[ 375].Re=-9.8585180586088438925429500159225425e-1, .Im=-1.669919275564611116369206911258515875e-1

    r[ 376].Re=-1.385037387586727786192852818203391500e-1, .Im= 9.9022343088724362747399254658375865e-1

    r[ 377].Re=-1.385037387586727786192852818203391500e-1, .Im=-9.9022343088724362747399254658375865e-1

    r[ 378].Re= 6.2904161450619588968891093827551230e-1, .Im= 7.7717396489677970095044656773097810e-1

    r[ 379].Re= 6.2904161450619588968891093827551230e-1, .Im=-7.7717396489677970095044656773097810e-1

    r[ 380].Re=-7.927802331387625578429378947475925e-1, .Im= 6.0932728089352938827261141341296020e-1

    r[ 381].Re=-7.927802331387625578429378947475925e-1, .Im=-6.0932728089352938827261141341296020e-1

    r[ 382].Re= 9.9982957753877133022513135074404995e-1, .Im= 1.83485570280878182436445911207556484375e-2

    r[ 383].Re= 9.9982957753877133022513135074404995e-1, .Im=-1.83485570280878182436445911207556484375e-2

    r[ 384].Re=-2.92591978255289819621509650460211550e-1, .Im= 9.5610556261764934049551811767742035e-1

    r[ 385].Re=-2.92591978255289819621509650460211550e-1, .Im=-9.5610556261764934049551811767742035e-1

    r[ 386].Re=-9.1492031656305972120435399119742210e-1, .Im= 4.03348969205317819941569723596330725e-1

    r[ 387].Re=-9.1492031656305972120435399119742210e-1, .Im=-4.03348969205317819941569723596330725e-1

    r[ 388].Re= 1.1431428143207997272234877073060488125e-1, .Im= 9.9330386045166085828839186433469875e-1

    r[ 389].Re= 1.1431428143207997272234877073060488125e-1, .Im=-9.9330386045166085828839186433469875e-1

    r[ 390].Re= 8.2238102426924919452488893512054345e-1, .Im= 5.6865889098008381985493997490266335e-1

    r[ 391].Re= 8.2238102426924919452488893512054345e-1, .Im=-5.6865889098008381985493997490266335e-1

    r[ 392].Re= 8.3673152809769235638270856725284825e-1, .Im= 5.4731694760163285273790734208887440e-1

    r[ 393].Re= 8.3673152809769235638270856725284825e-1, .Im=-5.4731694760163285273790734208887440e-1

    r[ 394].Re=-9.9700488939784270847610514465486630e-1, .Im= 7.586240512106262601221828845154959375e-2

    r[ 395].Re=-9.9700488939784270847610514465486630e-1, .Im=-7.586240512106262601221828845154959375e-2

    r[ 396].Re=-3.48255518385441054096673951789853150e-1, .Im= 9.3727289599727658941930030778166835e-1

    r[ 397].Re=-3.48255518385441054096673951789853150e-1, .Im=-9.3727289599727658941930030778166835e-1

    r[ 398].Re= 3.48342172467517419143234747025417150e-1, .Im= 9.372150375724082049799790183897130e-1

    r[ 399].Re= 3.48342172467517419143234747025417150e-1, .Im=-9.372150375724082049799790183897130e-1

    r[ 400].Re=-6.6993214015934088312320682234712875e-1, .Im= 7.4226074919336371138456343032885340e-1

    r[ 401].Re=-6.6993214015934088312320682234712875e-1, .Im=-7.4226074919336371138456343032885340e-1

    r[ 402].Re= 9.7597370365799340774515258090104905e-1, .Im= 2.173617990100496777383654034565552125e-1

    r[ 403].Re= 9.7597370365799340774515258090104905e-1, .Im=-2.173617990100496777383654034565552125e-1

    r[ 404].Re=-4.16144362662996258883651989890495300e-1, .Im= 9.0916686413402236777159259872860275e-1

    r[ 405].Re=-4.16144362662996258883651989890495300e-1, .Im=-9.0916686413402236777159259872860275e-1

    r[ 406].Re= 5.2520711970240718802216406402294520e-1, .Im= 8.5078507742095144106286852547782470e-1

    r[ 407].Re= 5.2520711970240718802216406402294520e-1, .Im=-8.5078507742095144106286852547782470e-1

    r[ 408].Re=-8.8909371369550749264476507960353045e-1, .Im= 4.57496861770295470961400496889837075e-1

    r[ 409].Re=-8.8909371369550749264476507960353045e-1, .Im=-4.57496861770295470961400496889837075e-1

    r[ 410].Re= 2.03737029426579896451698914461303500e-1, .Im= 9.7888387636434937011387091843062080e-1

    r[ 411].Re= 2.03737029426579896451698914461303500e-1, .Im=-9.7888387636434937011387091843062080e-1

    r[ 412].Re= 9.4689347580342708710077204159460960e-1, .Im= 3.21091617139455054452668036901741275e-1

    r[ 413].Re= 9.4689347580342708710077204159460960e-1, .Im=-3.21091617139455054452668036901741275e-1

    r[ 414].Re=-9.594548018930307842211391289310995e-1, .Im= 2.81504686683573590588736124118440775e-1

    r[ 415].Re=-9.594548018930307842211391289310995e-1, .Im=-2.81504686683573590588736124118440775e-1

    r[ 416].Re=-9.105861992673504323736466403715894375e-2, .Im= 9.9572022781558866544315833380096590e-1

    r[ 417].Re=-9.105861992673504323736466403715894375e-2, .Im=-9.9572022781558866544315833380096590e-1

    r[ 418].Re= 7.1156948408875020373187680888804605e-1, .Im= 7.023795809006440071797783275542315e-1

    r[ 419].Re= 7.1156948408875020373187680888804605e-1, .Im=-7.023795809006440071797783275542315e-1

    r[ 420].Re=-6.7628356874910200424722006573574615e-1, .Im= 7.3648285105612643075545520332525480e-1

    r[ 421].Re=-6.7628356874910200424722006573574615e-1, .Im=-7.3648285105612643075545520332525480e-1

    r[ 422].Re= 9.5558135392062937274459955006022935e-1, .Im= 2.94298203784212564215749807772226625e-1

    r[ 423].Re= 9.5558135392062937274459955006022935e-1, .Im=-2.94298203784212564215749807772226625e-1

    r[ 424].Re=-7.7374892346235291107348075456684455e-1, .Im= 6.3330886236121908261509361182106655e-1

    r[ 425].Re=-7.7374892346235291107348075456684455e-1, .Im=-6.3330886236121908261509361182106655e-1

    r[ 426].Re= 4.40556635644766714232645199444959850e-1, .Im= 8.9756278815949652738481745473109185e-1

    r[ 427].Re= 4.40556635644766714232645199444959850e-1, .Im=-8.9756278815949652738481745473109185e-1

    r[ 428].Re=-1.403827898740900130547526458713036796875e-2, .Im= 9.9976495205497495355473347444785755e-1

    r[ 429].Re=-1.403827898740900130547526458713036796875e-2, .Im=-9.9976495205497495355473347444785755e-1

    r[ 430].Re=-9.9969578816187854020114400555030440e-1, .Im= 1.95990822987931884169299223685811734375e-2

    r[ 431].Re=-9.9969578816187854020114400555030440e-1, .Im=-1.95990822987931884169299223685811734375e-2

    r[ 432].Re= 8.9949173981039021175121206397307105e-1, .Im= 4.36574652078689007250744680277421125e-1

    r[ 433].Re= 8.9949173981039021175121206397307105e-1, .Im=-4.36574652078689007250744680277421125e-1

    r[ 434].Re=-4.83920704838303128436649558352655725e-1, .Im= 8.7498113240081698549488464777823535e-1

    r[ 435].Re=-4.83920704838303128436649558352655725e-1, .Im=-8.7498113240081698549488464777823535e-1

    r[ 436].Re= 7.5080935282877148129188071834505535e-1, .Im= 6.6027568699154948195229053453658705e-1

    r[ 437].Re= 7.5080935282877148129188071834505535e-1, .Im=-6.6027568699154948195229053453658705e-1

    r[ 438].Re=-6.308827494846971362107979075517505e-1, .Im= 7.7573311839514003107609596554539165e-1

    r[ 439].Re=-6.308827494846971362107979075517505e-1, .Im=-7.7573311839514003107609596554539165e-1

    r[ 440].Re= 1.1552689130719626109389253088011173125e-1, .Im= 9.9317130143104137562914957015891555e-1

    r[ 441].Re= 1.1552689130719626109389253088011173125e-1, .Im=-9.9317130143104137562914957015891555e-1

    r[ 442].Re=-9.0321087962915880265057921860716305e-1, .Im= 4.28959172621562023763885918015148475e-1

    r[ 443].Re=-9.0321087962915880265057921860716305e-1, .Im=-4.28959172621562023763885918015148475e-1

    r[ 444].Re= 9.9718429466032643126993662008317185e-1, .Im= 7.456595294003388885162308952203602500e-2

    r[ 445].Re= 9.9718429466032643126993662008317185e-1, .Im=-7.456595294003388885162308952203602500e-2

    r[ 446].Re=-2.239774776964716940241828524449374500e-1, .Im= 9.7445500429919185148008864416624415e-1

    r[ 447].Re=-2.239774776964716940241828524449374500e-1, .Im=-9.7445500429919185148008864416624415e-1

    r[ 448].Re= 5.7628727526486145382733639053185470e-1, .Im= 8.1705521604914788103002365460270080e-1

    r[ 449].Re= 5.7628727526486145382733639053185470e-1, .Im=-8.1705521604914788103002365460270080e-1

    r[ 450].Re=-9.6762589260314924022310378859401680e-1, .Im= 2.51992247058103580048538105984334825e-1

    r[ 451].Re=-9.6762589260314924022310378859401680e-1, .Im=-2.51992247058103580048538105984334825e-1

    r[ 452].Re= 2.8095376596713728112320040963822975e-1, .Im= 9.5957447878003576668959340167930345e-1

    r[ 453].Re= 2.8095376596713728112320040963822975e-1, .Im=-9.5957447878003576668959340167930345e-1

    r[ 454].Re= 9.1294224900290010804582152559305540e-1, .Im= 4.07712746903364342543341081182006725e-1

    r[ 455].Re= 9.1294224900290010804582152559305540e-1, .Im=-4.07712746903364342543341081182006725e-1

    r[ 456].Re=-5.6213553253602888126749803632264955e-1, .Im= 8.2689289370743213059000709108659065e-1

    r[ 457].Re=-5.6213553253602888126749803632264955e-1, .Im=-8.2689289370743213059000709108659065e-1

    r[ 458].Re=-8.4988293529265646064629891043296080e-1, .Im= 5.2676713129067909147096315791714005e-1

    r[ 459].Re=-8.4988293529265646064629891043296080e-1, .Im=-5.2676713129067909147096315791714005e-1

    r[ 460].Re= 5.9515574585144148667126273721805770e-1, .Im= 8.0342666384966943127210470265708860e-1

    r[ 461].Re= 5.9515574585144148667126273721805770e-1, .Im=-8.0342666384966943127210470265708860e-1

    r[ 462].Re=-3.10105888714571453768087394564645350e-1, .Im= 9.5056625601472422015802976602572015e-1

    r[ 463].Re=-3.10105888714571453768087394564645350e-1, .Im=-9.5056625601472422015802976602572015e-1

    r[ 464].Re= 9.6823659768098668809699347548303190e-1, .Im= 2.495197166844886071945808225791552000e-1

    r[ 465].Re= 9.6823659768098668809699347548303190e-1, .Im=-2.495197166844886071945808225791552000e-1

    r[ 466].Re=-9.6731096293727758528291360562434415e-1, .Im= 2.53170334639982730351448481087572850e-1

    r[ 467].Re=-9.6731096293727758528291360562434415e-1, .Im=-2.53170334639982730351448481087572850e-1

    r[ 468].Re= 2.466863373836548634088217113458085750e-1, .Im= 9.6894977666221338008512020678608675e-1

    r[ 469].Re= 2.466863373836548634088217113458085750e-1, .Im=-9.6894977666221338008512020678608675e-1

    r[ 470].Re=-1.759950731312491245539320061652688250e-1, .Im= 9.8425446860572085583385160134639590e-1

    r[ 471].Re=-1.759950731312491245539320061652688250e-1, .Im=-9.8425446860572085583385160134639590e-1

    r[ 472].Re= 7.3357541543652182713941556357895020e-1, .Im= 6.793659950864258112446236737014260e-1

    r[ 473].Re= 7.3357541543652182713941556357895020e-1, .Im=-6.793659950864258112446236737014260e-1

    r[ 474].Re= 9.7781129532203026055725558762787840e-1, .Im= 2.089973189574196310580589397432049625e-1

    r[ 475].Re= 9.7781129532203026055725558762787840e-1, .Im=-2.089973189574196310580589397432049625e-1

    r[ 476].Re=-8.7995368236301507725016790573135945e-1, .Im= 4.74827688921049706483046293215011225e-1

    r[ 477].Re=-8.7995368236301507725016790573135945e-1, .Im=-4.74827688921049706483046293215011225e-1

    r[ 478].Re=-3.76794158955883362605021602576016425e-1, .Im= 9.2617182346352289190605233670794405e-1

    r[ 479].Re=-3.76794158955883362605021602576016425e-1, .Im=-9.2617182346352289190605233670794405e-1

    r[ 480].Re=-9.748846849498254973909183718205895e-1, .Im= 2.22243838860671061308238449782948000e-1

    r[ 481].Re=-9.748846849498254973909183718205895e-1, .Im=-2.22243838860671061308238449782948000e-1

    r[ 482].Re= 4.8612010402091349048347979078243950e-1, .Im= 8.7371373616463121614117426361190155e-1

    r[ 483].Re= 4.8612010402091349048347979078243950e-1, .Im=-8.7371373616463121614117426361190155e-1

    r[ 484].Re= 8.5880774762066047767206100616022010e-1, .Im= 5.1200658100451290621890620968770235e-1

    r[ 485].Re= 8.5880774762066047767206100616022010e-1, .Im=-5.1200658100451290621890620968770235e-1

    r[ 486].Re=-7.217927936844006353567237965762615e-1, .Im= 6.9195138367394903866625099908560510e-1

    r[ 487].Re=-7.217927936844006353567237965762615e-1, .Im=-6.9195138367394903866625099908560510e-1

    r[ 488].Re= 2.64448177612893187138354278431506825e-1, .Im= 9.6425616934755919995581052717170675e-1

    r[ 489].Re= 2.64448177612893187138354278431506825e-1, .Im=-9.6425616934755919995581052717170675e-1

    r[ 490].Re=-1.1663244361400298965136812512355390625e-1, .Im= 9.9304874922784314161816610067035070e-1

    r[ 491].Re=-1.1663244361400298965136812512355390625e-1, .Im=-9.9304874922784314161816610067035070e-1

    r[ 492].Re= 6.796118716221319355774710402329219375e-2, .Im= 9.9754563828830422611559924916946325e-1

    r[ 493].Re= 6.796118716221319355774710402329219375e-2, .Im=-9.9754563828830422611559924916946325e-1

    r[ 494].Re=-9.9903201981921674335040961523191070e-1, .Im= 4.1622750949317319224540767663711446875e-2

    r[ 495].Re=-9.9903201981921674335040961523191070e-1, .Im=-4.1622750949317319224540767663711446875e-2

    r[ 496].Re= 9.9753637855869647932394173039938320e-1, .Im= 6.968541275731218731515070885507156875e-2

    r[ 497].Re= 9.9753637855869647932394173039938320e-1, .Im=-6.968541275731218731515070885507156875e-2

    r[ 498].Re=-6.0293484859114021556791840339428745e-1, .Im= 7.9763403333529436789461897205910645e-1

    r[ 499].Re=-6.0293484859114021556791840339428745e-1, .Im=-7.9763403333529436789461897205910645e-1

    r[ 500].Re= 6.7901498112188718447868041039328090e-1, .Im= 7.3390349276970323622037994937272740e-1

    r[ 501].Re= 6.7901498112188718447868041039328090e-1, .Im=-7.3390349276970323622037994937272740e-1

    r[ 502].Re= 8.9297508017484716891232210400630715e-1, .Im= 4.49760995857530765373866188383544775e-1

    r[ 503].Re= 8.9297508017484716891232210400630715e-1, .Im=-4.49760995857530765373866188383544775e-1

    r[ 504].Re=-8.2236831380059383089786706477752885e-1, .Im= 5.6876431541566463412351595252403055e-1

    r[ 505].Re=-8.2236831380059383089786706477752885e-1, .Im=-5.6876431541566463412351595252403055e-1

    r[ 506].Re= 2.490673705704960216866794553425279375e-1, .Im= 9.6833027746732447393895881759817710e-1

    r[ 507].Re= 2.490673705704960216866794553425279375e-1, .Im=-9.6833027746732447393895881759817710e-1

    r[ 508].Re=-5.0836049627627211133784612684394230e-1, .Im= 8.6099853822062322183938931630109435e-1

    r[ 509].Re=-5.0836049627627211133784612684394230e-1, .Im=-8.6099853822062322183938931630109435e-1

    r[ 510].Re= 7.8147032758068601943080011551501225e-1, .Im= 6.2368169907742576629772202068124895e-1

    r[ 511].Re= 7.8147032758068601943080011551501225e-1, .Im=-6.2368169907742576629772202068124895e-1

    r[ 512].Re=-9.3618313655497054082132990515674460e-1, .Im= 3.51188868837600809413856950413901350e-1

    r[ 513].Re=-9.3618313655497054082132990515674460e-1, .Im=-3.51188868837600809413856950413901350e-1

    r[ 514].Re= 4.3395697760366930273434604714566375e-1, .Im= 9.0077528348699098525997897013439795e-1

    r[ 515].Re= 4.3395697760366930273434604714566375e-1, .Im=-9.0077528348699098525997897013439795e-1

    r[ 516].Re= 9.8546295106422321374850525899091735e-1, .Im= 1.693138399403073257598606460305745625e-1

    r[ 517].Re= 9.8546295106422321374850525899091735e-1, .Im=-1.693138399403073257598606460305745625e-1

    r[ 518].Re=-2.084427538444574012910237570395111000e-1, .Im= 9.7790966176251492569804213417228310e-1

    r[ 519].Re=-2.084427538444574012910237570395111000e-1, .Im=-9.7790966176251492569804213417228310e-1

    r[ 520].Re= 2.58537048316304751693905927822925150e-1, .Im= 9.6585711459650747112704038954689165e-1

    r[ 521].Re= 2.58537048316304751693905927822925150e-1, .Im=-9.6585711459650747112704038954689165e-1

    r[ 522].Re=-9.9015919638860927509682596792117690e-1, .Im= 1.391708653430917541626854472269769750e-1

    r[ 523].Re=-9.9015919638860927509682596792117690e-1, .Im=-1.391708653430917541626854472269769750e-1

    r[ 524].Re=-6.5155093860545487682855991806718520e-1, .Im= 7.5844259716458872766509102802956475e-1

    r[ 525].Re=-6.5155093860545487682855991806718520e-1, .Im=-7.5844259716458872766509102802956475e-1

    r[ 526].Re= 9.4041588381763452364481281620101070e-1, .Im= 3.39590638669499567114939964085351675e-1

    r[ 527].Re= 9.4041588381763452364481281620101070e-1, .Im=-3.39590638669499567114939964085351675e-1

    r[ 528].Re=-4.38287137581776786721121652590227300e-1, .Im= 8.986971461295769625365892352419905e-1

    r[ 529].Re=-4.38287137581776786721121652590227300e-1, .Im=-8.986971461295769625365892352419905e-1

    r[ 530].Re= 6.5716160825275149459656631734105755e-1, .Im= 7.5353530987115902028961045289179310e-1

    r[ 531].Re= 6.5716160825275149459656631734105755e-1, .Im=-7.5353530987115902028961045289179310e-1

    r[ 532].Re=-8.6376178022360194930229226883966475e-1, .Im= 5.0366705386824595080952349235303695e-1

    r[ 533].Re=-8.6376178022360194930229226883966475e-1, .Im=-5.0366705386824595080952349235303695e-1

    r[ 534].Re=-6.785631396034649820414585974504006875e-2, .Im= 9.975587467013786735492431034799665e-1

    r[ 535].Re=-6.785631396034649820414585974504006875e-2, .Im=-9.975587467013786735492431034799665e-1

    r[ 536].Re= 7.6517462735971641940579957008594645e-1, .Im= 6.4357723358969876059632042597513645e-1

    r[ 537].Re= 7.6517462735971641940579957008594645e-1, .Im=-6.4357723358969876059632042597513645e-1

    r[ 538].Re=-9.961112198396707695380314362409990e-1, .Im= 8.683818434420045861976689138828078125e-2

    r[ 539].Re=-9.961112198396707695380314362409990e-1, .Im=-8.683818434420045861976689138828078125e-2

    r[ 540].Re= 5.4691821097756398994960136406007220e-1, .Im= 8.3699539990594540306290127773536365e-1

    r[ 541].Re= 5.4691821097756398994960136406007220e-1, .Im=-8.3699539990594540306290127773536365e-1

    r[ 542].Re=-7.1411479783084352845889952732250090e-1, .Im= 6.9987450649644156186468535452149805e-1

    r[ 543].Re=-7.1411479783084352845889952732250090e-1, .Im=-6.9987450649644156186468535452149805e-1

    r[ 544].Re= 9.9878927882448675923399150633485985e-1, .Im= 4.8917803396269880777946781336140700000e-2

    r[ 545].Re= 9.9878927882448675923399150633485985e-1, .Im=-4.8917803396269880777946781336140700000e-2

    r[ 546].Re=-2.76147993133166069767980843607801925e-1, .Im= 9.6099119779402253360700569828622970e-1

    r[ 547].Re=-2.76147993133166069767980843607801925e-1, .Im=-9.6099119779402253360700569828622970e-1

    r[ 548].Re= 8.627493352746089250171479534401441875e-2, .Im= 9.9613170884831148121918431570520620e-1

    r[ 549].Re= 8.627493352746089250171479534401441875e-2, .Im=-9.9613170884831148121918431570520620e-1

    r[ 550].Re=-9.2593380922288714973689138787449335e-1, .Im= 3.77414825927000596728078107844339675e-1

    r[ 551].Re=-9.2593380922288714973689138787449335e-1, .Im=-3.77414825927000596728078107844339675e-1

    r[ 552].Re= 8.6683746175055953475663272911333475e-1, .Im= 4.98261334608256389877567471557995300e-1

    r[ 553].Re= 8.6683746175055953475663272911333475e-1, .Im=-4.98261334608256389877567471557995300e-1

    r[ 554].Re= 5.6971220403867046944146323994573321875e-2, .Im= 9.9823126754385327341623224128852595e-1

    r[ 555].Re= 5.6971220403867046944146323994573321875e-2, .Im=-9.9823126754385327341623224128852595e-1

    r[ 556].Re=-7.8903259598183062006881982597406020e-1, .Im= 6.1417033190774639184184024998103265e-1

    r[ 557].Re=-7.8903259598183062006881982597406020e-1, .Im=-6.1417033190774639184184024998103265e-1

    r[ 558].Re= 9.5876519584492148062793148710625245e-1, .Im= 2.83737628371093286716586590046063050e-1

    r[ 559].Re= 9.5876519584492148062793148710625245e-1, .Im=-2.83737628371093286716586590046063050e-1

    r[ 560].Re=-4.91390688993366464565326623414875925e-1, .Im= 8.7080020824180470739861448237206785e-1

    r[ 561].Re=-4.91390688993366464565326623414875925e-1, .Im=-8.7080020824180470739861448237206785e-1

    r[ 562].Re= 5.0527836811913917625105341357993890e-1, .Im= 8.6278379035699248600366217942791990e-1

    r[ 563].Re= 5.0527836811913917625105341357993890e-1, .Im=-8.6278379035699248600366217942791990e-1

    r[ 564].Re=-9.5038058657637991544220312789548185e-1, .Im= 3.10749569861781926860544444934930650e-1

    r[ 565].Re=-9.5038058657637991544220312789548185e-1, .Im=-3.10749569861781926860544444934930650e-1

    r[ 566].Re= 9.1979299630589417269277419109130275e-1, .Im= 3.92007201588513598533580761795747075e-1

    r[ 567].Re= 9.1979299630589417269277419109130275e-1, .Im=-3.92007201588513598533580761795747075e-1

    r[ 568].Re=-2.442294393286965348277561815848457625e-1, .Im= 9.6958631164124775558832425303990020e-1

    r[ 569].Re=-2.442294393286965348277561815848457625e-1, .Im=-9.6958631164124775558832425303990020e-1

    r[ 570].Re= 6.8707251111516232100484558031894265e-1, .Im= 7.2638044386223188375595327670453115e-1

    r[ 571].Re= 6.8707251111516232100484558031894265e-1, .Im=-7.2638044386223188375595327670453115e-1

    r[ 572].Re= 3.8931375894538994275606569317460525e-1, .Im= 9.2094772832533855488890139895374885e-1

    r[ 573].Re= 3.8931375894538994275606569317460525e-1, .Im=-9.2094772832533855488890139895374885e-1

    r[ 574].Re=-5.8918008688329193134336492221336810e-1, .Im= 8.0785805313653114012595324311405420e-1

    r[ 575].Re=-5.8918008688329193134336492221336810e-1, .Im=-8.0785805313653114012595324311405420e-1

    r[ 576].Re= 2.88233625909755757088515082386948046875e-2, .Im= 9.9945428480770648338449291259166780e-1

    r[ 577].Re= 2.88233625909755757088515082386948046875e-2, .Im=-9.9945428480770648338449291259166780e-1

    r[ 578].Re=-9.8284653821293166409134300920413805e-1, .Im= 1.838828577897832772247710408919374375e-1

    r[ 579].Re=-9.8284653821293166409134300920413805e-1, .Im=-1.838828577897832772247710408919374375e-1

    r[ 580].Re= 9.8897913647254775959538619645172730e-1, .Im= 1.47555064584539208372149232673109500e-1

    r[ 581].Re= 9.8897913647254775959538619645172730e-1, .Im=-1.47555064584539208372149232673109500e-1

    r[ 582].Re=-8.3200986248908437303839491505641490e-1, .Im= 5.5457332555805771701074036172940395e-1

    r[ 583].Re=-8.3200986248908437303839491505641490e-1, .Im=-5.5457332555805771701074036172940395e-1

    r[ 584].Re= 7.9279869383430945362079000915400680e-1, .Im= 6.0922265751853932336246089107589795e-1

    r[ 585].Re= 7.9279869383430945362079000915400680e-1, .Im=-6.0922265751853932336246089107589795e-1

    r[ 586].Re= 4.54798801231171667680541759182233350e-1, .Im= 8.9042011646991814366458584117935970e-1

    r[ 587].Re= 4.54798801231171667680541759182233350e-1, .Im=-8.9042011646991814366458584117935970e-1

    r[ 588].Re=-7.35212918964596173765357889351435e-1, .Im= 6.7768003046817715251393110520439220e-1

    r[ 589].Re=-7.35212918964596173765357889351435e-1, .Im=-6.7768003046817715251393110520439220e-1

    r[ 590].Re=-3.30974608128725478195519826840609300e-1, .Im= 9.4350993774914393430464087941800240e-1

    r[ 591].Re=-3.30974608128725478195519826840609300e-1, .Im=-9.4350993774914393430464087941800240e-1

    r[ 592].Re=-9.7150048701139102291790550225414335e-1, .Im= 2.365529518531963859562239349543233375e-1

    r[ 593].Re=-9.7150048701139102291790550225414335e-1, .Im=-2.365529518531963859562239349543233375e-1

    r[ 594].Re= 9.8525696657309591586226815707050260e-1, .Im= 1.705272877895772365430815398212871500e-1

    r[ 595].Re= 9.8525696657309591586226815707050260e-1, .Im=-1.705272877895772365430815398212871500e-1

    r[ 596].Re= 5.9417345872510385351716877266881055e-1, .Im= 8.0414601676621733084004972624825310e-1

    r[ 597].Re= 5.9417345872510385351716877266881055e-1, .Im=-8.0414601676621733084004972624825310e-1

    r[ 598].Re=-8.617124400330819500304357916320441250e-2, .Im= 9.961480478503250690636150466161780e-1

    r[ 599].Re=-8.617124400330819500304357916320441250e-2, .Im=-9.961480478503250690636150466161780e-1

    r[ 600].Re=-5.1678619237600664781950854376191270e-1, .Im= 8.5598321248896647173154406118555925e-1

    r[ 601].Re=-5.1678619237600664781950854376191270e-1, .Im=-8.5598321248896647173154406118555925e-1

    r[ 602].Re=-9.1243289155455653549608996399911120e-1, .Im= 4.08943310063814513544144801926449850e-1

    r[ 603].Re=-9.1243289155455653549608996399911120e-1, .Im=-4.08943310063814513544144801926449850e-1

    r[ 604].Re= 8.5310124082816773949389244080521165e-1, .Im= 5.2144712462645814721184933659969825e-1

    r[ 605].Re= 8.5310124082816773949389244080521165e-1, .Im=-5.2144712462645814721184933659969825e-1

    r[ 606].Re= 1.905369143785790309042482704171561625e-1, .Im= 9.81543313683410079129032510536490e-1

    r[ 607].Re= 1.905369143785790309042482704171561625e-1, .Im=-9.81543313683410079129032510536490e-1

    r[ 608].Re=-2.465909745518032880617909086140571125e-1, .Im= 9.689923067408521273335963996942155e-1

    r[ 609].Re=-2.465909745518032880617909086140571125e-1, .Im=-9.689923067408521273335963996942155e-1

    r[ 610].Re=-6.2898994550892806110198307578684760e-1, .Im= 7.7726507923606169558894407600746490e-1

    r[ 611].Re=-6.2898994550892806110198307578684760e-1, .Im=-7.7726507923606169558894407600746490e-1

    r[ 612].Re= 9.9504557496836898433656415363657285e-1, .Im= 9.895471585107495915423214682959951250e-2

    r[ 613].Re= 9.9504557496836898433656415363657285e-1, .Im=-9.895471585107495915423214682959951250e-2

    r[ 614].Re=-9.98170198505961892010418523568660e-1, .Im= 5.8758513212579507878352558236656475000e-2

    r[ 615].Re=-9.98170198505961892010418523568660e-1, .Im=-5.8758513212579507878352558236656475000e-2

    r[ 616].Re= 7.6832868639592344361943787589552810e-1, .Im= 6.3981942393036472793710345285944640e-1

    r[ 617].Re= 7.6832868639592344361943787589552810e-1, .Im=-6.3981942393036472793710345285944640e-1

    r[ 618].Re= 3.31063406905940271762744941952405475e-1, .Im= 9.4345403109151049214631257200380785e-1

    r[ 619].Re= 3.31063406905940271762744941952405475e-1, .Im=-9.4345403109151049214631257200380785e-1

    r[ 620].Re=-7.9797464143024809946069808574975465e-1, .Im= 6.0249406141195549491129668240319005e-1

    r[ 621].Re=-7.9797464143024809946069808574975465e-1, .Im=-6.0249406141195549491129668240319005e-1

    r[ 622].Re= 1.579870459193827569865931081949383875e-1, .Im= 9.8729895559516300806990329874679445e-1

    r[ 623].Re= 1.579870459193827569865931081949383875e-1, .Im=-9.8729895559516300806990329874679445e-1

    r[ 624].Re= 8.8168661911480072923552597785601390e-1, .Im= 4.71494622481028635707644980357144950e-1

    r[ 625].Re= 8.8168661911480072923552597785601390e-1, .Im=-4.71494622481028635707644980357144950e-1

    r[ 626].Re= 4.9253134909863449664157997176516800e-1, .Im= 8.7011056803881314802850965861580330e-1

    r[ 627].Re= 4.9253134909863449664157997176516800e-1, .Im=-8.7011056803881314802850965861580330e-1

    r[ 628].Re=-8.8455544951718345636493268102640285e-1, .Im= 4.66194796156669477582568106299731875e-1

    r[ 629].Re=-8.8455544951718345636493268102640285e-1, .Im=-4.66194796156669477582568106299731875e-1

    r[ 630].Re=-3.86984194250912627577321245553321200e-1, .Im= 9.2195198035837855332630397242610340e-1

    r[ 631].Re=-3.86984194250912627577321245553321200e-1, .Im=-9.2195198035837855332630397242610340e-1

    r[ 632].Re= 9.3789939712875125543689591722795735e-1, .Im= 3.46497670920526190663224497257033350e-1

    r[ 633].Re= 9.3789939712875125543689591722795735e-1, .Im=-3.46497670920526190663224497257033350e-1

    r[ 634].Re=-9.9934702531297381344899122268543575e-1, .Im= 3.3068750158946239037227599055768221875e-2

    r[ 635].Re=-9.9934702531297381344899122268543575e-1, .Im=-3.3068750158946239037227599055768221875e-2

    r[ 636].Re=-1.324379022009379569535525433821021500e-1, .Im= 9.9105358034445578674365151528036220e-1

    r[ 637].Re=-1.324379022009379569535525433821021500e-1, .Im=-9.9105358034445578674365151528036220e-1

    r[ 638].Re= 6.6541824742916355628352675921632905e-1, .Im= 7.462505352010423420594520393933635e-1

    r[ 639].Re= 6.6541824742916355628352675921632905e-1, .Im=-7.462505352010423420594520393933635e-1

    r[ 640].Re=-7.2263584093089605620008342157234435e-1, .Im= 6.9107486245834415239386316898162475e-1

    r[ 641].Re=-7.2263584093089605620008342157234435e-1, .Im=-6.9107486245834415239386316898162475e-1

    r[ 642].Re= 9.9346589295421061649449256947264075e-1, .Im= 1.1356506515434081072690730707108741250e-1

    r[ 643].Re= 9.9346589295421061649449256947264075e-1, .Im=-1.1356506515434081072690730707108741250e-1

    r[ 644].Re=-5.5603929797556395087099190277513115e-1, .Im= 8.3100794741563499545833337833755645e-1

    r[ 645].Re=-5.5603929797556395087099190277513115e-1, .Im=-8.3100794741563499545833337833755645e-1

    r[ 646].Re= 3.19482709333449910182878284103935575e-1, .Im= 9.4743606625825649292238495036144740e-1

    r[ 647].Re= 3.19482709333449910182878284103935575e-1, .Im=-9.4743606625825649292238495036144740e-1

    r[ 648].Re=-9.1786283188621309303556472514173945e-1, .Im= 3.96607394423819925588503565450082525e-1

    r[ 649].Re=-9.1786283188621309303556472514173945e-1, .Im=-3.96607394423819925588503565450082525e-1

    r[ 650].Re= 7.8755905345846688447863925830461080e-1, .Im= 6.1599050984574144074201740295393390e-1

    r[ 651].Re= 7.8755905345846688447863925830461080e-1, .Im=-6.1599050984574144074201740295393390e-1

    r[ 652].Re= 6.0495278621697523568911947222659360e-1, .Im= 7.9607482639583904138191883248509835e-1

    r[ 653].Re= 6.0495278621697523568911947222659360e-1, .Im=-7.9607482639583904138191883248509835e-1

    r[ 654].Re=-7.4672169743233707261964582357904870e-1, .Im= 6.6496292844816295986021259523113255e-1

    r[ 655].Re=-7.4672169743233707261964582357904870e-1, .Im=-6.6496292844816295986021259523113255e-1

    r[ 656].Re=-1.33654008877120505927038607296708500e-1, .Im= 9.9089928860317022518700014188652855e-1

    r[ 657].Re=-1.33654008877120505927038607296708500e-1, .Im=-9.9089928860317022518700014188652855e-1

    r[ 658].Re= 1.519378770805241141150787598235183375e-1, .Im= 9.8824941529581000754234310079482380e-1

    r[ 659].Re= 1.519378770805241141150787598235183375e-1, .Im=-9.8824941529581000754234310079482380e-1

    r[ 660].Re=-9.5483916400034618554570897686062380e-1, .Im= 2.96736057159524557746976825001183875e-1

    r[ 661].Re=-9.5483916400034618554570897686062380e-1, .Im=-2.96736057159524557746976825001183875e-1

    r[ 662].Re= 9.6315877526275317510595641579129730e-1, .Im= 2.6844932529079218452849886489275375e-1

    r[ 663].Re= 9.6315877526275317510595641579129730e-1, .Im=-2.6844932529079218452849886489275375e-1

    r[ 664].Re=-4.23911454609236681978501337653142400e-1, .Im= 9.0557227466054057707367519469698890e-1

    r[ 665].Re=-4.23911454609236681978501337653142400e-1, .Im=-9.0557227466054057707367519469698890e-1

    r[ 666].Re= 8.5628004501072352283586042176466435e-1, .Im= 5.1621318642586822011963931799982670e-1

    r[ 667].Re= 8.5628004501072352283586042176466435e-1, .Im=-5.1621318642586822011963931799982670e-1

    r[ 668].Re=-9.7854106525647577274895638765883630e-1, .Im= 2.054970200732273988286635812983149625e-1

    r[ 669].Re=-9.7854106525647577274895638765883630e-1, .Im=-2.054970200732273988286635812983149625e-1

    r[ 670].Re= 4.18436443393493340270339331254945125e-1, .Im= 9.0808166168661885730983840403496285e-1

    r[ 671].Re= 4.18436443393493340270339331254945125e-1, .Im=-9.0808166168661885730983840403496285e-1

    r[ 672].Re=-6.2421853876214905554320466762874275e-1, .Im= 7.8110351272704192648888010808150280e-1

    r[ 673].Re=-6.2421853876214905554320466762874275e-1, .Im=-7.8110351272704192648888010808150280e-1

    r[ 674].Re= 9.7210546709738188120297763816779475e-1, .Im= 2.340703760620292395167041377135319625e-1

    r[ 675].Re= 9.7210546709738188120297763816779475e-1, .Im=-2.340703760620292395167041377135319625e-1

    r[ 676].Re=-5.1979809855862334211362707492298793750e-2, .Im= 9.9851482384342693521261935529764740e-1

    r[ 677].Re=-5.1979809855862334211362707492298793750e-2, .Im=-9.9851482384342693521261935529764740e-1

    r[ 678].Re=-8.0890635557721390913599179839366115e-1, .Im= 5.8773494889976696242683829041197895e-1

    r[ 679].Re=-8.0890635557721390913599179839366115e-1, .Im=-5.8773494889976696242683829041197895e-1

    r[ 680].Re= 6.7632752158841624723351060310960745e-1, .Im= 7.3638704330243898166230565038858910e-1

    r[ 681].Re= 6.7632752158841624723351060310960745e-1, .Im=-7.3638704330243898166230565038858910e-1

    r[ 682].Re= 9.9952674909713423723189862357685340e-1, .Im= 3.05788737998181868460445542723391546875e-2

    r[ 683].Re= 9.9952674909713423723189862357685340e-1, .Im=-3.05788737998181868460445542723391546875e-2

    r[ 684].Re=-9.9283862624183361056395824562059715e-1, .Im= 1.1851281383869900765137828102524508125e-1

    r[ 685].Re=-9.9283862624183361056395824562059715e-1, .Im=-1.1851281383869900765137828102524508125e-1

    r[ 686].Re=-1.735702942234846335445297427213517875e-1, .Im= 9.8468869940090730796811158143100325e-1

    r[ 687].Re=-1.735702942234846335445297427213517875e-1, .Im=-9.8468869940090730796811158143100325e-1

    r[ 688].Re= 3.94947344077361262026926169710350200e-1, .Im= 9.1854681976603869131281498994212595e-1

    r[ 689].Re= 3.94947344077361262026926169710350200e-1, .Im=-9.1854681976603869131281498994212595e-1

    r[ 690].Re= 1.313191980510033662898905504334834375e-1, .Im= 9.9119114379444894780135655310004945e-1

    r[ 691].Re= 1.313191980510033662898905504334834375e-1, .Im=-9.9119114379444894780135655310004945e-1

    r[ 692].Re=-8.6066152637093107369281597129884175e-1, .Im= 5.0894632680484186426639325873111370e-1

    r[ 693].Re=-8.6066152637093107369281597129884175e-1, .Im=-5.0894632680484186426639325873111370e-1

    r[ 694].Re= 8.1322926909435377940127409601700490e-1, .Im= 5.8166673435907945144407449333812110e-1

    r[ 695].Re= 8.1322926909435377940127409601700490e-1, .Im=-5.8166673435907945144407449333812110e-1

    r[ 696].Re=-4.47059003819297695603296460831188575e-1, .Im= 8.9436724325768002241687781861401160e-1

    r[ 697].Re=-4.47059003819297695603296460831188575e-1, .Im=-8.9436724325768002241687781861401160e-1

    r[ 698].Re= 7.2520211792163380426501362308044915e-1, .Im= 6.8830012445097366047264131339034065e-1

    r[ 699].Re= 7.2520211792163380426501362308044915e-1, .Im=-6.8830012445097366047264131339034065e-1

    r[ 700].Re=-9.3401445525748882925398675070027820e-1, .Im= 3.56914458697255854158214560811757100e-1

    r[ 701].Re=-9.3401445525748882925398675070027820e-1, .Im=-3.56914458697255854158214560811757100e-1

    r[ 702].Re=-1.928345462379443264744338648597477000e-1, .Im= 9.8109354006877025344834919451386665e-1

    r[ 703].Re=-1.928345462379443264744338648597477000e-1, .Im=-9.8109354006877025344834919451386665e-1

    r[ 704].Re= 9.1443010828050363958396928865113295e-1, .Im= 4.04369516135049456018180080718593650e-1

    r[ 705].Re= 9.1443010828050363958396928865113295e-1, .Im=-4.04369516135049456018180080718593650e-1

    r[ 706].Re=-6.7987417072144007423872835715883410e-1, .Im= 7.3316157138637305656914122664602470e-1

    r[ 707].Re=-6.7987417072144007423872835715883410e-1, .Im=-7.3316157138637305656914122664602470e-1

    r[ 708].Re= 3.10198706110982824757371645318926300e-1, .Im= 9.5051609878802190145563599799061190e-1

    r[ 709].Re= 3.10198706110982824757371645318926300e-1, .Im=-9.5051609878802190145563599799061190e-1

    r[ 710].Re= 9.4923500592694431965412604768062010e-1, .Im= 3.14119983114467538065639473643386725e-1

    r[ 711].Re= 9.4923500592694431965412604768062010e-1, .Im=-3.14119983114467538065639473643386725e-1

    r[ 712].Re=-9.9946490293247369773865784736699420e-1, .Im= 2.93819760289022388621837933442293421875e-2

    r[ 713].Re=-9.9946490293247369773865784736699420e-1, .Im=-2.93819760289022388621837933442293421875e-2

    r[ 714].Re=-3.69981912911176880065511340944794925e-1, .Im= 9.289089358698128240376945541356690e-1

    r[ 715].Re=-3.69981912911176880065511340944794925e-1, .Im=-9.289089358698128240376945541356690e-1

    r[ 716].Re= 5.5712591880251627340925324460840780e-1, .Im= 8.302336604977326173226970240648370e-1

    r[ 717].Re= 5.5712591880251627340925324460840780e-1, .Im=-8.302336604977326173226970240648370e-1

    r[ 718].Re=-9.6149013883922118672842316300375385e-1, .Im= 2.74448046691567970611913551692850875e-1

    r[ 719].Re=-9.6149013883922118672842316300375385e-1, .Im=-2.74448046691567970611913551692850875e-1

    r[ 720].Re= 1.89679593364047065565114458252082832031250e-3, .Im= 9.9986525654446978261802314591477625e-1

    r[ 721].Re= 1.89679593364047065565114458252082832031250e-3, .Im=-9.9986525654446978261802314591477625e-1

    r[ 722].Re= 8.9625378426517887664459749430534425e-1, .Im= 4.4317922532198766871758266461256425e-1

    r[ 723].Re= 8.9625378426517887664459749430534425e-1, .Im=-4.4317922532198766871758266461256425e-1

    r[ 724].Re=-5.7823716834073990433751077944179995e-1, .Im= 8.1571811441304942214003403933020305e-1

    r[ 725].Re=-5.7823716834073990433751077944179995e-1, .Im=-8.1571811441304942214003403933020305e-1

    r[ 726].Re= 7.4101220231572306751388623524690045e-1, .Im= 6.7124634799985927191556811521877530e-1

    r[ 727].Re= 7.4101220231572306751388623524690045e-1, .Im=-6.7124634799985927191556811521877530e-1

    r[ 728].Re=-7.7685100572306864386007418943336230e-1, .Im= 6.2951530418490242446694082900648935e-1

    r[ 729].Re=-7.7685100572306864386007418943336230e-1, .Im=-6.2951530418490242446694082900648935e-1

    r[ 730].Re= 3.3729710168268769998611844584956996875e-2, .Im= 9.9929978209851866299828770934254860e-1

    r[ 731].Re= 3.3729710168268769998611844584956996875e-2, .Im=-9.9929978209851866299828770934254860e-1

    r[ 732].Re= 9.9825251243172807846804062137380240e-1, .Im= 5.8698136376093716648494336141084203125e-2

    r[ 733].Re= 9.9825251243172807846804062137380240e-1, .Im=-5.8698136376093716648494336141084203125e-2

    r[ 734].Re=-3.67691922203141230429679353619576425e-1, .Im= 9.2980682381949841808221890460117720e-1

    r[ 735].Re=-3.67691922203141230429679353619576425e-1, .Im=-9.2980682381949841808221890460117720e-1

    r[ 736].Re=-8.946292577593361050602993600477930e-1, .Im= 4.46570885287661478724174912713351650e-1

    r[ 737].Re=-8.946292577593361050602993600477930e-1, .Im=-4.46570885287661478724174912713351650e-1

    r[ 738].Re= 5.3249198115548146414965913209016430e-1, .Im= 8.4626110205012894383003185794223095e-1

    r[ 739].Re= 5.3249198115548146414965913209016430e-1, .Im=-8.4626110205012894383003185794223095e-1

    r[ 740].Re=-1.035083767376619723332709099850035234375e-2, .Im= 9.9981606545930135077071554405847560e-1

    r[ 741].Re=-1.035083767376619723332709099850035234375e-2, .Im=-9.9981606545930135077071554405847560e-1

    r[ 742].Re=-9.8911730153492904982215350173646580e-1, .Im= 1.464422001468598522055941657527000625e-1

    r[ 743].Re=-9.8911730153492904982215350173646580e-1, .Im=-1.464422001468598522055941657527000625e-1

    r[ 744].Re= 9.2639059267584755730240431148558855e-1, .Im= 3.76184824259934602608268505719024675e-1

    r[ 745].Re= 9.2639059267584755730240431148558855e-1, .Im=-3.76184824259934602608268505719024675e-1

    r[ 746].Re= 3.55216647120730089071116708510089650e-1, .Im= 9.3462233323424681596947038997313935e-1

    r[ 747].Re= 3.55216647120730089071116708510089650e-1, .Im=-9.3462233323424681596947038997313935e-1

    r[ 748].Re=-6.1748464886415688201992679751128885e-1, .Im= 7.8642555165047334231331888076965695e-1

    r[ 749].Re=-6.1748464886415688201992679751128885e-1, .Im=-7.8642555165047334231331888076965695e-1

    r[ 750].Re= 9.7931714294491345462745357508538290e-1, .Im= 2.018092908646954009022067566547775625e-1

    r[ 751].Re= 9.7931714294491345462745357508538290e-1, .Im=-2.018092908646954009022067566547775625e-1

    r[ 752].Re= 4.38366769780108855858458127841004150e-1, .Im= 8.9862824890502901453714912349823860e-1

    r[ 753].Re= 4.38366769780108855858458127841004150e-1, .Im=-8.9862824890502901453714912349823860e-1

    r[ 754].Re=-8.3471153723351454445378294622059910e-1, .Im= 5.5048223963387121759893716443912125e-1

    r[ 755].Re=-8.3471153723351454445378294622059910e-1, .Im=-5.5048223963387121759893716443912125e-1

    r[ 756].Re=-4.60164592387202586731831388533464625e-1, .Im= 8.8769030282957817057365446089534085e-1

    r[ 757].Re=-4.60164592387202586731831388533464625e-1, .Im=-8.8769030282957817057365446089534085e-1

    r[ 758].Re= 8.3404240333915524718833012229879385e-1, .Im= 5.5140019385049499067719125378062015e-1

    r[ 759].Re= 8.3404240333915524718833012229879385e-1, .Im=-5.5140019385049499067719125378062015e-1

    r[ 760].Re=-9.9448644518166362527011870042770165e-1, .Im= 1.0390978513308062047837410091233323125e-1

    r[ 761].Re=-9.9448644518166362527011870042770165e-1, .Im=-1.0390978513308062047837410091233323125e-1

    r[ 762].Re= 1.688521733241724609442258042690809750e-1, .Im= 9.8549016415707246796529261700925415e-1

    r[ 763].Re= 1.688521733241724609442258042690809750e-1, .Im=-9.8549016415707246796529261700925415e-1

    r[ 764].Re= 6.3378868497924012448407893316471015e-1, .Im= 7.7330585450604749642167234924272630e-1

    r[ 765].Re= 6.3378868497924012448407893316471015e-1, .Im=-7.7330585450604749642167234924272630e-1

    r[ 766].Re=-7.4996141138915162205336173428804610e-1, .Im= 6.6129918717945568307214898595702830e-1

    r[ 767].Re=-7.4996141138915162205336173428804610e-1, .Im=-6.6129918717945568307214898595702830e-1

    r[ 768].Re= 9.9528285984213249459884309544577260e-1, .Im= 9.652659275060181121030922213321900625e-2

    r[ 769].Re= 9.9528285984213249459884309544577260e-1, .Im=-9.652659275060181121030922213321900625e-2

    r[ 770].Re=-2.64354505062538436277463915757834900e-1, .Im= 9.6430081987403093446431512347771785e-1

    r[ 771].Re=-2.64354505062538436277463915757834900e-1, .Im=-9.6430081987403093446431512347771785e-1

    r[ 772].Re=-9.4450766298400357090514489755150860e-1, .Im= 3.28155955312669000978331723672454225e-1

    r[ 773].Re=-9.4450766298400357090514489755150860e-1, .Im=-3.28155955312669000978331723672454225e-1

    r[ 774].Re=-1.469870107182194574058087255252758000e-1, .Im= 9.8901396687609433033827599501819345e-1

    r[ 775].Re=-1.469870107182194574058087255252758000e-1, .Im=-9.8901396687609433033827599501819345e-1

    r[ 776].Re= 7.9354158394510387886100488685769960e-1, .Im= 6.0824257088035871277043042937293645e-1

    r[ 777].Re= 7.9354158394510387886100488685769960e-1, .Im=-6.0824257088035871277043042937293645e-1

    r[ 778].Re= 2.9501274201519939177629225923737975e-1, .Im= 9.5534424584688593107273391069611530e-1

    r[ 779].Re= 2.9501274201519939177629225923737975e-1, .Im=-9.5534424584688593107273391069611530e-1

    r[ 780].Re=-5.4377678516096294991655213379999620e-1, .Im= 8.3909750608921840342446785143692975e-1

    r[ 781].Re=-5.4377678516096294991655213379999620e-1, .Im=-8.3909750608921840342446785143692975e-1

    r[ 782].Re= 8.7936975710415654639007243531523270e-1, .Im= 4.75799650904829285469332944558118450e-1

    r[ 783].Re= 8.7936975710415654639007243531523270e-1, .Im=-4.75799650904829285469332944558118450e-1

    r[ 784].Re=-8.9517668112623038911834782993537370e-1, .Im= 4.45483627427886441640936254771077050e-1

    r[ 785].Re=-8.9517668112623038911834782993537370e-1, .Im=-4.45483627427886441640936254771077050e-1

    r[ 786].Re= 5.6219854316466155719211883479147215e-1, .Im= 8.2680633225110256034895428456366060e-1

    r[ 787].Re= 5.6219854316466155719211883479147215e-1, .Im=-8.2680633225110256034895428456366060e-1

    r[ 788].Re= 9.6637967253003032030989061240688895e-1, .Im= 2.56633558929533378556442357876221625e-1

    r[ 789].Re= 9.6637967253003032030989061240688895e-1, .Im=-2.56633558929533378556442357876221625e-1

    r[ 790].Re=-6.9939328673481304665671132170245980e-1, .Im= 7.1457911953109420899465931142913175e-1

    r[ 791].Re=-6.9939328673481304665671132170245980e-1, .Im=-7.1457911953109420899465931142913175e-1

    r[ 792].Re=-3.14749658317673208784981397911906225e-1, .Im= 9.4903450241876496917825534183066335e-1

    r[ 793].Re=-3.14749658317673208784981397911906225e-1, .Im=-9.4903450241876496917825534183066335e-1

    r[ 794].Re=-9.8122637948075175362561139991157685e-1, .Im= 1.922909658041801195249576039714156625e-1

    r[ 795].Re=-9.8122637948075175362561139991157685e-1, .Im=-1.922909658041801195249576039714156625e-1

    r[ 796].Re= 1.0091767956285205287692008369049290000e-1, .Im= 9.9474869113310027124441603518789630e-1

    r[ 797].Re= 1.0091767956285205287692008369049290000e-1, .Im=-9.9474869113310027124441603518789630e-1

    r[ 798].Re= 7.089939778716676244130212580785155e-1, .Im= 7.0500102797388042308313060857472005e-1

    r[ 799].Re= 7.089939778716676244130212580785155e-1, .Im=-7.0500102797388042308313060857472005e-1

    r[ 800].Re=-8.594208830578871083361036653514020e-1, .Im= 5.1106448718382402329751812430913560e-1

    r[ 801].Re=-8.594208830578871083361036653514020e-1, .Im=-5.1106448718382402329751812430913560e-1

    r[ 802].Re=-8.862342299060593786563799767463933125e-2, .Im= 9.9592612192715967989187220155145040e-1

    r[ 803].Re=-8.862342299060593786563799767463933125e-2, .Im=-9.9592612192715967989187220155145040e-1

    r[ 804].Re= 9.9839582979158592035417996157775630e-1, .Im= 5.6248447356777531158655847320915196875e-2

    r[ 805].Re= 9.9839582979158592035417996157775630e-1, .Im=-5.6248447356777531158655847320915196875e-2

    r[ 806].Re= 4.73239041876441335343628225018619550e-1, .Im= 8.8077082548721430388383168974542055e-1

    r[ 807].Re= 4.73239041876441335343628225018619550e-1, .Im=-8.8077082548721430388383168974542055e-1

    r[ 808].Re=-5.3033876164810822562145631309249435e-1, .Im= 8.476362667410839435433445032685995e-1

    r[ 809].Re=-5.3033876164810822562145631309249435e-1, .Im=-8.476362667410839435433445032685995e-1

    r[ 810].Re= 9.0161556888582305990809118156903420e-1, .Im= 4.32171074573866664803034609576570800e-1

    r[ 811].Re= 9.0161556888582305990809118156903420e-1, .Im=-4.32171074573866664803034609576570800e-1

    r[ 812].Re= 2.240769256176592116869272786061628625e-1, .Im= 9.7441655719674002966712578199803825e-1

    r[ 813].Re= 2.240769256176592116869272786061628625e-1, .Im=-9.7441655719674002966712578199803825e-1

    r[ 814].Re=-9.2729973234826512662465347602847030e-1, .Im= 3.74009937606986975211498247517738475e-1

    r[ 815].Re=-9.2729973234826512662465347602847030e-1, .Im=-3.74009937606986975211498247517738475e-1

    r[ 816].Re= 6.0397642918515226373443738339119590e-1, .Im= 7.9680600725456629529475094386725685e-1

    r[ 817].Re= 6.0397642918515226373443738339119590e-1, .Im=-7.9680600725456629529475094386725685e-1

    r[ 818].Re=-9.9633167408173683998739988965098745e-1, .Im= 8.440737643049060767719282694088178125e-2

    r[ 819].Re=-9.9633167408173683998739988965098745e-1, .Im=-8.440737643049060767719282694088178125e-2

    r[ 820].Re=-2.94921110485163007197684237326029675e-1, .Im= 9.5539431551838494005579605072853155e-1

    r[ 821].Re=-2.94921110485163007197684237326029675e-1, .Im=-9.5539431551838494005579605072853155e-1

    r[ 822].Re= 9.6381718319569786856959581200499085e-1, .Im= 2.66075978035448079683789046612218950e-1

    r[ 823].Re= 9.6381718319569786856959581200499085e-1, .Im=-2.66075978035448079683789046612218950e-1

    r[ 824].Re=-6.6355662442274698786803810435230840e-1, .Im= 7.4798203493036974354168933132314120e-1

    r[ 825].Re=-6.6355662442274698786803810435230840e-1, .Im=-7.4798203493036974354168933132314120e-1

    r[ 826].Re= 7.2435007820520092014504598409985190e-1, .Im= 6.8919084993538692884840202168561515e-1

    r[ 827].Re= 7.2435007820520092014504598409985190e-1, .Im=-6.8919084993538692884840202168561515e-1

    r[ 828].Re=-8.4599615964220753472346814305637960e-1, .Im= 5.3299601978378718936113500603823920e-1

    r[ 829].Re=-8.4599615964220753472346814305637960e-1, .Im=-5.3299601978378718936113500603823920e-1

    r[ 830].Re= 1.821201683362910217489627484610537000e-1, .Im= 9.8312781618455169496684220575843935e-1

    r[ 831].Re= 1.821201683362910217489627484610537000e-1, .Im=-9.8312781618455169496684220575843935e-1

    r[ 832].Re=-4.41573068419922387661813445447478425e-1, .Im= 8.9708697854222274603586129160248670e-1

    r[ 833].Re=-4.41573068419922387661813445447478425e-1, .Im=-8.9708697854222274603586129160248670e-1

    r[ 834].Re= 9.81255121853834122447324261884205e-1, .Im= 1.921919529042827035070217789325397375e-1

    r[ 835].Re= 9.81255121853834122447324261884205e-1, .Im=-1.921919529042827035070217789325397375e-1

    r[ 836].Re= 3.64372340945156858449394121635123150e-1, .Im= 9.311004864302970807088399851636495e-1

    r[ 837].Re= 3.64372340945156858449394121635123150e-1, .Im=-9.311004864302970807088399851636495e-1

    r[ 838].Re=-9.7093058491866435222306108698830935e-1, .Im= 2.389390306059707702601713208423461750e-1

    r[ 839].Re=-9.7093058491866435222306108698830935e-1, .Im=-2.389390306059707702601713208423461750e-1

    r[ 840].Re= 8.4206946074524602341426771090482360e-1, .Im= 5.3908793494490259146090238573378880e-1

    r[ 841].Re= 8.4206946074524602341426771090482360e-1, .Im=-5.3908793494490259146090238573378880e-1

    r[ 842].Re=-8.0747256412647872014787253647227770e-1, .Im= 5.8972633568233057133056718157604335e-1

    r[ 843].Re=-8.0747256412647872014787253647227770e-1, .Im=-5.8972633568233057133056718157604335e-1

    r[ 844].Re=-1.0933957488454211504080859640453126875e-1, .Im= 9.9387875159774208277951856871368360e-1

    r[ 845].Re=-1.0933957488454211504080859640453126875e-1, .Im=-9.9387875159774208277951856871368360e-1

    r[ 846].Re= 9.8241537554631541695471241837367415e-1, .Im= 1.861793733663301975145287769919377750e-1

    r[ 847].Re= 9.8241537554631541695471241837367415e-1, .Im=-1.861793733663301975145287769919377750e-1

    r[ 848].Re= 1.276843696512063863757191484182840125e-1, .Im= 9.9167984546227572195675747934728860e-1

    r[ 849].Re= 1.276843696512063863757191484182840125e-1, .Im=-9.9167984546227572195675747934728860e-1

    r[ 850].Re= 8.0531188626202099278827972739236425e-1, .Im= 5.9257104273613647738017107258201575e-1

    r[ 851].Re= 8.0531188626202099278827972739236425e-1, .Im=-5.9257104273613647738017107258201575e-1

    r[ 852].Re=-5.8221806681242593839442633907310660e-1, .Im= 8.1287963047646161207637760526267810e-1

    r[ 853].Re=-5.8221806681242593839442633907310660e-1, .Im=-8.1287963047646161207637760526267810e-1

    r[ 854].Re=-4.77476449052302520659196716223959800e-1, .Im= 8.7850578662477285529774917449685740e-1

    r[ 855].Re=-4.77476449052302520659196716223959800e-1, .Im=-8.7850578662477285529774917449685740e-1

    r[ 856].Re= 5.2104207179672212824073085357667875e-1, .Im= 8.5335160120443387388178280161810105e-1

    r[ 857].Re= 5.2104207179672212824073085357667875e-1, .Im=-8.5335160120443387388178280161810105e-1

    r[ 858].Re=-9.9989005554149201770997024141252040e-1, .Im= 1.23180550053428208671923993478003466796875e-3

    r[ 859].Re=-9.9989005554149201770997024141252040e-1, .Im=-1.23180550053428208671923993478003466796875e-3

    r[ 860].Re=-2.299399811967733353590404021815629625e-1, .Im= 9.7306594784657218788481714000226925e-1

    r[ 861].Re=-2.299399811967733353590404021815629625e-1, .Im=-9.7306594784657218788481714000226925e-1

    r[ 862].Re= 9.3136981142179553483373410927015355e-1, .Im= 3.63668122036748475700562721613096050e-1

    r[ 863].Re= 9.3136981142179553483373410927015355e-1, .Im=-3.63668122036748475700562721613096050e-1

    r[ 864].Re=-9.0991144254690381476535776528180575e-1, .Im= 4.14522322827070632822454854249372125e-1

    r[ 865].Re=-9.0991144254690381476535776528180575e-1, .Im=-4.14522322827070632822454854249372125e-1

    r[ 866].Re= 8.139989627662795601548140211889403750e-2, .Im= 9.9653498201495338548738800454884765e-1

    r[ 867].Re= 8.139989627662795601548140211889403750e-2, .Im=-9.9653498201495338548738800454884765e-1

    r[ 868].Re=-6.3656178681911623762346152943791820e-1, .Im= 7.7106985425598328909302381362067535e-1

    r[ 869].Re=-6.3656178681911623762346152943791820e-1, .Im=-7.7106985425598328909302381362067535e-1

    r[ 870].Re= 6.915091995575796124384737595391925e-1, .Im= 7.2215879646396674562680573217221535e-1

    r[ 871].Re= 6.915091995575796124384737595391925e-1, .Im=-7.2215879646396674562680573217221535e-1

    r[ 872].Re=-4.2178126596193965536230052748578600000e-2, .Im= 9.9897763476899337220515917579177765e-1

    r[ 873].Re=-4.2178126596193965536230052748578600000e-2, .Im=-9.9897763476899337220515917579177765e-1

    r[ 874].Re=-9.8820091708382606920935131711303255e-1, .Im= 1.524977113090641989145979096065275250e-1

    r[ 875].Re=-9.8820091708382606920935131711303255e-1, .Im=-1.524977113090641989145979096065275250e-1

    r[ 876].Re= 4.81839888997103837908753121155314125e-1, .Im= 8.7607711396454768237873622638289815e-1

    r[ 877].Re= 4.81839888997103837908753121155314125e-1, .Im=-8.7607711396454768237873622638289815e-1

    r[ 878].Re= 9.4167249554143317435972448947723020e-1, .Im= 3.3613214334096391811002035865385550e-1

    r[ 879].Re= 9.4167249554143317435972448947723020e-1, .Im=-3.3613214334096391811002035865385550e-1

    r[ 880].Re=-7.8221182123666876950807136381627060e-1, .Im= 6.2282039574439407303430016327183690e-1

    r[ 881].Re=-7.8221182123666876950807136381627060e-1, .Im=-6.2282039574439407303430016327183690e-1

    r[ 882].Re= 6.204314174264730086250096974254120e-1, .Im= 7.8407087651404994144144211531965990e-1

    r[ 883].Re= 6.204314174264730086250096974254120e-1, .Im=-7.8407087651404994144144211531965990e-1

    r[ 884].Re=-7.1582016325364816733411998939118345e-1, .Im= 6.9811051632470755290427177897072395e-1

    r[ 885].Re=-7.1582016325364816733411998939118345e-1, .Im=-6.9811051632470755290427177897072395e-1

    r[ 886].Re= 9.8932758729441094835976855392800640e-1, .Im= 1.45132763782425511234208670430234625e-1

    r[ 887].Re= 9.8932758729441094835976855392800640e-1, .Im=-1.45132763782425511234208670430234625e-1

    r[ 888].Re=-9.6047518766823680724797895891242660e-1, .Im= 2.77964589296715081090383137052413075e-1

    r[ 889].Re=-9.6047518766823680724797895891242660e-1, .Im=-2.77964589296715081090383137052413075e-1

    r[ 890].Re= 2.98534733113197614517986266946536475e-1, .Im= 9.5424675817479598372017335350392385e-1

    r[ 891].Re= 2.98534733113197614517986266946536475e-1, .Im=-9.5424675817479598372017335350392385e-1

    r[ 892].Re=-3.27513861888335811034522748741437675e-1, .Im= 9.4470737550949535066280304818064905e-1

    r[ 893].Re=-3.27513861888335811034522748741437675e-1, .Im=-9.4470737550949535066280304818064905e-1

    r[ 894].Re= 7.5483769016581647726127357600489630e-1, .Im= 6.5566477390807809122463822859572245e-1

    r[ 895].Re= 7.5483769016581647726127357600489630e-1, .Im=-6.5566477390807809122463822859572245e-1

    r[ 896].Re=-8.728688354465401477710884137195535e-1, .Im= 4.87717022358144458582529523482662625e-1

    r[ 897].Re=-8.728688354465401477710884137195535e-1, .Im=-4.87717022358144458582529523482662625e-1

    r[ 898].Re= 8.7109209111103547140686487182392735e-1, .Im= 4.9081236748800532998515677718387450e-1

    r[ 899].Re= 8.7109209111103547140686487182392735e-1, .Im=-4.9081236748800532998515677718387450e-1

    r[ 900].Re=-2.54893929928713069976708993635838850e-1, .Im= 9.6682929896306568640085288279806260e-1

    r[ 901].Re=-2.54893929928713069976708993635838850e-1, .Im=-9.6682929896306568640085288279806260e-1

    r[ 902].Re= 2.324327791755789185401681606890633625e-1, .Im= 9.7246960523975767287652161030564455e-1

    r[ 903].Re= 2.324327791755789185401681606890633625e-1, .Im=-9.7246960523975767287652161030564455e-1

    r[ 904].Re=-5.020208891644836191048284490534570e-1, .Im= 8.6471864412987864412230010202620175e-1

    r[ 905].Re=-5.020208891644836191048284490534570e-1, .Im=-8.6471864412987864412230010202620175e-1

    r[ 906].Re=-9.4083017250276868015390618893434290e-1, .Im= 3.38537471058579231275587062555132425e-1

    r[ 907].Re=-9.4083017250276868015390618893434290e-1, .Im=-3.38537471058579231275587062555132425e-1

    r[ 908].Re= 9.996311097282211122205808351282030e-1, .Im= 2.69122549660174570362869417294859875000e-2

    r[ 909].Re= 9.996311097282211122205808351282030e-1, .Im=-2.69122549660174570362869417294859875000e-2

    r[ 910].Re= 3.43743690078048835800927918171510100e-1, .Im= 9.3890085195680061946887917656567875e-1

    r[ 911].Re= 3.43743690078048835800927918171510100e-1, .Im=-9.3890085195680061946887917656567875e-1

    r[ 912].Re=-7.6985553763723491016435218625701960e-1, .Im= 6.3803431396983090184704678904381580e-1

    r[ 913].Re=-7.6985553763723491016435218625701960e-1, .Im=-6.3803431396983090184704678904381580e-1

    r[ 914].Re= 5.793008274051359984824216553533915e-1, .Im= 8.1493007352181900948551174224121495e-1

    r[ 915].Re= 5.793008274051359984824216553533915e-1, .Im=-8.1493007352181900948551174224121495e-1

    r[ 916].Re= 9.0940596440713827863788765171193515e-1, .Im= 4.15537443685105534196821963632828550e-1

    r[ 917].Re= 9.0940596440713827863788765171193515e-1, .Im=-4.15537443685105534196821963632828550e-1

    r[ 918].Re=-9.8964173846102043707873008315800685e-1, .Im= 1.427937000633079656086721342944656375e-1

    r[ 919].Re=-9.8964173846102043707873008315800685e-1, .Im=-1.427937000633079656086721342944656375e-1

    r[ 920].Re= 1.414332220723552718810722694797732343750e-2, .Im= 9.9976417389999894247409883973887190e-1

    r[ 921].Re= 1.414332220723552718810722694797732343750e-2, .Im=-9.9976417389999894247409883973887190e-1

    r[ 922].Re=-4.0497728631046114866620655448059550e-1, .Im= 9.1419775439667139149690910926437935e-1

    r[ 923].Re=-4.0497728631046114866620655448059550e-1, .Im=-9.1419775439667139149690910926437935e-1

    r[ 924].Re= 9.7238715794586461083071071698213925e-1, .Im= 2.328863769565359120861103292554616875e-1

    r[ 925].Re= 9.7238715794586461083071071698213925e-1, .Im=-2.328863769565359120861103292554616875e-1

    r[ 926].Re= 4.51519079001550305285661579546285775e-1, .Im= 8.9209988272147433541192640404915435e-1

    r[ 927].Re= 4.51519079001550305285661579546285775e-1, .Im=-8.9209988272147433541192640404915435e-1

    r[ 928].Re=-8.8795602417853503052214136914699335e-1, .Im= 4.59674231399947508247549876614357325e-1

    r[ 929].Re=-8.8795602417853503052214136914699335e-1, .Im=-4.59674231399947508247549876614357325e-1

    r[ 930].Re=-2.18006677497242618013473247629008250e-1, .Im= 9.758076873692483887978710299648810e-1

    r[ 931].Re=-2.18006677497242618013473247629008250e-1, .Im=-9.758076873692483887978710299648810e-1

    r[ 932].Re= 7.3772088919533052031596298547810870e-1, .Im= 6.7486093859664553207267090328969060e-1

    r[ 933].Re= 7.3772088919533052031596298547810870e-1, .Im=-6.7486093859664553207267090328969060e-1

    r[ 934].Re= 8.7048285311437845201965046726400030e-1, .Im= 4.91873700444774408779835539462510475e-1

    r[ 935].Re= 8.7048285311437845201965046726400030e-1, .Im=-4.91873700444774408779835539462510475e-1

    r[ 936].Re=-9.9729133923217305746078409356414340e-1, .Im= 7.219547676727285090425567659622174375e-2

    r[ 937].Re=-9.9729133923217305746078409356414340e-1, .Im=-7.219547676727285090425567659622174375e-2

    r[ 938].Re=-5.6417018669890650617304572733701205e-1, .Im= 8.2552313535537791278073882494936695e-1

    r[ 939].Re=-5.6417018669890650617304572733701205e-1, .Im=-8.2552313535537791278073882494936695e-1

    r[ 940].Re= 8.384858475185845427812836305747623125e-2, .Im= 9.9634497346372796755531453527510165e-1

    r[ 941].Re= 8.384858475185845427812836305747623125e-2, .Im=-9.9634497346372796755531453527510165e-1

    r[ 942].Re=-6.8969660045255565261612673566560260e-1, .Im= 7.2393327590233691459786768973572175e-1

    r[ 943].Re=-6.8969660045255565261612673566560260e-1, .Im=-7.2393327590233691459786768973572175e-1

    r[ 944].Re= 9.999516751418836557618874394393060e-1, .Im= 9.78735025022146008788492821395266171875e-3

    r[ 945].Re= 9.999516751418836557618874394393060e-1, .Im=-9.78735025022146008788492821395266171875e-3

    r[ 946].Re= 6.062880617622787987608390380955825000e-2, .Im= 9.9802634194805539546990758026367980e-1

    r[ 947].Re= 6.062880617622787987608390380955825000e-2, .Im=-9.9802634194805539546990758026367980e-1

    r[ 948].Re=-8.2515414327320690812683778858627190e-1, .Im= 5.6472450587416367362436631083255630e-1

    r[ 949].Re=-8.2515414327320690812683778858627190e-1, .Im=-5.6472450587416367362436631083255630e-1

    r[ 950].Re= 6.4974496764328315556724646739894520e-1, .Im= 7.5995395694590339719098892601323310e-1

    r[ 951].Re= 6.4974496764328315556724646739894520e-1, .Im=-7.5995395694590339719098892601323310e-1

    r[ 952].Re=-9.5338300598815806097263703122735020e-1, .Im= 3.01407598237128593332556647510500600e-1

    r[ 953].Re=-9.5338300598815806097263703122735020e-1, .Im=-3.01407598237128593332556647510500600e-1

    r[ 954].Re= 9.0788136902742266887145206055720335e-1, .Im= 4.18864245113930389052825375983957200e-1

    r[ 955].Re= 9.0788136902742266887145206055720335e-1, .Im=-4.18864245113930389052825375983957200e-1

    r[ 956].Re=-1.675367145944693936243652387929614625e-1, .Im= 9.8573177491050412157846949412487445e-1

    r[ 957].Re=-1.675367145944693936243652387929614625e-1, .Im=-9.8573177491050412157846949412487445e-1

    r[ 958].Re= 4.15107784294537540681346854398725550e-1, .Im= 9.096024777595359545045994309475645e-1

    r[ 959].Re= 4.15107784294537540681346854398725550e-1, .Im=-9.096024777595359545045994309475645e-1

    r[ 960].Re= 8.1179244872772060581667119549820195e-1, .Im= 5.8366843436472604089715332520427180e-1

    r[ 961].Re= 8.1179244872772060581667119549820195e-1, .Im=-5.8366843436472604089715332520427180e-1

    r[ 962].Re=-6.6629299464848479317424789769574995e-1, .Im= 7.4552611104698196520246256113750860e-1

    r[ 963].Re=-6.6629299464848479317424789769574995e-1, .Im=-7.4552611104698196520246256113750860e-1

    r[ 964].Re=-9.7929959809111799540204401637311090e-1, .Im= 2.019106434773150493544591199679416500e-1

    r[ 965].Re=-9.7929959809111799540204401637311090e-1, .Im=-2.019106434773150493544591199679416500e-1

    r[ 966].Re= 1.98938927122457143159550696509541000e-1, .Im= 9.7986044331482591296378359402297060e-1

    r[ 967].Re= 1.98938927122457143159550696509541000e-1, .Im=-9.7986044331482591296378359402297060e-1

    r[ 968].Re=-3.82460202800977144832472731650341300e-1, .Im= 9.2384643074390893069391950120916590e-1

    r[ 969].Re=-3.82460202800977144832472731650341300e-1, .Im=-9.2384643074390893069391950120916590e-1

    r[ 970].Re= 9.522676366711616546822938289551530e-1, .Im= 3.04818390166686548070629214635118825e-1

    r[ 971].Re= 9.522676366711616546822938289551530e-1, .Im=-3.04818390166686548070629214635118825e-1

    r[ 972].Re=-5.802352041508974656025543481518980e-1, .Im= 8.1431368151420313594712752092164005e-1

    r[ 973].Re=-5.802352041508974656025543481518980e-1, .Im=-8.1431368151420313594712752092164005e-1

    r[ 974].Re= 5.4281721813611039095803789678029715e-1, .Im= 8.3967299055523147988111531958566045e-1

    r[ 975].Re= 5.4281721813611039095803789678029715e-1, .Im=-8.3967299055523147988111531958566045e-1

    r[ 976].Re=-9.1931931748681317007054758505546485e-1, .Im= 3.93245683451561689469855309653212300e-1

    r[ 977].Re=-9.1931931748681317007054758505546485e-1, .Im=-3.93245683451561689469855309653212300e-1

    r[ 978].Re= 9.9103877755837022078821973991580305e-1, .Im= 1.330089673181134302115680156930466125e-1

    r[ 979].Re= 9.9103877755837022078821973991580305e-1, .Im=-1.330089673181134302115680156930466125e-1

    r[ 980].Re=-7.153441093215422152962190693870070000e-2, .Im= 9.9731045127525108640043072227854280e-1

    r[ 981].Re=-7.153441093215422152962190693870070000e-2, .Im=-9.9731045127525108640043072227854280e-1

    r[ 982].Re=-7.0981395895927634764888125573634165e-1, .Im= 7.0423471774155910196668628486804660e-1

    r[ 983].Re=-7.0981395895927634764888125573634165e-1, .Im=-7.0423471774155910196668628486804660e-1

    r[ 984].Re= 7.8377189467374830389445605760556645e-1, .Im= 6.2080331345566031053806455020094290e-1

    r[ 985].Re= 7.8377189467374830389445605760556645e-1, .Im=-6.2080331345566031053806455020094290e-1

    r[ 986].Re=-9.9461053591667270001863698780653065e-1, .Im= 1.0270019929777568501449991344998124375e-1

    r[ 987].Re=-9.9461053591667270001863698780653065e-1, .Im=-1.0270019929777568501449991344998124375e-1

    r[ 988].Re= 3.28766158664155261348582826030906275e-1, .Im= 9.4426008436050135053108078864170235e-1

    r[ 989].Re= 3.28766158664155261348582826030906275e-1, .Im=-9.4426008436050135053108078864170235e-1

    r[ 990].Re=-3.22886723897089000789861756857135325e-1, .Im= 9.4630882849087283315014929030439815e-1

    r[ 991].Re=-3.22886723897089000789861756857135325e-1, .Im=-9.4630882849087283315014929030439815e-1

    r[ 992].Re= 9.6415009675472729266942906178883275e-1, .Im= 2.64899146040399768864403995394241050e-1

    r[ 993].Re= 9.6415009675472729266942906178883275e-1, .Im=-2.64899146040399768864403995394241050e-1

    r[ 994].Re=-8.265207499789272160839459502312820e-1, .Im= 5.6269981162786975037448655712069010e-1

    r[ 995].Re=-8.265207499789272160839459502312820e-1, .Im=-5.6269981162786975037448655712069010e-1

    r[ 996].Re= 5.5306014735559516637408705719280985e-1, .Im= 8.3295890484065471248698031558888030e-1

    r[ 997].Re= 5.5306014735559516637408705719280985e-1, .Im=-8.3295890484065471248698031558888030e-1

    r[ 998].Re= 6.8082352159077608177994989091530440e-1, .Im= 7.3223044541153359254792576393811030e-1

    r[ 999].Re= 6.8082352159077608177994989091530440e-1, .Im=-7.3223044541153359254792576393811030e-1

    r[ 1000].Re=-3.34452869085423265538281611952697850e-1, .Im= 9.4228100652281487903394463501172140e-1

    r[ 1001].Re=-3.34452869085423265538281611952697850e-1, .Im=-9.4228100652281487903394463501172140e-1

    r[ 1002].Re=-9.4611379971382714160199611796997485e-1, .Im= 3.235230354617413262019454123219475e-1

    r[ 1003].Re=-9.4611379971382714160199611796997485e-1, .Im=-3.235230354617413262019454123219475e-1

    r[ 1004].Re= 1.603915365705354534320292714255629000e-1, .Im= 9.8691513800246088994327919863280840e-1

    r[ 1005].Re= 1.603915365705354534320292714255629000e-1, .Im=-9.8691513800246088994327919863280840e-1

    r[ 1006].Re= 8.5373401281778960036916714670951475e-1, .Im= 5.2039459092351803004561361376545390e-1

    r[ 1007].Re= 8.5373401281778960036916714670951475e-1, .Im=-5.2039459092351803004561361376545390e-1

    r[ 1008].Re=-7.8978083017807354515582574094878505e-1, .Im= 6.1319544536760983710621530917705965e-1

    r[ 1009].Re=-7.8978083017807354515582574094878505e-1, .Im=-6.1319544536760983710621530917705965e-1

    r[ 1010].Re= 9.9596619436720268403462341666454445e-1, .Im= 8.921057987096708830065949769050348125e-2

    r[ 1011].Re= 9.9596619436720268403462341666454445e-1, .Im=-8.921057987096708830065949769050348125e-2

    r[ 1012].Re=-4.56900522352032212314298931232769950e-1, .Im= 8.8938999559220510704449225158896295e-1

    r[ 1013].Re=-4.56900522352032212314298931232769950e-1, .Im=-8.8938999559220510704449225158896295e-1

    r[ 1014].Re= 3.07854910481253130072332169220317150e-1, .Im= 9.512758780694503535357853252207860e-1

    r[ 1015].Re= 3.07854910481253130072332169220317150e-1, .Im=-9.512758780694503535357853252207860e-1

    r[ 1016].Re=-9.9851228651227874610896151352790180e-1, .Im= 5.2643678973620378069853131819400003125e-2

    r[ 1017].Re=-9.9851228651227874610896151352790180e-1, .Im=-5.2643678973620378069853131819400003125e-2

    r[ 1018].Re= 6.792016671971483343650533015534165234375e-3, .Im= 9.9983446440924683695783414805191565e-1

    r[ 1019].Re= 6.792016671971483343650533015534165234375e-3, .Im=-9.9983446440924683695783414805191565e-1

    r[ 1020].Re= 8.8513014918052945745330362115055320e-1, .Im= 4.64994932293879725815344272632501075e-1

    r[ 1021].Re= 8.8513014918052945745330362115055320e-1, .Im=-4.64994932293879725815344272632501075e-1

    r[ 1022].Re= 4.46046193874290231029533515538787450e-1, .Im= 8.9484822194931878946988490497460585e-1

    r[ 1023].Re= 4.46046193874290231029533515538787450e-1, .Im=-8.9484822194931878946988490497460585e-1

    r[ 1024].Re=-8.7762093658683137942233543071779420e-1, .Im= 4.79142047656455294379895804013358425e-1

    r[ 1025].Re=-8.7762093658683137942233543071779420e-1, .Im=-4.79142047656455294379895804013358425e-1

    r[ 1026].Re=-1.554515537178562112341495549117098500e-1, .Im= 9.8770708152612085584109991032164540e-1

    r[ 1027].Re=-1.554515537178562112341495549117098500e-1, .Im=-9.8770708152612085584109991032164540e-1

    r[ 1028].Re= 9.3705479936091951032040014979429540e-1, .Im= 3.48781816124888233154877070774091400e-1

    r[ 1029].Re= 9.3705479936091951032040014979429540e-1, .Im=-3.48781816124888233154877070774091400e-1

    r[ 1030].Re=-7.4098240312348262470720783312572165e-1, .Im= 6.7134954969114768452698172040982170e-1

    r[ 1031].Re=-7.4098240312348262470720783312572165e-1, .Im=-6.7134954969114768452698172040982170e-1

    r[ 1032].Re=-6.0586615975466773242885665240464730e-1, .Im= 7.9542735691689958610339772349107075e-1

    r[ 1033].Re=-6.0586615975466773242885665240464730e-1, .Im=-7.9542735691689958610339772349107075e-1

    r[ 1034].Re= 6.2712113050282669579615912880399260e-1, .Im= 7.787117909774362578545492397097405e-1

    r[ 1035].Re= 6.2712113050282669579615912880399260e-1, .Im=-7.787117909774362578545492397097405e-1

    r[ 1036].Re=-9.6509559194076632859804476538556625e-1, .Im= 2.61464795078537537431628834383445775e-1

    r[ 1037].Re=-9.6509559194076632859804476538556625e-1, .Im=-2.61464795078537537431628834383445775e-1

    r[ 1038].Re= 9.8668860095713195601518918920191935e-1, .Im= 1.620636765237426224484096337619121125e-1

    r[ 1039].Re= 9.8668860095713195601518918920191935e-1, .Im=-1.620636765237426224484096337619121125e-1

    r[ 1040].Re=-6.1746355597394900205365786405309334375e-2, .Im= 9.9795425558487005357477528377785345e-1

    r[ 1041].Re=-6.1746355597394900205365786405309334375e-2, .Im=-9.9795425558487005357477528377785345e-1

    r[ 1042].Re= 2.75071642496022616963813334223232225e-1, .Im= 9.6127843728176609605640123845660125e-1

    r[ 1043].Re= 2.75071642496022616963813334223232225e-1, .Im=-9.6127843728176609605640123845660125e-1

    r[ 1044].Re=-5.136236272131784463823578334995545e-1, .Im= 8.5787043546556296380600770135060880e-1

    r[ 1045].Re=-5.136236272131784463823578334995545e-1, .Im=-8.5787043546556296380600770135060880e-1

    r[ 1046].Re= 7.5321968886211476679193310701521110e-1, .Im= 6.5752317949258387574928974572685545e-1

    r[ 1047].Re= 7.5321968886211476679193310701521110e-1, .Im=-6.5752317949258387574928974572685545e-1

    r[ 1048].Re=-9.236052680197675002204960037488490e-1, .Im= 3.83079502503803348556488117537810450e-1

    r[ 1049].Re=-9.236052680197675002204960037488490e-1, .Im=-3.83079502503803348556488117537810450e-1

    r[ 1050].Re= 9.7379806932907830852030883761472065e-1, .Im= 2.269268128446700616418496565529494500e-1

    r[ 1051].Re= 9.7379806932907830852030883761472065e-1, .Im=-2.269268128446700616418496565529494500e-1

    r[ 1052].Re=-2.8085984318070889020901859112200325e-1, .Im= 9.5961960559675318904737650882452725e-1

    r[ 1053].Re=-2.8085984318070889020901859112200325e-1, .Im=-9.5961960559675318904737650882452725e-1

    r[ 1054].Re=-9.9897165183073310945616185563267205e-1, .Im= 4.2844829565653351488574429595246328125e-2

    r[ 1055].Re=-9.9897165183073310945616185563267205e-1, .Im=-4.2844829565653351488574429595246328125e-2

    r[ 1056].Re= 5.8328074211191027753642401876277290e-1, .Im= 8.1207360106735859694992996082874010e-1

    r[ 1057].Re= 5.8328074211191027753642401876277290e-1, .Im=-8.1207360106735859694992996082874010e-1

    r[ 1058].Re= 6.919080289049250875876850841450504375e-2, .Im= 9.9745754178126766475998010719195005e-1

    r[ 1059].Re= 6.919080289049250875876850841450504375e-2, .Im=-9.9745754178126766475998010719195005e-1

    r[ 1060].Re= 9.3048816841557380197258453335962255e-1, .Im= 3.65941036462686108965414177873753925e-1

    r[ 1061].Re= 9.3048816841557380197258453335962255e-1, .Im=-3.65941036462686108965414177873753925e-1

    r[ 1062].Re=-7.3187432525626150425779314900864845e-1, .Im= 6.8127667459485308221189825417241080e-1

    r[ 1063].Re=-7.3187432525626150425779314900864845e-1, .Im=-6.8127667459485308221189825417241080e-1

    r[ 1064].Re=-4.68834899280362205065131320225191300e-1, .Im= 8.8315297435341810761144643038278445e-1

    r[ 1065].Re=-4.68834899280362205065131320225191300e-1, .Im=-8.8315297435341810761144643038278445e-1

    r[ 1066].Re= 8.0093155451650410725505935261026020e-1, .Im= 5.9848010710913912557629146249382755e-1

    r[ 1067].Re= 8.0093155451650410725505935261026020e-1, .Im=-5.9848010710913912557629146249382755e-1

    r[ 1068].Re=-9.8481167540838077112397286327905020e-1, .Im= 1.730268900363407524878311960492283000e-1

    r[ 1069].Re=-9.8481167540838077112397286327905020e-1, .Im=-1.730268900363407524878311960492283000e-1

    r[ 1070].Re= 3.7800343697627797334703814158274325e-1, .Im= 9.2564536615769554828148102387785910e-1

    r[ 1071].Re= 3.7800343697627797334703814158274325e-1, .Im=-9.2564536615769554828148102387785910e-1

    r[ 1072].Re=-1.856183332765949378639902533905114875e-1, .Im= 9.8249172955713914845432555011939255e-1

    r[ 1073].Re=-1.856183332765949378639902533905114875e-1, .Im=-9.8249172955713914845432555011939255e-1

    r[ 1074].Re= 7.0203784631213927980297739850357170e-1, .Im= 7.1190794322523909265498787135584275e-1

    r[ 1075].Re= 7.0203784631213927980297739850357170e-1, .Im=-7.1190794322523909265498787135584275e-1

    r[ 1076].Re=-8.5372547169512180698092151942546475e-1, .Im= 5.2050207507108137150453330832533535e-1

    r[ 1077].Re=-8.5372547169512180698092151942546475e-1, .Im=-5.2050207507108137150453330832533535e-1

    r[ 1078].Re= 9.9245887147869815692047268385067580e-1, .Im= 1.2208083714615666770519908368441974375e-1

    r[ 1079].Re= 9.9245887147869815692047268385067580e-1, .Im=-1.2208083714615666770519908368441974375e-1

    r[ 1080].Re= 1.845210946305508581399834611147525625e-1, .Im= 9.8269188421804776201184949968592260e-1

    r[ 1081].Re= 1.845210946305508581399834611147525625e-1, .Im=-9.8269188421804776201184949968592260e-1

    r[ 1082].Re=-5.3242626421293304250781375230872070e-1, .Im= 8.4634159580869683381365575769450515e-1

    r[ 1083].Re=-5.3242626421293304250781375230872070e-1, .Im=-8.4634159580869683381365575769450515e-1

    r[ 1084].Re=-8.1533804619891336873394038775586520e-1, .Im= 5.7879286912010097232439420622540635e-1

    r[ 1085].Re=-8.1533804619891336873394038775586520e-1, .Im=-5.7879286912010097232439420622540635e-1

    r[ 1086].Re=-5.63584726931402120626846130591047753906250e-4, .Im= 9.9985742379939268609234659379580985e-1

    r[ 1087].Re=-5.63584726931402120626846130591047753906250e-4, .Im=-9.9985742379939268609234659379580985e-1

    r[ 1088].Re= 8.1958204413561186463255126000149175e-1, .Im= 5.7267163931891074124536089584580620e-1

    r[ 1089].Re= 8.1958204413561186463255126000149175e-1, .Im=-5.7267163931891074124536089584580620e-1

    r[ 1090].Re=-9.7568282849973109183139285960351115e-1, .Im= 2.186685646493902179798851648229174250e-1

    r[ 1091].Re=-9.7568282849973109183139285960351115e-1, .Im=-2.186685646493902179798851648229174250e-1

    r[ 1092].Re= 4.95729497831255638828906739945523425e-1, .Im= 8.6830948003305363780413017593673430e-1

    r[ 1093].Re= 4.95729497831255638828906739945523425e-1, .Im=-8.6830948003305363780413017593673430e-1

    r[ 1094].Re=-3.41366054862260404068052821457968075e-1, .Im= 9.3980544494573936553649673442123455e-1

    r[ 1095].Re=-3.41366054862260404068052821457968075e-1, .Im=-9.3980544494573936553649673442123455e-1

    r[ 1096].Re= 9.993639881077642783679948479402810e-1, .Im= 3.5472685322154508258396532482947803125e-2

    r[ 1097].Re= 9.993639881077642783679948479402810e-1, .Im=-3.5472685322154508258396532482947803125e-2

    r[ 1098].Re=-9.0529531591729561768033818225376305e-1, .Im= 4.24521473218545497552156575693516050e-1

    r[ 1099].Re=-9.0529531591729561768033818225376305e-1, .Im=-4.24521473218545497552156575693516050e-1

    r[ 1100].Re= 8.4729615337825703313967551366658880e-1, .Im= 5.3080964109069939116380965060670860e-1

    r[ 1101].Re= 8.4729615337825703313967551366658880e-1, .Im=-5.3080964109069939116380965060670860e-1

    r[ 1102].Re=-6.5896241314833148283724995053489690e-1, .Im= 7.5203243836371147512664947498706165e-1

    r[ 1103].Re=-6.5896241314833148283724995053489690e-1, .Im=-7.5203243836371147512664947498706165e-1

    r[ 1104].Re= 6.8172238797534423504487222089665010e-1, .Im= 7.3140487104964124753792020783293990e-1

    r[ 1105].Re= 6.8172238797534423504487222089665010e-1, .Im=-7.3140487104964124753792020783293990e-1

    r[ 1106].Re=-1.1298656347095005492153774184771463750e-1, .Im= 9.9345598262975132186625160102266815e-1

    r[ 1107].Re=-1.1298656347095005492153774184771463750e-1, .Im=-9.9345598262975132186625160102266815e-1

    r[ 1108].Re= 8.650152039268406145566814302583225e-1, .Im= 5.0144707795661169758005826224689370e-1

    r[ 1109].Re= 8.650152039268406145566814302583225e-1, .Im=-5.0144707795661169758005826224689370e-1

    r[ 1110].Re= 8.017308244187462684671174883987986875e-2, .Im= 9.9664035192787514549905836247489785e-1

    r[ 1111].Re= 8.017308244187462684671174883987986875e-2, .Im=-9.9664035192787514549905836247489785e-1

    r[ 1112].Re=-5.5910335353229856369949857253232035e-1, .Im= 8.2896369266513947327013056565192525e-1

    r[ 1113].Re=-5.5910335353229856369949857253232035e-1, .Im=-8.2896369266513947327013056565192525e-1

    r[ 1114].Re= 9.1884370581187435611525415879441425e-1, .Im= 3.94262915913540790135982661013258600e-1

    r[ 1115].Re= 9.1884370581187435611525415879441425e-1, .Im=-3.94262915913540790135982661013258600e-1

    r[ 1116].Re=-9.9115018851267921995429333037463945e-1, .Im= 1.318847392000764284780700563715072250e-1

    r[ 1117].Re=-9.9115018851267921995429333037463945e-1, .Im=-1.318847392000764284780700563715072250e-1

    r[ 1118].Re= 3.83665710989835817557036534708458925e-1, .Im= 9.2331393111953663499491540278540920e-1

    r[ 1119].Re= 3.83665710989835817557036534708458925e-1, .Im=-9.2331393111953663499491540278540920e-1

    r[ 1120].Re=-8.6744599487514384428266112081473690e-1, .Im= 4.97301095094467737744992064108373575e-1

    r[ 1121].Re=-8.6744599487514384428266112081473690e-1, .Im=-4.97301095094467737744992064108373575e-1

    r[ 1122].Re= 2.276566376612528530554158123777597125e-1, .Im= 9.7360166039685125394242959373514165e-1

    r[ 1123].Re= 2.276566376612528530554158123777597125e-1, .Im=-9.7360166039685125394242959373514165e-1

    r[ 1124].Re=-4.12786484036520573415174339970690175e-1, .Im= 9.1069423983808994726985019951825960e-1

    r[ 1125].Re=-4.12786484036520573415174339970690175e-1, .Im=-9.1069423983808994726985019951825960e-1

    r[ 1126].Re=-9.4922895019433506380579501637839710e-1, .Im= 3.14225414277172987453923269640654325e-1

    r[ 1127].Re=-9.4922895019433506380579501637839710e-1, .Im=-3.14225414277172987453923269640654325e-1

    r[ 1128].Re= 9.5700925841375383829046086248126810e-1, .Im= 2.89604224101342455632845940272090950e-1

    r[ 1129].Re= 9.5700925841375383829046086248126810e-1, .Im=-2.89604224101342455632845940272090950e-1

    r[ 1130].Re= 5.2936364998474583209997490484965965e-1, .Im= 8.4821008110335160967707679446903055e-1

    r[ 1131].Re= 5.2936364998474583209997490484965965e-1, .Im=-8.4821008110335160967707679446903055e-1

    r[ 1132].Re=-7.1496357763893936265731099410913880e-1, .Im= 6.9899536172963805391589175997069105e-1

    r[ 1133].Re=-7.1496357763893936265731099410913880e-1, .Im=-6.9899536172963805391589175997069105e-1

    r[ 1134].Re= 4.12867066871515919768143021428841150e-1, .Im= 9.1062616887320291247931436373619360e-1

    r[ 1135].Re= 4.12867066871515919768143021428841150e-1, .Im=-9.1062616887320291247931436373619360e-1

    r[ 1136].Re=-2.060409660114872754110848518394050125e-1, .Im= 9.7840378087219259661821979534579440e-1

    r[ 1137].Re=-2.060409660114872754110848518394050125e-1, .Im=-9.7840378087219259661821979534579440e-1

    r[ 1138].Re= 9.9680733124063225503164176188874985e-1, .Im= 7.945133646387937675914514557007350625e-2

    r[ 1139].Re= 9.9680733124063225503164176188874985e-1, .Im=-7.945133646387937675914514557007350625e-2

    r[ 1140].Re=-8.3268246889469921256932138931006190e-1, .Im= 5.5356045053084701468293360449024475e-1

    r[ 1141].Re=-8.3268246889469921256932138931006190e-1, .Im=-5.5356045053084701468293360449024475e-1

    r[ 1142].Re= 7.418387483850327202006269544654060e-1, .Im= 6.7033077239854066409208144250442270e-1

    r[ 1143].Re= 7.418387483850327202006269544654060e-1, .Im=-6.7033077239854066409208144250442270e-1

    r[ 1144].Re=-5.1257641378319040992295185787952505e-1, .Im= 8.5850679455041267740256216711713930e-1

    r[ 1145].Re=-5.1257641378319040992295185787952505e-1, .Im=-8.5850679455041267740256216711713930e-1

    r[ 1146].Re=-9.9979792121546573469004215439781545e-1, .Im= 1.347724406929234723662158756951612265625e-2

    r[ 1147].Re=-9.9979792121546573469004215439781545e-1, .Im=-1.347724406929234723662158756951612265625e-2

    r[ 1148].Re= 7.1671984868198568285890814877348020e-1, .Im= 6.9713181027457871152819279814139005e-1

    r[ 1149].Re= 7.1671984868198568285890814877348020e-1, .Im=-6.9713181027457871152819279814139005e-1

    r[ 1150].Re=-1.280740406457666832884534358072414687500e-2, .Im= 9.9977515184092258238024442107416685e-1

    r[ 1151].Re=-1.280740406457666832884534358072414687500e-2, .Im=-9.9977515184092258238024442107416685e-1

    r[ 1152].Re=-9.3748193636454058008666834211908280e-1, .Im= 3.47744745794859311249780375874252050e-1

    r[ 1153].Re=-9.3748193636454058008666834211908280e-1, .Im=-3.47744745794859311249780375874252050e-1

    r[ 1154].Re= 9.7955827798018657581735624262364580e-1, .Im= 2.006046480684451349674191078520379875e-1

    r[ 1155].Re= 9.7955827798018657581735624262364580e-1, .Im=-2.006046480684451349674191078520379875e-1

    r[ 1156].Re=-2.59621048955742395047963100296328775e-1, .Im= 9.655761869504539962605349501245655e-1

    r[ 1157].Re=-2.59621048955742395047963100296328775e-1, .Im=-9.655761869504539962605349501245655e-1

    r[ 1158].Re= 8.4860869680754791311017015686957165e-1, .Im= 5.2873147855969571118350813776487480e-1

    r[ 1159].Re= 8.4860869680754791311017015686957165e-1, .Im=-5.2873147855969571118350813776487480e-1

    r[ 1160].Re=-7.0634769472710634552470310154603790e-1, .Im= 7.076973924856881925649076947593130e-1

    r[ 1161].Re=-7.0634769472710634552470310154603790e-1, .Im=-7.076973924856881925649076947593130e-1

    r[ 1162].Re= 2.60906102275058504602611719747073925e-1, .Im= 9.6520656099284218853995298559311775e-1

    r[ 1163].Re= 2.60906102275058504602611719747073925e-1, .Im=-9.6520656099284218853995298559311775e-1

    r[ 1164].Re=-9.8098381480789731412528453802224245e-1, .Im= 1.934985452879564304939918883974314625e-1

    r[ 1165].Re=-9.8098381480789731412528453802224245e-1, .Im=-1.934985452879564304939918883974314625e-1

    r[ 1166].Re= 6.3756037693431133472898864056332965e-1, .Im= 7.7018746253161352033345110612572170e-1

    r[ 1167].Re= 6.3756037693431133472898864056332965e-1, .Im=-7.7018746253161352033345110612572170e-1

    r[ 1168].Re= 1.2039483418651747426153519882063846875e-1, .Im= 9.9258376404336523535221203928813335e-1

    r[ 1169].Re= 1.2039483418651747426153519882063846875e-1, .Im=-9.9258376404336523535221203928813335e-1

    r[ 1170].Re=-3.9148761775918305971799782128073275e-1, .Im= 9.2004112263626625090040533905266780e-1

    r[ 1171].Re=-3.9148761775918305971799782128073275e-1, .Im=-9.2004112263626625090040533905266780e-1

    r[ 1172].Re= 3.7393547609039609613823529343790140625e-2, .Im= 9.9915609461634424803833098849281665e-1

    r[ 1173].Re= 3.7393547609039609613823529343790140625e-2, .Im=-9.9915609461634424803833098849281665e-1

    r[ 1174].Re= 9.9895911790335456537093250517500560e-1, .Im= 4.525283808422179282482389339747896875e-2

    r[ 1175].Re= 9.9895911790335456537093250517500560e-1, .Im=-4.525283808422179282482389339747896875e-2

    r[ 1176].Re=-8.9187829846741240036323006279417310e-1, .Im= 4.52042291529750617229410636355169100e-1

    r[ 1177].Re=-8.9187829846741240036323006279417310e-1, .Im=-4.52042291529750617229410636355169100e-1

    r[ 1178].Re= 9.4371445825413546870663594745565205e-1, .Im= 3.30357790066866774392195793552673400e-1

    r[ 1179].Re= 9.4371445825413546870663594745565205e-1, .Im=-3.30357790066866774392195793552673400e-1

    r[ 1180].Re=-7.5159303801473020811840797250624745e-1, .Im= 6.5946374234468185804303175245877355e-1

    r[ 1181].Re=-7.5159303801473020811840797250624745e-1, .Im=-6.5946374234468185804303175245877355e-1

    r[ 1182].Re= 4.78624936488484697960643643455114200e-1, .Im= 8.7785521318799408785338300731382330e-1

    r[ 1183].Re= 4.78624936488484697960643643455114200e-1, .Im=-8.7785521318799408785338300731382330e-1

    r[ 1184].Re=-5.9411592121836631630316105656675060e-1, .Im= 8.042337510572996617241869898862205e-1

    r[ 1185].Re=-5.9411592121836631630316105656675060e-1, .Im=-8.042337510572996617241869898862205e-1

    r[ 1186].Re= 6.5991783585800567468737654053256845e-1, .Im= 7.5112837934900245073777114157564935e-1

    r[ 1187].Re= 6.5991783585800567468737654053256845e-1, .Im=-7.5112837934900245073777114157564935e-1

    r[ 1188].Re=-9.9568335172029431845430735847912725e-1, .Im= 9.171929966788941457345174512738594375e-2

    r[ 1189].Re=-9.9568335172029431845430735847912725e-1, .Im=-9.171929966788941457345174512738594375e-2

    r[ 1190].Re= 8.9517820693823635380681480455677955e-1, .Im= 4.45380294857997960367157475047861225e-1

    r[ 1191].Re= 8.9517820693823635380681480455677955e-1, .Im=-4.45380294857997960367157475047861225e-1

    r[ 1192].Re=-4.28353115154641195250206919808988450e-1, .Im= 9.0348446028374085337020460428902875e-1

    r[ 1193].Re=-4.28353115154641195250206919808988450e-1, .Im=-9.0348446028374085337020460428902875e-1

    r[ 1194].Re= 3.51794951918187603912002714423579150e-1, .Im= 9.3591842244219392021875592035939915e-1

    r[ 1195].Re= 3.51794951918187603912002714423579150e-1, .Im=-9.3591842244219392021875592035939915e-1

    r[ 1196].Re= 3.6163999094406755474562231711388446875e-2, .Im= 9.9920796967448244352283381886081770e-1

    r[ 1197].Re= 3.6163999094406755474562231711388446875e-2, .Im=-9.9920796967448244352283381886081770e-1

    r[ 1198].Re=-9.5771184171795886719280588295077905e-1, .Im= 2.87376041728647058093315536098089050e-1

    r[ 1199].Re=-9.5771184171795886719280588295077905e-1, .Im=-2.87376041728647058093315536098089050e-1

    r[ 1200].Re= 9.4650072755072267582931999641004945e-1, .Im= 3.22259501355178112902422071783803400e-1

    r[ 1201].Re= 9.4650072755072267582931999641004945e-1, .Im=-3.22259501355178112902422071783803400e-1

    r[ 1202].Re=-6.3940562282635404756092611933127045e-1, .Im= 7.6872730757319118755077624882687810e-1

    r[ 1203].Re=-6.3940562282635404756092611933127045e-1, .Im=-7.6872730757319118755077624882687810e-1

    r[ 1204].Re= 5.7429914547744909114612710254732515e-1, .Im= 8.1846382234805392652532418651389885e-1

    r[ 1205].Re= 5.7429914547744909114612710254732515e-1, .Im=-8.1846382234805392652532418651389885e-1

    r[ 1206].Re=-7.9576549406846541767635017095017245e-1, .Im= 6.0543284780857498095230084800277835e-1

    r[ 1207].Re=-7.9576549406846541767635017095017245e-1, .Im=-6.0543284780857498095230084800277835e-1

    r[ 1208].Re= 9.9639954389032980852647369829355735e-1, .Im= 8.433533367348958198483899195707635625e-2

    r[ 1209].Re= 9.9639954389032980852647369829355735e-1, .Im=-8.433533367348958198483899195707635625e-2

    r[ 1210].Re=-1.360661951711607531301240214816061750e-1, .Im= 9.9056868256663233029968296250444835e-1

    r[ 1211].Re=-1.360661951711607531301240214816061750e-1, .Im=-9.9056868256663233029968296250444835e-1

    r[ 1212].Re=-8.9075429621938329027841518836794420e-1, .Im= 4.542288195874499279192093581514200e-1

    r[ 1213].Re=-8.9075429621938329027841518836794420e-1, .Im=-4.542288195874499279192093581514200e-1

    r[ 1214].Re= 7.7455152632445900540147931678802705e-1, .Im= 6.3224789501347866682579024200094860e-1

    r[ 1215].Re= 7.7455152632445900540147931678802705e-1, .Im=-6.3224789501347866682579024200094860e-1

    r[ 1216].Re=-2.335202248089321697133158295400789875e-1, .Im= 9.7222821563410555256723455386236310e-1

    r[ 1217].Re=-2.335202248089321697133158295400789875e-1, .Im=-9.7222821563410555256723455386236310e-1

    r[ 1218].Re= 2.145260344420051867864174255373654875e-1, .Im= 9.7657921092184118982970630895579230e-1

    r[ 1219].Re= 2.145260344420051867864174255373654875e-1, .Im=-9.7657921092184118982970630895579230e-1

    r[ 1220].Re= 8.9132171072779819986919846996897830e-1, .Im= 4.53025298283327770842987547439406625e-1

    r[ 1221].Re= 8.9132171072779819986919846996897830e-1, .Im=-4.53025298283327770842987547439406625e-1

    r[ 1222].Re=-9.8743225788781063823051908912020735e-1, .Im= 1.573361869675299340443075379880610750e-1

    r[ 1223].Re=-9.8743225788781063823051908912020735e-1, .Im=-1.573361869675299340443075379880610750e-1

    r[ 1224].Re=-4.52528373356968882657014319192967375e-1, .Im= 8.9161390276244323338517006050096820e-1

    r[ 1225].Re=-4.52528373356968882657014319192967375e-1, .Im=-8.9161390276244323338517006050096820e-1

    r[ 1226].Re= 4.69988031368432757073350103382836075e-1, .Im= 8.8249375713053235248395367307239210e-1

    r[ 1227].Re= 4.69988031368432757073350103382836075e-1, .Im=-8.8249375713053235248395367307239210e-1

    r[ 1228].Re=-4.95660093432964798942919060209533175e-1, .Im= 8.6838677274022779695172857827856205e-1

    r[ 1229].Re=-4.95660093432964798942919060209533175e-1, .Im=-8.6838677274022779695172857827856205e-1

    r[ 1230].Re= 9.7323616539693613702866059611551460e-1, .Im= 2.292984281537763513458827446811483125e-1

    r[ 1231].Re= 9.7323616539693613702866059611551460e-1, .Im=-2.292984281537763513458827446811483125e-1

    r[ 1232].Re=-9.327095483265369635361707878473680e-1, .Im= 3.60337202725932281843768123508198175e-1

    r[ 1233].Re=-9.327095483265369635361707878473680e-1, .Im=-3.60337202725932281843768123508198175e-1

    r[ 1234].Re= 6.9504424769180894738695997148170135e-1, .Im= 7.18753371434704524389758262259420e-1

    r[ 1235].Re= 6.9504424769180894738695997148170135e-1, .Im=-7.18753371434704524389758262259420e-1

    r[ 1236].Re=-9.836647390746890151635994925527483750e-2, .Im= 9.9502060905595712814175612948019985e-1

    r[ 1237].Re=-9.836647390746890151635994925527483750e-2, .Im=-9.9502060905595712814175612948019985e-1

    r[ 1238].Re=-7.7452614822437204633587271018768660e-1, .Im= 6.3235229728266861837226997522520830e-1

    r[ 1239].Re=-7.7452614822437204633587271018768660e-1, .Im=-6.3235229728266861837226997522520830e-1

    r[ 1240].Re= 4.25098569066178155750890255148988200e-1, .Im= 9.0497395440701133839667136271600610e-1

    r[ 1241].Re= 4.25098569066178155750890255148988200e-1, .Im=-9.0497395440701133839667136271600610e-1

    r[ 1242].Re= 1.773020576415872129327766515416442375e-1, .Im= 9.840184699665943668378531583584845e-1

    r[ 1243].Re= 1.773020576415872129327766515416442375e-1, .Im=-9.840184699665943668378531583584845e-1

    r[ 1244].Re= 9.9401686137642975005235257413005455e-1, .Im= 1.0870395805555702062328293777682119375e-1

    r[ 1245].Re= 9.9401686137642975005235257413005455e-1, .Im=-1.0870395805555702062328293777682119375e-1

    r[ 1246].Re=-9.979363351125494219218126090709120e-1, .Im= 6.241651079140399932532190518941206250e-2

    r[ 1247].Re=-9.979363351125494219218126090709120e-1, .Im=-6.241651079140399932532190518941206250e-2

    r[ 1248].Re=-3.01931250111968529914463488239562125e-1, .Im= 9.5319409444898173244808958770590830e-1

    r[ 1249].Re=-3.01931250111968529914463488239562125e-1, .Im=-9.5319409444898173244808958770590830e-1

    r[ 1250].Re= 7.8603336575926863183383375144330780e-1, .Im= 6.1791402968160891173710069779190230e-1

    r[ 1251].Re= 7.8603336575926863183383375144330780e-1, .Im=-6.1791402968160891173710069779190230e-1

    r[ 1252].Re=-8.4138904297334804471830693728406910e-1, .Im= 5.4021716142144404759761755485669705e-1

    r[ 1253].Re=-8.4138904297334804471830693728406910e-1, .Im=-5.4021716142144404759761755485669705e-1

    r[ 1254].Re= 2.90328640620284628148795036395313200e-1, .Im= 9.5676825551502553413030227602575905e-1

    r[ 1255].Re= 2.90328640620284628148795036395313200e-1, .Im=-9.5676825551502553413030227602575905e-1

    r[ 1256].Re=-6.1072741677538910920475245802663265e-1, .Im= 7.9170200115118605221908865132718345e-1

    r[ 1257].Re=-6.1072741677538910920475245802663265e-1, .Im=-7.9170200115118605221908865132718345e-1

    r[ 1258].Re= 9.2170983412544704727054067916469645e-1, .Im= 3.87503112769959523475904461520258325e-1

    r[ 1259].Re= 9.2170983412544704727054067916469645e-1, .Im=-3.87503112769959523475904461520258325e-1

    r[ 1260].Re=-9.6606442962101146676445750927086915e-1, .Im= 2.57914643887592776039241471153218275e-1

    r[ 1261].Re=-9.6606442962101146676445750927086915e-1, .Im=-2.57914643887592776039241471153218275e-1

    r[ 1262].Re= 6.0884378080120449272527594075654630e-1, .Im= 7.9309131381578312769420335825998335e-1

    r[ 1263].Re= 6.0884378080120449272527594075654630e-1, .Im=-7.9309131381578312769420335825998335e-1

    r[ 1264].Re=-4.7080321524684644318714532573721953125e-2, .Im= 9.9876474966041117742321375772007740e-1

    r[ 1265].Re=-4.7080321524684644318714532573721953125e-2, .Im=-9.9876474966041117742321375772007740e-1

    r[ 1266].Re=-7.6040745335379777980477911114576270e-1, .Im= 6.4928441481503440524392090082983485e-1

    r[ 1267].Re=-7.6040745335379777980477911114576270e-1, .Im=-6.4928441481503440524392090082983485e-1

    r[ 1268].Re= 8.3065083561981034598886708408826960e-1, .Im= 5.5649695157954714996861866893596015e-1

    r[ 1269].Re= 8.3065083561981034598886708408826960e-1, .Im=-5.5649695157954714996861866893596015e-1

    r[ 1270].Re= 9.8823520481568460915866580762667580e-1, .Im= 1.524017080669805013215523104008752750e-1

    r[ 1271].Re= 9.8823520481568460915866580762667580e-1, .Im=-1.524017080669805013215523104008752750e-1

    r[ 1272].Re=-3.72242287297519514055466061108745625e-1, .Im= 9.2800413263964953713980321481358255e-1

    r[ 1273].Re=-3.72242287297519514055466061108745625e-1, .Im=-9.2800413263964953713980321481358255e-1

    r[ 1274].Re=-9.1394346537999027191290224436670540e-1, .Im= 4.05592281028989254387795426737284275e-1

    r[ 1275].Re=-9.1394346537999027191290224436670540e-1, .Im=-4.05592281028989254387795426737284275e-1

    r[ 1276].Re= 4.17332197191271736524953439584351125e-1, .Im= 9.0859758401658730075922676405753005e-1

    r[ 1277].Re= 4.17332197191271736524953439584351125e-1, .Im=-9.0859758401658730075922676405753005e-1

    r[ 1278].Re=-1.892421426202975653918514353790669625e-1, .Im= 9.8180076743656263804638228975818490e-1

    r[ 1279].Re=-1.892421426202975653918514353790669625e-1, .Im=-9.8180076743656263804638228975818490e-1

    r[ 1280].Re= 7.6121798712373089923488578278920610e-1, .Im= 6.4825039507119164294834945394541135e-1

    r[ 1281].Re= 7.6121798712373089923488578278920610e-1, .Im=-6.4825039507119164294834945394541135e-1

    r[ 1282].Re= 1.536243601662236855920351530357947890625e-2, .Im= 9.9975339250953376701858132946654220e-1

    r[ 1283].Re= 1.536243601662236855920351530357947890625e-2, .Im=-9.9975339250953376701858132946654220e-1

    r[ 1284].Re=-9.9921427965312914487583384470781310e-1, .Im= 3.6726754821458956756785596553527284375e-2

    r[ 1285].Re=-9.9921427965312914487583384470781310e-1, .Im=-3.6726754821458956756785596553527284375e-2

    r[ 1286].Re= 9.6083102446060064671939926483901215e-1, .Im= 2.76690011072610486664302698045503325e-1

    r[ 1287].Re= 9.6083102446060064671939926483901215e-1, .Im=-2.76690011072610486664302698045503325e-1

    r[ 1288].Re=-6.4316095022196273500725283156498335e-1, .Im= 7.6557621772445871854984034143853930e-1

    r[ 1289].Re=-6.4316095022196273500725283156498335e-1, .Im=-7.6557621772445871854984034143853930e-1

    r[ 1290].Re= 5.13692482551557416670107159006875e-1, .Im= 8.5778873371849995166371627419721335e-1

    r[ 1291].Re= 5.13692482551557416670107159006875e-1, .Im=-8.5778873371849995166371627419721335e-1

    r[ 1292].Re=-8.7108446416914386833951766675454560e-1, .Im= 4.90915817360818906855968180025229225e-1

    r[ 1293].Re=-8.7108446416914386833951766675454560e-1, .Im=-4.90915817360818906855968180025229225e-1

    r[ 1294].Re=-3.4841477775969152685942020752918321875e-2, .Im= 9.9926593251922990468472107750130815e-1

    r[ 1295].Re=-3.4841477775969152685942020752918321875e-2, .Im=-9.9926593251922990468472107750130815e-1

    r[ 1296].Re= 9.9998106110524909162506901338929310e-1, .Im= 6.116386323224590020053437200431289843750e-3

    r[ 1297].Re= 9.9998106110524909162506901338929310e-1, .Im=-6.116386323224590020053437200431289843750e-3

    r[ 1298].Re=-6.7897386449315788592429044001619330e-1, .Im= 7.340022331699038726782191588426940e-1

    r[ 1299].Re=-6.7897386449315788592429044001619330e-1, .Im=-7.340022331699038726782191588426940e-1

    r[ 1300].Re= 7.822352319712337909152211068430915e-1, .Im= 6.2271525022749663058618807554012160e-1

    r[ 1301].Re= 7.822352319712337909152211068430915e-1, .Im=-6.2271525022749663058618807554012160e-1

    r[ 1302].Re=-9.8395486106680285498526927767670710e-1, .Im= 1.778592215837420387192224779937532625e-1

    r[ 1303].Re=-9.8395486106680285498526927767670710e-1, .Im=-1.778592215837420387192224779937532625e-1

    r[ 1304].Re= 2.85647415169489382602563409818685600e-1, .Im= 9.5817718705398891021474128137924705e-1

    r[ 1305].Re= 2.85647415169489382602563409818685600e-1, .Im=-9.5817718705398891021474128137924705e-1

    r[ 1306].Re=-5.1048252730517029718271260207984595e-1, .Im= 8.5974988450302702869265658591757525e-1

    r[ 1307].Re=-5.1048252730517029718271260207984595e-1, .Im=-8.5974988450302702869265658591757525e-1

    r[ 1308].Re= 9.1144097664361301003310700252768580e-1, .Im= 4.11079158870693128768891710933530700e-1

    r[ 1309].Re= 9.1144097664361301003310700252768580e-1, .Im=-4.11079158870693128768891710933530700e-1

    r[ 1310].Re= 1.434470850117956497449256403342587750e-1, .Im= 9.8950908798325598603184971580049020e-1

    r[ 1311].Re= 1.434470850117956497449256403342587750e-1, .Im=-9.8950908798325598603184971580049020e-1

    r[ 1312].Re= 6.3661085375909209904676799851586110e-1, .Im= 7.7097469145118124878024445933988315e-1

    r[ 1313].Re= 6.3661085375909209904676799851586110e-1, .Im=-7.7097469145118124878024445933988315e-1

    r[ 1314].Re=-9.2957266917911263170992697268957270e-1, .Im= 3.68325175814942007423979930536006575e-1

    r[ 1315].Re=-9.2957266917911263170992697268957270e-1, .Im=-3.68325175814942007423979930536006575e-1

    r[ 1316].Re=-3.04279429500873943581495950638782225e-1, .Im= 9.5244832528930634119035403273301195e-1

    r[ 1317].Re=-3.04279429500873943581495950638782225e-1, .Im=-9.5244832528930634119035403273301195e-1

    r[ 1318].Re= 9.573673090099448224066236434737220e-1, .Im= 2.88439557610827457256874595259432675e-1

    r[ 1319].Re= 9.573673090099448224066236434737220e-1, .Im=-2.88439557610827457256874595259432675e-1

    r[ 1320].Re=-8.03844560142693120852186439151410e-1, .Im= 5.946605303217755711386871553258970e-1

    r[ 1321].Re=-8.03844560142693120852186439151410e-1, .Im=-5.946605303217755711386871553258970e-1

    r[ 1322].Re= 5.448579857148412308731622033519670e-1, .Im= 8.383449714871087365963830961845815e-1

    r[ 1323].Re= 5.448579857148412308731622033519670e-1, .Im=-8.383449714871087365963830961845815e-1

    r[ 1324].Re=-9.7378592629982230199914283730322495e-1, .Im= 2.270271673911054000072340386395808250e-1

    r[ 1325].Re=-9.7378592629982230199914283730322495e-1, .Im=-2.270271673911054000072340386395808250e-1

    r[ 1326].Re=-8.12943691334787055247090847842628125e-2, .Im= 9.9654937530946574586465658285305835e-1

    r[ 1327].Re=-8.12943691334787055247090847842628125e-2, .Im=-9.9654937530946574586465658285305835e-1

    r[ 1328].Re= 8.2447624080024384252141089746146460e-1, .Im= 5.6562274716330240842410148616181685e-1

    r[ 1329].Re= 8.2447624080024384252141089746146460e-1, .Im=-5.6562274716330240842410148616181685e-1

    r[ 1330].Re=-5.5093976148563617023512506420956920e-1, .Im= 8.3439630367391870446880375311593525e-1

    r[ 1331].Re=-5.5093976148563617023512506420956920e-1, .Im=-8.3439630367391870446880375311593525e-1

    r[ 1332].Re= 3.59797053417035106459564985925680950e-1, .Im= 9.3287899485706882174440579547081140e-1

    r[ 1333].Re= 3.59797053417035106459564985925680950e-1, .Im=-9.3287899485706882174440579547081140e-1

    r[ 1334].Re= 9.872793461874849185733182821422815e-1, .Im= 1.584496340731524344214165012090234000e-1

    r[ 1335].Re= 9.872793461874849185733182821422815e-1, .Im=-1.584496340731524344214165012090234000e-1

    r[ 1336].Re=-3.89231228545280194541788887363509275e-1, .Im= 9.210117349440660738935093831969425e-1

    r[ 1337].Re=-3.89231228545280194541788887363509275e-1, .Im=-9.210117349440660738935093831969425e-1

    r[ 1338].Re=-9.9327586564878744823658962559420615e-1, .Im= 1.1487573634572460778979774431718396875e-1

    r[ 1339].Re=-9.9327586564878744823658962559420615e-1, .Im=-1.1487573634572460778979774431718396875e-1

    r[ 1340].Re=-1.64744588666177055324979505712690296875e-2, .Im= 9.9973503592467827250089840163127515e-1

    r[ 1341].Re=-1.64744588666177055324979505712690296875e-2, .Im=-9.9973503592467827250089840163127515e-1

    r[ 1342].Re= 8.8226642896008611316460701345931735e-1, .Im= 4.70406036177657749242086993035627525e-1

    r[ 1343].Re= 8.8226642896008611316460701345931735e-1, .Im=-4.70406036177657749242086993035627525e-1

    r[ 1344].Re=-8.1321065492358346471490904150414280e-1, .Im= 5.8177108913131203582480566183221525e-1

    r[ 1345].Re=-8.1321065492358346471490904150414280e-1, .Im=-5.8177108913131203582480566183221525e-1

    r[ 1346].Re= 4.82920946664189665309407928361906650e-1, .Im= 8.7548948067968435093888501796755005e-1

    r[ 1347].Re= 4.82920946664189665309407928361906650e-1, .Im=-8.7548948067968435093888501796755005e-1

    r[ 1348].Re=-6.5711398355779282454136591695714740e-1, .Im= 7.5363050803670261768019145165453660e-1

    r[ 1349].Re=-6.5711398355779282454136591695714740e-1, .Im=-7.5363050803670261768019145165453660e-1

    r[ 1350].Re= 7.184215725700503485384729174256790e-1, .Im= 6.9538856749883826147140553075587375e-1

    r[ 1351].Re= 7.184215725700503485384729174256790e-1, .Im=-6.9538856749883826147140553075587375e-1

    r[ 1352].Re= 9.7065185562010081188333288082503710e-1, .Im= 2.40020084408329670289106161362724375e-1

    r[ 1353].Re= 9.7065185562010081188333288082503710e-1, .Im=-2.40020084408329670289106161362724375e-1

    r[ 1354].Re=-9.4125184587976595818048508590436540e-1, .Im= 3.37380968728187624616765560858766525e-1

    r[ 1355].Re=-9.4125184587976595818048508590436540e-1, .Im=-3.37380968728187624616765560858766525e-1

    r[ 1356].Re=-2.67903076069380852164414363869582300e-1, .Im= 9.633097597842196213591137166076805e-1

    r[ 1357].Re=-2.67903076069380852164414363869582300e-1, .Im=-9.633097597842196213591137166076805e-1

    r[ 1358].Re= 1.965455808332741693966738694143714375e-1, .Im= 9.8035770874061878288330262876115735e-1

    r[ 1359].Re= 1.965455808332741693966738694143714375e-1, .Im=-9.8035770874061878288330262876115735e-1

    r[ 1360].Re=-7.260166370198553043024958242313005e-1, .Im= 6.8751693640256361650386907058418725e-1

    r[ 1361].Re=-7.260166370198553043024958242313005e-1, .Im=-6.8751693640256361650386907058418725e-1

    r[ 1362].Re= 6.432107943240812364393832467612810e-1, .Im= 7.6548312016659636469739780295640230e-1

    r[ 1363].Re= 6.432107943240812364393832467612810e-1, .Im=-7.6548312016659636469739780295640230e-1

    r[ 1364].Re=-8.6500733658222961341976997573510740e-1, .Im= 5.015501928408303555784186755772680e-1

    r[ 1365].Re=-8.6500733658222961341976997573510740e-1, .Im=-5.015501928408303555784186755772680e-1

    r[ 1366].Re= 9.926020149019568750148323488247115e-1, .Im= 1.2086540297895258244675886771801742500e-1

    r[ 1367].Re= 9.926020149019568750148323488247115e-1, .Im=-1.2086540297895258244675886771801742500e-1

    r[ 1368].Re=-2.012528381418222933607609093087376000e-1, .Im= 9.7940721088379423253655886583146635e-1

    r[ 1369].Re=-2.012528381418222933607609093087376000e-1, .Im=-9.7940721088379423253655886583146635e-1

    r[ 1370].Re= 6.69830531342517025011895626107616406250000e-4, .Im= 9.9985822344560915109212828610907305e-1

    r[ 1371].Re= 6.69830531342517025011895626107616406250000e-4, .Im=-9.9985822344560915109212828610907305e-1

    r[ 1372].Re= 8.8399441735406625308968386889318935e-1, .Im= 4.67175066431905816610736792426905575e-1

    r[ 1373].Re= 8.8399441735406625308968386889318935e-1, .Im=-4.67175066431905816610736792426905575e-1

    r[ 1374].Re=-9.7121375467251325197537425992777570e-1, .Im= 2.377504744538678216336791138019179875e-1

    r[ 1375].Re=-9.7121375467251325197537425992777570e-1, .Im=-2.377504744538678216336791138019179875e-1

    r[ 1376].Re= 3.26439442189373374425542806420708075e-1, .Im= 9.4505507163059943032124010642291975e-1

    r[ 1377].Re= 3.26439442189373374425542806420708075e-1, .Im=-9.4505507163059943032124010642291975e-1

    r[ 1378].Re=-5.8718498576201250127581943161203525e-1, .Im= 8.0930004381422737669282696515438145e-1

    r[ 1379].Re=-5.8718498576201250127581943161203525e-1, .Im=-8.0930004381422737669282696515438145e-1

    r[ 1380].Re= 7.3606342560173954048252653592498970e-1, .Im= 6.7668077320008634956138848792761560e-1

    r[ 1381].Re= 7.3606342560173954048252653592498970e-1, .Im=-6.7668077320008634956138848792761560e-1

    r[ 1382].Re=-9.9673023239219205038352811243385075e-1, .Im= 7.951559757099564695881355191886541250e-2

    r[ 1383].Re=-9.9673023239219205038352811243385075e-1, .Im=-7.951559757099564695881355191886541250e-2

    r[ 1384].Re= 9.4845848164321866491377477359492330e-1, .Im= 3.16457752826865668094313832625630300e-1

    r[ 1385].Re= 9.4845848164321866491377477359492330e-1, .Im=-3.16457752826865668094313832625630300e-1

    r[ 1386].Re=-4.71000262131217151129192188818706175e-1, .Im= 8.8198784257430973276825625362107530e-1

    r[ 1387].Re=-4.71000262131217151129192188818706175e-1, .Im=-8.8198784257430973276825625362107530e-1

    r[ 1388].Re= 2.407472480703016781689029812696389750e-1, .Im= 9.7044143283524442189502678957069290e-1

    r[ 1389].Re= 2.407472480703016781689029812696389750e-1, .Im=-9.7044143283524442189502678957069290e-1

    r[ 1390].Re=-9.0633495848817191564705808559665455e-1, .Im= 4.22316776059386222996749893354717625e-1

    r[ 1391].Re=-9.0633495848817191564705808559665455e-1, .Im=-4.22316776059386222996749893354717625e-1

    r[ 1392].Re= 5.7027382381010038869817435625009235e-1, .Im= 8.2127336160479713633719711651792745e-1

    r[ 1393].Re= 5.7027382381010038869817435625009235e-1, .Im=-8.2127336160479713633719711651792745e-1

    r[ 1394].Re=-2.83195563589548393590433761346503150e-1, .Im= 9.5893267728259590221284724975703280e-1

    r[ 1395].Re=-2.83195563589548393590433761346503150e-1, .Im=-9.5893267728259590221284724975703280e-1

    r[ 1396].Re= 9.2546764009341042633849383491906335e-1, .Im= 3.78438601868774315839516475534765025e-1

    r[ 1397].Re= 9.2546764009341042633849383491906335e-1, .Im=-3.78438601868774315839516475534765025e-1

    r[ 1398].Re=-9.8928720179551288271824205367011015e-1, .Im= 1.452316664021439940324142980898614000e-1

    r[ 1399].Re=-9.8928720179551288271824205367011015e-1, .Im=-1.452316664021439940324142980898614000e-1

    r[ 1400].Re= 3.71198194353984933790968625544337550e-1, .Im= 9.2840216502372463480696751503273840e-1

    r[ 1401].Re= 3.71198194353984933790968625544337550e-1, .Im=-9.2840216502372463480696751503273840e-1

    r[ 1402].Re=-4.20586974579497507864545013944734800e-1, .Im= 9.0711012789493672414664615644142030e-1

    r[ 1403].Re=-4.20586974579497507864545013944734800e-1, .Im=-9.0711012789493672414664615644142030e-1

    r[ 1404].Re=-1.445642831041104303668731745347031375e-1, .Im= 9.8935631957304348560455764527432620e-1

    r[ 1405].Re=-1.445642831041104303668731745347031375e-1, .Im=-9.8935631957304348560455764527432620e-1

    r[ 1406].Re= 9.999932920041790795906422317784745e-1, .Im= 3.6702806925318449612904991852246892578125e-3

    r[ 1407].Re= 9.999932920041790795906422317784745e-1, .Im=-3.6702806925318449612904991852246892578125e-3

    r[ 1408].Re=-7.7761348124484874766437769721960645e-1, .Im= 6.285595893126741939838098005566280e-1

    r[ 1409].Re=-7.7761348124484874766437769721960645e-1, .Im=-6.285595893126741939838098005566280e-1

    r[ 1410].Re= 6.40386062173930237229058093362255e-1, .Im= 7.6785480848166698386592088354518635e-1

    r[ 1411].Re= 6.40386062173930237229058093362255e-1, .Im=-7.6785480848166698386592088354518635e-1

    r[ 1412].Re=-9.1344551893586811708303230261662970e-1, .Im= 4.067024956876738595035192247451050e-1

    r[ 1413].Re=-9.1344551893586811708303230261662970e-1, .Im=-4.067024956876738595035192247451050e-1

    r[ 1414].Re= 8.3808009771248304087265523776295590e-1, .Im= 5.4525508127075861253274524642620235e-1

    r[ 1415].Re= 8.3808009771248304087265523776295590e-1, .Im=-5.4525508127075861253274524642620235e-1

    r[ 1416].Re=-6.1460507826763921546131541617796755e-1, .Im= 7.8869255886438793812232006530393845e-1

    r[ 1417].Re=-6.1460507826763921546131541617796755e-1, .Im=-7.8869255886438793812232006530393845e-1

    r[ 1418].Re= 1.386073552810765663334535702233552000e-1, .Im= 9.9020079706111774342502940271515395e-1

    r[ 1419].Re= 1.386073552810765663334535702233552000e-1, .Im=-9.9020079706111774342502940271515395e-1

    r[ 1420].Re= 8.6004464349202691675344567556749095e-1, .Im= 5.0990144947743609726842350937658920e-1

    r[ 1421].Re= 8.6004464349202691675344567556749095e-1, .Im=-5.0990144947743609726842350937658920e-1

    r[ 1422].Re=-9.530046716833842079807936897850595e-1, .Im= 3.02577126889518377428345274893217700e-1

    r[ 1423].Re=-9.530046716833842079807936897850595e-1, .Im=-3.02577126889518377428345274893217700e-1

    r[ 1424].Re= 4.47135881683003111319862910022493450e-1, .Im= 8.9429425834980180720634734825580380e-1

    r[ 1425].Re= 4.47135881683003111319862910022493450e-1, .Im=-8.9429425834980180720634734825580380e-1

    r[ 1426].Re=-6.870338608886128461961106950184330e-1, .Im= 7.2647733177360451772841543061076660e-1

    r[ 1427].Re=-6.870338608886128461961106950184330e-1, .Im=-7.2647733177360451772841543061076660e-1

    r[ 1428].Re= 9.7676540473254935825764277979033065e-1, .Im= 2.137874543993119325069329761390690625e-1

    r[ 1429].Re= 9.7676540473254935825764277979033065e-1, .Im=-2.137874543993119325069329761390690625e-1

    r[ 1430].Re=-3.42507861055841578146186066078371350e-1, .Im= 9.3938734391763567543875979026779530e-1

    r[ 1431].Re=-3.42507861055841578146186066078371350e-1, .Im=-9.3938734391763567543875979026779530e-1

    r[ 1432].Re= 1.0456140201641611620075877908675465625e-1, .Im= 9.9438160440730061218062019179342310e-1

    r[ 1433].Re= 1.0456140201641611620075877908675465625e-1, .Im=-9.9438160440730061218062019179342310e-1

    r[ 1434].Re=-8.4336489683105453352141012146603315e-1, .Im= 5.3713606872004615588878095877589655e-1

    r[ 1435].Re=-8.4336489683105453352141012146603315e-1, .Im=-5.3713606872004615588878095877589655e-1

    r[ 1436].Re= 9.8172233842830469718876429396914315e-1, .Im= 1.898003778389316664743091678246855625e-1

    r[ 1437].Re= 9.8172233842830469718876429396914315e-1, .Im=-1.898003778389316664743091678246855625e-1

    r[ 1438].Re= 5.6321928611913318896142754965694620e-1, .Im= 8.2612013810344531172802362561924380e-1

    r[ 1439].Re= 5.6321928611913318896142754965694620e-1, .Im=-8.2612013810344531172802362561924380e-1

    r[ 1440].Re= 5.330007239768277255143047455021587500e-2, .Im= 9.9844886573982460920007042659563010e-1

    r[ 1441].Re= 5.330007239768277255143047455021587500e-2, .Im=-9.9844886573982460920007042659563010e-1

    r[ 1442].Re= 7.6675202542926368387554703076602890e-1, .Im= 6.4168641079435462248881094637908970e-1

    r[ 1443].Re= 7.6675202542926368387554703076602890e-1, .Im=-6.4168641079435462248881094637908970e-1

    r[ 1444].Re=-9.9986268626512464496869370123022235e-1, .Im= 7.354748597847392613258143967414070703125e-3

    r[ 1445].Re=-9.9986268626512464496869370123022235e-1, .Im=-7.354748597847392613258143967414070703125e-3

    r[ 1446].Re=-7.4345916265638556374995005171513180e-1, .Im= 6.6862214039068990079073273591347970e-1

    r[ 1447].Re=-7.4345916265638556374995005171513180e-1, .Im=-6.6862214039068990079073273591347970e-1

    r[ 1448].Re=-2.26375198639403862888030971589614625e-1, .Im= 9.7391264018028878002297687999089245e-1

    r[ 1449].Re=-2.26375198639403862888030971589614625e-1, .Im=-9.7391264018028878002297687999089245e-1

    r[ 1450].Re= 6.7180600302971815729335958167212080e-1, .Im= 7.4051617264200497725568084206315685e-1

    r[ 1451].Re= 6.7180600302971815729335958167212080e-1, .Im=-7.4051617264200497725568084206315685e-1

    r[ 1452].Re=-9.594318656220360286290826934418873750e-2, .Im= 9.952553766011938973790051932155620e-1

    r[ 1453].Re=-9.594318656220360286290826934418873750e-2, .Im=-9.952553766011938973790051932155620e-1

    r[ 1454].Re=-9.591107101985968386159697729453910e-1, .Im= 2.82670839170370780113472619632375425e-1

    r[ 1455].Re=-9.591107101985968386159697729453910e-1, .Im=-2.82670839170370780113472619632375425e-1

    r[ 1456].Re= 9.3874357851886669479313241026829925e-1, .Im= 3.44185131359943108364518593589309600e-1

    r[ 1457].Re= 9.3874357851886669479313241026829925e-1, .Im=-3.44185131359943108364518593589309600e-1

    r[ 1458].Re=-6.7356753224929166723455864485003985e-1, .Im= 7.3897676475444595833863559164456090e-1

    r[ 1459].Re=-6.7356753224929166723455864485003985e-1, .Im=-7.3897676475444595833863559164456090e-1

    r[ 1460].Re= 2.7741070800447387156850709288846700e-1, .Im= 9.6059996623574650520538398268399760e-1

    r[ 1461].Re= 2.7741070800447387156850709288846700e-1, .Im=-9.6059996623574650520538398268399760e-1

    r[ 1462].Re= 9.0056845404010554823059919726802035e-1, .Im= 4.34380836956069771304100868292152875e-1

    r[ 1463].Re= 9.0056845404010554823059919726802035e-1, .Im=-4.34380836956069771304100868292152875e-1

    r[ 1464].Re= 9.9690174700568434662528716216911560e-1, .Im= 7.823514080768007028510169220680836250e-2

    r[ 1465].Re= 9.9690174700568434662528716216911560e-1, .Im=-7.823514080768007028510169220680836250e-2

    r[ 1466].Re=-8.7936289195392780548843347787624225e-1, .Im= 4.75906673432615945351642494642874225e-1

    r[ 1467].Re=-8.7936289195392780548843347787624225e-1, .Im=-4.75906673432615945351642494642874225e-1

    r[ 1468].Re=-4.89270587646601529119294582415022875e-1, .Im= 8.7200009302248016052061529990169215e-1

    r[ 1469].Re=-4.89270587646601529119294582415022875e-1, .Im=-8.7200009302248016052061529990169215e-1

    r[ 1470].Re=-8.5181917554291042282699208953999910e-1, .Im= 5.2362729492761028726732774885022080e-1

    r[ 1471].Re=-8.5181917554291042282699208953999910e-1, .Im=-5.2362729492761028726732774885022080e-1

    r[ 1472].Re= 4.44958485542301940274256821794551775e-1, .Im= 8.9539044694193881124277822891599495e-1

    r[ 1473].Re= 4.44958485542301940274256821794551775e-1, .Im=-8.9539044694193881124277822891599495e-1

    r[ 1474].Re= 3.36835532856376518306973366634338150e-1, .Im= 9.4140978019385146424724553071428090e-1

    r[ 1475].Re= 3.36835532856376518306973366634338150e-1, .Im=-9.4140978019385146424724553071428090e-1

    r[ 1476].Re=-9.8437332638225971681578130301204510e-1, .Im= 1.754472027037622949841022546024760125e-1

    r[ 1477].Re=-9.8437332638225971681578130301204510e-1, .Im=-1.754472027037622949841022546024760125e-1

    r[ 1478].Re= 8.082022118278198163920933438930660e-1, .Im= 5.8862785232952885561275024883798320e-1

    r[ 1479].Re= 8.082022118278198163920933438930660e-1, .Im=-5.8862785232952885561275024883798320e-1

    r[ 1480].Re=-3.74522491126815404438588075208826900e-1, .Im= 9.2707750872911298678502589609706770e-1

    r[ 1481].Re=-3.74522491126815404438588075208826900e-1, .Im=-9.2707750872911298678502589609706770e-1

    r[ 1482].Re=-1.602914719860161762987615929887397125e-1, .Im= 9.8694336039590291331791149787022730e-1

    r[ 1483].Re=-1.602914719860161762987615929887397125e-1, .Im=-9.8694336039590291331791149787022730e-1

    r[ 1484].Re=-6.54244997163368202652833360843942500e-2, .Im= 9.9773045388091918805884006360429335e-1

    r[ 1485].Re=-6.54244997163368202652833360843942500e-2, .Im=-9.9773045388091918805884006360429335e-1

    r[ 1486].Re= 9.8860432651494090094956845859996970e-1, .Im= 1.499697691778617281155305818174383500e-1

    r[ 1487].Re= 9.8860432651494090094956845859996970e-1, .Im=-1.499697691778617281155305818174383500e-1

    r[ 1488].Re=-9.6699194197975291142910236885654740e-1, .Im= 2.54357751653957686599483167810831200e-1

    r[ 1489].Re=-9.6699194197975291142910236885654740e-1, .Im=-2.54357751653957686599483167810831200e-1

    r[ 1490].Re= 6.6083626512007087594469112445949575e-1, .Im= 7.5031054404511721145354385953396555e-1

    r[ 1491].Re= 6.6083626512007087594469112445949575e-1, .Im=-7.5031054404511721145354385953396555e-1

    r[ 1492].Re=-5.4581975998726661725157782711903560e-1, .Im= 8.3775340989908675393138537401682695e-1

    r[ 1493].Re=-5.4581975998726661725157782711903560e-1, .Im=-8.3775340989908675393138537401682695e-1

    r[ 1494].Re= 7.4917836875918419892173005791846660e-1, .Im= 6.6212251119540488364378916230634785e-1

    r[ 1495].Re= 7.4917836875918419892173005791846660e-1, .Im=-6.6212251119540488364378916230634785e-1

    r[ 1496].Re=-7.4915071234386942933269892819225785e-1, .Im= 6.622259295373246201776851194154005e-1

    r[ 1497].Re=-7.4915071234386942933269892819225785e-1, .Im=-6.622259295373246201776851194154005e-1

    r[ 1498].Re= 1.640300745352449574010478272612090125e-1, .Im= 9.8631149562004138964255162136396390e-1

    r[ 1499].Re= 1.640300745352449574010478272612090125e-1, .Im=-9.8631149562004138964255162136396390e-1

    r[ 1500].Re= 9.3490109645760810508363647386431690e-1, .Im= 3.54514823946165291701504429511260225e-1

    r[ 1501].Re= 9.3490109645760810508363647386431690e-1, .Im=-3.54514823946165291701504429511260225e-1

    r[ 1502].Re=-9.977905561684182744741633541707415e-1, .Im= 6.487096592079887036330632099634385625e-2

    r[ 1503].Re=-9.977905561684182744741633541707415e-1, .Im=-6.487096592079887036330632099634385625e-2

    r[ 1504].Re= 5.3040628305960357824488937694695775e-1, .Im= 8.4755309324814898097599780157906930e-1

    r[ 1505].Re= 5.3040628305960357824488937694695775e-1, .Im=-8.4755309324814898097599780157906930e-1

    r[ 1506].Re=-5.5401536628595027256238836343982255e-1, .Im= 8.323730449645952989001784771971870e-1

    r[ 1507].Re=-5.5401536628595027256238836343982255e-1, .Im=-8.323730449645952989001784771971870e-1

    r[ 1508].Re= 9.905478754870497004603180357662495e-1, .Im= 1.366396548138920363779647004776052125e-1

    r[ 1509].Re= 9.905478754870497004603180357662495e-1, .Im=-1.366396548138920363779647004776052125e-1

    r[ 1510].Re=-8.9679687763547677459285978329717180e-1, .Im= 4.42181190836890614104248697913135400e-1

    r[ 1511].Re=-8.9679687763547677459285978329717180e-1, .Im=-4.42181190836890614104248697913135400e-1

    r[ 1512].Re= 2.431338266013515769792263654380803875e-1, .Im= 9.6983799326378250516000889547285620e-1

    r[ 1513].Re= 2.431338266013515769792263654380803875e-1, .Im=-9.6983799326378250516000889547285620e-1

    r[ 1514].Re=-4.34973391117718266585256969847250725e-1, .Im= 9.0031380507321256967401268411776980e-1

    r[ 1515].Re=-4.34973391117718266585256969847250725e-1, .Im=-9.0031380507321256967401268411776980e-1

    r[ 1516].Re= 8.5753922433706131212005630004568955e-1, .Im= 5.1409963468297659172634439528337675e-1

    r[ 1517].Re= 8.5753922433706131212005630004568955e-1, .Im=-5.1409963468297659172634439528337675e-1

    r[ 1518].Re=-8.0018638803761577005246863336651585e-1, .Im= 5.9957220709661673829771189048187805e-1

    r[ 1519].Re=-8.0018638803761577005246863336651585e-1, .Im=-5.9957220709661673829771189048187805e-1

    r[ 1520].Re= 5.2415931484962108299896499374881385e-1, .Im= 8.5143491082877398312689365411642935e-1

    r[ 1521].Re= 5.2415931484962108299896499374881385e-1, .Im=-8.5143491082877398312689365411642935e-1

    r[ 1522].Re=-5.9312006532587453755400730415203721875e-2, .Im= 9.9811285982742403710687995044281705e-1

    r[ 1523].Re=-5.9312006532587453755400730415203721875e-2, .Im=-9.9811285982742403710687995044281705e-1

    r[ 1524].Re=-2.86731391466258866973504382258397525e-1, .Im= 9.5788053343852164189797804283443835e-1

    r[ 1525].Re=-2.86731391466258866973504382258397525e-1, .Im=-9.5788053343852164189797804283443835e-1

    r[ 1526].Re=-9.7700420618726091515071630055899730e-1, .Im= 2.126903152759757886780533908677170875e-1

    r[ 1527].Re=-9.7700420618726091515071630055899730e-1, .Im=-2.126903152759757886780533908677170875e-1

    r[ 1528].Re= 9.0735905549548878656906936157611195e-1, .Im= 4.19978205110673796784936939729959700e-1

    r[ 1529].Re= 9.0735905549548878656906936157611195e-1, .Im=-4.19978205110673796784936939729959700e-1

    r[ 1530].Re= 7.0725592422907401779497149618691760e-1, .Im= 7.0672370288973540564114728113054295e-1

    r[ 1531].Re= 7.0725592422907401779497149618691760e-1, .Im=-7.0672370288973540564114728113054295e-1

    r[ 1532].Re=-6.33737586200337488229195059830090e-1, .Im= 7.7339760507654231602714389737229790e-1

    r[ 1533].Re=-6.33737586200337488229195059830090e-1, .Im=-7.7339760507654231602714389737229790e-1

    r[ 1534].Re= 2.061416614596801866188258145484724000e-1, .Im= 9.7836902252399582380348874721676110e-1

    r[ 1535].Re= 2.061416614596801866188258145484724000e-1, .Im=-9.7836902252399582380348874721676110e-1

    r[ 1536].Re=-9.2217749562192441459274050430394705e-1, .Im= 3.86475766086131156118455010073375875e-1

    r[ 1537].Re=-9.2217749562192441459274050430394705e-1, .Im=-3.86475766086131156118455010073375875e-1

    r[ 1538].Re=-3.60847012039176406883456138530164025e-1, .Im= 9.3249120578931143921153079645591785e-1

    r[ 1539].Re=-3.60847012039176406883456138530164025e-1, .Im=-9.3249120578931143921153079645591785e-1

    r[ 1540].Re= 9.985972438850079235805878852261230e-1, .Im= 5.2588781948466570281830456679017515625e-2

    r[ 1541].Re= 9.985972438850079235805878852261230e-1, .Im=-5.2588781948466570281830456679017515625e-2

    r[ 1542].Re= 5.9120220191070416149159427732229230e-1, .Im= 8.0633292915340026851822585740592330e-1

    r[ 1543].Re= 5.9120220191070416149159427732229230e-1, .Im=-8.0633292915340026851822585740592330e-1

    r[ 1544].Re=-1.795975768442413245118416398327099125e-1, .Im= 9.8360868238174647970595287915784865e-1

    r[ 1545].Re=-1.795975768442413245118416398327099125e-1, .Im=-9.8360868238174647970595287915784865e-1

    r[ 1546].Re= 9.2265299016672430720831243888824245e-1, .Im= 3.85230191416714551344568917556898650e-1

    r[ 1547].Re= 9.2265299016672430720831243888824245e-1, .Im=-3.85230191416714551344568917556898650e-1

    r[ 1548].Re=-9.9408570130102680284522875808761455e-1, .Im= 1.075716070303040783340264852085965625e-1

    r[ 1549].Re=-9.9408570130102680284522875808761455e-1, .Im=-1.075716070303040783340264852085965625e-1

    r[ 1550].Re=-7.6751888119852662573094903564197010e-1, .Im= 6.4085207399466825872735853408812545e-1

    r[ 1551].Re=-7.6751888119852662573094903564197010e-1, .Im=-6.4085207399466825872735853408812545e-1

    r[ 1552].Re= 3.98330205526908176505429537428426550e-1, .Im= 9.1707804204051035501521482729003760e-1

    r[ 1553].Re= 3.98330205526908176505429537428426550e-1, .Im=-9.1707804204051035501521482729003760e-1

    r[ 1554].Re= 8.1606002615910055997261451921076510e-1, .Im= 5.7767899767343922068363326616236005e-1

    r[ 1555].Re= 8.1606002615910055997261451921076510e-1, .Im=-5.7767899767343922068363326616236005e-1

    r[ 1556].Re= 6.2330743849638148290637218451593070e-1, .Im= 7.8177040902334526961681149259675290e-1

    r[ 1557].Re= 6.2330743849638148290637218451593070e-1, .Im=-7.8177040902334526961681149259675290e-1

    r[ 1558].Re=-8.8342401693498051606923127110349010e-1, .Im= 4.68354551013078324039895505848107850e-1

    r[ 1559].Re=-8.8342401693498051606923127110349010e-1, .Im=-4.68354551013078324039895505848107850e-1

    r[ 1560].Re=-6.0001088301376881428694787246058695e-1, .Im= 7.998539257150376613481057574972510e-1

    r[ 1561].Re=-6.0001088301376881428694787246058695e-1, .Im=-7.998539257150376613481057574972510e-1

    r[ 1562].Re= 1.0700654642879593725357523226193734375e-1, .Im= 9.9411130025141392074772284104255955e-1

    r[ 1563].Re= 1.0700654642879593725357523226193734375e-1, .Im=-9.9411130025141392074772284104255955e-1

    r[ 1564].Re= 9.6763515551170253825574718575808215e-1, .Im= 2.5189226780319823317810801199811975e-1

    r[ 1565].Re= 9.6763515551170253825574718575808215e-1, .Im=-2.5189226780319823317810801199811975e-1

    r[ 1566].Re=-9.6413965568572812525616200218792070e-1, .Im= 2.65000078042987807780406228630454275e-1

    r[ 1567].Re=-9.6413965568572812525616200218792070e-1, .Im=-2.65000078042987807780406228630454275e-1

    r[ 1568].Re=-5.0752009246276173770606732205123987500e-2, .Im= 9.9857018713914857954705439624376595e-1

    r[ 1569].Re=-5.0752009246276173770606732205123987500e-2, .Im=-9.9857018713914857954705439624376595e-1

    r[ 1570].Re= 3.13674587865285514620694584664306600e-1, .Im= 9.4937376923669658523863290611188855e-1

    r[ 1571].Re= 3.13674587865285514620694584664306600e-1, .Im=-9.4937376923669658523863290611188855e-1

    r[ 1572].Re=-4.02724863744024330625137508832267475e-1, .Im= 9.1517848105701760097474561916897070e-1

    r[ 1573].Re=-4.02724863744024330625137508832267475e-1, .Im=-9.1517848105701760097474561916897070e-1

    r[ 1574].Re=-8.1747069288894880223494965321151535e-1, .Im= 5.757834521105759106873733799147885e-1

    r[ 1575].Re=-8.1747069288894880223494965321151535e-1, .Im=-5.757834521105759106873733799147885e-1

    r[ 1576].Re= 9.9563624311554987933448046533158045e-1, .Im= 9.286193434469454388580089698734809375e-2

    r[ 1577].Re= 9.9563624311554987933448046533158045e-1, .Im=-9.286193434469454388580089698734809375e-2

    r[ 1578].Re= 6.1465830358519479847956290541333145e-1, .Im= 7.886031369147596947755118890199810e-1

    r[ 1579].Re= 6.1465830358519479847956290541333145e-1, .Im=-7.886031369147596947755118890199810e-1

    r[ 1580].Re=-4.96715013687860140745300441267318075e-1, .Im= 8.6777575525106187548374236939707770e-1

    r[ 1581].Re=-4.96715013687860140745300441267318075e-1, .Im=-8.6777575525106187548374236939707770e-1

    r[ 1582].Re= 8.7287482014924100415242946837679480e-1, .Im= 4.87609225239969135134998623470892175e-1

    r[ 1583].Re= 8.7287482014924100415242946837679480e-1, .Im=-4.87609225239969135134998623470892175e-1

    r[ 1584].Re=-9.9977424713854645688115851953625675e-1, .Im= 1.59190117572577845284076403231665593750e-2

    r[ 1585].Re=-9.9977424713854645688115851953625675e-1, .Im=-1.59190117572577845284076403231665593750e-2

    r[ 1586].Re=-1.0690163163233160070753058334958040625e-1, .Im= 9.941291763974219319877079215075355e-1

    r[ 1587].Re=-1.0690163163233160070753058334958040625e-1, .Im=-9.941291763974219319877079215075355e-1

    r[ 1588].Re= 7.8980219135414930775596076273359355e-1, .Im= 6.1308975199923398946566521772183475e-1

    r[ 1589].Re= 7.8980219135414930775596076273359355e-1, .Im=-6.1308975199923398946566521772183475e-1

    r[ 1590].Re=-6.9234643310140187022483360124169845e-1, .Im= 7.2140773419980586123045895874383855e-1

    r[ 1591].Re=-6.9234643310140187022483360124169845e-1, .Im=-7.2140773419980586123045895874383855e-1

    r[ 1592].Re= 4.07282407496520115763871672243112675e-1, .Im= 9.1313646166044570851028083779965525e-1

    r[ 1593].Re= 4.07282407496520115763871672243112675e-1, .Im=-9.1313646166044570851028083779965525e-1

    r[ 1594].Re=-9.3533438483028286114517868554685260e-1, .Im= 3.53480699855943714116079945597448375e-1

    r[ 1595].Re=-9.3533438483028286114517868554685260e-1, .Im=-3.53480699855943714116079945597448375e-1

    r[ 1596].Re= 9.5338967714403688447077911405358460e-1, .Im= 3.01305117798495891712207139789825300e-1

    r[ 1597].Re= 9.5338967714403688447077911405358460e-1, .Im=-3.01305117798495891712207139789825300e-1

    r[ 1598].Re= 1.507226876941842597101839373863185750e-1, .Im= 9.8842714800807696118312151156715115e-1

    r[ 1599].Re= 1.507226876941842597101839373863185750e-1, .Im=-9.8842714800807696118312151156715115e-1

    r[ 1600].Re=-5.4171714799960701824943498650100080e-1, .Im= 8.4041268365060350920003884311881845e-1

    r[ 1601].Re=-5.4171714799960701824943498650100080e-1, .Im=-8.4041268365060350920003884311881845e-1

    r[ 1602].Re= 5.0103893641220531574020924381329675e-1, .Im= 8.6525705527855667487102664381382055e-1

    r[ 1603].Re= 5.0103893641220531574020924381329675e-1, .Im=-8.6525705527855667487102664381382055e-1

    r[ 1604].Re= 9.9629833179791349451193127606529740e-1, .Im= 8.555121454252645474269911574083380000e-2

    r[ 1605].Re= 9.9629833179791349451193127606529740e-1, .Im=-8.555121454252645474269911574083380000e-2

    r[ 1606].Re=-2.70256307298812892270234442548826325e-1, .Im= 9.626641713463829352903644576144870e-1

    r[ 1607].Re=-2.70256307298812892270234442548826325e-1, .Im=-9.626641713463829352903644576144870e-1

    r[ 1608].Re=-9.9067188232013314586055230392958035e-1, .Im= 1.355191473366312571169345346788759250e-1

    r[ 1609].Re=-9.9067188232013314586055230392958035e-1, .Im=-1.355191473366312571169345346788759250e-1

    r[ 1610].Re=-6.8791448948203648416921396346879190e-1, .Im= 7.2563329486513405974790202890289945e-1

    r[ 1611].Re=-6.8791448948203648416921396346879190e-1, .Im=-7.2563329486513405974790202890289945e-1

    r[ 1612].Re= 7.2771842196564628935107066354248670e-1, .Im= 6.8564375435874913566891564187244510e-1

    r[ 1613].Re= 7.2771842196564628935107066354248670e-1, .Im=-6.8564375435874913566891564187244510e-1

    r[ 1614].Re=-9.1884370851937080537652491329936310e-1, .Im= 3.94365573690223625291650932922493650e-1

    r[ 1615].Re=-9.1884370851937080537652491329936310e-1, .Im=-3.94365573690223625291650932922493650e-1

    r[ 1616].Re= 2.193096184452627273042679689751821500e-1, .Im= 9.7550633868250558045076559210428965e-1

    r[ 1617].Re= 2.193096184452627273042679689751821500e-1, .Im=-9.7550633868250558045076559210428965e-1

    r[ 1618].Re= 9.1492164263007402791316735601867545e-1, .Im= 4.03241045080582560800053215643856650e-1

    r[ 1619].Re= 9.1492164263007402791316735601867545e-1, .Im=-4.03241045080582560800053215643856650e-1

    r[ 1620].Re=-5.2618917376371876493124091211939230e-1, .Im= 8.502240521229948999604175696731545e-1

    r[ 1621].Re=-5.2618917376371876493124091211939230e-1, .Im=-8.502240521229948999604175696731545e-1

    r[ 1622].Re= 6.431000666660069420288436958799138125e-2, .Im= 9.9779186722920854002438773022731765e-1

    r[ 1623].Re= 6.431000666660069420288436958799138125e-2, .Im=-9.9779186722920854002438773022731765e-1

    r[ 1624].Re=-9.4845843439405508323858384756022130e-1, .Im= 3.16563842518223614863615011927322475e-1

    r[ 1625].Re=-9.4845843439405508323858384756022130e-1, .Im=-3.16563842518223614863615011927322475e-1

    r[ 1626].Re= 9.6478725012515531567203197482740505e-1, .Im= 2.62546443453860967043311802626703850e-1

    r[ 1627].Re= 9.6478725012515531567203197482740505e-1, .Im=-2.62546443453860967043311802626703850e-1

    r[ 1628].Re= 6.9943252335341365988341522097471170e-1, .Im= 7.1448211414323592460817735627642830e-1

    r[ 1629].Re= 6.9943252335341365988341522097471170e-1, .Im=-7.1448211414323592460817735627642830e-1

    r[ 1630].Re=-7.8601097269393493949252160746254955e-1, .Im= 6.1801947550609015458178419066825880e-1

    r[ 1631].Re=-7.8601097269393493949252160746254955e-1, .Im=-6.1801947550609015458178419066825880e-1

    r[ 1632].Re=-2.192102567877080021574442980636376875e-1, .Im= 9.7554199127842033956170553210540670e-1

    r[ 1633].Re=-2.192102567877080021574442980636376875e-1, .Im=-9.7554199127842033956170553210540670e-1

    r[ 1634].Re= 4.56975048659833682496156370689277525e-1, .Im= 8.8931786604312779154213330912170930e-1

    r[ 1635].Re= 4.56975048659833682496156370689277525e-1, .Im=-8.8931786604312779154213330912170930e-1

    r[ 1636].Re= 9.735225192278093020448181960091460e-1, .Im= 2.281119313028471262683183340413961500e-1

    r[ 1637].Re= 9.735225192278093020448181960091460e-1, .Im=-2.281119313028471262683183340413961500e-1

    r[ 1638].Re=-3.37898227017687680096003077778732400e-1, .Im= 9.410446185393385176709557526919525e-1

    r[ 1639].Re=-3.37898227017687680096003077778732400e-1, .Im=-9.410446185393385176709557526919525e-1

    r[ 1640].Re= 3.74609729700219939996230777978780675e-1, .Im= 9.2701678069701798357016286900034170e-1

    r[ 1641].Re= 3.74609729700219939996230777978780675e-1, .Im=-9.2701678069701798357016286900034170e-1

    r[ 1642].Re= 7.1414827466240482500836606050143015e-1, .Im= 6.9977520863501729841971155110513790e-1

    r[ 1643].Re= 7.1414827466240482500836606050143015e-1, .Im=-6.9977520863501729841971155110513790e-1

    r[ 1644].Re=-9.7804353509559127655137444889987815e-1, .Im= 2.079047029675712698892908747438923375e-1

    r[ 1645].Re=-9.7804353509559127655137444889987815e-1, .Im=-2.079047029675712698892908747438923375e-1

    r[ 1646].Re=-8.5627365523224008292402231745654715e-1, .Im= 5.1631834537813248164894730507512575e-1

    r[ 1647].Re=-8.5627365523224008292402231745654715e-1, .Im=-5.1631834537813248164894730507512575e-1

    r[ 1648].Re=-1.25143539334963332931849322449124875e-1, .Im= 9.919984440668594416479209030512720e-1

    r[ 1649].Re=-1.25143539334963332931849322449124875e-1, .Im=-9.919984440668594416479209030512720e-1

    r[ 1650].Re=-6.4033921590839071313894237391650675e-1, .Im= 7.679485571387663078724017395870760e-1

    r[ 1651].Re=-6.4033921590839071313894237391650675e-1, .Im=-7.679485571387663078724017395870760e-1

    r[ 1652].Re= 8.6807002402124566753371937011252155e-1, .Im= 4.96139006183777597769335443445015675e-1

    r[ 1653].Re= 8.6807002402124566753371937011252155e-1, .Im=-4.96139006183777597769335443445015675e-1

    r[ 1654].Re=-9.9862539836695285444534420093987135e-1, .Im= 5.0191286993858587328620757261887771875e-2

    r[ 1655].Re=-9.9862539836695285444534420093987135e-1, .Im=-5.0191286993858587328620757261887771875e-2

    r[ 1656].Re= 9.8419056591737641426220761786680665e-1, .Im= 1.765565510265644511012084194589988250e-1

    r[ 1657].Re= 9.8419056591737641426220761786680665e-1, .Im=-1.765565510265644511012084194589988250e-1

    r[ 1658].Re= 9.604652875679500767525098581245401250e-2, .Im= 9.9524063882060798125195333341252990e-1

    r[ 1659].Re= 9.604652875679500767525098581245401250e-2, .Im=-9.9524063882060798125195333341252990e-1

    r[ 1660].Re=-5.7323182772298619802597841044189405e-1, .Im= 8.1924427219819617729257288374355990e-1

    r[ 1661].Re=-5.7323182772298619802597841044189405e-1, .Im=-8.1924427219819617729257288374355990e-1

    r[ 1662].Re= 2.67999308889208531780923294718377275e-1, .Im= 9.6326614862366943814464548268006180e-1

    r[ 1663].Re= 2.67999308889208531780923294718377275e-1, .Im=-9.6326614862366943814464548268006180e-1

    r[ 1664].Re=-8.3672076874873690943701376454555425e-1, .Im= 5.4742371591042915390801226749317720e-1

    r[ 1665].Re=-8.3672076874873690943701376454555425e-1, .Im=-5.4742371591042915390801226749317720e-1

    r[ 1666].Re= 8.3336346701231811540111493741278535e-1, .Im= 5.5242974465289806929035876237321645e-1

    r[ 1667].Re= 8.3336346701231811540111493741278535e-1, .Im=-5.5242974465289806929035876237321645e-1

    r[ 1668].Re= 6.3567057660392334295096361529431305e-1, .Im= 7.7176179487669094303470274098799560e-1

    r[ 1669].Re= 6.3567057660392334295096361529431305e-1, .Im=-7.7176179487669094303470274098799560e-1

    r[ 1670].Re=-7.3270371535591716227742153932922515e-1, .Im= 6.8037225235075837748155436202068810e-1

    r[ 1671].Re=-7.3270371535591716227742153932922515e-1, .Im=-6.8037225235075837748155436202068810e-1

    r[ 1672].Re=-2.418393067823285391693133306034724125e-1, .Im= 9.7017884933876330499913365201791745e-1

    r[ 1673].Re=-2.418393067823285391693133306034724125e-1, .Im=-9.7017884933876330499913365201791745e-1

    r[ 1674].Re= 9.9922086043837088364938381346291860e-1, .Im= 3.9140503978006793706079236017103537500e-2

    r[ 1675].Re= 9.9922086043837088364938381346291860e-1, .Im=-3.9140503978006793706079236017103537500e-2

    r[ 1676].Re= 3.39148534060178474813795901354751525e-1, .Im= 9.4056930883897282846817233803449195e-1

    r[ 1677].Re= 3.39148534060178474813795901354751525e-1, .Im=-9.4056930883897282846817233803449195e-1

    r[ 1678].Re=-9.9522174791337980614969183079665525e-1, .Im= 9.660627517732106595005348026461433125e-2

    r[ 1679].Re=-9.9522174791337980614969183079665525e-1, .Im=-9.660627517732106595005348026461433125e-2

    r[ 1680].Re=-3.17085062156140573552676187318866125e-1, .Im= 9.4826952141899101267341620769002470e-1

    r[ 1681].Re=-3.17085062156140573552676187318866125e-1, .Im=-9.4826952141899101267341620769002470e-1

    r[ 1682].Re= 8.4006840554857442615599438795470630e-1, .Im= 5.4218354067942564622484269420965570e-1

    r[ 1683].Re= 8.4006840554857442615599438795470630e-1, .Im=-5.4218354067942564622484269420965570e-1

    r[ 1684].Re=-9.0267960984063921880959924237686205e-1, .Im= 4.30057947921759886611425827140919850e-1

    r[ 1685].Re=-9.0267960984063921880959924237686205e-1, .Im=-4.30057947921759886611425827140919850e-1

    r[ 1686].Re= 5.6016999093959296551759052817942570e-1, .Im= 8.2819586421607094273156235431088130e-1

    r[ 1687].Re= 5.6016999093959296551759052817942570e-1, .Im=-8.2819586421607094273156235431088130e-1

    r[ 1688].Re= 9.116071604437341047155740625385078125e-2, .Im= 9.9570463328999014862574767903424795e-1

    r[ 1689].Re= 9.116071604437341047155740625385078125e-2, .Im=-9.9570463328999014862574767903424795e-1

    r[ 1690].Re= 9.4125639644547565154653057106770575e-1, .Im= 3.3727719523526594747053763967414850e-1

    r[ 1691].Re= 9.4125639644547565154653057106770575e-1, .Im=-3.3727719523526594747053763967414850e-1

    r[ 1692].Re=-9.1641087201755377922296474935137665e-1, .Im= 3.99986471186752179374224169805529525e-1

    r[ 1693].Re=-9.1641087201755377922296474935137665e-1, .Im=-3.99986471186752179374224169805529525e-1

    r[ 1694].Re=-4.43781829740814592888398237846558900e-1, .Im= 8.9599548244649207529022305607213635e-1

    r[ 1695].Re=-4.43781829740814592888398237846558900e-1, .Im=-8.9599548244649207529022305607213635e-1

    r[ 1696].Re= 7.7300201843401150636481133915367535e-1, .Im= 6.3415813247854968537353670399170365e-1

    r[ 1697].Re= 7.7300201843401150636481133915367535e-1, .Im=-6.3415813247854968537353670399170365e-1

    r[ 1698].Re=-2.62813774519498992432442463496045078125e-2, .Im= 9.995161330320567749652127531589940e-1

    r[ 1699].Re=-2.62813774519498992432442463496045078125e-2, .Im=-9.995161330320567749652127531589940e-1

    r[ 1700].Re=-7.234729300869882084867867888533510e-1, .Im= 6.9018808942841169962179037611349485e-1

    r[ 1701].Re=-7.234729300869882084867867888533510e-1, .Im=-6.9018808942841169962179037611349485e-1

    r[ 1702].Re= 9.9972744194759655123050379188498480e-1, .Im= 2.32425052593282985280431773844611593750e-2

    r[ 1703].Re= 9.9972744194759655123050379188498480e-1, .Im=-2.32425052593282985280431773844611593750e-2

    r[ 1704].Re=-9.8328015778317678918796218567877075e-1, .Im= 1.814712079075940787120657660125289000e-1

    r[ 1705].Re=-9.8328015778317678918796218567877075e-1, .Im=-1.814712079075940787120657660125289000e-1

    r[ 1706].Re= 3.3569103104310310525804084136325400e-1, .Im= 9.4182450293823738451948202055064025e-1

    r[ 1707].Re= 3.3569103104310310525804084136325400e-1, .Im=-9.4182450293823738451948202055064025e-1

    r[ 1708].Re=-1.663337136656332093664900639851111875e-1, .Im= 9.8594402198926756053509734556428155e-1

    r[ 1709].Re=-1.663337136656332093664900639851111875e-1, .Im=-9.8594402198926756053509734556428155e-1

    r[ 1710].Re= 8.9407856917534800356150981315295210e-1, .Im= 4.47558273845363119303186749675660375e-1

    r[ 1711].Re= 8.9407856917534800356150981315295210e-1, .Im=-4.47558273845363119303186749675660375e-1

    r[ 1712].Re=-7.9945896366575908142948492240975610e-1, .Im= 6.0054705803848273948375435793423090e-1

    r[ 1713].Re=-7.9945896366575908142948492240975610e-1, .Im=-6.0054705803848273948375435793423090e-1

    r[ 1714].Re= 5.1160108277458637981993661014712415e-1, .Im= 8.5905432397556358292689537847763855e-1

    r[ 1715].Re= 5.1160108277458637981993661014712415e-1, .Im=-8.5905432397556358292689537847763855e-1

    r[ 1716].Re=-9.5557720620022323920750295656034720e-1, .Im= 2.94399238075057079200291809684131275e-1

    r[ 1717].Re=-9.5557720620022323920750295656034720e-1, .Im=-2.94399238075057079200291809684131275e-1

    r[ 1718].Re= 4.30632037235686271348100717659690400e-1, .Im= 9.0235459866769818226828192564425985e-1

    r[ 1719].Re= 4.30632037235686271348100717659690400e-1, .Im=-9.0235459866769818226828192564425985e-1

    r[ 1720].Re=-4.72088012931332401400652543088654050e-1, .Im= 8.8141432115684559267521080982987765e-1

    r[ 1721].Re=-4.72088012931332401400652543088654050e-1, .Im=-8.8141432115684559267521080982987765e-1

    r[ 1722].Re= 9.5038081668830654002988467254908755e-1, .Im= 3.1064398139873267146171542663068975e-1

    r[ 1723].Re= 9.5038081668830654002988467254908755e-1, .Im=-3.1064398139873267146171542663068975e-1

    r[ 1724].Re=-6.1652172861995324648631822128663770e-1, .Im= 7.871899622451132838563125915243290e-1

    r[ 1725].Re=-6.1652172861995324648631822128663770e-1, .Im=-7.871899622451132838563125915243290e-1

    r[ 1726].Re= 1.664333477290680374238718286505900250e-1, .Im= 9.859150281604243115651797779719345e-1

    r[ 1727].Re= 1.664333477290680374238718286505900250e-1, .Im=-9.859150281604243115651797779719345e-1

    r[ 1728].Re=-9.4531122398525346817166337132221085e-1, .Im= 3.25827241565370684384106425568461400e-1

    r[ 1729].Re=-9.4531122398525346817166337132221085e-1, .Im=-3.25827241565370684384106425568461400e-1

    r[ 1730].Re= 7.9651584701393440823835589981172230e-1, .Im= 6.0435674417968365812470210585161110e-1

    r[ 1731].Re= 7.9651584701393440823835589981172230e-1, .Im=-6.0435674417968365812470210585161110e-1

    r[ 1732].Re=-4.01600319588746701437997899120091450e-1, .Im= 9.1567915487252982131849421421065925e-1

    r[ 1733].Re=-4.01600319588746701437997899120091450e-1, .Im=-9.1567915487252982131849421421065925e-1

    r[ 1734].Re= 9.8030321740947345965366821474162860e-1, .Im= 1.970045003078370604576718960743164625e-1

    r[ 1735].Re= 9.8030321740947345965366821474162860e-1, .Im=-1.970045003078370604576718960743164625e-1

    r[ 1736].Re= 6.4600589868944058302702160290209575e-1, .Im= 7.6312203355842578300638479049666780e-1

    r[ 1737].Re= 6.4600589868944058302702160290209575e-1, .Im=-7.6312203355842578300638479049666780e-1

    r[ 1738].Re=-7.8069295532654392477667215644032690e-1, .Im= 6.2474569147368730348546250752406190e-1

    r[ 1739].Re=-7.8069295532654392477667215644032690e-1, .Im=-6.2474569147368730348546250752406190e-1

    r[ 1740].Re= 1.869247573385150185121261756648891500e-1, .Im= 9.8222234881355718894013762110262175e-1

    r[ 1741].Re= 1.869247573385150185121261756648891500e-1, .Im=-9.8222234881355718894013762110262175e-1

    r[ 1742].Re=-9.9989332324107027538673264643875880e-1, .Im= 3.6701993387881254489457649725636656250000e-3

    r[ 1743].Re=-9.9989332324107027538673264643875880e-1, .Im=-3.6701993387881254489457649725636656250000e-3

    r[ 1744].Re=-2.394711218711375877443714443870703625e-1, .Im= 9.7077974359479457522326129037537610e-1

    r[ 1745].Re=-2.394711218711375877443714443870703625e-1, .Im=-9.7077974359479457522326129037537610e-1

    r[ 1746].Re= 9.1786628667953185090055967521038835e-1, .Im= 3.96500854111343059571481717284768800e-1

    r[ 1747].Re= 9.1786628667953185090055967521038835e-1, .Im=-3.96500854111343059571481717284768800e-1

    r[ 1748].Re=-8.6682982023569921103955948638031255e-1, .Im= 4.983689661724551300814312071452150e-1

    r[ 1749].Re=-8.6682982023569921103955948638031255e-1, .Im=-4.983689661724551300814312071452150e-1

    r[ 1750].Re= 5.3868997713627952972359480554587205e-1, .Im= 8.4232994719741594025208542007021605e-1

    r[ 1751].Re= 5.3868997713627952972359480554587205e-1, .Im=-8.4232994719741594025208542007021605e-1

    r[ 1752].Re=-3.7287333471999438427868511780616243750e-2, .Im= 9.9916307153836469989727220308850515e-1

    r[ 1753].Re=-3.7287333471999438427868511780616243750e-2, .Im=-9.9916307153836469989727220308850515e-1

    r[ 1754].Re= 6.6997546931534301961619348730891940e-1, .Im= 7.4216260906411712916508349735522640e-1

    r[ 1755].Re= 6.6997546931534301961619348730891940e-1, .Im=-7.4216260906411712916508349735522640e-1

    r[ 1756].Re=-6.6446346539900247307741665281355380e-1, .Im= 7.4717033498705309746412694948958230e-1

    r[ 1757].Re=-6.6446346539900247307741665281355380e-1, .Im=-7.4717033498705309746412694948958230e-1

    r[ 1758].Re= 9.814939487811682461426698864670470e-1, .Im= 1.909969132607720887495617034801398375e-1

    r[ 1759].Re= 9.814939487811682461426698864670470e-1, .Im=-1.909969132607720887495617034801398375e-1

    r[ 1760].Re=-9.6884213166377164405673738656332715e-1, .Im= 2.472414030300135734385946761904051500e-1

    r[ 1761].Re=-9.6884213166377164405673738656332715e-1, .Im=-2.472414030300135734385946761904051500e-1

    r[ 1762].Re=-1.275826119418684845285838491690810750e-1, .Im= 9.9170015936637456732682949223089960e-1

    r[ 1763].Re=-1.275826119418684845285838491690810750e-1, .Im=-9.9170015936637456732682949223089960e-1

    r[ 1764].Re= 7.5964095892992045122582567273639140e-1, .Im= 6.5010599481914765895851360255619510e-1

    r[ 1765].Re= 7.5964095892992045122582567273639140e-1, .Im=-6.5010599481914765895851360255619510e-1

    r[ 1766].Re=-5.6517325871538581782971277789329175e-1, .Im= 8.248363148459794125244570750510320e-1

    r[ 1767].Re=-5.6517325871538581782971277789329175e-1, .Im=-8.248363148459794125244570750510320e-1

    r[ 1768].Re= 5.0857990875832433108616470462948200000e-2, .Im= 9.9856226261220049078559668487287125e-1

    r[ 1769].Re= 5.0857990875832433108616470462948200000e-2, .Im=-9.9856226261220049078559668487287125e-1

    r[ 1770].Re=-9.9193963539557161723791978147346525e-1, .Im= 1.258134374894574469827546181477373375e-1

    r[ 1771].Re=-9.9193963539557161723791978147346525e-1, .Im=-1.258134374894574469827546181477373375e-1

    r[ 1772].Re= 9.9136879327930016447822936243028375e-1, .Im= 1.305724642393113477112365217180922625e-1

    r[ 1773].Re= 9.9136879327930016447822936243028375e-1, .Im=-1.305724642393113477112365217180922625e-1

    r[ 1774].Re= 2.51556105568850572884453953292904765625e-2, .Im= 9.995393108224615019707925966940820e-1

    r[ 1775].Re= 2.51556105568850572884453953292904765625e-2, .Im=-9.995393108224615019707925966940820e-1

    r[ 1776].Re=-8.407197964257525635289880483469460e-1, .Im= 5.412524543923981079629470514191780e-1

    r[ 1777].Re=-8.407197964257525635289880483469460e-1, .Im=-5.412524543923981079629470514191780e-1

    r[ 1778].Re= 8.4073199184394076244331017733202315e-1, .Im= 5.4114528426579189268608161000884135e-1

    r[ 1779].Re= 8.4073199184394076244331017733202315e-1, .Im=-5.4114528426579189268608161000884135e-1

    r[ 1780].Re=-4.18356731894637678959014692736673150e-1, .Im= 9.0815035614026162757994597996002990e-1

    r[ 1781].Re=-4.18356731894637678959014692736673150e-1, .Im=-9.0815035614026162757994597996002990e-1

    r[ 1782].Re= 4.64575531564716981414164820307632900e-1, .Im= 8.8535453416547671423586507444269955e-1

    r[ 1783].Re= 4.64575531564716981414164820307632900e-1, .Im=-8.8535453416547671423586507444269955e-1

    r[ 1784].Re=-3.98245904486591750792712218753877075e-1, .Im= 9.1714140192403104112628398070228285e-1

    r[ 1785].Re=-3.98245904486591750792712218753877075e-1, .Im=-9.1714140192403104112628398070228285e-1

    r[ 1786].Re=-1.772022221070410352705692957897554125e-1, .Im= 9.8404698027753834121966747261467385e-1

    r[ 1787].Re=-1.772022221070410352705692957897554125e-1, .Im=-9.8404698027753834121966747261467385e-1

    r[ 1788].Re= 9.980294340156768972960321661958005e-1, .Im= 6.2356296165625269001253627720871006250e-2

    r[ 1789].Re= 9.980294340156768972960321661958005e-1, .Im=-6.2356296165625269001253627720871006250e-2

    r[ 1790].Re=-9.3445418247142630896462378586875270e-1, .Im= 3.5576222499171999968936574987310450e-1

    r[ 1791].Re=-9.3445418247142630896462378586875270e-1, .Im=-3.5576222499171999968936574987310450e-1

    r[ 1792].Re= 3.0085860671909192554096534877317025e-1, .Im= 9.5352036004476781183569755739881655e-1

    r[ 1793].Re= 3.0085860671909192554096534877317025e-1, .Im=-9.5352036004476781183569755739881655e-1

    r[ 1794].Re=-7.7063987577108228332889439116115680e-1, .Im= 6.3708296941822939452038099261699240e-1

    r[ 1795].Re=-7.7063987577108228332889439116115680e-1, .Im=-6.3708296941822939452038099261699240e-1

    r[ 1796].Re= 7.9429296422260908805412782385246825e-1, .Im= 6.0726458537560046302417049446376040e-1

    r[ 1797].Re= 7.9429296422260908805412782385246825e-1, .Im=-6.0726458537560046302417049446376040e-1

    r[ 1798].Re= 9.1931761649207099917902041852357795e-1, .Im= 3.93140255585440079322268047690158700e-1

    r[ 1799].Re= 9.1931761649207099917902041852357795e-1, .Im=-3.93140255585440079322268047690158700e-1

    r[ 1800].Re= 3.87069265645387350360806522076018150e-1, .Im= 9.2189058133047574461471640461240895e-1

    r[ 1801].Re= 3.87069265645387350360806522076018150e-1, .Im=-9.2189058133047574461471640461240895e-1

    r[ 1802].Re=-9.9953201155316517834137357567669820e-1, .Im= 2.69478275452493080954763371437366000000e-2

    r[ 1803].Re=-9.9953201155316517834137357567669820e-1, .Im=-2.69478275452493080954763371437366000000e-2

    r[ 1804].Re=-6.7446555049438672302386521550943140e-1, .Im= 7.3814535595397345879575823346385730e-1

    r[ 1805].Re=-6.7446555049438672302386521550943140e-1, .Im=-7.3814535595397345879575823346385730e-1

    r[ 1806].Re= 5.8923816642295867573864143196260555e-1, .Im= 8.0777099981605859913003087058314120e-1

    r[ 1807].Re= 5.8923816642295867573864143196260555e-1, .Im=-8.0777099981605859913003087058314120e-1

    r[ 1808].Re=-8.7643271426049951244863223109859970e-1, .Im= 4.81282301719642646720132006521453125e-1

    r[ 1809].Re=-8.7643271426049951244863223109859970e-1, .Im=-4.81282301719642646720132006521453125e-1

    r[ 1810].Re= 8.776254369314793191136914174421690e-1, .Im= 4.79038895125037222921804413999780075e-1

    r[ 1811].Re= 8.776254369314793191136914174421690e-1, .Im=-4.79038895125037222921804413999780075e-1

    r[ 1812].Re=-5.9510049642245976819765473919687790e-1, .Im= 8.0351442442560372381166189370560455e-1

    r[ 1813].Re=-5.9510049642245976819765473919687790e-1, .Im=-8.0351442442560372381166189370560455e-1

    r[ 1814].Re= 2.28842797638729195108808767145092125e-1, .Im= 9.7331527460121780581658867959049530e-1

    r[ 1815].Re= 2.28842797638729195108808767145092125e-1, .Im=-9.7331527460121780581658867959049530e-1

    r[ 1816].Re= 9.6048518419869521878240448131691660e-1, .Im= 2.77860573217815487456761047724285150e-1

    r[ 1817].Re= 9.6048518419869521878240448131691660e-1, .Im=-2.77860573217815487456761047724285150e-1

    r[ 1818].Re=-9.0002998602001582639786647632718085e-1, .Im= 4.35578487919133727768183916850830425e-1

    r[ 1819].Re=-9.0002998602001582639786647632718085e-1, .Im=-4.35578487919133727768183916850830425e-1

    r[ 1820].Re=-3.12426857011903147398612645702087300e-1, .Im= 9.498168788388575700665228396246675e-1

    r[ 1821].Re=-3.12426857011903147398612645702087300e-1, .Im=-9.498168788388575700665228396246675e-1

    r[ 1822].Re= 7.4429845462096777541916026166290975e-1, .Im= 6.6761554497387598505753203426138495e-1

    r[ 1823].Re= 7.4429845462096777541916026166290975e-1, .Im=-6.6761554497387598505753203426138495e-1

    r[ 1824].Re= 1.300995131684913597158725906410836500e-1, .Im= 9.9135822945783425019783408060902725e-1

    r[ 1825].Re= 1.300995131684913597158725906410836500e-1, .Im=-9.9135822945783425019783408060902725e-1

    r[ 1826].Re=-9.8782089580552889795939108807942830e-1, .Im= 1.549040262595891559449512442370178125e-1

    r[ 1827].Re=-9.8782089580552889795939108807942830e-1, .Im=-1.549040262595891559449512442370178125e-1

    r[ 1828].Re= 9.9810924362214770155787846306338905e-1, .Im= 6.113705591409721029627633015479659375e-2

    r[ 1829].Re= 9.9810924362214770155787846306338905e-1, .Im=-6.113705591409721029627633015479659375e-2

    r[ 1830].Re=-3.57430599187776254499482320170500300e-1, .Im= 9.3380270670117926368192229347187090e-1

    r[ 1831].Re=-3.57430599187776254499482320170500300e-1, .Im=-9.3380270670117926368192229347187090e-1

    r[ 1832].Re= 4.63490647991862236843019218213157725e-1, .Im= 8.8593194734988078842263803380774330e-1

    r[ 1833].Re= 4.63490647991862236843019218213157725e-1, .Im=-8.8593194734988078842263803380774330e-1

    r[ 1834].Re=-7.08091547383363217882390472368570e-1, .Im= 7.0595770062580653902983840453089210e-1

    r[ 1835].Re=-7.08091547383363217882390472368570e-1, .Im=-7.0595770062580653902983840453089210e-1

    r[ 1836].Re= 6.8529386154357141425208510554512030e-1, .Im= 7.2804655697012843340587551210774105e-1

    r[ 1837].Re= 6.8529386154357141425208510554512030e-1, .Im=-7.2804655697012843340587551210774105e-1

    r[ 1838].Re=-9.618201314418111103066166833741590e-1, .Im= 2.73263441687783659173049954915768450e-1

    r[ 1839].Re=-9.618201314418111103066166833741590e-1, .Im=-2.73263441687783659173049954915768450e-1

    r[ 1840].Re= 8.87284881782779977221764511341461875e-2, .Im= 9.9591204810691691395874158843071195e-1

    r[ 1841].Re= 8.87284881782779977221764511341461875e-2, .Im=-9.9591204810691691395874158843071195e-1

    r[ 1842].Re= 9.5484609059036174016910081263631580e-1, .Im= 2.966295095674677528840845752711175e-1

    r[ 1843].Re= 9.5484609059036174016910081263631580e-1, .Im=-2.966295095674677528840845752711175e-1

    r[ 1844].Re=-4.67761847253154283698961535264970725e-1, .Im= 8.83726267786678509885689436487155e-1

    r[ 1845].Re=-4.67761847253154283698961535264970725e-1, .Im=-8.83726267786678509885689436487155e-1

    r[ 1846].Re=-8.2167949786680749557632452706457115e-1, .Im= 5.6976829429861242104493612714577465e-1

    r[ 1847].Re=-8.2167949786680749557632452706457115e-1, .Im=-5.6976829429861242104493612714577465e-1

    r[ 1848].Re= 8.6439498287164406864491184023790990e-1, .Im= 5.0249881487564129756151487526949495e-1

    r[ 1849].Re= 8.6439498287164406864491184023790990e-1, .Im=-5.0249881487564129756151487526949495e-1

    r[ 1850].Re=-1.1176247547214696043127446500875521250e-1, .Im= 9.9359867239260379889742580417077985e-1

    r[ 1851].Re=-1.1176247547214696043127446500875521250e-1, .Im=-9.9359867239260379889742580417077985e-1

    r[ 1852].Re= 2.73892495289205395447851287826779275e-1, .Im= 9.6160571277366513331941177966655230e-1

    r[ 1853].Re= 2.73892495289205395447851287826779275e-1, .Im=-9.6160571277366513331941177966655230e-1

    r[ 1854].Re=-9.7515856956553792489472698434838090e-1, .Im= 2.210581730943981526582575725115020750e-1

    r[ 1855].Re=-9.7515856956553792489472698434838090e-1, .Im=-2.210581730943981526582575725115020750e-1

    r[ 1856].Re= 5.6725013653563038928950845729559655e-1, .Im= 8.2334819540690351580281003407435490e-1

    r[ 1857].Re= 5.6725013653563038928950845729559655e-1, .Im=-8.2334819540690351580281003407435490e-1

    r[ 1858].Re=-2.144285308715557780701033152581658125e-1, .Im= 9.7661405302377946036074263247428460e-1

    r[ 1859].Re=-2.144285308715557780701033152581658125e-1, .Im=-9.7661405302377946036074263247428460e-1

    r[ 1860].Re= 9.8286981140023177427877953959978185e-1, .Im= 1.837849788824630070660504088664310875e-1

    r[ 1861].Re= 9.8286981140023177427877953959978185e-1, .Im=-1.837849788824630070660504088664310875e-1

    r[ 1862].Re=-7.5961331564131340243761769670527425e-1, .Im= 6.5020650046296124546785222264588810e-1

    r[ 1863].Re=-7.5961331564131340243761769670527425e-1, .Im=-6.5020650046296124546785222264588810e-1

    r[ 1864].Re= 8.2516737908534187884157518055872060e-1, .Im= 5.6462167605847957130293934824294410e-1

    r[ 1865].Re= 8.2516737908534187884157518055872060e-1, .Im=-5.6462167605847957130293934824294410e-1

    r[ 1866].Re=-6.0525448449466646982930484455209806250e-2, .Im= 9.9803797455314613440435778102255425e-1

    r[ 1867].Re=-6.0525448449466646982930484455209806250e-2, .Im=-9.9803797455314613440435778102255425e-1

    r[ 1868].Re= 4.79690565662751922104689583647996175e-1, .Im= 8.7726960662689124070823254442075265e-1

    r[ 1869].Re= 4.79690565662751922104689583647996175e-1, .Im=-8.7726960662689124070823254442075265e-1

    r[ 1870].Re=-9.9313954097547396671075148333329705e-1, .Im= 1.1608497870306087873526479370411834375e-1

    r[ 1871].Re=-9.9313954097547396671075148333329705e-1, .Im=-1.1608497870306087873526479370411834375e-1

    r[ 1872].Re=-5.7221943479136216925695634927251375e-1, .Im= 8.1994749390664922739091480252682230e-1

    r[ 1873].Re=-5.7221943479136216925695634927251375e-1, .Im=-8.1994749390664922739091480252682230e-1

    r[ 1874].Re= 8.9841973354338955370934627353562970e-1, .Im= 4.38791291267266680975467352254781850e-1

    r[ 1875].Re= 8.9841973354338955370934627353562970e-1, .Im=-4.38791291267266680975467352254781850e-1

    r[ 1876].Re=-7.3935000522923788324192173604387785e-1, .Im= 6.7316375215316437419232897809706625e-1

    r[ 1877].Re=-7.3935000522923788324192173604387785e-1, .Im=-6.7316375215316437419232897809706625e-1

    r[ 1878].Re= 3.56366792975962742850981612718896925e-1, .Im= 9.3417963701364981066177506363601420e-1

    r[ 1879].Re= 3.56366792975962742850981612718896925e-1, .Im=-9.3417963701364981066177506363601420e-1

    r[ 1880].Re=-9.3093351605803875692402016284177075e-1, .Im= 3.64912388757531958027868768112966775e-1

    r[ 1881].Re=-9.3093351605803875692402016284177075e-1, .Im=-3.64912388757531958027868768112966775e-1

    r[ 1882].Re=-2.50491815899217401542031780081742906250e-2, .Im= 9.99543689110392485908107573777670e-1

    r[ 1883].Re=-2.50491815899217401542031780081742906250e-2, .Im=-9.99543689110392485908107573777670e-1

    r[ 1884].Re= 9.9977947738382066944495818461291490e-1, .Im= 2.07967336247612891164671111710049437500e-2

    r[ 1885].Re= 9.9977947738382066944495818461291490e-1, .Im=-2.07967336247612891164671111710049437500e-2

    r[ 1886].Re=-5.1991900836851523415305109665496270e-1, .Im= 8.5406679697763432379531423066509885e-1

    r[ 1887].Re=-5.1991900836851523415305109665496270e-1, .Im=-8.5406679697763432379531423066509885e-1

    r[ 1888].Re= 7.235051375301841947162984070018865e-1, .Im= 6.9008653771300554335965671270969320e-1

    r[ 1889].Re= 7.235051375301841947162984070018865e-1, .Im=-6.9008653771300554335965671270969320e-1

    r[ 1890].Re=-9.965211569799200530539451392542105e-1, .Im= 8.196570145267474682970743060650420000e-2

    r[ 1891].Re=-9.965211569799200530539451392542105e-1, .Im=-8.196570145267474682970743060650420000e-2

    r[ 1892].Re= 9.26842694187239080072515662322985e-1, .Im= 3.75046457815554568071547691943123925e-1

    r[ 1893].Re= 9.26842694187239080072515662322985e-1, .Im=-3.75046457815554568071547691943123925e-1

    r[ 1894].Re=-3.25189496801988109364600632034125725e-1, .Im= 9.4551797927994829517928110362845470e-1

    r[ 1895].Re=-3.25189496801988109364600632034125725e-1, .Im=-9.4551797927994829517928110362845470e-1

    r[ 1896].Re= 3.16013072051261167949576247337972725e-1, .Im= 9.4859742123896229060164841939695175e-1

    r[ 1897].Re= 3.16013072051261167949576247337972725e-1, .Im=-9.4859742123896229060164841939695175e-1

    r[ 1898].Re=-8.8226022912084733906823430515942160e-1, .Im= 4.70513333826435065088134024335886350e-1

    r[ 1899].Re=-8.8226022912084733906823430515942160e-1, .Im=-4.70513333826435065088134024335886350e-1

    r[ 1900].Re= 9.3575782344081726016327138495398685e-1, .Im= 3.52234617738110711293586518877418700e-1

    r[ 1901].Re= 9.3575782344081726016327138495398685e-1, .Im=-3.52234617738110711293586518877418700e-1

    r[ 1902].Re= 5.2312099766806618994507971365237605e-1, .Im= 8.5208400119413463258410956768784670e-1

    r[ 1903].Re= 5.2312099766806618994507971365237605e-1, .Im=-8.5208400119413463258410956768784670e-1

    r[ 1904].Re=-6.2611904246984051436442086924216710e-1, .Im= 7.7958152622584597768451430965797040e-1

    r[ 1905].Re=-6.2611904246984051436442086924216710e-1, .Im=-7.7958152622584597768451430965797040e-1

    r[ 1906].Re=-2.58442844817617478625493276922497875e-1, .Im= 9.6590108873633739872133219250827095e-1

    r[ 1907].Re=-2.58442844817617478625493276922497875e-1, .Im=-9.6590108873633739872133219250827095e-1

    r[ 1908].Re= 2.085404014652064708101875112333800625e-1, .Im= 9.7787559697499415456434235238702965e-1

    r[ 1909].Re= 2.085404014652064708101875112333800625e-1, .Im=-9.7787559697499415456434235238702965e-1

    r[ 1910].Re=-9.1737362418696122290384664665907620e-1, .Im= 3.97739478618071795601451867696596300e-1

    r[ 1911].Re=-9.1737362418696122290384664665907620e-1, .Im=-3.97739478618071795601451867696596300e-1

    r[ 1912].Re= 9.7543475899302911624744183427537790e-1, .Im= 2.197644361320522654601461454149102750e-1

    r[ 1913].Re= 9.7543475899302911624744183427537790e-1, .Im=-2.197644361320522654601461454149102750e-1

    r[ 1914].Re= 6.7271198701803880393157442085794170e-1, .Im= 7.397020281348406500754322223656345e-1

    r[ 1915].Re= 6.7271198701803880393157442085794170e-1, .Im=-7.397020281348406500754322223656345e-1

    r[ 1916].Re= 5.5739800285935739432296998074889415625e-2, .Im= 9.983016827983682839331436298380140e-1

    r[ 1917].Re= 5.5739800285935739432296998074889415625e-2, .Im=-9.983016827983682839331436298380140e-1

    r[ 1918].Re=-8.2995174212687894410578337556216865e-1, .Im= 5.5762871403924552105024758930085225e-1

    r[ 1919].Re=-8.2995174212687894410578337556216865e-1, .Im=-5.5762871403924552105024758930085225e-1

    r[ 1920].Re= 8.153524305077098910388144759053830e-1, .Im= 5.7868702895924251095038925996050235e-1

    r[ 1921].Re= 8.153524305077098910388144759053830e-1, .Im=-5.7868702895924251095038925996050235e-1

    r[ 1922].Re=-9.3873987475400921809409737761598080e-1, .Im= 3.44291912908709751839353430113987975e-1

    r[ 1923].Re=-9.3873987475400921809409737761598080e-1, .Im=-3.44291912908709751839353430113987975e-1

    r[ 1924].Re=-4.80687542998349315315209651089389800e-1, .Im= 8.7675081397826803986106369848130270e-1

    r[ 1925].Re=-4.80687542998349315315209651089389800e-1, .Im=-8.7675081397826803986106369848130270e-1

    r[ 1926].Re= 6.1561693620098811852159315094468180e-1, .Im= 7.8785608810454443862170137435896320e-1

    r[ 1927].Re= 6.1561693620098811852159315094468180e-1, .Im=-7.8785608810454443862170137435896320e-1

    r[ 1928].Re= 9.8746885380538307330766656377818435e-1, .Im= 1.57234974475053412845682032639160750e-1

    r[ 1929].Re= 9.8746885380538307330766656377818435e-1, .Im=-1.57234974475053412845682032639160750e-1

    r[ 1930].Re=-5.9803969732900930100782943554804660e-1, .Im= 8.0131085133997825842300244403304530e-1

    r[ 1931].Re=-5.9803969732900930100782943554804660e-1, .Im=-8.0131085133997825842300244403304530e-1

    r[ 1932].Re=-9.9829949265294626314926063059829175e-1, .Im= 5.6304930301316398477684543877330725000e-2

    r[ 1933].Re=-9.9829949265294626314926063059829175e-1, .Im=-5.6304930301316398477684543877330725000e-2

    r[ 1934].Re= 1.410267013838121530344693610459216750e-1, .Im= 9.8987185065761496005620756477583195e-1

    r[ 1935].Re= 1.410267013838121530344693610459216750e-1, .Im=-9.8987185065761496005620756477583195e-1

    r[ 1936].Re= 7.6595894677477549539190704308566635e-1, .Im= 6.4263115585807284446673293132334945e-1

    r[ 1937].Re= 7.6595894677477549539190704308566635e-1, .Im=-6.4263115585807284446673293132334945e-1

    r[ 1938].Re=-1.988386137617196014470977161181508500e-1, .Im= 9.7989541577584038378745390218682585e-1

    r[ 1939].Re=-1.988386137617196014470977161181508500e-1, .Im=-9.7989541577584038378745390218682585e-1

    r[ 1940].Re=-8.924309329476750596299439166614320e-1, .Im= 4.50958473433123396834076856976025725e-1

    r[ 1941].Re=-8.924309329476750596299439166614320e-1, .Im=-4.50958473433123396834076856976025725e-1

    r[ 1942].Re= 8.8684044162073227823839260963723060e-1, .Im= 4.61752447300272317320946058316621925e-1

    r[ 1943].Re= 8.8684044162073227823839260963723060e-1, .Im=-4.61752447300272317320946058316621925e-1

    r[ 1944].Re=-1.494004049416626511703753976689768000e-1, .Im= 9.8863930220587326047620990721043195e-1

    r[ 1945].Re=-1.494004049416626511703753976689768000e-1, .Im=-9.8863930220587326047620990721043195e-1

    r[ 1946].Re=-7.1754166997947510520106106923776675e-1, .Im= 6.9635991687557352580739689074107445e-1

    r[ 1947].Re=-7.1754166997947510520106106923776675e-1, .Im=-6.9635991687557352580739689074107445e-1

    r[ 1948].Re= 5.8824166619297701963375857303617520e-1, .Im= 8.0848596888783430536307150759967040e-1

    r[ 1949].Re= 5.8824166619297701963375857303617520e-1, .Im=-8.0848596888783430536307150759967040e-1

    r[ 1950].Re= 9.9375237957167339430952779366634785e-1, .Im= 1.1112998866710893652864911018696147500e-1

    r[ 1951].Re= 9.9375237957167339430952779366634785e-1, .Im=-1.1112998866710893652864911018696147500e-1

    r[ 1952].Re=-9.8028080852122123634018180382554415e-1, .Im= 1.971011355668079167990924815967446125e-1

    r[ 1953].Re=-9.8028080852122123634018180382554415e-1, .Im=-1.971011355668079167990924815967446125e-1

    r[ 1954].Re= 2.52616351971768016149155755556421350e-1, .Im= 9.674216613523127783480504149338230e-1

    r[ 1955].Re= 2.52616351971768016149155755556421350e-1, .Im=-9.674216613523127783480504149338230e-1

    r[ 1956].Re=-4.55816141964880572334806174694676875e-1, .Im= 8.8994163139608073453956649245810690e-1

    r[ 1957].Re=-4.55816141964880572334806174694676875e-1, .Im=-8.8994163139608073453956649245810690e-1

    r[ 1958].Re= 4.22889806438455306825119350833119800e-1, .Im= 9.0602430273648104641637246459140440e-1

    r[ 1959].Re= 4.22889806438455306825119350833119800e-1, .Im=-9.0602430273648104641637246459140440e-1

    r[ 1960].Re=-5.452513852178521303049052448841393750000e-3, .Im= 9.9984464101492653842484514825628135e-1

    r[ 1961].Re=-5.452513852178521303049052448841393750000e-3, .Im=-9.9984464101492653842484514825628135e-1

    r[ 1962].Re=-8.1035767679748949010587466545985080e-1, .Im= 5.8575494015014328841317592377890830e-1

    r[ 1963].Re=-8.1035767679748949010587466545985080e-1, .Im=-5.8575494015014328841317592377890830e-1

    r[ 1964].Re= 9.4490880263413612460965396167011930e-1, .Im= 3.26883441279372854992857355682644975e-1

    r[ 1965].Re= 9.4490880263413612460965396167011930e-1, .Im=-3.26883441279372854992857355682644975e-1

    r[ 1966].Re=-9.732174137475775310690551123116165e-1, .Im= 2.294010733611130392617383222386706500e-1

    r[ 1967].Re=-9.732174137475775310690551123116165e-1, .Im=-2.294010733611130392617383222386706500e-1

    r[ 1968].Re= 6.9591988922899294944812709218240340e-1, .Im= 7.1790985430964970870348906828439790e-1

    r[ 1969].Re= 6.9591988922899294944812709218240340e-1, .Im=-7.1790985430964970870348906828439790e-1

    r[ 1970].Re=-4.32775857699652988230809569358825675e-1, .Im= 9.0136524302529585916943233314668755e-1

    r[ 1971].Re=-4.32775857699652988230809569358825675e-1, .Im=-9.0136524302529585916943233314668755e-1

    r[ 1972].Re= 9.8505418862395099921513974550180135e-1, .Im= 1.717335182237516855163761420044465875e-1

    r[ 1973].Re= 9.8505418862395099921513974550180135e-1, .Im=-1.717335182237516855163761420044465875e-1

    r[ 1974].Re=-6.6079071921463727878887084443704225e-1, .Im= 7.5040786047289476101695981924422085e-1

    r[ 1975].Re=-6.6079071921463727878887084443704225e-1, .Im=-7.5040786047289476101695981924422085e-1

    r[ 1976].Re= 3.76877984351357442349694792937953025e-1, .Im= 9.2611114770203883939103661759872920e-1

    r[ 1977].Re= 3.76877984351357442349694792937953025e-1, .Im=-9.2611114770203883939103661759872920e-1

    r[ 1978].Re=-8.5500904355554030455976999292033720e-1, .Im= 5.1840016653906617616343055487959645e-1

    r[ 1979].Re=-8.5500904355554030455976999292033720e-1, .Im=-5.1840016653906617616343055487959645e-1

    r[ 1980].Re= 8.0748806327807931548790065789944490e-1, .Im= 5.8962257281732877167712558730272575e-1

    r[ 1981].Re= 8.0748806327807931548790065789944490e-1, .Im=-5.8962257281732877167712558730272575e-1

    r[ 1982].Re=-8.252354412034611230719605146077810625e-2, .Im= 9.9645078071801018726461052210652265e-1

    r[ 1983].Re=-8.252354412034611230719605146077810625e-2, .Im=-9.9645078071801018726461052210652265e-1

    r[ 1984].Re= 8.4664804841820773262384136614855375e-1, .Im= 5.3185555205374479559310429976903830e-1

    r[ 1985].Re= 8.4664804841820773262384136614855375e-1, .Im=-5.3185555205374479559310429976903830e-1

    r[ 1986].Re=-9.5075361842209094032085658909636545e-1, .Im= 3.095799498505125146863292684429325e-1

    r[ 1987].Re=-9.5075361842209094032085658909636545e-1, .Im=-3.095799498505125146863292684429325e-1

    r[ 1988].Re=-3.51705987235142791824671348877018300e-1, .Im= 9.3597484175607970069421526204678225e-1

    r[ 1989].Re=-3.51705987235142791824671348877018300e-1, .Im=-9.3597484175607970069421526204678225e-1

    r[ 1990].Re= 5.0208994119898597841000764674390665e-1, .Im= 8.6463882074570774793897953713894820e-1

    r[ 1991].Re= 5.0208994119898597841000764674390665e-1, .Im=-8.6463882074570774793897953713894820e-1

    r[ 1992].Re= 9.237375723731326704335486965646850625e-2, .Im= 9.9558571261134609642340365098789330e-1

    r[ 1993].Re= 9.237375723731326704335486965646850625e-2, .Im=-9.9558571261134609642340365098789330e-1

    r[ 1994].Re=-9.9354515961200595697278004081454125e-1, .Im= 1.1243126993198290786146742448181611875e-1

    r[ 1995].Re=-9.9354515961200595697278004081454125e-1, .Im=-1.1243126993198290786146742448181611875e-1

    r[ 1996].Re= 9.6732415642158253721305527506046925e-1, .Im= 2.53068965843745441457457445721956900e-1

    r[ 1997].Re= 9.6732415642158253721305527506046925e-1, .Im=-2.53068965843745441457457445721956900e-1

    r[ 1998].Re=-6.3750962785017684097965684486553070e-1, .Im= 7.7028185191761000538690495886839925e-1

    r[ 1999].Re=-6.3750962785017684097965684486553070e-1, .Im=-7.7028185191761000538690495886839925e-1

    r[ 2000].Re= 5.9908626836280443050952726480318230e-1, .Im= 8.0049096325154300846094201915548180e-1

    r[ 2001].Re= 5.9908626836280443050952726480318230e-1, .Im=-8.0049096325154300846094201915548180e-1

    r[ 2002].Re=-2.9023454323890290895704424656287300e-1, .Im= 9.5681798645943449965756144592887720e-1

    r[ 2003].Re=-2.9023454323890290895704424656287300e-1, .Im=-9.5681798645943449965756144592887720e-1

    r[ 2004].Re= 9.7004837133901022916404599527595560e-1, .Im= 2.423908866263990713463272186345420750e-1

    r[ 2005].Re= 9.7004837133901022916404599527595560e-1, .Im=-2.423908866263990713463272186345420750e-1

    r[ 2006].Re=-8.6253581683764857235274803315405730e-1, .Im= 5.0579125416302250783928684541024265e-1

    r[ 2007].Re=-8.6253581683764857235274803315405730e-1, .Im=-5.0579125416302250783928684541024265e-1

    r[ 2008].Re= 1.724690496898087510579955505818361375e-1, .Im= 9.8487776954027062004115578019991515e-1

    r[ 2009].Re= 1.724690496898087510579955505818361375e-1, .Im=-9.8487776954027062004115578019991515e-1

    r[ 2010].Re=-6.9675254601562963685523754975292830e-1, .Im= 7.1715495513612870226438644749578085e-1

    r[ 2011].Re=-6.9675254601562963685523754975292830e-1, .Im=-7.1715495513612870226438644749578085e-1

    r[ 2012].Re= 8.6926986993310628726305822056019675e-1, .Im= 4.94018221119253697626305665835388925e-1

    r[ 2013].Re= 8.6926986993310628726305822056019675e-1, .Im=-4.94018221119253697626305665835388925e-1

    r[ 2014].Re=-9.9745140645290852887683286098763345e-1, .Im= 6.975617791482184582019243634931626250e-2

    r[ 2015].Re=-9.9745140645290852887683286098763345e-1, .Im=-6.975617791482184582019243634931626250e-2

    r[ 2016].Re= 3.04372526157007883274019377495278600e-1, .Im= 9.5239924470598158467993243903038090e-1

    r[ 2017].Re= 3.04372526157007883274019377495278600e-1, .Im=-9.5239924470598158467993243903038090e-1

    r[ 2018].Re= 7.132987087306462692382069690211210e-1, .Im= 7.0064470853448490572645823704078790e-1

    r[ 2019].Re= 7.132987087306462692382069690211210e-1, .Im=-7.0064470853448490572645823704078790e-1

    r[ 2020].Re=-5.2513867996016494466005042340839280e-1, .Im= 8.5086740370822677714812698468449525e-1

    r[ 2021].Re=-5.2513867996016494466005042340839280e-1, .Im=-8.5086740370822677714812698468449525e-1

    r[ 2022].Re=-5.0414412758715110296492412089719435e-1, .Im= 8.6347344258725267085452514947974120e-1

    r[ 2023].Re=-5.0414412758715110296492412089719435e-1, .Im=-8.6347344258725267085452514947974120e-1

    r[ 2024].Re= 9.9940508115834447711023358351667410e-1, .Im= 3.4251241002895761733615387356621793750e-2

    r[ 2025].Re= 9.9940508115834447711023358351667410e-1, .Im=-3.4251241002895761733615387356621793750e-2

    r[ 2026].Re=-7.9204199374869799221698940527858210e-1, .Im= 6.1029581586931802572593142031109890e-1

    r[ 2027].Re=-7.9204199374869799221698940527858210e-1, .Im=-6.1029581586931802572593142031109890e-1

    r[ 2028].Re= 4.10650180198531111752657807301147825e-1, .Im= 9.116348348134919454821556428214535e-1

    r[ 2029].Re= 4.10650180198531111752657807301147825e-1, .Im=-9.116348348134919454821556428214535e-1

    r[ 2030].Re=-1.433438246311428965196199669662746500e-1, .Im= 9.8953455906003573439022602542536330e-1

    r[ 2031].Re=-1.433438246311428965196199669662746500e-1, .Im=-9.8953455906003573439022602542536330e-1

    r[ 2032].Re=-9.5628263554258974288302397326333445e-1, .Im= 2.92063920618730044065358697480405675e-1

    r[ 2033].Re=-9.5628263554258974288302397326333445e-1, .Im=-2.92063920618730044065358697480405675e-1

    r[ 2034].Re= 8.9735111298833614146275294842780565e-1, .Im= 4.40979211276101790151216164304059925e-1

    r[ 2035].Re= 8.9735111298833614146275294842780565e-1, .Im=-4.40979211276101790151216164304059925e-1

    r[ 2036].Re= 6.2522256680025800612554576218826695e-1, .Im= 7.8025604680123050727047484542708840e-1

    r[ 2037].Re= 6.2522256680025800612554576218826695e-1, .Im=-7.8025604680123050727047484542708840e-1

    r[ 2038].Re=-9.8542976603401732926812428559060205e-1, .Im= 1.694165662929643656475775514991255375e-1

    r[ 2039].Re=-9.8542976603401732926812428559060205e-1, .Im=-1.694165662929643656475775514991255375e-1

    r[ 2040].Re= 1.1064974576183081445002187592763220625e-1, .Im= 9.9372346847451942242201994304195975e-1

    r[ 2041].Re= 1.1064974576183081445002187592763220625e-1, .Im=-9.9372346847451942242201994304195975e-1

    r[ 2042].Re= 9.9183891715405703148888960640761065e-1, .Im= 1.269395398907479655115082550764782250e-1

    r[ 2043].Re= 9.9183891715405703148888960640761065e-1, .Im=-1.269395398907479655115082550764782250e-1

    r[ 2044].Re=-2.50162416181406666026987295481376325e-1, .Im= 9.6807143601404921362529876205371690e-1

    r[ 2045].Re=-2.50162416181406666026987295481376325e-1, .Im=-9.6807143601404921362529876205371690e-1

    r[ 2046].Re=-8.2446032429462223767302475607721135e-1, .Im= 5.6572596426121080082083381057600490e-1

    r[ 2047].Re=-8.2446032429462223767302475607721135e-1, .Im=-5.6572596426121080082083381057600490e-1

    r[ 2048].Re= 7.7533428827666905913673645045491865e-1, .Im= 6.3129991322068268466694007656769825e-1

    r[ 2049].Re= 7.7533428827666905913673645045491865e-1, .Im=-6.3129991322068268466694007656769825e-1

    r[ 2050].Re= 2.63868699659207534002902661995904046875e-2, .Im= 9.9951311266006248601456718461122360e-1

    r[ 2051].Re= 2.63868699659207534002902661995904046875e-2, .Im=-9.9951311266006248601456718461122360e-1

    r[ 2052].Re=-7.4427074916138225013639839744428170e-1, .Im= 6.6771687239497423682621501939138395e-1

    r[ 2053].Re=-7.4427074916138225013639839744428170e-1, .Im=-6.6771687239497423682621501939138395e-1

    r[ 2054].Re= 7.0030437928511113376828234322601925e-1, .Im= 7.1363379073598176560722095018718390e-1

    r[ 2055].Re= 7.0030437928511113376828234322601925e-1, .Im=-7.1363379073598176560722095018718390e-1

    r[ 2056].Re= 9.2822907529870879450584197911666705e-1, .Im= 3.7163375244136248598536553799931425e-1

    r[ 2057].Re= 9.2822907529870879450584197911666705e-1, .Im=-3.7163375244136248598536553799931425e-1

    r[ 2058].Re=-9.0735605952620346226211722751031625e-1, .Im= 4.2008582906982722127153806468413675e-1

    r[ 2059].Re=-9.0735605952620346226211722751031625e-1, .Im=-4.2008582906982722127153806468413675e-1

    r[ 2060].Re=-1.0324978887565226803868512206463491875e-1, .Im= 9.9453009281763338211845848491066135e-1

    r[ 2061].Re=-1.0324978887565226803868512206463491875e-1, .Im=-9.9453009281763338211845848491066135e-1

    r[ 2062].Re=-3.80191860119681368512800645476090700e-1, .Im= 9.2476650201130483619493816149770280e-1

    r[ 2063].Re=-3.80191860119681368512800645476090700e-1, .Im=-9.2476650201130483619493816149770280e-1

    r[ 2064].Re= 5.0737621514095254671161683290847575e-1, .Im= 8.6154868717606558625732304790290070e-1

    r[ 2065].Re= 5.0737621514095254671161683290847575e-1, .Im=-8.6154868717606558625732304790290070e-1

    r[ 2066].Re=-8.8965154399077894797898125034407710e-1, .Im= 4.56416269855443090808222450505127175e-1

    r[ 2067].Re=-8.8965154399077894797898125034407710e-1, .Im=-4.56416269855443090808222450505127175e-1

    r[ 2068].Re= 9.5593434371119978543163142603589220e-1, .Im= 2.93132585199785189455923273271764625e-1

    r[ 2069].Re= 9.5593434371119978543163142603589220e-1, .Im=-2.93132585199785189455923273271764625e-1

    r[ 2070].Re= 2.013525128520324281033992974698776375e-1, .Im= 9.7937486249239724678261609369656070e-1

    r[ 2071].Re= 2.013525128520324281033992974698776375e-1, .Im=-9.7937486249239724678261609369656070e-1

    r[ 2072].Re=-5.8322078028295931684255037907860240e-1, .Im= 8.1216155863086303412501365528441965e-1

    r[ 2073].Re=-5.8322078028295931684255037907860240e-1, .Im=-8.1216155863086303412501365528441965e-1

    r[ 2074].Re=-9.9931283286747085714551985802245325e-1, .Im= 3.4287419485231389326695961017321678125e-2

    r[ 2075].Re=-9.9931283286747085714551985802245325e-1, .Im=-3.4287419485231389326695961017321678125e-2

    r[ 2076].Re= 7.5564554270979622518922269591712390e-1, .Im= 6.5474719097479372464931657304987310e-1

    r[ 2077].Re= 7.5564554270979622518922269591712390e-1, .Im=-6.5474719097479372464931657304987310e-1

    r[ 2078].Re= 3.41453608296209687456013170958613025e-1, .Im= 9.3975037575777586873471136641455810e-1

    r[ 2079].Re= 3.41453608296209687456013170958613025e-1, .Im=-9.3975037575777586873471136641455810e-1

    r[ 2080].Re=-3.19392377607017718954551810384145925e-1, .Im= 9.4749045590777258851744591083843260e-1

    r[ 2081].Re=-3.19392377607017718954551810384145925e-1, .Im=-9.4749045590777258851744591083843260e-1

    r[ 2082].Re= 9.9479035155374562204855237723677415e-1, .Im= 1.0139508255772647360437588304193923125e-1

    r[ 2083].Re= 9.9479035155374562204855237723677415e-1, .Im=-1.0139508255772647360437588304193923125e-1

    r[ 2084].Re=-9.6315409970827547958549530449090525e-1, .Im= 2.68554832945501309460212269186740725e-1

    r[ 2085].Re=-9.6315409970827547958549530449090525e-1, .Im=-2.68554832945501309460212269186740725e-1

    r[ 2086].Re= 5.4998252867594232817793908907333385e-1, .Im= 8.3499336301148285865991738319280555e-1

    r[ 2087].Re= 5.4998252867594232817793908907333385e-1, .Im=-8.3499336301148285865991738319280555e-1

    r[ 2088].Re=-5.6820491447947052421341140870936210e-1, .Im= 8.2273989164293503950631247789715415e-1

    r[ 2089].Re=-5.6820491447947052421341140870936210e-1, .Im=-8.2273989164293503950631247789715415e-1

    r[ 2090].Re= 8.5118004381595058216447569066076535e-1, .Im= 5.245632141431204598092108426499180e-1

    r[ 2091].Re= 8.5118004381595058216447569066076535e-1, .Im=-5.245632141431204598092108426499180e-1

    r[ 2092].Re=-7.5319306515603612339759820315521210e-1, .Im= 6.5762662503487845366834108062903395e-1

    r[ 2093].Re=-7.5319306515603612339759820315521210e-1, .Im=-6.5762662503487845366834108062903395e-1

    r[ 2094].Re= 4.4742736337211971853200509485759537500e-2, .Im= 9.9885597657977931440598240442341190e-1

    r[ 2095].Re= 4.4742736337211971853200509485759537500e-2, .Im=-9.9885597657977931440598240442341190e-1

    r[ 2096].Re= 2.56182472069192757047062514175195225e-1, .Im= 9.6647893289242148284756694920361040e-1

    r[ 2097].Re= 2.56182472069192757047062514175195225e-1, .Im=-9.6647893289242148284756694920361040e-1

    r[ 2098].Re=-2.168063179580770882814988453901605625e-1, .Im= 9.7608119258289405273387728811940175e-1

    r[ 2099].Re=-2.168063179580770882814988453901605625e-1, .Im=-9.7608119258289405273387728811940175e-1

    r[ 2100].Re=-4.50357306892249564800323469171416925e-1, .Im= 8.9271750388814929966230238278512840e-1

    r[ 2101].Re=-4.50357306892249564800323469171416925e-1, .Im=-8.9271750388814929966230238278512840e-1

    r[ 2102].Re=-4.79618999057656925089077049051411425e-1, .Im= 8.7734572849872061173215342932962810e-1

    r[ 2103].Re=-4.79618999057656925089077049051411425e-1, .Im=-8.7734572849872061173215342932962810e-1

    r[ 2104].Re= 9.9990739589539801013273745411424895e-1, .Im= 1.34562147943839225533446679605731328125e-2

    r[ 2105].Re= 9.9990739589539801013273745411424895e-1, .Im=-1.34562147943839225533446679605731328125e-2

    r[ 2106].Re=-9.8350577223811352922666628728620705e-1, .Im= 1.802591484428038015597195453665335625e-1

    r[ 2107].Re=-9.8350577223811352922666628728620705e-1, .Im=-1.802591484428038015597195453665335625e-1

    r[ 2108].Re= 8.5817725640070474657505883442354385e-1, .Im= 5.1304932091303800945070179295726120e-1

    r[ 2109].Re= 8.5817725640070474657505883442354385e-1, .Im=-5.1304932091303800945070179295726120e-1

    r[ 2110].Re=-9.8999644566616240570766649398137815e-1, .Im= 1.403810360838743387379423666061484250e-1

    r[ 2111].Re=-9.8999644566616240570766649398137815e-1, .Im=-1.403810360838743387379423666061484250e-1

    r[ 2112].Re= 4.37257743240436591580788672217749975e-1, .Im= 8.9916053164099074557213953085010870e-1

    r[ 2113].Re= 4.37257743240436591580788672217749975e-1, .Im=-8.9916053164099074557213953085010870e-1

    r[ 2114].Re= 9.4572086726849480253775936944293785e-1, .Im= 3.24571043469300601902460812198114575e-1

    r[ 2115].Re= 9.4572086726849480253775936944293785e-1, .Im=-3.24571043469300601902460812198114575e-1

    r[ 2116].Re=-7.8753691229430577980252792258397675e-1, .Im= 6.1609215465575362102867984503973275e-1

    r[ 2117].Re=-7.8753691229430577980252792258397675e-1, .Im=-6.1609215465575362102867984503973275e-1

    r[ 2118].Re= 6.5808982385753067578804120785207485e-1, .Im= 7.5273692067817132844709249184234065e-1

    r[ 2119].Re= 6.5808982385753067578804120785207485e-1, .Im=-7.5273692067817132844709249184234065e-1

    r[ 2120].Re= 7.284961993966060367355908056197221875e-2, .Im= 9.9721036466362000805219167887116780e-1

    r[ 2121].Re= 7.284961993966060367355908056197221875e-2, .Im=-9.9721036466362000805219167887116780e-1

    r[ 2122].Re=-9.2546399918826927066817233935580585e-1, .Im= 3.78543085738444806676028520087129425e-1

    r[ 2123].Re=-9.2546399918826927066817233935580585e-1, .Im=-3.78543085738444806676028520087129425e-1

    r[ 2124].Re= 9.291235882670343393385792296612635e-1, .Im= 3.6936428253499248297586632361344525e-1

    r[ 2125].Re= 9.291235882670343393385792296612635e-1, .Im=-3.6936428253499248297586632361344525e-1

    r[ 2126].Re=-1.69964893743328765429723148372431750e-1, .Im= 9.8531454549211183735479835377191190e-1

    r[ 2127].Re=-1.69964893743328765429723148372431750e-1, .Im=-9.8531454549211183735479835377191190e-1

    r[ 2128].Re=-7.9723213121997016372688449337147175e-1, .Im= 6.0347865876701267673354323051171375e-1

    r[ 2129].Re=-7.9723213121997016372688449337147175e-1, .Im=-6.0347865876701267673354323051171375e-1

    r[ 2130].Re= 5.7829788581436802896718063493608495e-1, .Im= 8.1563098002643286132951061517815105e-1

    r[ 2131].Re= 5.7829788581436802896718063493608495e-1, .Im=-8.1563098002643286132951061517815105e-1

    r[ 2132].Re=-3.6059287463301406551074990147753850000e-2, .Im= 9.9921578174264369387458373239496720e-1

    r[ 2133].Re=-3.6059287463301406551074990147753850000e-2, .Im=-9.9921578174264369387458373239496720e-1

    r[ 2134].Re= 8.0386070209435900313366119007696395e-1, .Im= 5.9455653155744370153001909784507005e-1

    r[ 2135].Re= 8.0386070209435900313366119007696395e-1, .Im=-5.9455653155744370153001909784507005e-1

    r[ 2136].Re=-9.3181093757909638775061011983780190e-1, .Im= 3.62626622001616605306395513252937225e-1

    r[ 2137].Re=-9.3181093757909638775061011983780190e-1, .Im=-3.62626622001616605306395513252937225e-1

    r[ 2138].Re= 9.7651020598098325908864580924273465e-1, .Im= 2.149820353446706966416002160258358250e-1

    r[ 2139].Re= 9.7651020598098325908864580924273465e-1, .Im=-2.149820353446706966416002160258358250e-1

    r[ 2140].Re=-6.4969966894320652084360290245967915e-1, .Im= 7.6004792607772608814542536492808720e-1

    r[ 2141].Re=-6.4969966894320652084360290245967915e-1, .Im=-7.6004792607772608814542536492808720e-1

    r[ 2142].Re= 2.83288556400467739226911589867086125e-1, .Im= 9.5888408335951891281467851513298225e-1

    r[ 2143].Re= 2.83288556400467739226911589867086125e-1, .Im=-9.5888408335951891281467851513298225e-1

    r[ 2144].Re=-3.28676065066674349957054346305085325e-1, .Im= 9.4431261994071014065355029742931945e-1

    r[ 2145].Re=-3.28676065066674349957054346305085325e-1, .Im=-9.4431261994071014065355029742931945e-1

    r[ 2146].Re=-9.889390208679522675794260067050345e-1, .Im= 1.476448683616407575591722434182884125e-1

    r[ 2147].Re=-9.889390208679522675794260067050345e-1, .Im=-1.476448683616407575591722434182884125e-1

    r[ 2148].Re= 9.0477037314372643628246350999688725e-1, .Im= 4.25526235631750127108574588419287450e-1

    r[ 2149].Re= 9.0477037314372643628246350999688725e-1, .Im=-4.25526235631750127108574588419287450e-1

    r[ 2150].Re= 4.53698935329194807941632916481466950e-1, .Im= 8.9097676427187233461069126860820685e-1

    r[ 2151].Re= 4.53698935329194807941632916481466950e-1, .Im=-8.9097676427187233461069126860820685e-1

    r[ 2152].Re=-6.9588251477381479759287685737945135e-1, .Im= 7.1800685992694812664893788678455165e-1

    r[ 2153].Re=-6.9588251477381479759287685737945135e-1, .Im=-7.1800685992694812664893788678455165e-1

    r[ 2154].Re= 5.4074505193234501110310930016566995e-1, .Im= 8.4099441778819949977474834668100810e-1

    r[ 2155].Re= 5.4074505193234501110310930016566995e-1, .Im=-8.4099441778819949977474834668100810e-1

    r[ 2156].Re=-8.6866820178019266140978515977622005e-1, .Im= 4.95187511281852843492146121207042575e-1

    r[ 2157].Re=-8.6866820178019266140978515977622005e-1, .Im=-4.95187511281852843492146121207042575e-1

    r[ 2158].Re= 9.9907281751052878782104471611091865e-1, .Im= 4.2805955155244941601200281411365721875e-2

    r[ 2159].Re= 9.9907281751052878782104471611091865e-1, .Im=-4.2805955155244941601200281411365721875e-2

    r[ 2160].Re= 1.555539011608996213809064101951662375e-1, .Im= 9.8767925950717716521154443398700095e-1

    r[ 2161].Re= 1.555539011608996213809064101951662375e-1, .Im=-9.8767925950717716521154443398700095e-1

    r[ 2162].Re=-5.3862663326098347837955770955886690e-1, .Im= 8.4241231523334592079521598861902020e-1

    r[ 2163].Re=-5.3862663326098347837955770955886690e-1, .Im=-8.4241231523334592079521598861902020e-1

    r[ 2164].Re= 7.3855533498776304579536144956364295e-1, .Im= 6.7396022253252196865247469759196970e-1

    r[ 2165].Re= 7.3855533498776304579536144956364295e-1, .Im=-6.7396022253252196865247469759196970e-1

    r[ 2166].Re=-9.691508480779775780433737963903695e-1, .Im= 2.460604120130586713877107740700012000e-1

    r[ 2167].Re=-9.691508480779775780433737963903695e-1, .Im=-2.460604120130586713877107740700012000e-1

    r[ 2168].Re=-2.77317010892776383279567653517005950e-1, .Im= 9.6064775422339965249562965254881415e-1

    r[ 2169].Re=-2.77317010892776383279567653517005950e-1, .Im=-9.6064775422339965249562965254881415e-1

    r[ 2170].Re= 6.3093135021593327316224986134329810e-1, .Im= 7.7563964409953878309522679046494885e-1

    r[ 2171].Re= 6.3093135021593327316224986134329810e-1, .Im=-7.7563964409953878309522679046494885e-1

    r[ 2172].Re=-8.4728579358560418555157411901745945e-1, .Im= 5.3091708465600939703676885983441025e-1

    r[ 2173].Re=-8.4728579358560418555157411901745945e-1, .Im=-5.3091708465600939703676885983441025e-1

    r[ 2174].Re= 9.6182815335088511776717723478213880e-1, .Im= 2.73156091464009320723960172472288825e-1

    r[ 2175].Re= 9.6182815335088511776717723478213880e-1, .Im=-2.73156091464009320723960172472288825e-1

    r[ 2176].Re=-1.578851391340393706119726857650675750e-1, .Im= 9.8732415187721234151041471704957075e-1

    r[ 2177].Re=-1.578851391340393706119726857650675750e-1, .Im=-9.8732415187721234151041471704957075e-1

    r[ 2178].Re= 2.228778970259868985603901592185138625e-1, .Im= 9.746974219553958818096361937932670e-1

    r[ 2179].Re= 2.228778970259868985603901592185138625e-1, .Im=-9.746974219553958818096361937932670e-1

    r[ 2180].Re=-9.9989632553731155883980363796581510e-1, .Im= 2.45437557273524981082957197031646484375e-3

    r[ 2181].Re=-9.9989632553731155883980363796581510e-1, .Im=-2.45437557273524981082957197031646484375e-3

    r[ 2182].Re= 8.320225341737765845095964323263615e-1, .Im= 5.5447059009811239249643222137819975e-1

    r[ 2183].Re= 8.320225341737765845095964323263615e-1, .Im=-5.5447059009811239249643222137819975e-1

    r[ 2184].Re=-4.11679001814125700153823572691180725e-1, .Im= 9.1120265004474809700241166865453120e-1

    r[ 2185].Re=-4.11679001814125700153823572691180725e-1, .Im=-9.1120265004474809700241166865453120e-1

    r[ 2186].Re= 9.8968990955937052866886460833484305e-1, .Im= 1.427020012343005184174415944653446750e-1

    r[ 2187].Re= 9.8968990955937052866886460833484305e-1, .Im=-1.427020012343005184174415944653446750e-1

    r[ 2188].Re=-6.7084517382723118927856376103591170e-1, .Im= 7.4143218208523264944886932426015845e-1

    r[ 2189].Re=-6.7084517382723118927856376103591170e-1, .Im=-7.4143218208523264944886932426015845e-1

    r[ 2190].Re= 3.5293977805826687310641887052042875e-1, .Im= 9.3549589744154237891393677273299545e-1

    r[ 2191].Re= 3.5293977805826687310641887052042875e-1, .Im=-9.3549589744154237891393677273299545e-1

    r[ 2192].Re=-9.4768756647959384586954456608509640e-1, .Im= 3.18873942049656411423796953386045050e-1

    r[ 2193].Re=-9.4768756647959384586954456608509640e-1, .Im=-3.18873942049656411423796953386045050e-1

    r[ 2194].Re= 4.90401465015756987675388245406793425e-1, .Im= 8.7132911848019967138156971486750990e-1

    r[ 2195].Re= 4.90401465015756987675388245406793425e-1, .Im=-8.7132911848019967138156971486750990e-1

    r[ 2196].Re=-8.374546628455552255143601314557599375e-2, .Im= 9.9635782683577955864961950283031910e-1

    r[ 2197].Re=-8.374546628455552255143601314557599375e-2, .Im=-9.9635782683577955864961950283031910e-1

    r[ 2198].Re= 8.8965317347596251096319974749349055e-1, .Im= 4.56312301699717093317332228252780600e-1

    r[ 2199].Re= 8.8965317347596251096319974749349055e-1, .Im=-4.56312301699717093317332228252780600e-1

    r[ 2200].Re=-8.3335179512547263858124324542586690e-1, .Im= 5.5253662863311481245887080149259415e-1

    r[ 2201].Re=-8.3335179512547263858124324542586690e-1, .Im=-5.5253662863311481245887080149259415e-1

    r[ 2202].Re=-3.2982745884966135907490070167114025e-1, .Im= 9.4391692169272001233792934726807285e-1

    r[ 2203].Re=-3.2982745884966135907490070167114025e-1, .Im=-9.4391692169272001233792934726807285e-1

    r[ 2204].Re= 7.3190457823065302456200242886552585e-1, .Im= 6.8117511883931392002722304823691955e-1

    r[ 2205].Re= 7.3190457823065302456200242886552585e-1, .Im=-6.8117511883931392002722304823691955e-1

    r[ 2206].Re=-8.9841964231598281376278691823245025e-1, .Im= 4.38897033479209108808305472848587650e-1

    r[ 2207].Re=-8.9841964231598281376278691823245025e-1, .Im=-4.38897033479209108808305472848587650e-1

    r[ 2208].Re= 9.955154847564058329112413048278540e-1, .Im= 9.408074386074298522952830126087064375e-2

    r[ 2209].Re= 9.955154847564058329112413048278540e-1, .Im=-9.408074386074298522952830126087064375e-2

    r[ 2210].Re= 1.252478501003570221516980609521851750e-1, .Im= 9.9197671322357594547725057054776695e-1

    r[ 2211].Re= 1.252478501003570221516980609521851750e-1, .Im=-9.9197671322357594547725057054776695e-1

    r[ 2212].Re=-9.9965814945868791685512633193866345e-1, .Im= 2.20427219980036080693164279864504343750e-2

    r[ 2213].Re=-9.9965814945868791685512633193866345e-1, .Im=-2.20427219980036080693164279864504343750e-2

    r[ 2214].Re= 7.890519473222080693020075159438420e-1, .Im= 6.1406555829376885391468476882437240e-1

    r[ 2215].Re= 7.890519473222080693020075159438420e-1, .Im=-6.1406555829376885391468476882437240e-1

    r[ 2216].Re=-6.2228882984922428978080688466434365e-1, .Im= 7.8263044050681096486243859544629230e-1

    r[ 2217].Re=-6.2228882984922428978080688466434365e-1, .Im=-7.8263044050681096486243859544629230e-1

    r[ 2218].Re= 3.65504466787621440371225389753817575e-1, .Im= 9.3065814180065808969288809748832135e-1

    r[ 2219].Re= 3.65504466787621440371225389753817575e-1, .Im=-9.3065814180065808969288809748832135e-1

    r[ 2220].Re=-3.84710172605685019053822770729311725e-1, .Im= 9.22898498016950230571353586128680e-1

    r[ 2221].Re=-3.84710172605685019053822770729311725e-1, .Im=-9.22898498016950230571353586128680e-1

    r[ 2222].Re= 9.0890472609350680954776180442422625e-1, .Im= 4.16653666795865240679574981186306100e-1

    r[ 2223].Re= 9.0890472609350680954776180442422625e-1, .Im=-4.16653666795865240679574981186306100e-1

    r[ 2224].Re=-7.1923165796036048202921620031702330e-1, .Im= 6.9460481341749291672726940305437890e-1

    r[ 2225].Re=-7.1923165796036048202921620031702330e-1, .Im=-6.9460481341749291672726940305437890e-1

    r[ 2226].Re= 6.674038333698065206256444525934056875e-2, .Im= 9.97637132510386881456554419855820e-1

    r[ 2227].Re= 6.674038333698065206256444525934056875e-2, .Im=-9.97637132510386881456554419855820e-1

    r[ 2228].Re= 9.6700499950495144574347250454593445e-1, .Im= 2.54252185440959177498143617413006700e-1

    r[ 2229].Re= 9.6700499950495144574347250454593445e-1, .Im=-2.54252185440959177498143617413006700e-1

    r[ 2230].Re=-9.9579547551817737538470964864245615e-1, .Im= 9.050858179383462764899803687512758125e-2

    r[ 2231].Re=-9.9579547551817737538470964864245615e-1, .Im=-9.050858179383462764899803687512758125e-2

    r[ 2232].Re= 6.2427074739302090833348302112426605e-1, .Im= 7.8101300160487330259684313205070790e-1

    r[ 2233].Re= 6.2427074739302090833348302112426605e-1, .Im=-7.8101300160487330259684313205070790e-1

    r[ 2234].Re=-6.097633659808551209735583142901305e-1, .Im= 7.9244281831167173724139729529269970e-1

    r[ 2235].Re=-6.097633659808551209735583142901305e-1, .Im=-7.9244281831167173724139729529269970e-1

    r[ 2236].Re= 6.9678949430029746281434199772775170e-1, .Im= 7.1705564531803001049325985150062475e-1

    r[ 2237].Re= 6.9678949430029746281434199772775170e-1, .Im=-7.1705564531803001049325985150062475e-1

    r[ 2238].Re=-1.2029115461020016553117528701477567500e-1, .Im= 9.9260279619474367507336864946410055e-1

    r[ 2239].Re=-1.2029115461020016553117528701477567500e-1, .Im=-9.9260279619474367507336864946410055e-1

    r[ 2240].Re=-9.4247925296392986993510021420661360e-1, .Im= 3.33933389757868737124368863078416325e-1

    r[ 2241].Re=-9.4247925296392986993510021420661360e-1, .Im=-3.33933389757868737124368863078416325e-1

    r[ 2242].Re= 2.93851384116734559714956276366137875e-1, .Im= 9.5570709304711076725880047888495025e-1

    r[ 2243].Re= 2.93851384116734559714956276366137875e-1, .Im=-9.5570709304711076725880047888495025e-1

    r[ 2244].Re= 9.9539687647434649253597171991714275e-1, .Im= 9.530453035210768863993990862581995000e-2

    r[ 2245].Re= 9.9539687647434649253597171991714275e-1, .Im=-9.530453035210768863993990862581995000e-2

    r[ 2246].Re=-7.3354184334451966176260384600027460e-1, .Im= 6.7946750953233714387380359767121260e-1

    r[ 2247].Re=-7.3354184334451966176260384600027460e-1, .Im=-6.7946750953233714387380359767121260e-1

    r[ 2248].Re=-2.347027123258677017147988408396486125e-1, .Im= 9.7193753128156523679592737607890740e-1

    r[ 2249].Re=-2.347027123258677017147988408396486125e-1, .Im=-9.7193753128156523679592737607890740e-1

    r[ 2250].Re= 4.93605642234552222102905716383247625e-1, .Im= 8.6950699516384455378670281788799910e-1

    r[ 2251].Re= 4.93605642234552222102905716383247625e-1, .Im=-8.6950699516384455378670281788799910e-1

    r[ 2252].Re= 9.0372996650292658493697217636508865e-1, .Im= 4.27754982129532335122235053859185425e-1

    r[ 2253].Re= 9.0372996650292658493697217636508865e-1, .Im=-4.27754982129532335122235053859185425e-1

    r[ 2254].Re=-9.7753156272509689195260307315038515e-1, .Im= 2.102855349969194320713938850531121625e-1

    r[ 2255].Re=-9.7753156272509689195260307315038515e-1, .Im=-2.102855349969194320713938850531121625e-1

    r[ 2256].Re=-3.11688098451364838104016286024489078125e-2, .Im= 9.9937202450893825034228257209178990e-1

    r[ 2257].Re=-3.11688098451364838104016286024489078125e-2, .Im=-9.9937202450893825034228257209178990e-1

    r[ 2258].Re=-5.0626135376102932017516877749585545e-1, .Im= 8.6225003558886337273747813014779235e-1

    r[ 2259].Re=-5.0626135376102932017516877749585545e-1, .Im=-8.6225003558886337273747813014779235e-1

    r[ 2260].Re= 8.7996079349530764712739028254873115e-1, .Im= 4.74723376990190959467952325212536375e-1

    r[ 2261].Re= 8.7996079349530764712739028254873115e-1, .Im=-4.74723376990190959467952325212536375e-1

    r[ 2262].Re=-8.139295498065496348161218520544935e-1, .Im= 5.8078005581513969524110052589094265e-1

    r[ 2263].Re=-8.139295498065496348161218520544935e-1, .Im=-5.8078005581513969524110052589094265e-1

    r[ 2264].Re= 4.05059177342323828430181720250402575e-1, .Im= 9.1413391708892755005422259273473170e-1

    r[ 2265].Re= 4.05059177342323828430181720250402575e-1, .Im=-9.1413391708892755005422259273473170e-1

    r[ 2266].Re=-9.0940634067164183296227975006331685e-1, .Im= 4.15644493561800831837871328389155675e-1

    r[ 2267].Re=-9.0940634067164183296227975006331685e-1, .Im=-4.15644493561800831837871328389155675e-1

    r[ 2268].Re= 7.7918489731938378461961747234454375e-1, .Im= 6.265390993268749042499621282331645e-1

    r[ 2269].Re= 7.7918489731938378461961747234454375e-1, .Im=-6.265390993268749042499621282331645e-1

    r[ 2270].Re=-3.64286033792471652947853044679504800e-1, .Im= 9.311583974779784611541799677070230e-1

    r[ 2271].Re=-3.64286033792471652947853044679504800e-1, .Im=-9.311583974779784611541799677070230e-1

    r[ 2272].Re= 9.7755392900877324802166867812047710e-1, .Im= 2.101867238196591658461187535067438125e-1

    r[ 2273].Re= 9.7755392900877324802166867812047710e-1, .Im=-2.101867238196591658461187535067438125e-1

    r[ 2274].Re=-8.8111285926698901249665141222067175e-1, .Im= 4.72685077155415189764653405291028300e-1

    r[ 2275].Re=-8.8111285926698901249665141222067175e-1, .Im=-4.72685077155415189764653405291028300e-1

    r[ 2276].Re= 1.929353960241201593195370378452935250e-1, .Im= 9.8105971420079940426006714915274640e-1

    r[ 2277].Re= 1.929353960241201593195370378452935250e-1, .Im=-9.8105971420079940426006714915274640e-1

    r[ 2278].Re= 9.5000795778254643053628569759894160e-1, .Im= 3.11806607838685245770449228075449350e-1

    r[ 2279].Re= 9.5000795778254643053628569759894160e-1, .Im=-3.11806607838685245770449228075449350e-1

    r[ 2280].Re=-5.489064373322544154731872367847245e-1, .Im= 8.3575103379972182082724430074449625e-1

    r[ 2281].Re=-5.489064373322544154731872367847245e-1, .Im=-8.3575103379972182082724430074449625e-1

    r[ 2282].Re= 2.252787835930129545225497622595867125e-1, .Im= 9.7414377378038208288302257642499170e-1

    r[ 2283].Re= 2.252787835930129545225497622595867125e-1, .Im=-9.7414377378038208288302257642499170e-1

    r[ 2284].Re=-9.8856009674230549411078072807868010e-1, .Im= 1.500679505161930105128220702681574000e-1

    r[ 2285].Re=-9.8856009674230549411078072807868010e-1, .Im=-1.500679505161930105128220702681574000e-1

    r[ 2286].Re= 5.9710900689047663458808301584213040e-1, .Im= 8.019588229830928449715088390803430e-1

    r[ 2287].Re= 5.9710900689047663458808301584213040e-1, .Im=-8.019588229830928449715088390803430e-1

    r[ 2288].Re=-4.26133199210597446437986945966258625e-1, .Im= 9.0451749463157582464845063441316595e-1

    r[ 2289].Re=-4.26133199210597446437986945966258625e-1, .Im=-9.0451749463157582464845063441316595e-1

    r[ 2290].Re= 9.9779358696889663971063555436558090e-1, .Im= 6.602693314423893622411299020313890625e-2

    r[ 2291].Re= 9.9779358696889663971063555436558090e-1, .Im=-6.602693314423893622411299020313890625e-2

    r[ 2292].Re=-7.6593347691052515724408067399053830e-1, .Im= 6.4273579865841923286495784850558265e-1

    r[ 2293].Re=-7.6593347691052515724408067399053830e-1, .Im=-6.4273579865841923286495784850558265e-1

    r[ 2294].Re=-7.396392906622517582349018994136713125e-2, .Im= 9.9712588689088166304941296402830630e-1

    r[ 2295].Re=-7.396392906622517582349018994136713125e-2, .Im=-9.9712588689088166304941296402830630e-1

    r[ 2296].Re= 6.6725911179893881985947245993884280e-1, .Im= 7.4461765204065011314327193758799690e-1

    r[ 2297].Re= 6.6725911179893881985947245993884280e-1, .Im=-7.4461765204065011314327193758799690e-1

    r[ 2298].Re=-9.5840115915028567528111125284340230e-1, .Im= 2.8502103496466790755192732831346800e-1

    r[ 2299].Re=-9.5840115915028567528111125284340230e-1, .Im=-2.8502103496466790755192732831346800e-1

    r[ 2300].Re= 8.1748732142213498264027293771505355e-1, .Im= 5.7568081472418564104032157047186045e-1

    r[ 2301].Re= 8.1748732142213498264027293771505355e-1, .Im=-5.7568081472418564104032157047186045e-1

    r[ 2302].Re=-2.048354057547760176394291420365334375e-1, .Im= 9.7866063862811580875700201431754975e-1

    r[ 2303].Re=-2.048354057547760176394291420365334375e-1, .Im=-9.7866063862811580875700201431754975e-1

    r[ 2304].Re= 2.371910847510600994780816108686849375e-1, .Im= 9.7130952720407237599431482522049915e-1

    r[ 2305].Re= 2.371910847510600994780816108686849375e-1, .Im=-9.7130952720407237599431482522049915e-1

    r[ 2306].Re= 9.8609097649258092843638223712332545e-1, .Im= 1.656979594934501476277688425398082375e-1

    r[ 2307].Re= 9.8609097649258092843638223712332545e-1, .Im=-1.656979594934501476277688425398082375e-1

    r[ 2308].Re=-8.7407382048151160969240436315885740e-1, .Im= 4.85571091657365672134005762927699825e-1

    r[ 2309].Re=-8.7407382048151160969240436315885740e-1, .Im=-4.85571091657365672134005762927699825e-1

    r[ 2310].Re=-6.8257066157734924694011624524137005e-1, .Im= 7.3067148033087436775900869179167780e-1

    r[ 2311].Re=-6.8257066157734924694011624524137005e-1, .Im=-7.3067148033087436775900869179167780e-1

    r[ 2312].Re= 4.66757224932256298277621908709988925e-1, .Im= 8.8421754569678645552244233840610830e-1

    r[ 2313].Re= 4.66757224932256298277621908709988925e-1, .Im=-8.8421754569678645552244233840610830e-1

    r[ 2314].Re=-9.9869164512568453506702326194499615e-1, .Im= 4.8961478572203322168210348763750515625e-2

    r[ 2315].Re=-9.9869164512568453506702326194499615e-1, .Im=-4.8961478572203322168210348763750515625e-2

    r[ 2316].Re= 5.5610176898894192465405694747460070e-1, .Im= 8.3092117579939750449113944341661405e-1

    r[ 2317].Re= 5.5610176898894192465405694747460070e-1, .Im=-8.3092117579939750449113944341661405e-1

    r[ 2318].Re=-2.000464418339470695773485431345761750e-1, .Im= 9.7964710715222658166112523758783935e-1

    r[ 2319].Re=-2.000464418339470695773485431345761750e-1, .Im=-9.7964710715222658166112523758783935e-1

    r[ 2320].Re= 9.391732501293541535147824106388725e-1, .Im= 3.43035861236121120132480655229301175e-1

    r[ 2321].Re= 9.391732501293541535147824106388725e-1, .Im=-3.43035861236121120132480655229301175e-1

    r[ 2322].Re=-6.0489857146392078668384328921092670e-1, .Im= 7.9616333257121718602888904570136215e-1

    r[ 2323].Re=-6.0489857146392078668384328921092670e-1, .Im=-7.9616333257121718602888904570136215e-1

    r[ 2324].Re= 4.2282499448893187676823401943693168750e-2, .Im= 9.9896879900481261316258496663067485e-1

    r[ 2325].Re= 4.2282499448893187676823401943693168750e-2, .Im=-9.9896879900481261316258496663067485e-1

    r[ 2326].Re=-9.2406934261032347421860322356224060e-1, .Im= 3.81955698709113500299849874863866700e-1

    r[ 2327].Re=-9.2406934261032347421860322356224060e-1, .Im=-3.81955698709113500299849874863866700e-1

    r[ 2328].Re= 7.9725141543511368613650347469956610e-1, .Im= 6.0337263871517399227428768426761960e-1

    r[ 2329].Re= 7.9725141543511368613650347469956610e-1, .Im=-6.0337263871517399227428768426761960e-1

    r[ 2330].Re= 3.58662879741369677866202891891589375e-1, .Im= 9.3331575301983982217990387653117065e-1

    r[ 2331].Re= 3.58662879741369677866202891891589375e-1, .Im=-9.3331575301983982217990387653117065e-1

    r[ 2332].Re=-4.92458599998153445653770177159458375e-1, .Im= 8.7018912126873548817940218214062040e-1

    r[ 2333].Re=-4.92458599998153445653770177159458375e-1, .Im=-8.7018912126873548817940218214062040e-1

    r[ 2334].Re= 8.4989052495276340426499928071280010e-1, .Im= 5.2666130650166453897043083998141810e-1

    r[ 2335].Re= 8.4989052495276340426499928071280010e-1, .Im=-5.2666130650166453897043083998141810e-1

    r[ 2336].Re=-9.7350619675031180300095456914277745e-1, .Im= 2.28210858118353787649112973667797625e-1

    r[ 2337].Re=-9.7350619675031180300095456914277745e-1, .Im=-2.28210858118353787649112973667797625e-1

    r[ 2338].Re= 2.02655815856212784265011350726126687500e-2, .Im= 9.9965737134870791269491974162519905e-1

    r[ 2339].Re= 2.02655815856212784265011350726126687500e-2, .Im=-9.9965737134870791269491974162519905e-1

    r[ 2340].Re= 9.819476424603850173156160963117145e-1, .Im= 1.885948254868128615147071514002163875e-1

    r[ 2341].Re= 9.819476424603850173156160963117145e-1, .Im=-1.885948254868128615147071514002163875e-1

    r[ 2342].Re=-7.6198289040201294675114240817492825e-1, .Im= 6.4741317217414695583954653557157140e-1

    r[ 2343].Re=-7.6198289040201294675114240817492825e-1, .Im=-6.4741317217414695583954653557157140e-1

    r[ 2344].Re= 1.1794837796853099853855439960170770000e-1, .Im= 9.9287533069604871904800802440149705e-1

    r[ 2345].Re= 1.1794837796853099853855439960170770000e-1, .Im=-9.9287533069604871904800802440149705e-1

    r[ 2346].Re=-7.7530871877200835395882450029603205e-1, .Im= 6.3140208575466638674100749994977375e-1

    r[ 2347].Re=-7.7530871877200835395882450029603205e-1, .Im=-6.3140208575466638674100749994977375e-1

    r[ 2348].Re= 7.2855646245508043357119731808779760e-1, .Im= 6.8474296519360500212769693462178110e-1

    r[ 2349].Re= 7.2855646245508043357119731808779760e-1, .Im=-6.8474296519360500212769693462178110e-1

    r[ 2350].Re=-3.00767618456736163246034720941679550e-1, .Im= 9.5357110842187442489858995031681840e-1

    r[ 2351].Re=-3.00767618456736163246034720941679550e-1, .Im=-9.5357110842187442489858995031681840e-1

    r[ 2352].Re=-9.9497512020687128853069225442595775e-1, .Im= 9.903134961253233503608583987443125625e-2

    r[ 2353].Re=-9.9497512020687128853069225442595775e-1, .Im=-9.903134961253233503608583987443125625e-2

    r[ 2354].Re= 6.3473401156632447417393905197968705e-1, .Im= 7.7253816727468904712594621742027810e-1

    r[ 2355].Re= 6.3473401156632447417393905197968705e-1, .Im=-7.7253816727468904712594621742027810e-1

    r[ 2356].Re= 9.2217730010485687852650471540982830e-1, .Im= 3.86368102031536098106556664788513425e-1

    r[ 2357].Re= 9.2217730010485687852650471540982830e-1, .Im=-3.86368102031536098106556664788513425e-1

    r[ 2358].Re=-4.39388545345419156973321150871925050e-1, .Im= 8.9816856166185210508245972960139620e-1

    r[ 2359].Re=-4.39388545345419156973321150871925050e-1, .Im=-8.9816856166185210508245972960139620e-1

    r[ 2360].Re= 3.18328353169577971115700165682937925e-1, .Im= 9.4783334713987754671649099691421720e-1

    r[ 2361].Re= 3.18328353169577971115700165682937925e-1, .Im=-9.4783334713987754671649099691421720e-1

    r[ 2362].Re=-9.5979017851075743017474906082497905e-1, .Im= 2.80330769319995232180531274934764950e-1

    r[ 2363].Re=-9.5979017851075743017474906082497905e-1, .Im=-2.80330769319995232180531274934764950e-1

    r[ 2364].Re= 9.9997223590425032835327101565781045e-1, .Im= 7.339914199703129367435838759092803125000e-3

    r[ 2365].Re= 9.9997223590425032835327101565781045e-1, .Im=-7.339914199703129367435838759092803125000e-3

    r[ 2366].Re=-6.5342098594521835774884266356821170e-1, .Im= 7.5684737279472846793737517145927995e-1

    r[ 2367].Re=-6.5342098594521835774884266356821170e-1, .Im=-7.5684737279472846793737517145927995e-1

    r[ 2368].Re= 7.5883765912474288040101555452565660e-1, .Im= 6.5102947092472507328864139708457510e-1

    r[ 2369].Re= 7.5883765912474288040101555452565660e-1, .Im=-6.5102947092472507328864139708457510e-1

    r[ 2370].Re=-2.61999438267732531748777091706870100e-1, .Im= 9.6493307287477048106438815011642870e-1

    r[ 2371].Re=-2.61999438267732531748777091706870100e-1, .Im=-9.6493307287477048106438815011642870e-1

    r[ 2372].Re= 4.2621480486496438055965541025216225e-1, .Im= 9.0444893737377862752424562131636775e-1

    r[ 2373].Re= 4.2621480486496438055965541025216225e-1, .Im=-9.0444893737377862752424562131636775e-1

    r[ 2374].Re=-8.5816674517354518680889441384351810e-1, .Im= 5.1315377581414312047058956522960215e-1

    r[ 2375].Re=-8.5816674517354518680889441384351810e-1, .Im=-5.1315377581414312047058956522960215e-1

    r[ 2376].Re= 8.7584475815855178382207668619230385e-1, .Im= 4.82255712510383738322872204662417050e-1

    r[ 2377].Re= 8.7584475815855178382207668619230385e-1, .Im=-4.82255712510383738322872204662417050e-1

    r[ 2378].Re=-1.178449482685216681554507545115484375e-1, .Im= 9.9289697382059072250370945766917425e-1

    r[ 2379].Re=-1.178449482685216681554507545115484375e-1, .Im=-9.9289697382059072250370945766917425e-1

    r[ 2380].Re= 9.6116562778420844281868085090536620e-1, .Im= 2.75520600888962463592690710356691850e-1

    r[ 2381].Re= 9.6116562778420844281868085090536620e-1, .Im=-2.75520600888962463592690710356691850e-1

    r[ 2382].Re=-9.6541682045632759567865832650568335e-1, .Im= 2.60274095632613666762011916944175025e-1

    r[ 2383].Re=-9.6541682045632759567865832650568335e-1, .Im=-2.60274095632613666762011916944175025e-1

    r[ 2384].Re= 1.615989018773132113171442370003205625e-1, .Im= 9.8670896378311945262851168081397190e-1

    r[ 2385].Re= 1.615989018773132113171442370003205625e-1, .Im=-9.8670896378311945262851168081397190e-1

    r[ 2386].Re=-6.4410183835841416932765923775150440e-1, .Im= 7.6479599162234657150349903531605375e-1

    r[ 2387].Re=-6.4410183835841416932765923775150440e-1, .Im=-7.6479599162234657150349903531605375e-1

    r[ 2388].Re= 5.6523247237455531699623634267481975e-1, .Im= 8.247501824806000580991849346901290e-1

    r[ 2389].Re= 5.6523247237455531699623634267481975e-1, .Im=-8.247501824806000580991849346901290e-1

    r[ 2390].Re=-8.3738972309136860960876447279588315e-1, .Im= 5.4638986637451913974672379481489770e-1

    r[ 2391].Re=-8.3738972309136860960876447279588315e-1, .Im=-5.4638986637451913974672379481489770e-1

    r[ 2392].Re=-1.89286470682354032724070691529050234375e-2, .Im= 9.9967806579881024475753292790614065e-1

    r[ 2393].Re=-1.89286470682354032724070691529050234375e-2, .Im=-9.9967806579881024475753292790614065e-1

    r[ 2394].Re= 9.9289943692167859090602632932132105e-1, .Im= 1.1842449854580393286962447518817498125e-1

    r[ 2395].Re= 9.9289943692167859090602632932132105e-1, .Im=-1.1842449854580393286962447518817498125e-1

    r[ 2396].Re=-9.9719743068904875826774514280259605e-1, .Im= 7.340942061954637554155311818249174375e-2

    r[ 2397].Re=-9.9719743068904875826774514280259605e-1, .Im=-7.340942061954637554155311818249174375e-2

    r[ 2398].Re= 6.7722998401590905892533100995933635e-1, .Im= 7.3556729562925560195196794666117055e-1

    r[ 2399].Re= 6.7722998401590905892533100995933635e-1, .Im=-7.3556729562925560195196794666117055e-1

    r[ 2400].Re=-4.44881370356116190301065671519609150e-1, .Im= 8.9545986027132229434499777198652735e-1

    r[ 2401].Re=-4.44881370356116190301065671519609150e-1, .Im=-8.9545986027132229434499777198652735e-1

    r[ 2402].Re=-4.88198941782421291790683426370378575e-1, .Im= 8.7259039230669110942528732266509905e-1

    r[ 2403].Re=-4.88198941782421291790683426370378575e-1, .Im=-8.7259039230669110942528732266509905e-1

    r[ 2404].Re= 9.1592126392414019431242877544718790e-1, .Im= 4.00996751953153374170568667977931900e-1

    r[ 2405].Re= 9.1592126392414019431242877544718790e-1, .Im=-4.00996751953153374170568667977931900e-1

    r[ 2406].Re= 4.21785128199549830263492822268744925e-1, .Im= 9.0653403707469282224451490037608890e-1

    r[ 2407].Re= 4.21785128199549830263492822268744925e-1, .Im=-9.0653403707469282224451490037608890e-1

    r[ 2408].Re=-9.1144159864724716424433381689595985e-1, .Im= 4.11182760127783042403137869769125225e-1

    r[ 2409].Re=-9.1144159864724716424433381689595985e-1, .Im=-4.11182760127783042403137869769125225e-1

    r[ 2410].Re= 8.69872353535101616728297813097015e-1, .Im= 4.92944489375398142705364534776890650e-1

    r[ 2411].Re= 8.69872353535101616728297813097015e-1, .Im=-4.92944489375398142705364534776890650e-1

    r[ 2412].Re=-5.5706201679547973082406997491489160e-1, .Im= 8.3031939245914176961349539851653385e-1

    r[ 2413].Re=-5.5706201679547973082406997491489160e-1, .Im=-8.3031939245914176961349539851653385e-1

    r[ 2414].Re= 1.495032274140327133160610628692666000e-1, .Im= 9.8861263806829413613996848653187040e-1

    r[ 2415].Re= 1.495032274140327133160610628692666000e-1, .Im=-9.8861263806829413613996848653187040e-1

    r[ 2416].Re=-9.8238446571077109314984454613295380e-1, .Im= 1.862784551864315463198806810396490500e-1

    r[ 2417].Re=-9.8238446571077109314984454613295380e-1, .Im=-1.862784551864315463198806810396490500e-1

    r[ 2418].Re= 5.3454834026422914927678675667266360e-1, .Im= 8.4495342214866564489739175769500430e-1

    r[ 2419].Re= 5.3454834026422914927678675667266360e-1, .Im=-8.4495342214866564489739175769500430e-1

    r[ 2420].Re= 9.9585989541246755507586385647300630e-1, .Im= 9.043257112263039521060647984995739375e-2

    r[ 2421].Re= 9.9585989541246755507586385647300630e-1, .Im=-9.043257112263039521060647984995739375e-2

    r[ 2422].Re=-7.3021305249094559108868907060241325e-1, .Im= 6.8305677526677388566866966357338240e-1

    r[ 2423].Re=-7.3021305249094559108868907060241325e-1, .Im=-6.8305677526677388566866966357338240e-1

    r[ 2424].Re=-1.372820188083614945107058247231179750e-1, .Im= 9.9039284255796555811457437812350690e-1

    r[ 2425].Re=-1.372820188083614945107058247231179750e-1, .Im=-9.9039284255796555811457437812350690e-1

    r[ 2426].Re= 2.66810910029496084483469076076289625e-1, .Im= 9.6359068046446672006766220874851565e-1

    r[ 2427].Re= 2.66810910029496084483469076076289625e-1, .Im=-9.6359068046446672006766220874851565e-1

    r[ 2428].Re= 8.1818782502282616508892942874808795e-1, .Im= 5.7468747072338355330600734305335205e-1

    r[ 2429].Re= 8.1818782502282616508892942874808795e-1, .Im=-5.7468747072338355330600734305335205e-1

    r[ 2430].Re=-9.0161422982059158393042253010207785e-1, .Im= 4.32278828710580154126574825568241050e-1

    r[ 2431].Re=-9.0161422982059158393042253010207785e-1, .Im=-4.32278828710580154126574825568241050e-1

    r[ 2432].Re= 8.9352274161392397644476659479551015e-1, .Im= 4.48658490378491148220518880407325900e-1

    r[ 2433].Re= 8.9352274161392397644476659479551015e-1, .Im=-4.48658490378491148220518880407325900e-1

    r[ 2434].Re=-3.5285288211309467909515547034970950e-1, .Im= 9.3555231354544388100435980959446165e-1

    r[ 2435].Re=-3.5285288211309467909515547034970950e-1, .Im=-9.3555231354544388100435980959446165e-1

    r[ 2436].Re=-9.4371202320371538885268591911881230e-1, .Im= 3.30459462774648549121536689199274400e-1

    r[ 2437].Re=-9.4371202320371538885268591911881230e-1, .Im=-3.30459462774648549121536689199274400e-1

    r[ 2438].Re= 9.7490296996958425435053641194826920e-1, .Im= 2.221450055208790685945530185563256875e-1

    r[ 2439].Re= 9.7490296996958425435053641194826920e-1, .Im=-2.221450055208790685945530185563256875e-1

    r[ 2440].Re=-2.096313236884053410324924016094882875e-1, .Im= 9.7765476625722258496864469634601845e-1

    r[ 2441].Re=-2.096313236884053410324924016094882875e-1, .Im=-9.7765476625722258496864469634601845e-1

    r[ 2442].Re=-8.0675519871717882303130409127334130e-1, .Im= 5.9070788339624769047730978854815475e-1

    r[ 2443].Re=-8.0675519871717882303130409127334130e-1, .Im=-5.9070788339624769047730978854815475e-1

    r[ 2444].Re= 4.55892482508710616961877803987590575e-1, .Im= 8.8987083153408175206777741550467905e-1

    r[ 2445].Re= 4.55892482508710616961877803987590575e-1, .Im=-8.8987083153408175206777741550467905e-1

    r[ 2446].Re= 6.8349693580556447614071657881140705e-1, .Im= 7.2973254669194687060951309831580145e-1

    r[ 2447].Re= 6.8349693580556447614071657881140705e-1, .Im=-7.2973254669194687060951309831580145e-1

    r[ 2448].Re=-6.8345690469174980030686583631904795e-1, .Im= 7.2983150418796483016592446801951155e-1

    r[ 2449].Re=-6.8345690469174980030686583631904795e-1, .Im=-7.2983150418796483016592446801951155e-1

    r[ 2450].Re= 4.5967842754598066401516831547269246875e-2, .Im= 9.9880919956165814532766944466857235e-1

    r[ 2451].Re= 4.5967842754598066401516831547269246875e-2, .Im=-9.9880919956165814532766944466857235e-1

    r[ 2452].Re=-9.9962496916804333135786464481498110e-1, .Im= 2.32600983462894934927778223254790640625e-2

    r[ 2453].Re=-9.9962496916804333135786464481498110e-1, .Im=-2.32600983462894934927778223254790640625e-2

    r[ 2454].Re=-6.42053258714617575142469263482780625e-2, .Im= 9.9780123586261171286793114632018840e-1

    r[ 2455].Re=-6.42053258714617575142469263482780625e-2, .Im=-9.9780123586261171286793114632018840e-1

    r[ 2456].Re= 7.628091427033372173838188246008940e-1, .Im= 6.4636995815491271599739775410853325e-1

    r[ 2457].Re= 7.628091427033372173838188246008940e-1, .Im=-6.4636995815491271599739775410853325e-1

    r[ 2458].Re= 9.5301132476622163469670567792491055e-1, .Im= 3.02470918060462723442327614975511075e-1

    r[ 2459].Re= 9.5301132476622163469670567792491055e-1, .Im=-3.02470918060462723442327614975511075e-1

    r[ 2460].Re=-5.1467991478627617141228256514295935e-1, .Im= 8.5723434090196204415690317546250295e-1

    r[ 2461].Re=-5.1467991478627617141228256514295935e-1, .Im=-8.5723434090196204415690317546250295e-1

    r[ 2462].Re=-9.8644942735651064413815447551314715e-1, .Im= 1.633794949462953061125602971515036125e-1

    r[ 2463].Re=-9.8644942735651064413815447551314715e-1, .Im=-1.633794949462953061125602971515036125e-1

    r[ 2464].Re= 3.24128148316599862255316111259162425e-1, .Im= 9.4586606920314375557268249394837765e-1

    r[ 2465].Re= 3.24128148316599862255316111259162425e-1, .Im=-9.4586606920314375557268249394837765e-1

    r[ 2466].Re= 6.5253584521738272616886433752370065e-1, .Im= 7.5754618489054592611608995866845360e-1

    r[ 2467].Re= 6.5253584521738272616886433752370065e-1, .Im=-7.5754618489054592611608995866845360e-1

    r[ 2468].Re=-7.0548650538262280829115979940979740e-1, .Im= 7.085682998575675295427345190546475e-1

    r[ 2469].Re=-7.0548650538262280829115979940979740e-1, .Im=-7.085682998575675295427345190546475e-1

    r[ 2470].Re= 9.9944488161549305260678011109121140e-1, .Im= 3.3026909824654504532759347057435659375e-2

    r[ 2471].Re= 9.9944488161549305260678011109121140e-1, .Im=-3.3026909824654504532759347057435659375e-2

    r[ 2472].Re=-2.78495025752192593149203503344324400e-1, .Im= 9.6029870419671481407419832976302130e-1

    r[ 2473].Re=-2.78495025752192593149203503344324400e-1, .Im=-9.6029870419671481407419832976302130e-1

    r[ 2474].Re=-8.6561830566837627554122036599437705e-1, .Im= 5.0049885652585235362721505225636065e-1

    r[ 2475].Re=-8.6561830566837627554122036599437705e-1, .Im=-5.0049885652585235362721505225636065e-1

    r[ 2476].Re= 3.91573049380839255384501029766397550e-1, .Im= 9.1997712042217683059419641722342930e-1

    r[ 2477].Re= 3.91573049380839255384501029766397550e-1, .Im=-9.1997712042217683059419641722342930e-1

    r[ 2478].Re= 8.1037495316388385990791221047402355e-1, .Im= 5.8565269136000519534235309038194825e-1

    r[ 2479].Re= 8.1037495316388385990791221047402355e-1, .Im=-5.8565269136000519534235309038194825e-1

    r[ 2480].Re=-9.3831689225934122866590314515633505e-1, .Im= 3.45450036413818550862231404607882700e-1

    r[ 2481].Re=-9.3831689225934122866590314515633505e-1, .Im=-3.45450036413818550862231404607882700e-1

    r[ 2482].Re= 1.0822922964387789168672071582477655625e-1, .Im= 9.9398674453537205764064310642424970e-1

    r[ 2483].Re= 1.0822922964387789168672071582477655625e-1, .Im=-9.9398674453537205764064310642424970e-1

    r[ 2484].Re= 9.3661829099581794810802648498793130e-1, .Im= 3.49927116670387450270141016517300150e-1

    r[ 2485].Re= 9.3661829099581794810802648498793130e-1, .Im=-3.49927116670387450270141016517300150e-1

    r[ 2486].Re=-5.9114691145400866112424864695640280e-1, .Im= 8.064225844309846902291383230476640e-1

    r[ 2487].Re=-5.9114691145400866112424864695640280e-1, .Im=-8.064225844309846902291383230476640e-1

    r[ 2488].Re=-2.63181631090465772970787838858086600e-1, .Im= 9.6462042935991010317309246602235360e-1

    r[ 2489].Re=-2.63181631090465772970787838858086600e-1, .Im=-9.6462042935991010317309246602235360e-1

    r[ 2490].Re= 5.1580698836862659550916987427626735e-1, .Im= 8.5652775437615014109127287156297825e-1

    r[ 2491].Re= 5.1580698836862659550916987427626735e-1, .Im=-8.5652775437615014109127287156297825e-1

    r[ 2492].Re=-9.9209501132841015902386061497963960e-1, .Im= 1.2459003445333330373223645892721833125e-1

    r[ 2493].Re=-9.9209501132841015902386061497963960e-1, .Im=-1.2459003445333330373223645892721833125e-1

    r[ 2494].Re= 9.9088075096249172979412378481356425e-1, .Im= 1.342244286271832010015714331530034500e-1

    r[ 2495].Re= 9.9088075096249172979412378481356425e-1, .Im=-1.342244286271832010015714331530034500e-1

    r[ 2496].Re=-4.62339905146747442987731346875079900e-1, .Im= 8.8657485499339083734327005004161035e-1

    r[ 2497].Re=-4.62339905146747442987731346875079900e-1, .Im=-8.8657485499339083734327005004161035e-1

    r[ 2498].Re= 1.784983854349588006105165050030336625e-1, .Im= 9.8380338019138147132025551400147375e-1

    r[ 2499].Re= 1.784983854349588006105165050030336625e-1, .Im=-9.8380338019138147132025551400147375e-1

    r[ 2500].Re=-8.1956649124464364675191063724923875e-1, .Im= 5.7277840840152283163888569106347855e-1

    r[ 2501].Re=-8.1956649124464364675191063724923875e-1, .Im=-5.7277840840152283163888569106347855e-1

    r[ 2502].Re= 7.4756919616101613623726507285027760e-1, .Im= 6.639557247075156265481155060115270e-1

    r[ 2503].Re= 7.4756919616101613623726507285027760e-1, .Im=-6.639557247075156265481155060115270e-1

    r[ 2504].Re=-9.471986408753850505970461881588561875e-2, .Im= 9.9536427744959399266377886306145225e-1

    r[ 2505].Re=-9.471986408753850505970461881588561875e-2, .Im=-9.9536427744959399266377886306145225e-1

    r[ 2506].Re= 9.715158031367703284075787451001815e-1, .Im= 2.364466892844147571928203888091957125e-1

    r[ 2507].Re= 9.715158031367703284075787451001815e-1, .Im=-2.364466892844147571928203888091957125e-1

    r[ 2508].Re=-9.5226710862787222744429982412839305e-1, .Im= 3.04923432677526529133160693163517850e-1

    r[ 2509].Re=-9.5226710862787222744429982412839305e-1, .Im=-3.04923432677526529133160693163517850e-1

    r[ 2510].Re= 2.57363112422600570639019679219927625e-1, .Im= 9.6617308395068013382456229010131210e-1

    r[ 2511].Re= 2.57363112422600570639019679219927625e-1, .Im=-9.6617308395068013382456229010131210e-1

    r[ 2512].Re=-7.5239570891962681553621905550244260e-1, .Im= 6.5855043939274438002939859870821235e-1

    r[ 2513].Re=-7.5239570891962681553621905550244260e-1, .Im=-6.5855043939274438002939859870821235e-1

    r[ 2514].Re= 5.8724299196491980268319821334443985e-1, .Im= 8.0920988497833568064976361711160275e-1

    r[ 2515].Re= 5.8724299196491980268319821334443985e-1, .Im=-8.0920988497833568064976361711160275e-1

    r[ 2516].Re=-3.77919364656374601185717665430274775e-1, .Im= 9.2570818074187977142486261072917840e-1

    r[ 2517].Re=-3.77919364656374601185717665430274775e-1, .Im=-9.2570818074187977142486261072917840e-1

    r[ 2518].Re= 8.8455831856577826766141470216098240e-1, .Im= 4.66087386417162630181110216653905800e-1

    r[ 2519].Re= 8.8455831856577826766141470216098240e-1, .Im=-4.66087386417162630181110216653905800e-1

    r[ 2520].Re= 5.921870076459638809751595545094460e-1, .Im= 8.0559942305764264958156672946643080e-1

    r[ 2521].Re= 5.921870076459638809751595545094460e-1, .Im=-8.0559942305764264958156672946643080e-1

    r[ 2522].Re=-9.7542126282521823821269890686380675e-1, .Im= 2.198685893287472825630146644471096750e-1

    r[ 2523].Re=-9.7542126282521823821269890686380675e-1, .Im=-2.198685893287472825630146644471096750e-1

    r[ 2524].Re=-5.3964943445718538406197239964967590e-1, .Im= 8.4174950914333157570013099757488815e-1

    r[ 2525].Re=-5.3964943445718538406197239964967590e-1, .Im=-8.4174950914333157570013099757488815e-1

    r[ 2526].Re= 9.9736644703739552042520699615124610e-1, .Im= 7.213225373569803755557927615882363125e-2

    r[ 2527].Re= 9.9736644703739552042520699615124610e-1, .Im=-7.213225373569803755557927615882363125e-2

    r[ 2528].Re=-8.7525470729714871520599217546987345e-1, .Im= 4.8344162275489888092039336697780525e-1

    r[ 2529].Re=-8.7525470729714871520599217546987345e-1, .Im=-4.8344162275489888092039336697780525e-1

    r[ 2530].Re= 2.27011349970513941209926400688345890625e-2, .Im= 9.9961145776116844263725624841754320e-1

    r[ 2531].Re= 2.27011349970513941209926400688345890625e-2, .Im=-9.9961145776116844263725624841754320e-1

    r[ 2532].Re= 3.80278546586553689579091042105574150e-1, .Im= 9.2470467548700607807177220820449290e-1

    r[ 2533].Re= 3.80278546586553689579091042105574150e-1, .Im=-9.2470467548700607807177220820449290e-1

    r[ 2534].Re= 8.6192773975358627502885155990952625e-1, .Im= 5.0673634785439425343156472081318495e-1

    r[ 2535].Re= 8.6192773975358627502885155990952625e-1, .Im=-5.0673634785439425343156472081318495e-1

    r[ 2536].Re=-8.5052148330356414085429150873096655e-1, .Im= 5.2571945326099778217354696607799265e-1

    r[ 2537].Re=-8.5052148330356414085429150873096655e-1, .Im=-5.2571945326099778217354696607799265e-1

    r[ 2538].Re=-1.711718798475519442980896656081313250e-1, .Im= 9.8511463827307665930277380539337170e-1

    r[ 2539].Re=-1.711718798475519442980896656081313250e-1, .Im=-9.8511463827307665930277380539337170e-1

    r[ 2540].Re=-6.1168853185486204981913260780856940e-1, .Im= 7.9094975346342277777722529208404010e-1

    r[ 2541].Re=-6.1168853185486204981913260780856940e-1, .Im=-7.9094975346342277777722529208404010e-1

    r[ 2542].Re= 9.4288888991333807965133928519207980e-1, .Im= 3.32663097494003801024575750489020700e-1

    r[ 2543].Re= 9.4288888991333807965133928519207980e-1, .Im=-3.32663097494003801024575750489020700e-1

    r[ 2544].Re=-7.91552791027219648789525763277197187500e-3, .Im= 9.9983320393928920566395390778779980e-1

    r[ 2545].Re=-7.91552791027219648789525763277197187500e-3, .Im=-9.9983320393928920566395390778779980e-1

    r[ 2546].Re=-9.9691879689164686340063781244680285e-1, .Im= 7.708775239524066902330190487191430000e-2

    r[ 2547].Re=-9.9691879689164686340063781244680285e-1, .Im=-7.708775239524066902330190487191430000e-2

    r[ 2548].Re= 7.08129626529854672156716333120130e-1, .Im= 7.0585963454149447393604077660711480e-1

    r[ 2549].Re= 7.08129626529854672156716333120130e-1, .Im=-7.0585963454149447393604077660711480e-1

    r[ 2550].Re=-3.07763031786051410865212574208271675e-1, .Im= 9.5132855167983210176174679872929115e-1

    r[ 2551].Re=-3.07763031786051410865212574208271675e-1, .Im=-9.5132855167983210176174679872929115e-1

    r[ 2552].Re= 8.3540308760878223548473897608346305e-1, .Im= 5.4936361496690200301173945263144560e-1

    r[ 2553].Re= 8.3540308760878223548473897608346305e-1, .Im=-5.4936361496690200301173945263144560e-1

    r[ 2554].Re=-9.2265016573154068346696021762909365e-1, .Im= 3.85337353423555240006237454508664075e-1

    r[ 2555].Re=-9.2265016573154068346696021762909365e-1, .Im=-3.85337353423555240006237454508664075e-1

    r[ 2556].Re= 4.89342175579247307126706800772808475e-1, .Im= 8.7192488286018532406274061941076070e-1

    r[ 2557].Re= 4.89342175579247307126706800772808475e-1, .Im=-8.7192488286018532406274061941076070e-1

    r[ 2558].Re=-7.1153217811775515411198966830852440e-1, .Im= 7.024802915344245946016599191352725e-1

    r[ 2559].Re=-7.1153217811775515411198966830852440e-1, .Im=-7.024802915344245946016599191352725e-1

    r[ 2560].Re= 9.8440491714447142523880529552116055e-1, .Im= 1.753439807025469476808865465500275500e-1

    r[ 2561].Re= 9.8440491714447142523880529552116055e-1, .Im=-1.753439807025469476808865465500275500e-1

    r[ 2562].Re= 1.953509833746670809606627017274149625e-1, .Im= 9.8059104339954827889158650577883235e-1

    r[ 2563].Re= 1.953509833746670809606627017274149625e-1, .Im=-9.8059104339954827889158650577883235e-1

    r[ 2564].Re=-7.9427092418685452113180645028478465e-1, .Im= 6.0736913582260299016013505024602635e-1

    r[ 2565].Re=-7.9427092418685452113180645028478465e-1, .Im=-6.0736913582260299016013505024602635e-1

    r[ 2566].Re= 5.4588432107006246152280937167233785e-1, .Im= 8.3766793397908523299832950215204615e-1

    r[ 2567].Re= 5.4588432107006246152280937167233785e-1, .Im=-8.3766793397908523299832950215204615e-1

    r[ 2568].Re=-9.7405522178986769787911725870799270e-1, .Im= 2.25837961648088891841723580000689250e-1

    r[ 2569].Re=-9.7405522178986769787911725870799270e-1, .Im=-2.25837961648088891841723580000689250e-1

    r[ 2570].Re= 9.6974865723717196264175299802445805e-1, .Im= 2.435866394174594495858343634608900125e-1

    r[ 2571].Re= 9.6974865723717196264175299802445805e-1, .Im=-2.435866394174594495858343634608900125e-1

    r[ 2572].Re=-4.09447317278209543811584580907947375e-1, .Im= 9.1219382441422469653957705304492260e-1

    r[ 2573].Re=-4.09447317278209543811584580907947375e-1, .Im=-9.1219382441422469653957705304492260e-1

    r[ 2574].Re= 1.349608063021670856240774583056918250e-1, .Im= 9.9071694330295156927235211696824990e-1

    r[ 2575].Re= 1.349608063021670856240774583056918250e-1, .Im=-9.9071694330295156927235211696824990e-1

    r[ 2576].Re= 2.97359118911974751320315135671989975e-1, .Im= 9.5460566521497658420969401049660515e-1

    r[ 2577].Re= 2.97359118911974751320315135671989975e-1, .Im=-9.5460566521497658420969401049660515e-1

    r[ 2578].Re=-1.880350223634377204717793574673123625e-1, .Im= 9.8202408270060692618841358125791880e-1

    r[ 2579].Re=-1.880350223634377204717793574673123625e-1, .Im=-9.8202408270060692618841358125791880e-1

    r[ 2580].Re=-5.0097016104780456302592028805520385e-1, .Im= 8.6533473262229432254599714724463410e-1

    r[ 2581].Re=-5.0097016104780456302592028805520385e-1, .Im=-8.6533473262229432254599714724463410e-1

    r[ 2582].Re=-9.997474873260693284393596513837110e-1, .Im= 1.71375496281866226966350552629592125000e-2

    r[ 2583].Re=-9.997474873260693284393596513837110e-1, .Im=-1.71375496281866226966350552629592125000e-2

    r[ 2584].Re= 9.1042888554062906258934617653721940e-1, .Im= 4.13296148489636971934402254191809325e-1

    r[ 2585].Re= 9.1042888554062906258934617653721940e-1, .Im=-4.13296148489636971934402254191809325e-1

    r[ 2586].Re= 7.7840791264098463386744697345420715e-1, .Im= 6.2749325704412162174605782638536765e-1

    r[ 2587].Re= 7.7840791264098463386744697345420715e-1, .Im=-6.2749325704412162174605782638536765e-1

    r[ 2588].Re= 9.9865972739865349616650291864061725e-1, .Im= 5.1363707147698611787944855677778831250e-2

    r[ 2589].Re= 9.9865972739865349616650291864061725e-1, .Im=-5.1363707147698611787944855677778831250e-2

    r[ 2590].Re=-8.8627558903894176900450929679209365e-1, .Im= 4.62934360842158942883628469644463600e-1

    r[ 2591].Re=-8.8627558903894176900450929679209365e-1, .Im=-4.62934360842158942883628469644463600e-1

    r[ 2592].Re=-6.6171588434389327915141620906069870e-1, .Im= 7.4959226805713286001520145873655565e-1

    r[ 2593].Re=-6.6171588434389327915141620906069870e-1, .Im=-7.4959226805713286001520145873655565e-1

    r[ 2594].Re= 6.6359998279971521562003999861190095e-1, .Im= 7.4788767471448847068415943795116615e-1

    r[ 2595].Re= 6.6359998279971521562003999861190095e-1, .Im=-7.4788767471448847068415943795116615e-1

    r[ 2596].Re= 5.558593238227165118925388043180646484375e-3, .Im= 9.998425873905535388175280786526855e-1

    r[ 2597].Re= 5.558593238227165118925388043180646484375e-3, .Im=-9.998425873905535388175280786526855e-1

    r[ 2598].Re=-9.9810052986497443949787111705518325e-1, .Im= 5.9972693238158535089521450345273478125e-2

    r[ 2599].Re=-9.9810052986497443949787111705518325e-1, .Im=-5.9972693238158535089521450345273478125e-2

    r[ 2600].Re= 4.32855927486362312972545396405621425e-1, .Im= 9.0129727958206051763312416369444690e-1

    r[ 2601].Re= 4.32855927486362312972545396405621425e-1, .Im=-9.0129727958206051763312416369444690e-1

    r[ 2602].Re=-3.44810774527835983693790922188782125e-1, .Im= 9.385313192551563155063831800362095e-1

    r[ 2603].Re=-3.44810774527835983693790922188782125e-1, .Im=-9.385313192551563155063831800362095e-1

    r[ 2604].Re= 7.6910269630965732989835714761284175e-1, .Im= 6.3887976084693864908814475711551490e-1

    r[ 2605].Re= 7.6910269630965732989835714761284175e-1, .Im=-6.3887976084693864908814475711551490e-1

    r[ 2606].Re=-8.1604348678854443654984152090037240e-1, .Im= 5.7778559298018583589851004944648590e-1

    r[ 2607].Re=-8.1604348678854443654984152090037240e-1, .Im=-5.7778559298018583589851004944648590e-1

    r[ 2608].Re= 9.331507537353984638173187704524025e-1, .Im= 3.59100633887224407470029063915717400e-1

    r[ 2609].Re= 9.331507537353984638173187704524025e-1, .Im=-3.59100633887224407470029063915717400e-1

    r[ 2610].Re=-5.752361104750596254575611965265125e-1, .Im= 8.1785215777539788106764717667829245e-1

    r[ 2611].Re=-5.752361104750596254575611965265125e-1, .Im=-8.1785215777539788106764717667829245e-1

    r[ 2612].Re= 1.482905939269832940041737856518011500e-1, .Im= 9.8880387353500109881565549585502590e-1

    r[ 2613].Re= 1.482905939269832940041737856518011500e-1, .Im=-9.8880387353500109881565549585502590e-1

    r[ 2614].Re=-9.5411789453924256143579896161099895e-1, .Im= 2.99085648420282290693705817830050350e-1

    r[ 2615].Re=-9.5411789453924256143579896161099895e-1, .Im=-2.99085648420282290693705817830050350e-1

    r[ 2616].Re= 7.1926490206108806280127510035526935e-1, .Im= 6.9450333149248144604115395850385535e-1

    r[ 2617].Re= 7.1926490206108806280127510035526935e-1, .Im=-6.9450333149248144604115395850385535e-1

    r[ 2618].Re=-1.29997033143873702565329608660249500e-1, .Im= 9.9138198476336081288451396176242265e-1

    r[ 2619].Re=-1.29997033143873702565329608660249500e-1, .Im=-9.9138198476336081288451396176242265e-1

    r[ 2620].Re= 9.944176148700571982175233642919920e-1, .Im= 1.050441507987105865806753968172415625e-1

    r[ 2621].Re= 9.944176148700571982175233642919920e-1, .Im=-1.050441507987105865806753968172415625e-1

    r[ 2622].Re=-9.0109195221506810380418528438895005e-1, .Im= 4.33386675612769001197932539071189225e-1

    r[ 2623].Re=-9.0109195221506810380418528438895005e-1, .Im=-4.33386675612769001197932539071189225e-1

    r[ 2624].Re= 2.395665268246406631735823111739591625e-1, .Im= 9.7074004194111451759852116083493455e-1

    r[ 2625].Re= 2.395665268246406631735823111739591625e-1, .Im=-9.7074004194111451759852116083493455e-1

    r[ 2626].Re=-7.1838882403403114818019048470887355e-1, .Im= 6.9548783074185216435125767020508645e-1

    r[ 2627].Re=-7.1838882403403114818019048470887355e-1, .Im=-6.9548783074185216435125767020508645e-1

    r[ 2628].Re= 9.0529976883107121654603588467580265e-1, .Im= 4.24416819697797154109508710462250725e-1

    r[ 2629].Re= 9.0529976883107121654603588467580265e-1, .Im=-4.24416819697797154109508710462250725e-1

    r[ 2630].Re=-3.65419636628232402664195888064568850e-1, .Im= 9.3071770668555475758410011621890585e-1

    r[ 2631].Re=-3.65419636628232402664195888064568850e-1, .Im=-9.3071770668555475758410011621890585e-1

    r[ 2632].Re= 4.97849616994818222615037939249305050e-1, .Im= 8.6707856084224488313338952139019965e-1

    r[ 2633].Re= 4.97849616994818222615037939249305050e-1, .Im=-8.6707856084224488313338952139019965e-1

    r[ 2634].Re=-9.8051883702327791159092384987161490e-1, .Im= 1.959088199522880380243350373348221125e-1

    r[ 2635].Re=-9.8051883702327791159092384987161490e-1, .Im=-1.959088199522880380243350373348221125e-1

    r[ 2636].Re= 6.1174114006688429245883753537782465e-1, .Im= 7.9085724468423768129810014215763655e-1

    r[ 2637].Re= 6.1174114006688429245883753537782465e-1, .Im=-7.9085724468423768129810014215763655e-1

    r[ 2638].Re=-7.764148362279461867974106326073524375e-2, .Im= 9.9685289335536442223428821307606995e-1

    r[ 2639].Re=-7.764148362279461867974106326073524375e-2, .Im=-9.9685289335536442223428821307606995e-1

    r[ 2640].Re=-7.791599429880852190066775619925465e-1, .Im= 6.2664174756781665376337286943453360e-1

    r[ 2641].Re=-7.791599429880852190066775619925465e-1, .Im=-6.2664174756781665376337286943453360e-1

    r[ 2642].Re= 9.5840861600548521437303861603140830e-1, .Im= 2.84913958706216663419041879024007350e-1

    r[ 2643].Re= 9.5840861600548521437303861603140830e-1, .Im=-2.84913958706216663419041879024007350e-1

    r[ 2644].Re=-4.228109689445467833657232858968200e-1, .Im= 9.0609139848784936432934955519158390e-1

    r[ 2645].Re=-4.228109689445467833657232858968200e-1, .Im=-9.0609139848784936432934955519158390e-1

    r[ 2646].Re= 8.2861058357970995835728444944834335e-1, .Im= 5.5955668514769674182218750502215695e-1

    r[ 2647].Re= 8.2861058357970995835728444944834335e-1, .Im=-5.5955668514769674182218750502215695e-1

    r[ 2648].Re=-9.9099412356540728108456050904351285e-1, .Im= 1.331046517865104861222391718911239875e-1

    r[ 2649].Re=-9.9099412356540728108456050904351285e-1, .Im=-1.331046517865104861222391718911239875e-1

    r[ 2650].Re= 3.1136209811399395697151248896261675e-1, .Im= 9.5014454272507054000129755877424030e-1

    r[ 2651].Re= 3.1136209811399395697151248896261675e-1, .Im=-9.5014454272507054000129755877424030e-1

    r[ 2652].Re= 9.8689382885147902690903265465749425e-1, .Im= 1.608575563243380690536810107005294375e-1

    r[ 2653].Re= 9.8689382885147902690903265465749425e-1, .Im=-1.608575563243380690536810107005294375e-1

    r[ 2654].Re=-6.2994083254072219535402155088377185e-1, .Im= 7.7650303690903277331614162903861140e-1

    r[ 2655].Re=-6.2994083254072219535402155088377185e-1, .Im=-7.7650303690903277331614162903861140e-1

    r[ 2656].Re= 7.529675934419950700249302144584361875e-2, .Im= 9.9701485681428547724891586767625990e-1

    r[ 2657].Re= 7.529675934419950700249302144584361875e-2, .Im=-9.9701485681428547724891586767625990e-1

    r[ 2658].Re=-9.3315154603268990474163047110778275e-1, .Im= 3.5920333049672620306935755252197850e-1

    r[ 2659].Re=-9.3315154603268990474163047110778275e-1, .Im=-3.5920333049672620306935755252197850e-1

    r[ 2660].Re= 6.7089015635820470340178189871949140e-1, .Im= 7.4133496460522263493686523361247960e-1

    r[ 2661].Re= 6.7089015635820470340178189871949140e-1, .Im=-7.4133496460522263493686523361247960e-1

    r[ 2662].Re=-2.38287098498307592375766716941143375e-1, .Im= 9.7106486438567285457423849948099810e-1

    r[ 2663].Re=-2.38287098498307592375766716941143375e-1, .Im=-9.7106486438567285457423849948099810e-1

    r[ 2664].Re= 8.5183035681814411876899839626275930e-1, .Im= 5.2352353076942870213628111741854805e-1

    r[ 2665].Re= 8.5183035681814411876899839626275930e-1, .Im=-5.2352353076942870213628111741854805e-1

    r[ 2666].Re=-6.7176142256377802119970965577522290e-1, .Im= 7.4061136581873310280599298494053070e-1

    r[ 2667].Re=-6.7176142256377802119970965577522290e-1, .Im=-7.4061136581873310280599298494053070e-1

    r[ 2668].Re= 4.00566225594808200671792519642622200e-1, .Im= 9.1611127313156515139525026825140230e-1

    r[ 2669].Re= 4.00566225594808200671792519642622200e-1, .Im=-9.1611127313156515139525026825140230e-1

    r[ 2670].Re=-4.3404552576871223423804480034959850000e-2, .Im= 9.9891682639790824183023687510285525e-1

    r[ 2671].Re=-4.3404552576871223423804480034959850000e-2, .Im=-9.9891682639790824183023687510285525e-1

    r[ 2672].Re=-9.4807813779143146337702319215168245e-1, .Im= 3.17721831650769948041101997660007325e-1

    r[ 2673].Re=-9.4807813779143146337702319215168245e-1, .Im=-3.17721831650769948041101997660007325e-1

    r[ 2674].Re= 9.9966413657187114250035619988921095e-1, .Im= 2.56873355231952739397005558430464578125e-2

    r[ 2675].Re= 9.9966413657187114250035619988921095e-1, .Im=-2.56873355231952739397005558430464578125e-2

    r[ 2676].Re=-8.2859764547981362703410468384390695e-1, .Im= 5.5965944127687494713541127566713835e-1

    r[ 2677].Re=-8.2859764547981362703410468384390695e-1, .Im=-5.5965944127687494713541127566713835e-1

    r[ 2678].Re= 7.3937988263897791441081608354579655e-1, .Im= 6.7306438496108722535637980399769730e-1

    r[ 2679].Re= 7.3937988263897791441081608354579655e-1, .Im=-6.7306438496108722535637980399769730e-1

    r[ 2680].Re=-2.93759769735757458875013981014490125e-1, .Im= 9.5575499401714347769143387267831710e-1

    r[ 2681].Re=-2.93759769735757458875013981014490125e-1, .Im=-9.5575499401714347769143387267831710e-1

    r[ 2682].Re= 9.9787017511611519893222066457383330e-1, .Im= 6.480552101702342915334753570277825625e-2

    r[ 2683].Re= 9.9787017511611519893222066457383330e-1, .Im=-6.480552101702342915334753570277825625e-2

    r[ 2684].Re=-9.8522898286503668430214020190760490e-1, .Im= 1.706278774242401818916903266654117000e-1

    r[ 2685].Re=-9.8522898286503668430214020190760490e-1, .Im=-1.706278774242401818916903266654117000e-1

    r[ 2686].Re= 3.33383346898717847217596954578766575e-1, .Im= 9.4262916275709240920832598931156095e-1

    r[ 2687].Re= 3.33383346898717847217596954578766575e-1, .Im=-9.4262916275709240920832598931156095e-1

    r[ 2688].Re=-5.6111818407227065375053598472732115e-1, .Im= 8.2758843641905488475174479390261690e-1

    r[ 2689].Re=-5.6111818407227065375053598472732115e-1, .Im=-8.2758843641905488475174479390261690e-1

    r[ 2690].Re= 6.0200881509378623146488962447619995e-1, .Im= 7.9828818975957371861795763834379610e-1

    r[ 2691].Re= 6.0200881509378623146488962447619995e-1, .Im=-7.9828818975957371861795763834379610e-1

    r[ 2692].Re=-7.4508043597350304132476139784557740e-1, .Im= 6.6680028491464649054165647612535390e-1

    r[ 2693].Re=-7.4508043597350304132476139784557740e-1, .Im=-6.6680028491464649054165647612535390e-1

    r[ 2694].Re= 6.5066747771304711545070631473208775e-1, .Im= 7.5915265455644864722728470951551570e-1

    r[ 2695].Re= 6.5066747771304711545070631473208775e-1, .Im=-7.5915265455644864722728470951551570e-1

    r[ 2696].Re=-2.251795982558587316813003553761518500e-1, .Im= 9.7418059089514641435414432635297995e-1

    r[ 2697].Re=-2.251795982558587316813003553761518500e-1, .Im=-9.7418059089514641435414432635297995e-1

    r[ 2698].Re= 9.3748222393344726732777871802682055e-1, .Im= 3.47642668311083757881618794272071675e-1

    r[ 2699].Re= 9.3748222393344726732777871802682055e-1, .Im=-3.47642668311083757881618794272071675e-1

    r[ 2700].Re=-9.9421460172050368786500484930002130e-1, .Im= 1.0634560430305207978651793609969899375e-1

    r[ 2701].Re=-9.9421460172050368786500484930002130e-1, .Im=-1.0634560430305207978651793609969899375e-1

    r[ 2702].Re= 2.07346273077326725964297793325386000e-1, .Im= 9.7812196357401937074627085166866890e-1

    r[ 2703].Re= 2.07346273077326725964297793325386000e-1, .Im=-9.7812196357401937074627085166866890e-1

    r[ 2704].Re=-6.3278136728090039753169548930600285e-1, .Im= 7.7417100487162959776554771451628765e-1

    r[ 2705].Re=-6.3278136728090039753169548930600285e-1, .Im=-7.7417100487162959776554771451628765e-1

    r[ 2706].Re= 8.8054356559942115190153799630934370e-1, .Im= 4.73654155715875102572454125038348125e-1

    r[ 2707].Re= 8.8054356559942115190153799630934370e-1, .Im=-4.73654155715875102572454125038348125e-1

    r[ 2708].Re= 5.1789196602247855594214343000203370e-1, .Im= 8.5527118537293533861998184875119475e-1

    r[ 2709].Re= 5.1789196602247855594214343000203370e-1, .Im=-8.5527118537293533861998184875119475e-1

    r[ 2710].Re=-8.5246224625701194632654278393601995e-1, .Im= 5.2259215892164379013706820842344310e-1

    r[ 2711].Re=-8.5246224625701194632654278393601995e-1, .Im=-5.2259215892164379013706820842344310e-1

    r[ 2712].Re=-1.530422463409191469185799405750003625e-1, .Im= 9.8809495666470581465290479172836055e-1

    r[ 2713].Re=-1.530422463409191469185799405750003625e-1, .Im=-9.8809495666470581465290479172836055e-1

    r[ 2714].Re= 8.0020323935390946790136013078154060e-1, .Im= 5.9946797973583787477735995707917025e-1

    r[ 2715].Re= 8.0020323935390946790136013078154060e-1, .Im=-5.9946797973583787477735995707917025e-1

    r[ 2716].Re=-9.2027368436162715337189865749678570e-1, .Im= 3.90979638976186760768172234747908075e-1

    r[ 2717].Re=-9.2027368436162715337189865749678570e-1, .Im=-3.90979638976186760768172234747908075e-1

    r[ 2718].Re= 9.96904136046707078921969014118076250e-2, .Im= 9.9487234638151400556438375133438965e-1

    r[ 2719].Re= 9.96904136046707078921969014118076250e-2, .Im=-9.9487234638151400556438375133438965e-1

    r[ 2720].Re=-4.65591159298299028801437771107885050e-1, .Im= 8.848555665304839168427974982478190e-1

    r[ 2721].Re=-4.65591159298299028801437771107885050e-1, .Im=-8.848555665304839168427974982478190e-1

    r[ 2722].Re= 9.9020165015381644835201768728438760e-1, .Im= 1.390734516841319046154268335158121750e-1

    r[ 2723].Re= 9.9020165015381644835201768728438760e-1, .Im=-1.390734516841319046154268335158121750e-1

    r[ 2724].Re=-9.6944804214080770865535896518849765e-1, .Im= 2.448813974084248779039540977464639500e-1

    r[ 2725].Re=-9.6944804214080770865535896518849765e-1, .Im=-2.448813974084248779039540977464639500e-1

    r[ 2726].Re= 4.60242045044326419933611305168597025e-1, .Im= 8.8761747890648134973190508389961905e-1

    r[ 2727].Re= 4.60242045044326419933611305168597025e-1, .Im=-8.8761747890648134973190508389961905e-1

    r[ 2728].Re=-3.92622493365657632136134225220303050e-1, .Im= 9.1956387305950881838612076535355295e-1

    r[ 2729].Re=-3.92622493365657632136134225220303050e-1, .Im=-9.1956387305950881838612076535355295e-1

    r[ 2730].Re= 9.6216919043532267430407500796718520e-1, .Im= 2.71973283098931983836621384398313225e-1

    r[ 2731].Re= 9.6216919043532267430407500796718520e-1, .Im=-2.71973283098931983836621384398313225e-1

    r[ 2732].Re=-7.8525548022221314248270118696382265e-1, .Im= 6.1899017188333815830958428705343975e-1

    r[ 2733].Re=-7.8525548022221314248270118696382265e-1, .Im=-6.1899017188333815830958428705343975e-1

    r[ 2734].Re= 2.336159584066986316663872003118740375e-1, .Im= 9.7218919269988612885668999297195110e-1

    r[ 2735].Re= 2.336159584066986316663872003118740375e-1, .Im=-9.7218919269988612885668999297195110e-1

    r[ 2736].Re= 7.2182714023150007509599390687071715e-1, .Im= 6.9185317853071215399296534087625330e-1

    r[ 2737].Re= 7.2182714023150007509599390687071715e-1, .Im=-6.9185317853071215399296534087625330e-1

    r[ 2738].Re=-9.9886464430851129581157010761671695e-1, .Im= 4.5306027755741717921722511164261959375e-2

    r[ 2739].Re=-9.9886464430851129581157010761671695e-1, .Im=-4.5306027755741717921722511164261959375e-2

    r[ 2740].Re=-6.908494028076278548056166073365602500e-2, .Im= 9.9746934568808764964842339395545420e-1

    r[ 2741].Re=-6.908494028076278548056166073365602500e-2, .Im=-9.9746934568808764964842339395545420e-1

    r[ 2742].Re= 9.245272306269310957915763538039755e-1, .Im= 3.8071445840372414304297876697091850e-1

    r[ 2743].Re= 9.245272306269310957915763538039755e-1, .Im=-3.8071445840372414304297876697091850e-1

    r[ 2744].Re=-5.8818250863933552174955821101320905e-1, .Im= 8.0857474149948238562046753941103815e-1

    r[ 2745].Re=-5.8818250863933552174955821101320905e-1, .Im=-8.0857474149948238562046753941103815e-1

    r[ 2746].Re= 3.85933046421514713841816046624444425e-1, .Im= 9.2235809105772847971138617140240965e-1

    r[ 2747].Re= 3.85933046421514713841816046624444425e-1, .Im=-9.2235809105772847971138617140240965e-1

    r[ 2748].Re=-8.9734651183199609647545003099367020e-1, .Im= 4.41082874830419024991812193547957575e-1

    r[ 2749].Re=-8.9734651183199609647545003099367020e-1, .Im=-4.41082874830419024991812193547957575e-1

    r[ 2750].Re= 9.783088201427126984199844628165010e-1, .Im= 2.065983598888073702326551028818357625e-1

    r[ 2751].Re= 9.783088201427126984199844628165010e-1, .Im=-2.065983598888073702326551028818357625e-1

    r[ 2752].Re=-2.9960841714047758976846580480923875e-1, .Im= 9.5393742695384864394014812205568885e-1

    r[ 2753].Re=-2.9960841714047758976846580480923875e-1, .Im=-9.5393742695384864394014812205568885e-1

    r[ 2754].Re= 5.9414872526225813442746215287115771875e-2, .Im= 9.9810332358458986323768158399616365e-1

    r[ 2755].Re= 5.9414872526225813442746215287115771875e-2, .Im=-9.9810332358458986323768158399616365e-1

    r[ 2756].Re= 8.3875210623485274563648772527812980e-1, .Im= 5.4423598668227401997654624210554175e-1

    r[ 2757].Re= 8.3875210623485274563648772527812980e-1, .Im=-5.4423598668227401997654624210554175e-1

    r[ 2758].Re=-7.7220964333245711852526937946095130e-1, .Im= 6.3520205900635240414686677468125705e-1

    r[ 2759].Re=-7.7220964333245711852526937946095130e-1, .Im=-6.3520205900635240414686677468125705e-1

    r[ 2760].Re=-9.6283222538506973986471848547807890e-1, .Im= 2.69730087045424005154359292646404350e-1

    r[ 2761].Re=-9.6283222538506973986471848547807890e-1, .Im=-2.69730087045424005154359292646404350e-1

    r[ 2762].Re= 5.3558564952547105253444215122726745e-1, .Im= 8.4428950497352639459336387517396360e-1

    r[ 2763].Re= 5.3558564952547105253444215122726745e-1, .Im=-8.4428950497352639459336387517396360e-1

    r[ 2764].Re=-5.6865227949038033017359339282847940625e-2, .Im= 9.9824047606378352170963808021042495e-1

    r[ 2765].Re=-5.6865227949038033017359339282847940625e-2, .Im=-9.9824047606378352170963808021042495e-1

    r[ 2766].Re= 8.6622706254381975909950597269926220e-1, .Im= 4.99331541105784926237731724540935825e-1

    r[ 2767].Re= 8.6622706254381975909950597269926220e-1, .Im=-4.99331541105784926237731724540935825e-1

    r[ 2768].Re=-7.0200023282015955317092448240146040e-1, .Im= 7.1200861194267284215442259664996525e-1

    r[ 2769].Re=-7.0200023282015955317092448240146040e-1, .Im=-7.1200861194267284215442259664996525e-1

    r[ 2770].Re= 9.5075685608887028354985204714466815e-1, .Im= 3.09472231901859129443721485586138425e-1

    r[ 2771].Re= 9.5075685608887028354985204714466815e-1, .Im=-3.09472231901859129443721485586138425e-1

    r[ 2772].Re=-9.6973849664657729707784028505557215e-1, .Im= 2.436931954101535235945874546814593375e-1

    r[ 2773].Re=-9.6973849664657729707784028505557215e-1, .Im=-2.436931954101535235945874546814593375e-1

    r[ 2774].Re= 2.78590459372172583041304960715933700e-1, .Im= 9.6025114970962877070093099973746575e-1

    r[ 2775].Re= 2.78590459372172583041304960715933700e-1, .Im=-9.6025114970962877070093099973746575e-1

    r[ 2776].Re=-4.69913106374548084076536724751349525e-1, .Im= 8.8256983146644629734112186270067465e-1

    r[ 2777].Re=-4.69913106374548084076536724751349525e-1, .Im=-8.8256983146644629734112186270067465e-1

    r[ 2778].Re= 6.7450776925955591156736090852064080e-1, .Im= 7.3804688772923654482838173862546680e-1

    r[ 2779].Re= 6.7450776925955591156736090852064080e-1, .Im=-7.3804688772923654482838173862546680e-1

    r[ 2780].Re=-5.344835845576927368938413565047085e-1, .Im= 8.4503745733391177896720591888879425e-1

    r[ 2781].Re=-5.344835845576927368938413565047085e-1, .Im=-8.4503745733391177896720591888879425e-1

    r[ 2782].Re= 9.9956466366086849095751176719204520e-1, .Im= 2.93579811900070986041555443080142125000e-2

    r[ 2783].Re= 9.9956466366086849095751176719204520e-1, .Im=-2.93579811900070986041555443080142125000e-2

    r[ 2784].Re=-8.9351935557307349267119889191235415e-1, .Im= 4.48766399530455717403754078986821675e-1

    r[ 2785].Re=-8.9351935557307349267119889191235415e-1, .Im=-4.48766399530455717403754078986821675e-1

    r[ 2786].Re= 2.049351492577139999262669789459323500e-1, .Im= 9.7862455879804688407830326468683775e-1

    r[ 2787].Re= 2.049351492577139999262669789459323500e-1, .Im=-9.7862455879804688407830326468683775e-1

    r[ 2788].Re=-1.1421065349582902592739941383115365000e-1, .Im= 9.9332175699653513234466117864940315e-1

    r[ 2789].Re=-1.1421065349582902592739941383115365000e-1, .Im=-9.9332175699653513234466117864940315e-1

    r[ 2790].Re= 8.2928675157679232476937158935470505e-1, .Im= 5.5854474829860367712797142303315920e-1

    r[ 2791].Re= 8.2928675157679232476937158935470505e-1, .Im=-5.5854474829860367712797142303315920e-1

    r[ 2792].Re=-9.9269206413796517995962176428292875e-1, .Im= 1.1973734864404234068402388402319047500e-1

    r[ 2793].Re=-9.9269206413796517995962176428292875e-1, .Im=-1.1973734864404234068402388402319047500e-1

    r[ 2794].Re= 5.7228053952656321445857656726730055e-1, .Im= 8.1985936834516215387935744729475115e-1

    r[ 2795].Re= 5.7228053952656321445857656726730055e-1, .Im=-8.1985936834516215387935744729475115e-1

    r[ 2796].Re=-8.3402841731539778535875484521966425e-1, .Im= 5.5150687817918797595240221198764625e-1

    r[ 2797].Re=-8.3402841731539778535875484521966425e-1, .Im=-5.5150687817918797595240221198764625e-1

    r[ 2798].Re=-2.51345500114532327540217693240265350e-1, .Im= 9.6777301805407167645256549803889355e-1

    r[ 2799].Re=-2.51345500114532327540217693240265350e-1, .Im=-9.6777301805407167645256549803889355e-1

    r[ 2800].Re= 9.8005811831473266249048492682049980e-1, .Im= 1.98197530526393522753991760509961750e-1

    r[ 2801].Re= 9.8005811831473266249048492682049980e-1, .Im=-1.98197530526393522753991760509961750e-1

    r[ 2802].Re=-6.0683257555306902020220150006935e-1, .Im= 7.9467977654154464683955438886187035e-1

    r[ 2803].Re=-6.0683257555306902020220150006935e-1, .Im=-7.9467977654154464683955438886187035e-1

    r[ 2804].Re= 4.4275474436055511917587068637658375e-1, .Im= 8.9646600346734661712844172143377360e-1

    r[ 2805].Re= 4.4275474436055511917587068637658375e-1, .Im=-8.9646600346734661712844172143377360e-1

    r[ 2806].Re=-9.2684368779060988252638253470649940e-1, .Im= 3.7515362701212479068502148038533050e-1

    r[ 2807].Re=-9.2684368779060988252638253470649940e-1, .Im=-3.7515362701212479068502148038533050e-1

    r[ 2808].Re= 7.8452569905821545326318755542160940e-1, .Im= 6.1984998540269542477432196392328475e-1

    r[ 2809].Re= 7.8452569905821545326318755542160940e-1, .Im=-6.1984998540269542477432196392328475e-1

    r[ 2810].Re= 7.89562611034706346435640966774371875e-2, .Im= 9.9674602756723240659653129114303735e-1

    r[ 2811].Re= 7.89562611034706346435640966774371875e-2, .Im=-9.9674602756723240659653129114303735e-1

    r[ 2812].Re=-7.4589813953563999238127735225134525e-1, .Im= 6.6587867436831993384060979224159380e-1

    r[ 2813].Re=-7.4589813953563999238127735225134525e-1, .Im=-6.6587867436831993384060979224159380e-1

    r[ 2814].Re= 9.1243476869651984895170926392893305e-1, .Im= 4.08835427809508933361115623483783550e-1

    r[ 2815].Re= 9.1243476869651984895170926392893305e-1, .Im=-4.08835427809508933361115623483783550e-1

    r[ 2816].Re=-3.73378573178802353194072338737896625e-1, .Im= 9.2753870256110959591211440056213175e-1

    r[ 2817].Re=-3.73378573178802353194072338737896625e-1, .Im=-9.2753870256110959591211440056213175e-1

    r[ 2818].Re= 9.3181234660614042919490884742117485e-1, .Im= 3.62518781324439098856515784063958550e-1

    r[ 2819].Re= 9.3181234660614042919490884742117485e-1, .Im=-3.62518781324439098856515784063958550e-1

    r[ 2820].Re=-9.9981133176499414894067285786150020e-1, .Im= 1.224438231994766368426752478626440234375e-2

    r[ 2821].Re=-9.9981133176499414894067285786150020e-1, .Im=-1.224438231994766368426752478626440234375e-2

    r[ 2822].Re= 2.99699732915831629220804188662441425e-1, .Im= 9.5388884181884536772599858522880820e-1

    r[ 2823].Re= 2.99699732915831629220804188662441425e-1, .Im=-9.5388884181884536772599858522880820e-1

    r[ 2824].Re= 5.4515138128475630618918756908897193750e-2, .Im= 9.9837800897426232094034048714092930e-1

    r[ 2825].Re= 5.4515138128475630618918756908897193750e-2, .Im=-9.9837800897426232094034048714092930e-1

    r[ 2826].Re= 9.5664520267673147646547704425756815e-1, .Im= 2.9077712270113331705090331524843350e-1

    r[ 2827].Re= 9.5664520267673147646547704425756815e-1, .Im=-2.9077712270113331705090331524843350e-1

    r[ 2828].Re=-7.5561744875508729535340535221621390e-1, .Im= 6.5484737264209602614073446602560575e-1

    r[ 2829].Re=-7.5561744875508729535340535221621390e-1, .Im=-6.5484737264209602614073446602560575e-1

    r[ 2830].Re=-4.10568629504142801334154455616953775e-1, .Im= 9.1169941557967826284425427729729560e-1

    r[ 2831].Re=-4.10568629504142801334154455616953775e-1, .Im=-9.1169941557967826284425427729729560e-1

    r[ 2832].Re= 6.1368816756076760565719041551346890e-1, .Im= 7.8934704480900197420822905769455245e-1

    r[ 2833].Re= 6.1368816756076760565719041551346890e-1, .Im=-7.8934704480900197420822905769455245e-1

    r[ 2834].Re=-9.8170117463405925928299211591365745e-1, .Im= 1.898994751611317588491090191382681875e-1

    r[ 2835].Re=-9.8170117463405925928299211591365745e-1, .Im=-1.898994751611317588491090191382681875e-1

    r[ 2836].Re= 4.50434034481118517057041117368498800e-1, .Im= 8.9264741847011030984049284597858785e-1

    r[ 2837].Re= 4.50434034481118517057041117368498800e-1, .Im=-8.9264741847011030984049284597858785e-1

    r[ 2838].Re=-1.820185158835608274507933401764603250e-1, .Im= 9.83157627514550713776486645656405e-1

    r[ 2839].Re=-1.820185158835608274507933401764603250e-1, .Im=-9.83157627514550713776486645656405e-1

    r[ 2840].Re= 7.4999112629974773458485515220672820e-1, .Im= 6.611957429527429708215890968858730e-1

    r[ 2841].Re= 7.4999112629974773458485515220672820e-1, .Im=-6.611957429527429708215890968858730e-1

    r[ 2842].Re=-8.6314594896133545187666413767146875e-1, .Im= 5.0473311101226503438965664827264845e-1

    r[ 2843].Re=-8.6314594896133545187666413767146875e-1, .Im=-5.0473311101226503438965664827264845e-1

    r[ 2844].Re= 9.8308743814268451099991352748475035e-1, .Im= 1.825791370374774125195926899323239875e-1

    r[ 2845].Re= 9.8308743814268451099991352748475035e-1, .Im=-1.825791370374774125195926899323239875e-1

    r[ 2846].Re=-5.5196767375522259868603214272297915e-1, .Im= 8.3371493707148713880883406091015785e-1

    r[ 2847].Re=-5.5196767375522259868603214272297915e-1, .Im=-8.3371493707148713880883406091015785e-1

    r[ 2848].Re= 3.49486623230046922206071258187876075e-1, .Im= 9.3677913003271728875631652044830840e-1

    r[ 2849].Re= 3.49486623230046922206071258187876075e-1, .Im=-9.3677913003271728875631652044830840e-1

    r[ 2850].Re=-9.3705116436974056348674366745399310e-1, .Im= 3.4888488546266593903766306539182550e-1

    r[ 2851].Re=-9.3705116436974056348674366745399310e-1, .Im=-3.4888488546266593903766306539182550e-1

    r[ 2852].Re= 8.9680193584003753404232384127681140e-1, .Im= 4.42074659049688345469064643111778400e-1

    r[ 2853].Re= 8.9680193584003753404232384127681140e-1, .Im=-4.42074659049688345469064643111778400e-1

    r[ 2854].Re=-3.53990200432042767531015670101623975e-1, .Im= 9.3512309357018097433211778479744680e-1

    r[ 2855].Re=-3.53990200432042767531015670101623975e-1, .Im=-9.3512309357018097433211778479744680e-1

    r[ 2856].Re= 3.00443486040372007006560295394592671875e-2, .Im= 9.9940969155924652689293452567653730e-1

    r[ 2857].Re= 3.00443486040372007006560295394592671875e-2, .Im=-9.9940969155924652689293452567653730e-1

    r[ 2858].Re=-8.4271520073438366260631937620928510e-1, .Im= 5.3816786657722970321771072121919130e-1

    r[ 2859].Re=-8.4271520073438366260631937620928510e-1, .Im=-5.3816786657722970321771072121919130e-1

    r[ 2860].Re= 6.9238437322158186137954771766089830e-1, .Im= 7.2130849632944971094872244066209530e-1

    r[ 2861].Re= 6.9238437322158186137954771766089830e-1, .Im=-7.2130849632944971094872244066209530e-1

    r[ 2862].Re=-5.209732524929728825213715026620775e-1, .Im= 8.5343124274580439703186129918321965e-1

    r[ 2863].Re=-5.209732524929728825213715026620775e-1, .Im=-8.5343124274580439703186129918321965e-1

    r[ 2864].Re= 9.9853496432502064639180616723024285e-1, .Im= 5.3810020035225662737854435135886887500e-2

    r[ 2865].Re= 9.9853496432502064639180616723024285e-1, .Im=-5.3810020035225662737854435135886887500e-2

    r[ 2866].Re=-9.9589741090066552509085795463761310e-1, .Im= 8.929214884053959799814492726000025625e-2

    r[ 2867].Re=-9.9589741090066552509085795463761310e-1, .Im=-8.929214884053959799814492726000025625e-2

    r[ 2868].Re= 1.700667455826607998847777025730465500e-1, .Im= 9.8528710578313882795242761858389710e-1

    r[ 2869].Re= 1.700667455826607998847777025730465500e-1, .Im=-9.8528710578313882795242761858389710e-1

    r[ 2870].Re= 9.6945602250824636225701169678359290e-1, .Im= 2.447786479001164416935409917641663875e-1

    r[ 2871].Re= 9.6945602250824636225701169678359290e-1, .Im=-2.447786479001164416935409917641663875e-1

    r[ 2872].Re=-6.8078023914790841697453060987754720e-1, .Im= 7.3232688486330721477912675254628990e-1

    r[ 2873].Re=-6.8078023914790841697453060987754720e-1, .Im=-7.3232688486330721477912675254628990e-1

    r[ 2874].Re= 5.1998832500408165291361228810274040e-1, .Im= 8.5398534934747749591821275316760875e-1

    r[ 2875].Re= 5.1998832500408165291361228810274040e-1, .Im=-8.5398534934747749591821275316760875e-1

    r[ 2876].Re=-9.1093830258272590061352502743829970e-1, .Im= 4.12289942755589888800926701151183800e-1

    r[ 2877].Re=-9.1093830258272590061352502743829970e-1, .Im=-4.12289942755589888800926701151183800e-1

    r[ 2878].Re= 7.9578418089802394064236068516038355e-1, .Im= 6.053307412578440294126380649686325e-1

    r[ 2879].Re= 7.9578418089802394064236068516038355e-1, .Im=-6.053307412578440294126380649686325e-1

    r[ 2880].Re=-1.940443960234359555006022901579854000e-1, .Im= 9.8085389123242394671109423143207095e-1

    r[ 2881].Re=-1.940443960234359555006022901579854000e-1, .Im=-9.8085389123242394671109423143207095e-1

    r[ 2882].Re=-2.75047625109534725484916606319529812500e-2, .Im= 9.9949220583218656432933357791625890e-1

    r[ 2883].Re=-2.75047625109534725484916606319529812500e-2, .Im=-9.9949220583218656432933357791625890e-1

    r[ 2884].Re=-1.76968523915893120868059185113452250000e-2, .Im= 9.9970536333247117521949576257611620e-1

    r[ 2885].Re=-1.76968523915893120868059185113452250000e-2, .Im=-9.9970536333247117521949576257611620e-1

    r[ 2886].Re=-9.8685488070779270319832221503020260e-1, .Im= 1.609508944335669711200864639977226000e-1

    r[ 2887].Re=-9.8685488070779270319832221503020260e-1, .Im=-1.609508944335669711200864639977226000e-1

    r[ 2888].Re= 7.9131646346898265598213129123905670e-1, .Im= 6.111546290550137205954683849995490e-1

    r[ 2889].Re= 7.9131646346898265598213129123905670e-1, .Im=-6.111546290550137205954683849995490e-1

    r[ 2890].Re=-6.5526009626559167386972148960921910e-1, .Im= 7.5525105433600248083791939279763025e-1

    r[ 2891].Re=-6.5526009626559167386972148960921910e-1, .Im=-7.5525105433600248083791939279763025e-1

    r[ 2892].Re= 9.9304988462717980191030164860421790e-1, .Im= 1.1721197570441066471147451011347584375e-1

    r[ 2893].Re= 9.9304988462717980191030164860421790e-1, .Im=-1.1721197570441066471147451011347584375e-1

    r[ 2894].Re=-8.0529247009847959581918530602706595e-1, .Im= 5.9267680346900908361362780851777640e-1

    r[ 2895].Re=-8.0529247009847959581918530602706595e-1, .Im=-5.9267680346900908361362780851777640e-1

    r[ 2896].Re= 4.59145772258670203935793097116402350e-1, .Im= 8.8818223057585177215855765098240225e-1

    r[ 2897].Re= 4.59145772258670203935793097116402350e-1, .Im=-8.8818223057585177215855765098240225e-1

    r[ 2898].Re=-4.82846817651221615896872663142858050e-1, .Im= 8.7556443246116855139149492970318530e-1

    r[ 2899].Re=-4.82846817651221615896872663142858050e-1, .Im=-8.7556443246116855139149492970318530e-1

    r[ 2900].Re= 8.8285089830258234311344267553067765e-1, .Im= 4.69324783069259010570561940767220200e-1

    r[ 2901].Re= 8.8285089830258234311344267553067765e-1, .Im=-4.69324783069259010570561940767220200e-1

    r[ 2902].Re=-9.4411381459724830200741507724160325e-1, .Im= 3.29311961754803483870546187972649925e-1

    r[ 2903].Re=-9.4411381459724830200741507724160325e-1, .Im=-3.29311961754803483870546187972649925e-1

    r[ 2904].Re= 5.7728959179415950675462454455555415e-1, .Im= 8.163399664675675682090627560683060e-1

    r[ 2905].Re= 5.7728959179415950675462454455555415e-1, .Im=-8.163399664675675682090627560683060e-1

    r[ 2906].Re= 2.6327607421570758949869173193292225e-1, .Im= 9.6457783347242598281923164904583245e-1

    r[ 2907].Re= 2.6327607421570758949869173193292225e-1, .Im=-9.6457783347242598281923164904583245e-1

    r[ 2908].Re=-3.33292087318808771811973201693035650e-1, .Im= 9.4268382116824578353941888053668660e-1

    r[ 2909].Re=-3.33292087318808771811973201693035650e-1, .Im=-9.4268382116824578353941888053668660e-1

    r[ 2910].Re= 9.9999686337393367541181987689924425e-1, .Im= 2.4468454626390351638876019535473458984375e-3

    r[ 2911].Re= 9.9999686337393367541181987689924425e-1, .Im=-2.4468454626390351638876019535473458984375e-3

    r[ 2912].Re= 3.20646861750621792186421998849255025e-1, .Im= 9.4703598874207384206158621964277695e-1

    r[ 2913].Re= 3.20646861750621792186421998849255025e-1, .Im=-9.4703598874207384206158621964277695e-1

    r[ 2914].Re=-9.8306275807828735757709637255175035e-1, .Im= 1.826820048865198109488972022518282750e-1

    r[ 2915].Re=-9.8306275807828735757709637255175035e-1, .Im=-1.826820048865198109488972022518282750e-1

    r[ 2916].Re=-7.124007241616190366784167053992860e-1, .Im= 7.0160742837313894160189420290407720e-1

    r[ 2917].Re=-7.124007241616190366784167053992860e-1, .Im=-7.0160742837313894160189420290407720e-1

    r[ 2918].Re= 7.0379436514318671758161372054019010e-1, .Im= 7.1018413744358377392984493781113995e-1

    r[ 2919].Re= 7.0379436514318671758161372054019010e-1, .Im=-7.1018413744358377392984493781113995e-1

    r[ 2920].Re=-1.481895939063624378917438662028871375e-1, .Im= 9.8883044262076558172935847323969935e-1

    r[ 2921].Re=-1.481895939063624378917438662028871375e-1, .Im=-9.8883044262076558172935847323969935e-1

    r[ 2922].Re=-8.7820025690658098938001785427331920e-1, .Im= 4.78072421752226806024310690190759475e-1

    r[ 2923].Re=-8.7820025690658098938001785427331920e-1, .Im=-4.78072421752226806024310690190759475e-1

    r[ 2924].Re= 8.5437560803786527507952541782287880e-1, .Im= 5.1934107224790626577970442667719905e-1

    r[ 2925].Re= 8.5437560803786527507952541782287880e-1, .Im=-5.1934107224790626577970442667719905e-1

    r[ 2926].Re=-4.29450419762952007030065715298405825e-1, .Im= 9.0296006573252707294585661657038140e-1

    r[ 2927].Re=-4.29450419762952007030065715298405825e-1, .Im=-9.0296006573252707294585661657038140e-1

    r[ 2928].Re= 9.4247933743414380458602863654959945e-1, .Im= 3.33826138031527053229297052894253275e-1

    r[ 2929].Re= 9.4247933743414380458602863654959945e-1, .Im=-3.33826138031527053229297052894253275e-1

    r[ 2930].Re= 3.99452783657814780582384628360159675e-1, .Im= 9.1659861534991482479028945817844940e-1

    r[ 2931].Re= 3.99452783657814780582384628360159675e-1, .Im=-9.1659861534991482479028945817844940e-1

    r[ 2932].Re=-9.9837423980123540800946102535817770e-1, .Im= 5.5076485771404566638143052159648503125e-2

    r[ 2933].Re=-9.9837423980123540800946102535817770e-1, .Im=-5.5076485771404566638143052159648503125e-2

    r[ 2934].Re= 1.288899014285551092307002818415639875e-1, .Im= 9.9152466481510892482020835814182645e-1

    r[ 2935].Re= 1.288899014285551092307002818415639875e-1, .Im=-9.9152466481510892482020835814182645e-1

    r[ 2936].Re=-2.84370034326274501168541064544115200e-1, .Im= 9.5857626136686646667328659532358865e-1

    r[ 2937].Re=-2.84370034326274501168541064544115200e-1, .Im=-9.5857626136686646667328659532358865e-1

    r[ 2938].Re= 9.6013628274460083300567703190608880e-1, .Im= 2.7904021539156914633039718864893075e-1

    r[ 2939].Re= 9.6013628274460083300567703190608880e-1, .Im=-2.7904021539156914633039718864893075e-1

    r[ 2940].Re=-7.2093850820383298394489202109980395e-1, .Im= 6.9282865755955747033567604376003145e-1

    r[ 2941].Re=-7.2093850820383298394489202109980395e-1, .Im=-6.9282865755955747033567604376003145e-1

    r[ 2942].Re=-9.5663801084550359465907831690856255e-1, .Im= 2.9088396254977738619729166202887425e-1

    r[ 2943].Re=-9.5663801084550359465907831690856255e-1, .Im=-2.9088396254977738619729166202887425e-1

    r[ 2944].Re= 6.4788552626074846774173465746571305e-1, .Im= 7.6152884278598076406296968343667685e-1

    r[ 2945].Re= 6.4788552626074846774173465746571305e-1, .Im=-7.6152884278598076406296968343667685e-1

    r[ 2946].Re= 6.0006560509139827974678382815909570e-1, .Im= 7.9976581231990484521787720950669605e-1

    r[ 2947].Re= 6.0006560509139827974678382815909570e-1, .Im=-7.9976581231990484521787720950669605e-1

    r[ 2948].Re=-6.1942352726223615100309416447998955e-1, .Im= 7.8491273141362971621504129871027540e-1

    r[ 2949].Re=-6.1942352726223615100309416447998955e-1, .Im=-7.8491273141362971621504129871027540e-1

    r[ 2950].Re= 9.8915409671646303824132928639301095e-1, .Im= 1.463480342247747145734138030093163250e-1

    r[ 2951].Re= 9.8915409671646303824132928639301095e-1, .Im=-1.463480342247747145734138030093163250e-1

    r[ 2952].Re=-5.6718805957489515368052934718434695e-1, .Im= 8.2343555664374501468216749344719570e-1

    r[ 2953].Re=-5.6718805957489515368052934718434695e-1, .Im=-8.2343555664374501468216749344719570e-1

    r[ 2954].Re= 1.118663470616769184395877800852758750e-1, .Im= 9.9357815232653245995919633060111660e-1

    r[ 2955].Re= 1.118663470616769184395877800852758750e-1, .Im=-9.9357815232653245995919633060111660e-1

    r[ 2956].Re=-9.2912488420890693152642825225484555e-1, .Im= 3.69471113935671391370618721339269525e-1

    r[ 2957].Re=-9.2912488420890693152642825225484555e-1, .Im=-3.69471113935671391370618721339269525e-1

    r[ 2958].Re= 8.2307352041324544078548797187977470e-1, .Im= 5.6764287650672196061663044019951485e-1

    r[ 2959].Re= 8.2307352041324544078548797187977470e-1, .Im=-5.6764287650672196061663044019951485e-1

    r[ 2960].Re=-9.958575445666680014955574051782605000e-2, .Im= 9.9489050403152634594050596206216140e-1

    r[ 2961].Re=-9.958575445666680014955574051782605000e-2, .Im=-9.9489050403152634594050596206216140e-1

    r[ 2962].Re=-8.0963366393075131277612399571808055e-1, .Im= 5.8674051093828683001163426524726670e-1

    r[ 2963].Re=-8.0963366393075131277612399571808055e-1, .Im=-5.8674051093828683001163426524726670e-1

    r[ 2964].Re= 6.9326691290162612002490050144842825e-1, .Im= 7.204508852002921015511560653976630e-1

    r[ 2965].Re= 6.9326691290162612002490050144842825e-1, .Im=-7.204508852002921015511560653976630e-1

    r[ 2966].Re= 3.63229871598499676199622854255721900e-1, .Im= 9.3153716301624356344035504662315360e-1

    r[ 2967].Re= 3.63229871598499676199622854255721900e-1, .Im=-9.3153716301624356344035504662315360e-1

    r[ 2968].Re=-9.9556180427055174231298906306619755e-1, .Im= 9.293641531943684641614566999123780625e-2

    r[ 2969].Re=-9.9556180427055174231298906306619755e-1, .Im=-9.293641531943684641614566999123780625e-2

    r[ 2970].Re= 9.2406753405112351806849346758099270e-1, .Im= 3.81851231433054383312963864227640425e-1

    r[ 2971].Re= 9.2406753405112351806849346758099270e-1, .Im=-3.81851231433054383312963864227640425e-1

    r[ 2972].Re=-2.311403734974842860694366208917926875e-1, .Im= 9.7278281578473368984560920580406670e-1

    r[ 2973].Re=-2.311403734974842860694366208917926875e-1, .Im=-9.7278281578473368984560920580406670e-1

    r[ 2974].Re= 9.5979400331614750374598088455968535e-1, .Im= 2.80224243682937967925283828662941225e-1

    r[ 2975].Re= 9.5979400331614750374598088455968535e-1, .Im=-2.80224243682937967925283828662941225e-1

    r[ 2976].Re=-6.9322708895173834608982588179060255e-1, .Im= 7.2055081136995613455553666426567360e-1

    r[ 2977].Re=-6.9322708895173834608982588179060255e-1, .Im=-7.2055081136995613455553666426567360e-1

    r[ 2978].Re= 1.917313815926280917700808004155987750e-1, .Im= 9.8130400885857194115402535317116415e-1

    r[ 2979].Re= 1.917313815926280917700808004155987750e-1, .Im=-9.8130400885857194115402535317116415e-1

    r[ 2980].Re=-8.7168536251968564698699992732144890e-1, .Im= 4.89857441458871223360915792000014325e-1

    r[ 2981].Re=-8.7168536251968564698699992732144890e-1, .Im=-4.89857441458871223360915792000014325e-1

    r[ 2982].Re= 7.467527666136193342794058480649255e-1, .Im= 6.6486202555445361728203579332330260e-1

    r[ 2983].Re= 7.467527666136193342794058480649255e-1, .Im=-6.6486202555445361728203579332330260e-1

    r[ 2984].Re=-3.40216925887877053025221130155841800e-1, .Im= 9.4021409919658904819073086400749160e-1

    r[ 2985].Re=-3.40216925887877053025221130155841800e-1, .Im=-9.4021409919658904819073086400749160e-1

    r[ 2986].Re= 5.5100328507832163627000454653170890e-1, .Im= 8.3431015392222507287556254595983770e-1

    r[ 2987].Re= 5.5100328507832163627000454653170890e-1, .Im=-8.3431015392222507287556254595983770e-1

    r[ 2988].Re=-9.6574346226271545745589719444978980e-1, .Im= 2.5908997025536156799674358808260875e-1

    r[ 2989].Re=-9.6574346226271545745589719444978980e-1, .Im=-2.5908997025536156799674358808260875e-1

    r[ 2990].Re= 9.9988992416633692972283142808009870e-1, .Im= 1.468053514521235405898558212811622031250e-2

    r[ 2991].Re= 9.9988992416633692972283142808009870e-1, .Im=-1.468053514521235405898558212811622031250e-2

    r[ 2992].Re=-5.2723281658302234564672517080907705e-1, .Im= 8.4958744942198416438827734964434055e-1

    r[ 2993].Re=-5.2723281658302234564672517080907705e-1, .Im=-8.4958744942198416438827734964434055e-1

    r[ 2994].Re= 1.2281425010492436067366384122578892500e-1, .Im= 9.9229499818066146943351668596733360e-1

    r[ 2995].Re= 1.2281425010492436067366384122578892500e-1, .Im=-9.9229499818066146943351668596733360e-1

    r[ 2996].Re=-9.5113458439264975119442624418297780e-1, .Im= 3.08406978025615285954330602180561975e-1

    r[ 2997].Re=-9.5113458439264975119442624418297780e-1, .Im=-3.08406978025615285954330602180561975e-1

    r[ 2998].Re= 8.613023101434433836942616835585795e-1, .Im= 5.0778349778150544402421928680269045e-1

    r[ 2999].Re= 8.613023101434433836942616835585795e-1, .Im=-5.0778349778150544402421928680269045e-1

    r[ 3000].Re=-1.263669730714664651838319286980549750e-1, .Im= 9.9184671961300996390065165542182510e-1

    r[ 3001].Re=-1.263669730714664651838319286980549750e-1, .Im=-9.9184671961300996390065165542182510e-1

    r[ 3002].Re= 4.88272525867995577097957493606372725e-1, .Im= 8.7251452321687983371134578192140905e-1

    r[ 3003].Re= 4.88272525867995577097957493606372725e-1, .Im=-8.7251452321687983371134578192140905e-1

    r[ 3004].Re=-8.016485274210514155868168018059805e-1, .Im= 5.9759656198084409872706146416021510e-1

    r[ 3005].Re=-8.016485274210514155868168018059805e-1, .Im=-5.9759656198084409872706146416021510e-1

    r[ 3006].Re= 9.4962675290902520686131538241170345e-1, .Im= 3.12961372355536671108211521641351275e-1

    r[ 3007].Re= 9.4962675290902520686131538241170345e-1, .Im=-3.12961372355536671108211521641351275e-1

    r[ 3008].Re=-4.53621223227769543306919786118669425e-1, .Im= 8.9105028291944521345868679418344980e-1

    r[ 3009].Re=-4.53621223227769543306919786118669425e-1, .Im=-8.9105028291944521345868679418344980e-1

    r[ 3010].Re= 6.5622968080251409261904882441740480e-1, .Im= 7.5434251292690368551063784252619370e-1

    r[ 3011].Re= 6.5622968080251409261904882441740480e-1, .Im=-7.5434251292690368551063784252619370e-1

    r[ 3012].Re=-9.9978936967034059968284509523073210e-1, .Im= 1.470257095322442114637695453893684296875e-2

    r[ 3013].Re=-9.9978936967034059968284509523073210e-1, .Im=-1.470257095322442114637695453893684296875e-2

    r[ 3014].Re= 2.87991927852392415321247653992031700e-1, .Im= 9.5748929505889746049973609842709265e-1

    r[ 3015].Re= 2.87991927852392415321247653992031700e-1, .Im=-9.5748929505889746049973609842709265e-1

    r[ 3016].Re=-4.9777779958457446518593769724247975e-1, .Im= 8.671579688144751552059119603654835e-1

    r[ 3017].Re=-4.9777779958457446518593769724247975e-1, .Im=-8.671579688144751552059119603654835e-1

    r[ 3018].Re= 9.8588778040105773392554056044900785e-1, .Im= 1.668980919927159911608782749681267875e-1

    r[ 3019].Re= 9.8588778040105773392554056044900785e-1, .Im=-1.668980919927159911608782749681267875e-1

    r[ 3020].Re=-9.154176760048156058502399901044555e-1, .Im= 4.02220430182177624001127469455241225e-1

    r[ 3021].Re=-9.154176760048156058502399901044555e-1, .Im=-4.02220430182177624001127469455241225e-1

    r[ 3022].Re= 1.90351062586165235834823050709019296875e-2, .Im= 9.9967499390929781544201659926329735e-1

    r[ 3023].Re= 1.90351062586165235834823050709019296875e-2, .Im=-9.9967499390929781544201659926329735e-1

    r[ 3024].Re= 7.8300618069480287797290429807617325e-1, .Im= 6.2175496812548758374106228075106625e-1

    r[ 3025].Re= 7.8300618069480287797290429807617325e-1, .Im=-6.2175496812548758374106228075106625e-1

    r[ 3026].Re=-2.69084736216478326298329193377867325e-1, .Im= 9.6298965230250310742832198229734785e-1

    r[ 3027].Re=-2.69084736216478326298329193377867325e-1, .Im=-9.6298965230250310742832198229734785e-1

    r[ 3028].Re=-8.4663975345731423693962369725340975e-1, .Im= 5.3196167336919863988242695995722895e-1

    r[ 3029].Re=-8.4663975345731423693962369725340975e-1, .Im=-5.3196167336919863988242695995722895e-1

    r[ 3030].Re= 9.0109171839111590340820612254901785e-1, .Im= 4.33281364593412265939775807055411850e-1

    r[ 3031].Re= 9.0109171839111590340820612254901785e-1, .Im=-4.33281364593412265939775807055411850e-1

    r[ 3032].Re=-6.4877368524784095882296242052689190e-1, .Im= 7.6083595165154138673102579559781585e-1

    r[ 3033].Re=-6.4877368524784095882296242052689190e-1, .Im=-7.6083595165154138673102579559781585e-1

    r[ 3034].Re= 4.11758899056132499083560105646029100e-1, .Im= 9.1113656985205038196795612748246635e-1

    r[ 3035].Re= 4.11758899056132499083560105646029100e-1, .Im=-9.1113656985205038196795612748246635e-1

    r[ 3036].Re= 1.736710488608088076567526059079682375e-1, .Im= 9.8465765602209254225840595609042790e-1

    r[ 3037].Re= 1.736710488608088076567526059079682375e-1, .Im=-9.8465765602209254225840595609042790e-1

    r[ 3038].Re=-9.7828911651682581851474651557509785e-1, .Im= 2.067039959583972796863804433087352625e-1

    r[ 3039].Re=-9.7828911651682581851474651557509785e-1, .Im=-2.067039959583972796863804433087352625e-1

    r[ 3040].Re= 5.5916439012322116663966653504758140e-1, .Im= 8.2887988990540151235109078697860240e-1

    r[ 3041].Re= 5.5916439012322116663966653504758140e-1, .Im=-8.2887988990540151235109078697860240e-1

    r[ 3042].Re= 9.9215265143506348177737663718289695e-1, .Im= 1.2450066711714079248363162832902161875e-1

    r[ 3043].Re= 9.9215265143506348177737663718289695e-1, .Im=-1.2450066711714079248363162832902161875e-1

    r[ 3044].Re=-6.0098217667405529063273661449784410e-1, .Im= 7.9912266158066425081329953172826205e-1

    r[ 3045].Re=-6.0098217667405529063273661449784410e-1, .Im=-7.9912266158066425081329953172826205e-1

    r[ 3046].Re=-8.984611375475738681561921339380205000e-2, .Im= 9.9582530321931206351848686608718705e-1

    r[ 3047].Re=-8.984611375475738681561921339380205000e-2, .Im=-9.9582530321931206351848686608718705e-1

    r[ 3048].Re=-8.8739485808373064212872805001097730e-1, .Im= 4.60769753299518081135488500876817850e-1

    r[ 3049].Re=-8.8739485808373064212872805001097730e-1, .Im=-4.60769753299518081135488500876817850e-1

    r[ 3050].Re= 7.979958436028838919540362439875025e-1, .Im= 6.0238907498784610705655495621613225e-1

    r[ 3051].Re= 7.979958436028838919540362439875025e-1, .Im=-6.0238907498784610705655495621613225e-1

    r[ 3052].Re= 4.75383086503685492463233686066814675e-1, .Im= 8.7959997947360823999929380079265680e-1

    r[ 3053].Re= 4.75383086503685492463233686066814675e-1, .Im=-8.7959997947360823999929380079265680e-1

    r[ 3054].Re=-7.6830453275198229423637030777172185e-1, .Im= 6.3992034803914898954957379828556440e-1

    r[ 3055].Re=-7.6830453275198229423637030777172185e-1, .Im=-6.3992034803914898954957379828556440e-1

    r[ 3056].Re= 9.7122457073373624769629941511084325e-1, .Im= 2.376443677167229817648319567524595125e-1

    r[ 3057].Re= 9.7122457073373624769629941511084325e-1, .Im=-2.376443677167229817648319567524595125e-1

    r[ 3058].Re=-9.9131432211108350127659605277585795e-1, .Im= 1.306627277037965551009790488024009375e-1

    r[ 3059].Re=-9.9131432211108350127659605277585795e-1, .Im=-1.306627277037965551009790488024009375e-1

    r[ 3060].Re=-1.808054065033521673466765378179843500e-1, .Im= 9.8337975539472288755149520511622540e-1

    r[ 3061].Re=-1.808054065033521673466765378179843500e-1, .Im=-9.8337975539472288755149520511622540e-1

    r[ 3062].Re= 8.4402980438479802138829199975589290e-1, .Im= 5.3598747075380670512601000154973005e-1

    r[ 3063].Re= 8.4402980438479802138829199975589290e-1, .Im=-5.3598747075380670512601000154973005e-1

    r[ 3064].Re=-3.97113645315147145709033793536946175e-1, .Im= 9.1762691932919848714078625562251545e-1

    r[ 3065].Re=-3.97113645315147145709033793536946175e-1, .Im=-9.1762691932919848714078625562251545e-1

    r[ 3066].Re= 2.45508082540316585618000999602372750e-1, .Im= 9.6925426330511632588837755974964235e-1

    r[ 3067].Re= 2.45508082540316585618000999602372750e-1, .Im=-9.6925426330511632588837755974964235e-1

    r[ 3068].Re=-9.790556031473611753312979999464005e-1, .Im= 2.031020318666713064814643985300790500e-1

    r[ 3069].Re=-9.790556031473611753312979999464005e-1, .Im=-2.031020318666713064814643985300790500e-1

    r[ 3070].Re= 8.9075839372187004538972132650087585e-1, .Im= 4.5412098077605700385817044661962425e-1

    r[ 3071].Re= 8.9075839372187004538972132650087585e-1, .Im=-4.5412098077605700385817044661962425e-1

    r[ 3072].Re=-3.08932791237969184283684853653539900e-1, .Im= 9.5094354657288993060149095981614660e-1

    r[ 3073].Re=-3.08932791237969184283684853653539900e-1, .Im=-9.5094354657288993060149095981614660e-1

    r[ 3074].Re= 6.1947625201764944247173616531654260e-1, .Im= 7.8482278548265971274133789847837760e-1

    r[ 3075].Re= 6.1947625201764944247173616531654260e-1, .Im=-7.8482278548265971274133789847837760e-1

    r[ 3076].Re=-8.2305895539040319075496654477319680e-1, .Im= 5.6774976227679097018352649683947670e-1

    r[ 3077].Re=-8.2305895539040319075496654477319680e-1, .Im=-5.6774976227679097018352649683947670e-1

    r[ 3078].Re= 9.9745030469372431003449719355558045e-1, .Im= 7.091069726857604504921539501083316250e-2

    r[ 3079].Re= 9.9745030469372431003449719355558045e-1, .Im=-7.091069726857604504921539501083316250e-2

    r[ 3080].Re=-1.614970616677092740687271543720271375e-1, .Im= 9.8673790384782533724461472957045770e-1

    r[ 3081].Re=-1.614970616677092740687271543720271375e-1, .Im=-9.8673790384782533724461472957045770e-1

    r[ 3082].Re=-7.5800392349914380574205097218509760e-1, .Im= 6.5206629077934119553816572079085740e-1

    r[ 3083].Re=-7.5800392349914380574205097218509760e-1, .Im=-6.5206629077934119553816572079085740e-1

    r[ 3084].Re= 3.70067930796897870404649211195646775e-1, .Im= 9.2885021467425610275370218005264175e-1

    r[ 3085].Re= 3.70067930796897870404649211195646775e-1, .Im=-9.2885021467425610275370218005264175e-1

    r[ 3086].Re= 7.294024505496827792683234292780980e-1, .Im= 6.8384577943665181276600151250022460e-1

    r[ 3087].Re= 7.294024505496827792683234292780980e-1, .Im=-6.8384577943665181276600151250022460e-1

    r[ 3088].Re=-9.9683030553064166934262857466819695e-1, .Im= 7.830292012341617813309113671493832500e-2

    r[ 3089].Re=-9.9683030553064166934262857466819695e-1, .Im=-7.830292012341617813309113671493832500e-2

    r[ 3090].Re= 4.1064685436565107057305112903122787500e-2, .Im= 9.9902693474572856757731642574071880e-1

    r[ 3091].Re= 4.1064685436565107057305112903122787500e-2, .Im=-9.9902693474572856757731642574071880e-1

    r[ 3092].Re= 9.4611360090740825867783314606640485e-1, .Im= 3.23420126723294731885260944181936775e-1

    r[ 3093].Re= 9.4611360090740825867783314606640485e-1, .Im=-3.23420126723294731885260944181936775e-1

    r[ 3094].Re=-6.2706986025683097984995129081653430e-1, .Im= 7.7880604522507157483346418302971865e-1

    r[ 3095].Re=-6.2706986025683097984995129081653430e-1, .Im=-7.7880604522507157483346418302971865e-1

    r[ 3096].Re= 2.169048446493797299705619252563337750e-1, .Im= 9.7604302985719981755607932427665215e-1

    r[ 3097].Re= 2.169048446493797299705619252563337750e-1, .Im=-9.7604302985719981755607932427665215e-1

    r[ 3098].Re=-9.0582090059887809818661708050058220e-1, .Im= 4.23418523452660344741360631815041400e-1

    r[ 3099].Re=-9.0582090059887809818661708050058220e-1, .Im=-4.23418523452660344741360631815041400e-1

    r[ 3100].Re= 9.798064153125944919509038300020620e-1, .Im= 1.993976644916858331768594325694721125e-1

    r[ 3101].Re= 9.798064153125944919509038300020620e-1, .Im=-1.993976644916858331768594325694721125e-1

    r[ 3102].Re=-4.57980960598113884252313710021553550e-1, .Im= 8.8882702782079925363234451651806010e-1

    r[ 3103].Re=-4.57980960598113884252313710021553550e-1, .Im=-8.8882702782079925363234451651806010e-1

    r[ 3104].Re= 5.6927571039885194181806582491844890e-1, .Im= 8.2196681905534085821329881582641970e-1

    r[ 3105].Re= 5.6927571039885194181806582491844890e-1, .Im=-8.2196681905534085821329881582641970e-1

    r[ 3106].Re=-9.5447523608988815713161102394224140e-1, .Im= 2.97913950489416712308354817650979375e-1

    r[ 3107].Re=-9.5447523608988815713161102394224140e-1, .Im=-2.97913950489416712308354817650979375e-1

    r[ 3108].Re= 8.9020267118033191700021689030108970e-1, .Im= 4.55220396536228921746669584535993625e-1

    r[ 3109].Re= 8.9020267118033191700021689030108970e-1, .Im=-4.55220396536228921746669584535993625e-1

    r[ 3110].Re=-3.9745663753281507135639571970386893750e-2, .Im= 9.9907860190766539787432520824950185e-1

    r[ 3111].Re=-3.9745663753281507135639571970386893750e-2, .Im=-9.9907860190766539787432520824950185e-1

    r[ 3112].Re=-6.5618304269946736706486944967764425e-1, .Im= 7.5443933635265403303549192060017955e-1

    r[ 3113].Re=-6.5618304269946736706486944967764425e-1, .Im=-7.5443933635265403303549192060017955e-1

    r[ 3114].Re= 7.1070426550106968743847346559050490e-1, .Im= 7.0325841200091165905661227952805345e-1

    r[ 3115].Re= 7.1070426550106968743847346559050490e-1, .Im=-7.0325841200091165905661227952805345e-1

    r[ 3116].Re= 2.59716863045625134809313294681487600e-1, .Im= 9.6553111282312376051351066053030080e-1

    r[ 3117].Re= 2.59716863045625134809313294681487600e-1, .Im=-9.6553111282312376051351066053030080e-1

    r[ 3118].Re=-9.2171164013657813640634230978321280e-1, .Im= 3.87608063727081675331476162682520225e-1

    r[ 3119].Re=-9.2171164013657813640634230978321280e-1, .Im=-3.87608063727081675331476162682520225e-1

    r[ 3120].Re= 7.6200943582539559795208106152131220e-1, .Im= 6.4730874763114387704376895271707325e-1

    r[ 3121].Re= 7.6200943582539559795208106152131220e-1, .Im=-6.4730874763114387704376895271707325e-1

    r[ 3122].Re=-4.36070778470304398766188569425139575e-1, .Im= 8.997730399213176299966221449722070e-1

    r[ 3123].Re=-4.36070778470304398766188569425139575e-1, .Im=-8.997730399213176299966221449722070e-1

    r[ 3124].Re=-2.47775726836362147897929730788746375e-1, .Im= 9.686808693085926513788308511720970e-1

    r[ 3125].Re=-2.47775726836362147897929730788746375e-1, .Im=-9.686808693085926513788308511720970e-1

    r[ 3126].Re=-9.9912455539634781320756928835180585e-1, .Im= 3.9188225609740910682088355088126262500e-2

    r[ 3127].Re=-9.9912455539634781320756928835180585e-1, .Im=-3.9188225609740910682088355088126262500e-2

    r[ 3128].Re= 9.9454670300836389706944373756414275e-1, .Im= 1.038325549654294521761954683825024375e-1

    r[ 3129].Re= 9.9454670300836389706944373756414275e-1, .Im=-1.038325549654294521761954683825024375e-1

    r[ 3130].Re= 4.08404285219870377687811924261040975e-1, .Im= 9.1262876768906409097326104529201980e-1

    r[ 3131].Re= 4.08404285219870377687811924261040975e-1, .Im=-9.1262876768906409097326104529201980e-1

    r[ 3132].Re=-7.2685565487822012542551419755909590e-1, .Im= 6.8663578128998892236012352441321125e-1

    r[ 3133].Re=-7.2685565487822012542551419755909590e-1, .Im=-6.8663578128998892236012352441321125e-1

    r[ 3134].Re= 8.8796083316093388226875049440423025e-1, .Im= 4.59566520856793669924655887371045525e-1

    r[ 3135].Re= 8.8796083316093388226875049440423025e-1, .Im=-4.59566520856793669924655887371045525e-1

    r[ 3136].Re= 9.35969218838063332643883995842770625e-2, .Im= 9.9546371736430849797017117452924135e-1

    r[ 3137].Re= 9.35969218838063332643883995842770625e-2, .Im=-9.9546371736430849797017117452924135e-1

    r[ 3138].Re=-8.3940249543657075026459324362804180e-1, .Im= 5.4331936228013255618662924462114460e-1

    r[ 3139].Re=-8.3940249543657075026459324362804180e-1, .Im=-5.4331936228013255618662924462114460e-1

    r[ 3140].Re= 5.0632954328852741721078700720681805e-1, .Im= 8.6217196143696372967468732895213175e-1

    r[ 3141].Re= 5.0632954328852741721078700720681805e-1, .Im=-8.6217196143696372967468732895213175e-1

    r[ 3142].Re=-5.4067947491341095123118520859861745e-1, .Im= 8.4107917055804126693629996225354260e-1

    r[ 3143].Re=-5.4067947491341095123118520859861745e-1, .Im=-8.4107917055804126693629996225354260e-1

    r[ 3144].Re= 9.2076372648135074161501734124612990e-1, .Im= 3.89746615570769450176413783992757075e-1

    r[ 3145].Re= 9.2076372648135074161501734124612990e-1, .Im=-3.89746615570769450176413783992757075e-1

    r[ 3146].Re=-9.4041562968727332449958566940040325e-1, .Im= 3.3969814728281855220615170765086075e-1

    r[ 3147].Re=-9.4041562968727332449958566940040325e-1, .Im=-3.3969814728281855220615170765086075e-1

    r[ 3148].Re=-1.2150624143265473242614405080530559375e-1, .Im= 9.9246373246980135185424387600505720e-1

    r[ 3149].Re=-1.2150624143265473242614405080530559375e-1, .Im=-9.9246373246980135185424387600505720e-1

    r[ 3150].Re= 9.6510429617232107446511690795887260e-1, .Im= 2.61357486737200772619615918301860800e-1

    r[ 3151].Re= 9.6510429617232107446511690795887260e-1, .Im=-2.61357486737200772619615918301860800e-1

    r[ 3152].Re=-3.50550867680489319777592527316301125e-1, .Im= 9.3640252534985624066621312522329390e-1

    r[ 3153].Re=-3.50550867680489319777592527316301125e-1, .Im=-9.3640252534985624066621312522329390e-1

    r[ 3154].Re=-6.685650442101576280962138554286866406250e-3, .Im= 9.9983494101862102620970063071581535e-1

    r[ 3155].Re=-6.685650442101576280962138554286866406250e-3, .Im=-9.9983494101862102620970063071581535e-1

    r[ 3156].Re=-9.9032376088056384144664434643345880e-1, .Im= 1.379510562272458495947091705602360875e-1

    r[ 3157].Re=-9.9032376088056384144664434643345880e-1, .Im=-1.379510562272458495947091705602360875e-1

    r[ 3158].Re= 6.6268699819146414942139244885765945e-1, .Im= 7.4869129861394756453307763877091925e-1

    r[ 3159].Re= 6.6268699819146414942139244885765945e-1, .Im=-7.4869129861394756453307763877091925e-1

    r[ 3160].Re= 3.44900959660001282802710420583025550e-1, .Im= 9.384743826775024944097935986064840e-1

    r[ 3161].Re= 3.44900959660001282802710420583025550e-1, .Im=-9.384743826775024944097935986064840e-1

    r[ 3162].Re=-7.8828862440832592195505412746570070e-1, .Im= 6.1513574965843664799081125238444655e-1

    r[ 3163].Re=-7.8828862440832592195505412746570070e-1, .Im=-6.1513574965843664799081125238444655e-1

    r[ 3164].Re= 9.9890429634487876153770002929377365e-1, .Im= 4.6477694148174965305120309722042290625e-2

    r[ 3165].Re= 9.9890429634487876153770002929377365e-1, .Im=-4.6477694148174965305120309722042290625e-2

    r[ 3166].Re=-6.3468522349975065033333976316498590e-1, .Im= 7.7262971611666364513126836754963730e-1

    r[ 3167].Re=-6.3468522349975065033333976316498590e-1, .Im=-7.7262971611666364513126836754963730e-1

    r[ 3168].Re= 8.1888200703147673298332165359170175e-1, .Im= 5.7368379392885937573254295784863640e-1

    r[ 3169].Re= 8.1888200703147673298332165359170175e-1, .Im=-5.7368379392885937573254295784863640e-1

    r[ 3170].Re=-9.6822699806415613021925992143223990e-1, .Im= 2.49626621069691218002262189656903500e-1

    r[ 3171].Re=-9.6822699806415613021925992143223990e-1, .Im=-2.49626621069691218002262189656903500e-1

    r[ 3172].Re= 5.0421579733004429080267527751857410e-1, .Im= 8.6339475865675807675359010318061335e-1

    r[ 3173].Re= 5.0421579733004429080267527751857410e-1, .Im=-8.6339475865675807675359010318061335e-1

    r[ 3174].Re= 7.4266805172694472236827323285979215e-1, .Im= 6.6942360231079844901103115262230855e-1

    r[ 3175].Re= 7.4266805172694472236827323285979215e-1, .Im=-6.6942360231079844901103115262230855e-1

    r[ 3176].Re=-4.06089668048376484232875327506917525e-1, .Im= 9.1370674305827082051223442249465730e-1

    r[ 3177].Re=-4.06089668048376484232875327506917525e-1, .Im=-9.1370674305827082051223442249465730e-1

    r[ 3178].Re= 9.3003253606698577105049707824946380e-1, .Im= 3.67074530391617748215082883689319700e-1

    r[ 3179].Re= 9.3003253606698577105049707824946380e-1, .Im=-3.67074530391617748215082883689319700e-1

    r[ 3180].Re=-8.5879963823269989120490208733826875e-1, .Im= 5.1210959606667738608365425534429955e-1

    r[ 3181].Re=-8.5879963823269989120490208733826875e-1, .Im=-5.1210959606667738608365425534429955e-1

    r[ 3182].Re=-1.506193369258532754884072346612811000e-1, .Im= 9.8845229124520295194145091954851520e-1

    r[ 3183].Re=-1.506193369258532754884072346612811000e-1, .Im=-9.8845229124520295194145091954851520e-1

    r[ 3184].Re= 1.543438694460449733814044748214655500e-1, .Im= 9.8787808846941282947540230452432295e-1

    r[ 3185].Re= 1.543438694460449733814044748214655500e-1, .Im=-9.8787808846941282947540230452432295e-1

    r[ 3186].Re= 9.8786287520139093309978761681122705e-1, .Im= 1.548111968038193564378701694295159500e-1

    r[ 3187].Re= 9.8786287520139093309978761681122705e-1, .Im=-1.548111968038193564378701694295159500e-1

    r[ 3188].Re=-9.3225890398956756666137835054541935e-1, .Im= 3.61477708931445151918637748167384400e-1

    r[ 3189].Re=-9.3225890398956756666137835054541935e-1, .Im=-3.61477708931445151918637748167384400e-1

    r[ 3190].Re=-5.7622902179487145435388129044440570e-1, .Im= 8.1714393522453465656951721030054610e-1

    r[ 3191].Re=-5.7622902179487145435388129044440570e-1, .Im=-8.1714393522453465656951721030054610e-1

    r[ 3192].Re= 3.27605583108217190968503018666524425e-1, .Im= 9.4465385894244513487194581102812660e-1

    r[ 3193].Re= 3.27605583108217190968503018666524425e-1, .Im=-9.4465385894244513487194581102812660e-1

    r[ 3194].Re= 6.441495987859409133591270801844075e-1, .Im= 7.6470378702724250974398501057294195e-1

    r[ 3195].Re= 6.441495987859409133591270801844075e-1, .Im=-7.6470378702724250974398501057294195e-1

    r[ 3196].Re=-9.9986729140524643888454647822072725e-1, .Im= 6.122290495998313451797567807943778125000e-3

    r[ 3197].Re=-9.9986729140524643888454647822072725e-1, .Im=-6.122290495998313451797567807943778125000e-3

    r[ 3198].Re=-2.430354448440904258088579581453814125e-1, .Im= 9.6987841409564523598163532369653690e-1

    r[ 3199].Re=-2.430354448440904258088579581453814125e-1, .Im=-9.6987841409564523598163532369653690e-1

    r[ 3200].Re= 8.4795262097456858274568958222516810e-1, .Im= 5.2976587560471632976089040312217545e-1

    r[ 3201].Re= 8.4795262097456858274568958222516810e-1, .Im=-5.2976587560471632976089040312217545e-1

    r[ 3202].Re=-7.3603407762889749843537856577313505e-1, .Im= 6.7678227603424845337798387845396060e-1

    r[ 3203].Re=-7.3603407762889749843537856577313505e-1, .Im=-6.7678227603424845337798387845396060e-1

    r[ 3204].Re= 1.74882949865359016428101313067600125e-1, .Im= 9.8443760373577682276646783066098575e-1

    r[ 3205].Re= 1.74882949865359016428101313067600125e-1, .Im=-9.8443760373577682276646783066098575e-1

    r[ 3206].Re= 9.7570061578091837883874859471688975e-1, .Im= 2.185623491887171976344461654662154500e-1

    r[ 3207].Re= 9.7570061578091837883874859471688975e-1, .Im=-2.185623491887171976344461654662154500e-1

    r[ 3208].Re=-8.851246369535048508225827390560880e-1, .Im= 4.65102461157097080146627376961987450e-1

    r[ 3209].Re=-8.851246369535048508225827390560880e-1, .Im=-4.65102461157097080146627376961987450e-1

    r[ 3210].Re= 1.78024761324628681691262244157769593750e-2, .Im= 9.9970089061804034979985544850933365e-1

    r[ 3211].Re= 1.78024761324628681691262244157769593750e-2, .Im=-9.9970089061804034979985544850933365e-1

    r[ 3212].Re=-7.274686184690229429072871880634920625e-2, .Im= 9.9722365889846853459488329463056285e-1

    r[ 3213].Re=-7.274686184690229429072871880634920625e-2, .Im=-9.9722365889846853459488329463056285e-1

    r[ 3214].Re= 8.7644021624439016893148846065741960e-1, .Im= 4.81175592224815040776064734018291325e-1

    r[ 3215].Re= 8.7644021624439016893148846065741960e-1, .Im=-4.81175592224815040776064734018291325e-1

    r[ 3216].Re=-9.8762291874693308724175722090876660e-1, .Im= 1.561181347203007829804732864431571125e-1

    r[ 3217].Re=-9.8762291874693308724175722090876660e-1, .Im=-1.561181347203007829804732864431571125e-1

    r[ 3218].Re= 5.2833049721175784352311666225432415e-1, .Im= 8.4886466046805020280174858271493575e-1

    r[ 3219].Re= 5.2833049721175784352311666225432415e-1, .Im=-8.4886466046805020280174858271493575e-1

    r[ 3220].Re=-5.1782561372352764461624019531882365e-1, .Im= 8.5535224224069739129561185109196230e-1

    r[ 3221].Re=-5.1782561372352764461624019531882365e-1, .Im=-8.5535224224069739129561185109196230e-1

    r[ 3222].Re=-7.9053748618710717455115855045733040e-1, .Im= 6.1222161628464610849675864301389080e-1

    r[ 3223].Re=-7.9053748618710717455115855045733040e-1, .Im=-6.1222161628464610849675864301389080e-1

    r[ 3224].Re= 9.0003457062325109561129465873818840e-1, .Im= 4.35474528400721871967959941684966900e-1

    r[ 3225].Re= 9.0003457062325109561129465873818840e-1, .Im=-4.35474528400721871967959941684966900e-1

    r[ 3226].Re= 4.2952846043803205589028948452323675e-1, .Im= 9.028902563858830498944030296115670e-1

    r[ 3227].Re= 4.2952846043803205589028948452323675e-1, .Im=-9.028902563858830498944030296115670e-1

    r[ 3228].Re=-6.8880172354557522851337125757709145e-1, .Im= 7.2478153340045192720708655542694030e-1

    r[ 3229].Re=-6.8880172354557522851337125757709145e-1, .Im=-7.2478153340045192720708655542694030e-1

    r[ 3230].Re= 6.0786298391056359236017669900320470e-1, .Im= 7.9383564470233047849490048974985255e-1

    r[ 3231].Re= 6.0786298391056359236017669900320470e-1, .Im=-7.9383564470233047849490048974985255e-1

    r[ 3232].Re=-9.9396189002955581681675312211154960e-1, .Im= 1.087901019424770826526938094502838750e-1

    r[ 3233].Re=-9.9396189002955581681675312211154960e-1, .Im=-1.087901019424770826526938094502838750e-1

    r[ 3234].Re= 9.9660047917845806519920870414352975e-1, .Im= 8.188862075269782991870926025512744375e-2

    r[ 3235].Re= 9.9660047917845806519920870414352975e-1, .Im=-8.188862075269782991870926025512744375e-2

    r[ 3236].Re=-3.24039365994984673857715051781269700e-1, .Im= 9.459192938454413779325591349333990e-1

    r[ 3237].Re=-3.24039365994984673857715051781269700e-1, .Im=-9.459192938454413779325591349333990e-1

    r[ 3238].Re=-2.108247120875677838025552546241669875e-1, .Im= 9.773892257185285981080369310802780e-1

    r[ 3239].Re=-2.108247120875677838025552546241669875e-1, .Im=-9.773892257185285981080369310802780e-1

    r[ 3240].Re= 7.3441474661289662950736101265647445e-1, .Im= 6.7847169158594000659689982057898305e-1

    r[ 3241].Re= 7.3441474661289662950736101265647445e-1, .Im=-6.7847169158594000659689982057898305e-1

    r[ 3242].Re=-2.21592314493823799859129053402284625e-1, .Im= 9.7501505798673748781624226467101830e-1

    r[ 3243].Re=-2.21592314493823799859129053402284625e-1, .Im=-9.7501505798673748781624226467101830e-1

    r[ 3244].Re=-9.1443131384975606668064074256108140e-1, .Im= 4.04475830731195917788767246747738675e-1

    r[ 3245].Re=-9.1443131384975606668064074256108140e-1, .Im=-4.04475830731195917788767246747738675e-1

    r[ 3246].Re= 8.1108515141652182123266356938984245e-1, .Im= 5.8466628368091655421068253417615775e-1

    r[ 3247].Re= 8.1108515141652182123266356938984245e-1, .Im=-5.8466628368091655421068253417615775e-1

    r[ 3248].Re=-6.7537228012891548090124160808045415e-1, .Im= 7.3731062268126856817929137832834385e-1

    r[ 3249].Re=-6.7537228012891548090124160808045415e-1, .Im=-7.3731062268126856817929137832834385e-1

    r[ 3250].Re= 2.91508763791877789639528373299981450e-1, .Im= 9.5640926164169948187065983802312985e-1

    r[ 3251].Re= 2.91508763791877789639528373299981450e-1, .Im=-9.5640926164169948187065983802312985e-1

    r[ 3252].Re= 9.7462315906345231564245068511809220e-1, .Im= 2.23334205217438325208334504168306000e-1

    r[ 3253].Re= 9.7462315906345231564245068511809220e-1, .Im=-2.23334205217438325208334504168306000e-1

    r[ 3254].Re=-9.7265269078645721911868804454570635e-1, .Im= 2.317986608329350717294659034450887625e-1

    r[ 3255].Re=-9.7265269078645721911868804454570635e-1, .Im=-2.317986608329350717294659034450887625e-1

    r[ 3256].Re= 1.977378197511754642778925017410074250e-1, .Im= 9.801123727564995391503543942235410e-1

    r[ 3257].Re= 1.977378197511754642778925017410074250e-1, .Im=-9.801123727564995391503543942235410e-1

    r[ 3258].Re=-5.3759953119067926952112657090765420e-1, .Im= 8.4306397040132818876401188390445895e-1

    r[ 3259].Re=-5.3759953119067926952112657090765420e-1, .Im=-8.4306397040132818876401188390445895e-1

    r[ 3260].Re= 5.9613006482522179485528113218606445e-1, .Im= 8.0269788978099987364345224705175495e-1

    r[ 3261].Re= 5.9613006482522179485528113218606445e-1, .Im=-8.0269788978099987364345224705175495e-1

    r[ 3262].Re=-8.7877769118875981302352329294080845e-1, .Im= 4.76991845386810053852855162404011925e-1

    r[ 3263].Re=-8.7877769118875981302352329294080845e-1, .Im=-4.76991845386810053852855162404011925e-1

    r[ 3264].Re=-3.2401293472921616212190087935596237500e-2, .Im= 9.9933563670926695010621187975630160e-1

    r[ 3265].Re=-3.2401293472921616212190087935596237500e-2, .Im=-9.9933563670926695010621187975630160e-1

    r[ 3266].Re= 8.994934223170110432210577755540725625e-2, .Im= 9.9581152922236515490084229895728640e-1

    r[ 3267].Re= 8.994934223170110432210577755540725625e-2, .Im=-9.9581152922236515490084229895728640e-1

    r[ 3268].Re= 9.9992424906609655987921314590494145e-1, .Im= 1.223262299960019283684431457004393437500e-2

    r[ 3269].Re= 9.9992424906609655987921314590494145e-1, .Im=-1.223262299960019283684431457004393437500e-2

    r[ 3270].Re=-9.99267261215374791305521284812130e-1, .Im= 3.5502942287391578424227134291868421875e-2

    r[ 3271].Re=-9.99267261215374791305521284812130e-1, .Im=-3.5502942287391578424227134291868421875e-2

    r[ 3272].Re= 7.9056032258879704865961457471712490e-1, .Im= 6.1211752463392132828090552720823325e-1

    r[ 3273].Re= 7.9056032258879704865961457471712490e-1, .Im=-6.1211752463392132828090552720823325e-1

    r[ 3274].Re=-4.76391729559750953804098116961540650e-1, .Im= 8.7908723620414519484000948068569410e-1

    r[ 3275].Re=-4.76391729559750953804098116961540650e-1, .Im=-8.7908723620414519484000948068569410e-1

    r[ 3276].Re= 9.4000587037855065641878127280506305e-1, .Im= 3.40747533918679068598578396631637575e-1

    r[ 3277].Re= 9.4000587037855065641878127280506305e-1, .Im=-3.40747533918679068598578396631637575e-1

    r[ 3278].Re=-7.9649822124769498188356919854413715e-1, .Im= 6.0446118268147797092382234040996990e-1

    r[ 3279].Re=-7.9649822124769498188356919854413715e-1, .Im=-6.0446118268147797092382234040996990e-1

    r[ 3280].Re= 4.39466057230219864226938852880266475e-1, .Im= 8.9809977958590569979691053958958945e-1

    r[ 3281].Re= 4.39466057230219864226938852880266475e-1, .Im=-8.9809977958590569979691053958958945e-1

    r[ 3282].Re=-3.83582424593443771509981843337300225e-1, .Im= 9.2337736068016218471399270129040810e-1

    r[ 3283].Re=-3.83582424593443771509981843337300225e-1, .Im=-9.2337736068016218471399270129040810e-1

    r[ 3284].Re= 6.8618901571035606501425263559212905e-1, .Im= 7.2721494587886315041913576351362280e-1

    r[ 3285].Re= 6.8618901571035606501425263559212905e-1, .Im=-7.2721494587886315041913576351362280e-1

    r[ 3286].Re=-9.6116162589977827135356847065850160e-1, .Im= 2.75622619065396645687826548964949300e-1

    r[ 3287].Re=-9.6116162589977827135356847065850160e-1, .Im=-2.75622619065396645687826548964949300e-1

    r[ 3288].Re= 8.8853143146520963124856962167541495e-1, .Im= 4.58475529944938953175181950427941025e-1

    r[ 3289].Re= 8.8853143146520963124856962167541495e-1, .Im=-4.58475529944938953175181950427941025e-1

    r[ 3290].Re=-6.9850942230699120116810263425577430e-1, .Im= 7.154318539166910628779305625357665e-1

    r[ 3291].Re=-6.9850942230699120116810263425577430e-1, .Im=-7.154318539166910628779305625357665e-1

    r[ 3292].Re= 2.71522661909765039567332678416278200e-1, .Im= 9.6227978417706716562918245472246780e-1

    r[ 3293].Re= 2.71522661909765039567332678416278200e-1, .Im=-9.6227978417706716562918245472246780e-1

    r[ 3294].Re= 9.9199320132968049623656270341598425e-1, .Im= 1.257186987302565395197007092065177750e-1

    r[ 3295].Re= 9.9199320132968049623656270341598425e-1, .Im=-1.257186987302565395197007092065177750e-1

    r[ 3296].Re=-9.1042471578819261779358384956140070e-1, .Im= 4.13401569706852545227349082779255675e-1

    r[ 3297].Re=-9.1042471578819261779358384956140070e-1, .Im=-4.13401569706852545227349082779255675e-1

    r[ 3298].Re=-2.38184247602760447437564295114498234375e-2, .Im= 9.9957961840936937480961432811454865e-1

    r[ 3299].Re=-2.38184247602760447437564295114498234375e-2, .Im=-9.9957961840936937480961432811454865e-1

    r[ 3300].Re=-4.19467825887779144355960170287289650e-1, .Im= 9.0762850974459119424153641375596635e-1

    r[ 3301].Re=-4.19467825887779144355960170287289650e-1, .Im=-9.0762850974459119424153641375596635e-1

    r[ 3302].Re= 6.1753807657386905471952331936336120e-1, .Im= 7.8633241925959473928031684408779255e-1

    r[ 3303].Re= 6.1753807657386905471952331936336120e-1, .Im=-7.8633241925959473928031684408779255e-1

    r[ 3304].Re=-8.2721254219849915667595041668391785e-1, .Im= 5.6167903519052941874178941361606120e-1

    r[ 3305].Re=-8.2721254219849915667595041668391785e-1, .Im=-5.6167903519052941874178941361606120e-1

    r[ 3306].Re= 8.6254130892399050178909192254650405e-1, .Im= 5.0568679110417080746486817588447590e-1

    r[ 3307].Re= 8.6254130892399050178909192254650405e-1, .Im=-5.0568679110417080746486817588447590e-1

    r[ 3308].Re=-5.8521244522011539590522488651913590e-1, .Im= 8.1074446446661818654888520541135220e-1

    r[ 3309].Re=-5.8521244522011539590522488651913590e-1, .Im=-8.1074446446661818654888520541135220e-1

    r[ 3310].Re= 3.60933554758562202824379028243129125e-1, .Im= 9.3243050971597929432732598797883835e-1

    r[ 3311].Re= 3.60933554758562202824379028243129125e-1, .Im=-9.3243050971597929432732598797883835e-1

    r[ 3312].Re=-9.7649443542558989062030150307691655e-1, .Im= 2.150808121620699508991236825750092875e-1

    r[ 3313].Re=-9.7649443542558989062030150307691655e-1, .Im=-2.150808121620699508991236825750092875e-1

    r[ 3314].Re= 9.119350561800479981755529479414690e-1, .Im= 4.09961239828957269004661156941438075e-1

    r[ 3315].Re= 9.119350561800479981755529479414690e-1, .Im=-4.09961239828957269004661156941438075e-1

    r[ 3316].Re=-2.79679618397085549830194395326543575e-1, .Im= 9.5995528862086287880117652093758805e-1

    r[ 3317].Re=-2.79679618397085549830194395326543575e-1, .Im=-9.5995528862086287880117652093758805e-1

    r[ 3318].Re= 4.80760508292441879341083676990820075e-1, .Im= 8.7667327989231902396483064876520070e-1

    r[ 3319].Re= 4.80760508292441879341083676990820075e-1, .Im=-8.7667327989231902396483064876520070e-1

    r[ 3320].Re= 9.8709076038689780308033050459926015e-1, .Im= 1.596561902486151873770126030649407750e-1

    r[ 3321].Re= 9.8709076038689780308033050459926015e-1, .Im=-1.596561902486151873770126030649407750e-1

    r[ 3322].Re=-8.9571364197888869718156001908937465e-1, .Im= 4.44390717819486580353327553893905125e-1

    r[ 3323].Re=-8.9571364197888869718156001908937465e-1, .Im=-4.44390717819486580353327553893905125e-1

    r[ 3324].Re= 7.041911334717927684057059423139435000e-2, .Im= 9.9737789043145219647357180292601695e-1

    r[ 3325].Re= 7.041911334717927684057059423139435000e-2, .Im=-9.9737789043145219647357180292601695e-1

    r[ 3326].Re=-7.6907977470899557825845249681151470e-1, .Im= 6.3898287761760230729635168245295060e-1

    r[ 3327].Re=-7.6907977470899557825845249681151470e-1, .Im=-6.3898287761760230729635168245295060e-1

    r[ 3328].Re= 7.1499788807300612702988473756704475e-1, .Im= 6.9889399989073530683469925861572845e-1

    r[ 3329].Re= 7.1499788807300612702988473756704475e-1, .Im=-6.9889399989073530683469925861572845e-1

    r[ 3330].Re=-3.03104417461087183305323833337752125e-1, .Im= 9.5281710917669937277452163471025410e-1

    r[ 3331].Re=-3.03104417461087183305323833337752125e-1, .Im=-9.5281710917669937277452163471025410e-1

    r[ 3332].Re=-9.9484693989851025186510469211498275e-1, .Im= 1.0025601653285130809845071553354500625e-1

    r[ 3333].Re=-9.9484693989851025186510469211498275e-1, .Im=-1.0025601653285130809845071553354500625e-1

    r[ 3334].Re= 9.6542913028816201848059108669986015e-1, .Im= 2.60168874539909722454211760123143900e-1

    r[ 3335].Re= 9.6542913028816201848059108669986015e-1, .Im=-2.60168874539909722454211760123143900e-1

    r[ 3336].Re= 2.359923710791983209045241665080538875e-1, .Im= 9.7159974992108655289513308161986060e-1

    r[ 3337].Re= 2.359923710791983209045241665080538875e-1, .Im=-9.7159974992108655289513308161986060e-1

    r[ 3338].Re=-5.7121324239865012284411704968078990e-1, .Im= 8.2065633300082885259740805850015020e-1

    r[ 3339].Re=-5.7121324239865012284411704968078990e-1, .Im=-8.2065633300082885259740805850015020e-1

    r[ 3340].Re= 5.4383949378512108641103850459330715e-1, .Im= 8.3901481256024224020251267575076780e-1

    r[ 3341].Re= 5.4383949378512108641103850459330715e-1, .Im=-8.3901481256024224020251267575076780e-1

    r[ 3342].Re= 9.8398044822463459624373172118794170e-1, .Im= 1.777626092583874384267517143598524750e-1

    r[ 3343].Re= 9.8398044822463459624373172118794170e-1, .Im=-1.777626092583874384267517143598524750e-1

    r[ 3344].Re=-9.4650075809867206810821471663075495e-1, .Im= 3.22366039497007206282574998112977475e-1

    r[ 3345].Re=-9.4650075809867206810821471663075495e-1, .Im=-3.22366039497007206282574998112977475e-1

    r[ 3346].Re=-1.0567600657448476819677551929999026250e-1, .Im= 9.9426318105974820227288546448107805e-1

    r[ 3347].Re=-1.0567600657448476819677551929999026250e-1, .Im=-9.9426318105974820227288546448107805e-1

    r[ 3348].Re=-8.5436478175377317256788956001400945e-1, .Im= 5.1944774506373914135792801971547305e-1

    r[ 3349].Re=-8.5436478175377317256788956001400945e-1, .Im=-5.1944774506373914135792801971547305e-1

    r[ 3350].Re= 7.7145446869527611877259687389596365e-1, .Im= 6.3603721403726631855590767372632395e-1

    r[ 3351].Re= 7.7145446869527611877259687389596365e-1, .Im=-6.3603721403726631855590767372632395e-1

    r[ 3352].Re= 2.09728766945672578936310515018703875e-1, .Im= 9.776185345665125980829657237336505e-1

    r[ 3353].Re= 2.09728766945672578936310515018703875e-1, .Im=-9.776185345665125980829657237336505e-1

    r[ 3354].Re=-4.98847765999661962865729947225190675e-1, .Im= 8.6654477230899262796270932085462845e-1

    r[ 3355].Re=-4.98847765999661962865729947225190675e-1, .Im=-8.6654477230899262796270932085462845e-1

    r[ 3356].Re= 8.0314018286618082953509656363166865e-1, .Im= 5.9553658918453311610363698491710235e-1

    r[ 3357].Re= 8.0314018286618082953509656363166865e-1, .Im=-5.9553658918453311610363698491710235e-1

    r[ 3358].Re=-9.856379934703712875077030730608385e-1, .Im= 1.682009883616344680934417965545435375e-1

    r[ 3359].Re=-9.856379934703712875077030730608385e-1, .Im=-1.682009883616344680934417965545435375e-1

    r[ 3360].Re= 3.90438862964871125083021752288914275e-1, .Im= 9.2046145934949130662516836309805510e-1

    r[ 3361].Re= 3.90438862964871125083021752288914275e-1, .Im=-9.2046145934949130662516836309805510e-1

    r[ 3362].Re=-2.156158237808382394096184953014017000e-1, .Im= 9.763533247538656034691939566982910e-1

    r[ 3363].Re=-2.156158237808382394096184953014017000e-1, .Im=-9.763533247538656034691939566982910e-1

    r[ 3364].Re= 9.9926976367415920599057699291734020e-1, .Im= 3.7915365977725358492822493872154153125e-2

    r[ 3365].Re= 9.9926976367415920599057699291734020e-1, .Im=-3.7915365977725358492822493872154153125e-2

    r[ 3366].Re=-7.2516685842938555239811648789327590e-1, .Im= 6.8840050642118122414814251897041685e-1

    r[ 3367].Re=-7.2516685842938555239811648789327590e-1, .Im=-6.8840050642118122414814251897041685e-1

    r[ 3368].Re= 1.373856755881605329339123500176356125e-1, .Im= 9.9036859543166810837533375888597220e-1

    r[ 3369].Re= 1.373856755881605329339123500176356125e-1, .Im=-9.9036859543166810837533375888597220e-1

    r[ 3370].Re=-6.3846130490863872708473536476958540e-1, .Im= 7.6950126178533440057805137257673775e-1

    r[ 3371].Re=-6.3846130490863872708473536476958540e-1, .Im=-7.6950126178533440057805137257673775e-1

    r[ 3372].Re= 8.3606833208084319064568035173579115e-1, .Im= 5.4834599557800189906231480563292275e-1

    r[ 3373].Re= 8.3606833208084319064568035173579115e-1, .Im=-5.4834599557800189906231480563292275e-1

    r[ 3374].Re=-9.9786067641515241444238881740602660e-1, .Im= 6.364722113128241931523376706536510000e-2

    r[ 3375].Re=-9.9786067641515241444238881740602660e-1, .Im=-6.364722113128241931523376706536510000e-2

    r[ 3376].Re= 5.3662828406954288240626738115679470e-1, .Im= 8.4363239341660256620514246606035155e-1

    r[ 3377].Re= 5.3662828406954288240626738115679470e-1, .Im=-8.4363239341660256620514246606035155e-1

    r[ 3378].Re=-1.916323290681176128025242633157176875e-1, .Im= 9.8133784884499752898534552514320235e-1

    r[ 3379].Re=-1.916323290681176128025242633157176875e-1, .Im=-9.8133784884499752898534552514320235e-1

    r[ 3380].Re= 9.4729353716492503689750037665362465e-1, .Im= 3.19927223099099322656257982089300625e-1

    r[ 3381].Re= 9.4729353716492503689750037665362465e-1, .Im=-3.19927223099099322656257982089300625e-1

    r[ 3382].Re=-8.6622183374446282133618524312623775e-1, .Im= 4.99438408565871461153307109270826900e-1

    r[ 3383].Re=-8.6622183374446282133618524312623775e-1, .Im=-4.99438408565871461153307109270826900e-1

    r[ 3384].Re= 3.2506967468377348517982738940190756250e-2, .Im= 9.9933143610975994075573680675006470e-1

    r[ 3385].Re= 3.2506967468377348517982738940190756250e-2, .Im=-9.9933143610975994075573680675006470e-1

    r[ 3386].Re= 9.2593499514576138587074183305958285e-1, .Im= 3.77312545823036415981732716318219900e-1

    r[ 3387].Re= 9.2593499514576138587074183305958285e-1, .Im=-3.77312545823036415981732716318219900e-1

    r[ 3388].Re=-6.0195405446788075032316100987372915e-1, .Im= 7.9837992274510816148591629826114510e-1

    r[ 3389].Re=-6.0195405446788075032316100987372915e-1, .Im=-7.9837992274510816148591629826114510e-1

    r[ 3390].Re=-9.6012855242488182039295452341320920e-1, .Im= 2.79147464757576235783176343829836675e-1

    r[ 3391].Re=-9.6012855242488182039295452341320920e-1, .Im=-2.79147464757576235783176343829836675e-1

    r[ 3392].Re= 6.5159864787272092634395903587574135e-1, .Im= 7.5834631682336539615363335542497225e-1

    r[ 3393].Re= 6.5159864787272092634395903587574135e-1, .Im=-7.5834631682336539615363335542497225e-1

    r[ 3394].Re=-7.031428750055054854861680269095813750e-2, .Im= 9.9738838119350148314623538681189525e-1

    r[ 3395].Re=-7.031428750055054854861680269095813750e-2, .Im=-9.9738838119350148314623538681189525e-1

    r[ 3396].Re= 6.299901687629226865183795780467335e-1, .Im= 7.7641175568698828080016482999781145e-1

    r[ 3397].Re= 6.299901687629226865183795780467335e-1, .Im=-7.7641175568698828080016482999781145e-1

    r[ 3398].Re=-7.5720732365394616270037886351929045e-1, .Im= 6.5300251623364591324616412748582660e-1

    r[ 3399].Re=-7.5720732365394616270037886351929045e-1, .Im=-6.5300251623364591324616412748582660e-1

    r[ 3400].Re= 9.9670562642957627463857761540566570e-1, .Im= 8.066731300087626177486299638985655625e-2

    r[ 3401].Re= 9.9670562642957627463857761540566570e-1, .Im=-8.066731300087626177486299638985655625e-2

    r[ 3402].Re=-4.45970392269718407529666137634194450e-1, .Im= 8.9491946410753575591456865367945280e-1

    r[ 3403].Re=-4.45970392269718407529666137634194450e-1, .Im=-8.9491946410753575591456865367945280e-1

    r[ 3404].Re= 7.5644151354420008370738059966242870e-1, .Im= 6.5382875060175349446467407688032835e-1

    r[ 3405].Re= 7.5644151354420008370738059966242870e-1, .Im=-6.5382875060175349446467407688032835e-1

    r[ 3406].Re=-9.395941122590817373705363024782855e-1, .Im= 3.41995719807499265474604044356965450e-1

    r[ 3407].Re=-9.395941122590817373705363024782855e-1, .Im=-3.41995719807499265474604044356965450e-1

    r[ 3408].Re= 3.14842350986877295149213296099333075e-1, .Im= 9.4898156829671109768753467506030570e-1

    r[ 3409].Re= 3.14842350986877295149213296099333075e-1, .Im=-9.4898156829671109768753467506030570e-1

    r[ 3410].Re=-3.66551426629196042128455701458733525e-1, .Im= 9.3026515890771721561947060763486660e-1

    r[ 3411].Re=-3.66551426629196042128455701458733525e-1, .Im=-9.3026515890771721561947060763486660e-1

    r[ 3412].Re= 9.5411884473435015774356315887416710e-1, .Im= 2.98981187118453062279144205604097800e-1

    r[ 3413].Re= 9.5411884473435015774356315887416710e-1, .Im=-2.98981187118453062279144205604097800e-1

    r[ 3414].Re= 4.23990316472921235924076199808041550e-1, .Im= 9.0550300241147885227377400951809245e-1

    r[ 3415].Re= 4.23990316472921235924076199808041550e-1, .Im=-9.0550300241147885227377400951809245e-1

    r[ 3416].Re=-9.6215840733782886928793232073076065e-1, .Im= 2.72077716447662931731343860519700675e-1

    r[ 3417].Re=-9.6215840733782886928793232073076065e-1, .Im=-2.72077716447662931731343860519700675e-1

    r[ 3418].Re=-5.5299633896905819874234566668746990e-1, .Im= 8.3304205599725156261570191418286410e-1

    r[ 3419].Re=-5.5299633896905819874234566668746990e-1, .Im=-8.3304205599725156261570191418286410e-1

    r[ 3420].Re= 1.0578029064109721602005009799540857500e-1, .Im= 9.9424382340169392691109351289924230e-1

    r[ 3421].Re= 1.0578029064109721602005009799540857500e-1, .Im=-9.9424382340169392691109351289924230e-1

    r[ 3422].Re=-8.1886848744153428736325395220774225e-1, .Im= 5.7378944568268341885897143583861175e-1

    r[ 3423].Re=-8.1886848744153428736325395220774225e-1, .Im=-5.7378944568268341885897143583861175e-1

    r[ 3424].Re= 9.1641058675107900377554415172198785e-1, .Im= 3.99883552490400306922424533695448175e-1

    r[ 3425].Re= 9.1641058675107900377554415172198785e-1, .Im=-3.99883552490400306922424533695448175e-1

    r[ 3426].Re= 5.812806000484935786687401559902355e-1, .Im= 8.1351169847304616311589597899001090e-1

    r[ 3427].Re= 5.812806000484935786687401559902355e-1, .Im=-8.1351169847304616311589597899001090e-1

    r[ 3428].Re=-9.9753592959811887563859045258141120e-1, .Im= 6.852582877052730558897764012726838125e-2

    r[ 3429].Re=-9.9753592959811887563859045258141120e-1, .Im=-6.852582877052730558897764012726838125e-2

    r[ 3430].Re=-5.4411450092908437980998570537849443750e-2, .Im= 9.9838875360676748726973528391681610e-1

    r[ 3431].Re=-5.4411450092908437980998570537849443750e-2, .Im=-9.9838875360676748726973528391681610e-1

    r[ 3432].Re= 9.718127448316724592558557560550980e-1, .Im= 2.352542446344557669490882290119770875e-1

    r[ 3433].Re= 9.718127448316724592558557560550980e-1, .Im=-2.352542446344557669490882290119770875e-1

    r[ 3434].Re=-6.8525129512052773694819052252569235e-1, .Im= 7.2814363764433498449335502300527875e-1

    r[ 3435].Re=-6.8525129512052773694819052252569235e-1, .Im=-7.2814363764433498449335502300527875e-1

    r[ 3436].Re= 4.87194715912152243042498866998357675e-1, .Im= 8.7311011826276196945428864637506190e-1

    r[ 3437].Re= 4.87194715912152243042498866998357675e-1, .Im=-8.7311011826276196945428864637506190e-1

    r[ 3438].Re=-7.814490538071069414272074027394410e-1, .Im= 6.2378664235298664220152886628056875e-1

    r[ 3439].Re=-7.814490538071069414272074027394410e-1, .Im=-6.2378664235298664220152886628056875e-1

    r[ 3440].Re= 8.4272446866004546706108158105053005e-1, .Im= 5.3806412294493766168557158380281180e-1

    r[ 3441].Re= 8.4272446866004546706108158105053005e-1, .Im=-5.3806412294493766168557158380281180e-1

    r[ 3442].Re=-3.13583481062500446512331109261140225e-1, .Im= 9.494273262885987163528511700860690e-1

    r[ 3443].Re=-3.13583481062500446512331109261140225e-1, .Im=-9.494273262885987163528511700860690e-1

    r[ 3444].Re=-9.1193588563771132982083145179785785e-1, .Im= 4.10067946771495162039400383946485800e-1

    r[ 3445].Re=-9.1193588563771132982083145179785785e-1, .Im=-4.10067946771495162039400383946485800e-1

    r[ 3446].Re= 7.2097454212891642910676637256983665e-1, .Im= 6.9272886073160955255900717020267620e-1

    r[ 3447].Re= 7.2097454212891642910676637256983665e-1, .Im=-6.9272886073160955255900717020267620e-1

    r[ 3448].Re= 1.191718281382580651994729237230785625e-1, .Im= 9.9272528077363964005286334213451480e-1

    r[ 3449].Re= 1.191718281382580651994729237230785625e-1, .Im=-9.9272528077363964005286334213451480e-1

    r[ 3450].Re=-3.56277880752800757413467636069981375e-1, .Im= 9.3423879951538935095811666542431335e-1

    r[ 3451].Re=-3.56277880752800757413467636069981375e-1, .Im=-9.3423879951538935095811666542431335e-1

    r[ 3452].Re= 9.9846807535536930000574784571654160e-1, .Im= 5.5028244724690339451100840051367412500e-2

    r[ 3453].Re= 9.9846807535536930000574784571654160e-1, .Im=-5.5028244724690339451100840051367412500e-2

    r[ 3454].Re=-9.8837820210492155492687516016303560e-1, .Im= 1.512868428465256598336452498188009375e-1

    r[ 3455].Re=-9.8837820210492155492687516016303560e-1, .Im=-1.512868428465256598336452498188009375e-1

    r[ 3456].Re= 3.42595200693087464927089058619458225e-1, .Im= 9.3933009932871236458140629110857840e-1

    r[ 3457].Re= 3.42595200693087464927089058619458225e-1, .Im=-9.3933009932871236458140629110857840e-1

    r[ 3458].Re=-1.409261958661839064799181642229086625e-1, .Im= 9.8989567382839871445554535966948605e-1

    r[ 3459].Re=-1.409261958661839064799181642229086625e-1, .Im=-9.8989567382839871445554535966948605e-1

    r[ 3460].Re= 8.734778882641925923380199492385145e-1, .Im= 4.86533672371689818181295095200766800e-1

    r[ 3461].Re= 8.734778882641925923380199492385145e-1, .Im=-4.86533672371689818181295095200766800e-1

    r[ 3462].Re=-8.619197566600632631761413904314395e-1, .Im= 5.0683938236833769863665111188311125e-1

    r[ 3463].Re=-8.619197566600632631761413904314395e-1, .Im=-5.0683938236833769863665111188311125e-1

    r[ 3464].Re= 9.8462557486467006118147082815994505e-1, .Im= 1.74134142973442124224803251308912875e-1

    r[ 3465].Re= 9.8462557486467006118147082815994505e-1, .Im=-1.74134142973442124224803251308912875e-1

    r[ 3466].Re=-5.0942156589782450204495489742839705e-1, .Im= 8.603699268165889701975856951321475e-1

    r[ 3467].Re=-5.0942156589782450204495489742839705e-1, .Im=-8.603699268165889701975856951321475e-1

    r[ 3468].Re= 3.06693329394967573175989627998205825e-1, .Im= 9.5166054948352329923011438950197770e-1

    r[ 3469].Re= 3.06693329394967573175989627998205825e-1, .Im=-9.5166054948352329923011438950197770e-1

    r[ 3470].Re=-9.3575951695501535798626946416334245e-1, .Im= 3.52340139524604856191558610589709125e-1

    r[ 3471].Re=-9.3575951695501535798626946416334245e-1, .Im=-3.52340139524604856191558610589709125e-1

    r[ 3472].Re= 6.8439267511012558120597759625525210e-1, .Im= 7.2888619044553648596007633386761880e-1

    r[ 3473].Re= 6.8439267511012558120597759625525210e-1, .Im=-7.2888619044553648596007633386761880e-1

    r[ 3474].Re=-5.5808700692081414374001724354457110e-1, .Im= 8.2963893331026594690769115914008580e-1

    r[ 3475].Re=-5.5808700692081414374001724354457110e-1, .Im=-8.2963893331026594690769115914008580e-1

    r[ 3476].Re= 1.881365094637709178826412426133174375e-1, .Im= 9.8199305072526177351477372212684710e-1

    r[ 3477].Re= 1.881365094637709178826412426133174375e-1, .Im=-9.8199305072526177351477372212684710e-1

    r[ 3478].Re=-9.7595218719633802795243582295370285e-1, .Im= 2.174650629184160521845114999450743125e-1

    r[ 3479].Re=-9.7595218719633802795243582295370285e-1, .Im=-2.174650629184160521845114999450743125e-1

    r[ 3480].Re= 8.2377465811942385265354005241533740e-1, .Im= 5.6662820622663312430944415609701535e-1

    r[ 3481].Re= 8.2377465811942385265354005241533740e-1, .Im=-5.6662820622663312430944415609701535e-1

    r[ 3482].Re=-2.57268471426364220278060201962944100e-1, .Im= 9.6621491477120646784726432088064025e-1

    r[ 3483].Re=-2.57268471426364220278060201962944100e-1, .Im=-9.6621491477120646784726432088064025e-1

    r[ 3484].Re= 9.6854475803953998802597880057874135e-1, .Im= 2.483261203970377473115860311736469125e-1

    r[ 3485].Re= 9.6854475803953998802597880057874135e-1, .Im=-2.483261203970377473115860311736469125e-1

    r[ 3486].Re=-7.3852304129053325532083817961392920e-1, .Im= 6.7406010564459517553359546582214530e-1

    r[ 3487].Re=-7.3852304129053325532083817961392920e-1, .Im=-6.7406010564459517553359546582214530e-1

    r[ 3488].Re= 5.1264363034963311704927946266252545e-1, .Im= 8.5842611226555098902224472112720830e-1

    r[ 3489].Re= 5.1264363034963311704927946266252545e-1, .Im=-8.5842611226555098902224472112720830e-1

    r[ 3490].Re=-9.9908363701486679886443198483902960e-1, .Im= 4.0407874091083213763386794425969128125e-2

    r[ 3491].Re=-9.9908363701486679886443198483902960e-1, .Im=-4.0407874091083213763386794425969128125e-2

    r[ 3492].Re= 4.9626069235676112390009961927717084375e-2, .Im= 9.9862376718180467793928301034611645e-1

    r[ 3493].Re= 4.9626069235676112390009961927717084375e-2, .Im=-9.9862376718180467793928301034611645e-1

    r[ 3494].Re= 8.3472613978598320105817265357472930e-1, .Im= 5.5037790211968029563394111391971815e-1

    r[ 3495].Re= 8.3472613978598320105817265357472930e-1, .Im=-5.5037790211968029563394111391971815e-1

    r[ 3496].Re=-7.0462619928190728391115271733724510e-1, .Im= 7.0942802083092482146042812019004485e-1

    r[ 3497].Re=-7.0462619928190728391115271733724510e-1, .Im=-7.0942802083092482146042812019004485e-1

    r[ 3498].Re= 4.91461676693438598295671226878766900e-1, .Im= 8.7072142596882817766612561172223645e-1

    r[ 3499].Re= 4.91461676693438598295671226878766900e-1, .Im=-8.7072142596882817766612561172223645e-1

    r[ 3500].Re=-4.21704278160588530433017240284243575e-1, .Im= 9.0660023107431397804134576290380205e-1

    r[ 3501].Re=-4.21704278160588530433017240284243575e-1, .Im=-9.0660023107431397804134576290380205e-1

    r[ 3502].Re= 9.8567549200774229323229747024015520e-1, .Im= 1.68101951233368213101115884455794000e-1

    r[ 3503].Re= 9.8567549200774229323229747024015520e-1, .Im=-1.68101951233368213101115884455794000e-1

    r[ 3504].Re=-8.3539066006485473980802680671331470e-1, .Im= 5.4946638600479724701131090114358810e-1

    r[ 3505].Re=-8.3539066006485473980802680671331470e-1, .Im=-5.4946638600479724701131090114358810e-1

    r[ 3506].Re=-9.349192864202060526679360918933525625e-2, .Im= 9.9548064428288485228080162414698860e-1

    r[ 3507].Re=-9.349192864202060526679360918933525625e-2, .Im=-9.9548064428288485228080162414698860e-1

    r[ 3508].Re= 7.5242201017129339835065593433682805e-1, .Im= 6.5844931795608818703158249263651665e-1

    r[ 3509].Re= 7.5242201017129339835065593433682805e-1, .Im=-6.5844931795608818703158249263651665e-1

    r[ 3510].Re=-9.2452785484178212627170978521462525e-1, .Im= 3.80821907441220464107800580677576350e-1

    r[ 3511].Re=-9.2452785484178212627170978521462525e-1, .Im=-3.80821907441220464107800580677576350e-1

    r[ 3512].Re= 3.82543585646193895488664793447242100e-1, .Im= 9.237851810277347697208938370749820e-1

    r[ 3513].Re= 3.82543585646193895488664793447242100e-1, .Im=-9.237851810277347697208938370749820e-1

    r[ 3514].Re= 9.9993920377435940860522123330156315e-1, .Im= 1.101001469594668075169252574596612187500e-2

    r[ 3515].Re= 9.9993920377435940860522123330156315e-1, .Im=-1.101001469594668075169252574596612187500e-2

    r[ 3516].Re=-6.1845520509865770097945869565592145e-1, .Im= 7.8566481456365033775313122532679695e-1

    r[ 3517].Re=-6.1845520509865770097945869565592145e-1, .Im=-7.8566481456365033775313122532679695e-1

    r[ 3518].Re= 6.3283305461652405998762560557224785e-1, .Im= 7.7407731696055503967102140450151635e-1

    r[ 3519].Re= 6.3283305461652405998762560557224785e-1, .Im=-7.7407731696055503967102140450151635e-1

    r[ 3520].Re=-9.7003381858511272817224835307570170e-1, .Im= 2.424969851611950000247475145442876875e-1

    r[ 3521].Re=-9.7003381858511272817224835307570170e-1, .Im=-2.424969851611950000247475145442876875e-1

    r[ 3522].Re=-1.1906726479304802213121661225159186250e-1, .Im= 9.9274573069906091316028096116497180e-1

    r[ 3523].Re=-1.1906726479304802213121661225159186250e-1, .Im=-9.9274573069906091316028096116497180e-1

    r[ 3524].Re= 9.3401552618190630816741304442984980e-1, .Im= 3.56806598993488266469142899950384150e-1

    r[ 3525].Re= 9.3401552618190630816741304442984980e-1, .Im=-3.56806598993488266469142899950384150e-1

    r[ 3526].Re=-3.06602951253881095272646462035481800e-1, .Im= 9.5171194477979148551582966319983825e-1

    r[ 3527].Re=-3.06602951253881095272646462035481800e-1, .Im=-9.5171194477979148551582966319983825e-1

    r[ 3528].Re=-9.8416431476134402789313071480137295e-1, .Im= 1.766583572833779758326500086695887125e-1

    r[ 3529].Re=-9.8416431476134402789313071480137295e-1, .Im=-1.766583572833779758326500086695887125e-1

    r[ 3530].Re= 2.478728823622222965372685621332493500e-1, .Im= 9.6863784651340401055108486616518345e-1

    r[ 3531].Re= 2.478728823622222965372685621332493500e-1, .Im=-9.6863784651340401055108486616518345e-1

    r[ 3532].Re= 8.9243247356098054368089833587873725e-1, .Im= 4.50854843790773063272325771322357450e-1

    r[ 3533].Re= 8.9243247356098054368089833587873725e-1, .Im=-4.50854843790773063272325771322357450e-1

    r[ 3534].Re=-6.653738067374701525835689608356915e-1, .Im= 7.4634829102813216028522447231807745e-1

    r[ 3535].Re=-6.653738067374701525835689608356915e-1, .Im=-7.4634829102813216028522447231807745e-1

    r[ 3536].Re= 1.652348824221984147087027849920559625e-1, .Im= 9.8611839228515385524787006943370215e-1

    r[ 3537].Re= 1.652348824221984147087027849920559625e-1, .Im=-9.8611839228515385524787006943370215e-1

    r[ 3538].Re=-8.8284402671345130197977368879946880e-1, .Im= 4.69429449125266795572741784781101150e-1

    r[ 3539].Re=-8.8284402671345130197977368879946880e-1, .Im=-4.69429449125266795572741784781101150e-1

    r[ 3540].Re= 8.5565535208009968481945861640269865e-1, .Im= 5.1725754369013554612166672086459580e-1

    r[ 3541].Re= 8.5565535208009968481945861640269865e-1, .Im=-5.1725754369013554612166672086459580e-1

    r[ 3542].Re=-3.15920574780047425100804048270219925e-1, .Im= 9.4864868020714254726044600829482075e-1

    r[ 3543].Re=-3.15920574780047425100804048270219925e-1, .Im=-9.4864868020714254726044600829482075e-1

    r[ 3544].Re= 9.6149433192273281445494603758561420e-1, .Im= 2.74341994008034328889067410273128175e-1

    r[ 3545].Re= 9.6149433192273281445494603758561420e-1, .Im=-2.74341994008034328889067410273128175e-1

    r[ 3546].Re=-8.1249006749069385691086608858313410e-1, .Im= 5.8277115908469645511047474428778510e-1

    r[ 3547].Re=-8.1249006749069385691086608858313410e-1, .Im=-5.8277115908469645511047474428778510e-1

    r[ 3548].Re= 5.7329325222819793594908333034254610e-1, .Im= 8.1915796167042609354780324792955070e-1

    r[ 3549].Re= 5.7329325222819793594908333034254610e-1, .Im=-8.1915796167042609354780324792955070e-1

    r[ 3550].Re=-3.9035472573967017195784023897431325e-1, .Im= 9.2052653125904537745327615994028745e-1

    r[ 3551].Re=-3.9035472573967017195784023897431325e-1, .Im=-9.2052653125904537745327615994028745e-1

    r[ 3552].Re= 7.8527577069552578770128548057982695e-1, .Im= 6.1888528925395758228944487200351430e-1

    r[ 3553].Re= 7.8527577069552578770128548057982695e-1, .Im=-6.1888528925395758228944487200351430e-1

    r[ 3554].Re=-9.9986166493373795915999835415277630e-1, .Im= 8.57871697425554961824456512431424921875e-3

    r[ 3555].Re=-9.9986166493373795915999835415277630e-1, .Im=-8.57871697425554961824456512431424921875e-3

    r[ 3556].Re= 8.02031763327554214626502471219282578125e-3, .Im= 9.9983348263863169869125613331561905e-1

    r[ 3557].Re= 8.02031763327554214626502471219282578125e-3, .Im=-9.9983348263863169869125613331561905e-1

    r[ 3558].Re= 4.36149543205688883240611630753846825e-1, .Im= 8.9970148531597027297124213873757980e-1

    r[ 3559].Re= 4.36149543205688883240611630753846825e-1, .Im=-8.9970148531597027297124213873757980e-1

    r[ 3560].Re= 9.9575187185458136074345247834571635e-1, .Im= 9.164822070292781563960460289308684375e-2

    r[ 3561].Re= 9.9575187185458136074345247834571635e-1, .Im=-9.164822070292781563960460289308684375e-2

    r[ 3562].Re=-6.9058941481213442781239564283168870e-1, .Im= 7.2309379578550103673251214786432680e-1

    r[ 3563].Re=-6.9058941481213442781239564283168870e-1, .Im=-7.2309379578550103673251214786432680e-1

    r[ 3564].Re=-4.84984275041354107038671372720273200e-1, .Im= 8.7439238506563277120164912048494440e-1

    r[ 3565].Re=-4.84984275041354107038671372720273200e-1, .Im=-8.7439238506563277120164912048494440e-1

    r[ 3566].Re=-9.9255252153641182477628035485395230e-1, .Im= 1.2095686184814850860913537644591996875e-1

    r[ 3567].Re=-9.9255252153641182477628035485395230e-1, .Im=-1.2095686184814850860913537644591996875e-1

    r[ 3568].Re= 6.8973840351745419052775787349673915e-1, .Im= 7.2383555240515695672343099431600420e-1

    r[ 3569].Re= 6.8973840351745419052775787349673915e-1, .Im=-7.2383555240515695672343099431600420e-1

    r[ 3570].Re= 7.406842720785949962802874324552248750e-2, .Im= 9.9711165708066962221067797145224175e-1

    r[ 3571].Re= 7.406842720785949962802874324552248750e-2, .Im=-9.9711165708066962221067797145224175e-1

    r[ 3572].Re= 9.0991388119273175494328143031452780e-1, .Im= 4.14414541857643758948626100391265925e-1

    r[ 3573].Re= 9.0991388119273175494328143031452780e-1, .Im=-4.14414541857643758948626100391265925e-1

    r[ 3574].Re=-8.9131580510917984838670236058533190e-1, .Im= 4.53131101200942798534754274442093425e-1

    r[ 3575].Re=-8.9131580510917984838670236058533190e-1, .Im=-4.53131101200942798534754274442093425e-1

    r[ 3576].Re= 2.76240720657635718815470227127661925e-1, .Im= 9.6094524676497461435076274938182905e-1

    r[ 3577].Re= 2.76240720657635718815470227127661925e-1, .Im=-9.6094524676497461435076274938182905e-1

    r[ 3578].Re=-1.723698138010486269333654263391508625e-1, .Im= 9.8490750697492079890338345649070105e-1

    r[ 3579].Re=-1.723698138010486269333654263391508625e-1, .Im=-9.8490750697492079890338345649070105e-1

    r[ 3580].Re=-8.4794036989948085025758928168215785e-1, .Im= 5.298718336373475779055297607555985e-1

    r[ 3581].Re=-8.4794036989948085025758928168215785e-1, .Im=-5.298718336373475779055297607555985e-1

    r[ 3582].Re= 9.9071900858783612520142014545854180e-1, .Im= 1.354322473255943626302411075812415125e-1

    r[ 3583].Re= 9.9071900858783612520142014545854180e-1, .Im=-1.354322473255943626302411075812415125e-1

    r[ 3584].Re= 5.8227713089838395443820218133623710e-1, .Im= 8.1279010207851742908502501450129780e-1

    r[ 3585].Re= 5.8227713089838395443820218133623710e-1, .Im=-8.1279010207851742908502501450129780e-1

    r[ 3586].Re=-5.4992070580932894685588507854845370e-1, .Im= 8.3507861351349965683965592688764445e-1

    r[ 3587].Re=-5.4992070580932894685588507854845370e-1, .Im=-8.3507861351349965683965592688764445e-1

    r[ 3588].Re= 1.264706712683250078299579399754293250e-1, .Im= 9.9182651585035774832732613504049365e-1

    r[ 3589].Re= 1.264706712683250078299579399754293250e-1, .Im=-9.9182651585035774832732613504049365e-1

    r[ 3590].Re=-9.5520988059941414061171371940872630e-1, .Im= 2.95562951557300446214782141396426575e-1

    r[ 3591].Re=-9.5520988059941414061171371940872630e-1, .Im=-2.95562951557300446214782141396426575e-1

    r[ 3592].Re= 7.459288692654986174801479137386195e-1, .Im= 6.6577565589647114130400495923822745e-1

    r[ 3593].Re= 7.459288692654986174801479137386195e-1, .Im=-6.6577565589647114130400495923822745e-1

    r[ 3594].Re=-6.4503155050812976956109423554153180e-1, .Im= 7.6401267730867394867289021931355815e-1

    r[ 3595].Re=-6.4503155050812976956109423554153180e-1, .Im=-7.6401267730867394867289021931355815e-1

    r[ 3596].Re= 9.4330418967611662228733848678530190e-1, .Im= 3.31506049674044400710215541039360675e-1

    r[ 3597].Re= 9.4330418967611662228733848678530190e-1, .Im=-3.31506049674044400710215541039360675e-1

    r[ 3598].Re=-1.7839951192597208740053815745341125e-1, .Im= 9.8383384071896184952521480227005665e-1

    r[ 3599].Re=-1.7839951192597208740053815745341125e-1, .Im=-9.8383384071896184952521480227005665e-1

    r[ 3600].Re=-9.4571762060422670526094179876963605e-1, .Im= 3.24672735591295225088259712720173400e-1

    r[ 3601].Re=-9.4571762060422670526094179876963605e-1, .Im=-3.24672735591295225088259712720173400e-1

    r[ 3602].Re= 3.96068097250299011591323505854234075e-1, .Im= 9.1805416514464954769181304072844795e-1

    r[ 3603].Re= 3.96068097250299011591323505854234075e-1, .Im=-9.1805416514464954769181304072844795e-1

    r[ 3604].Re= 9.1835978221805503185493080309242940e-1, .Im= 3.95379035026501457483760759714641600e-1

    r[ 3605].Re= 9.1835978221805503185493080309242940e-1, .Im=-3.95379035026501457483760759714641600e-1

    r[ 3606].Re=-4.37177559277490968003831994792562900e-1, .Im= 8.9923114690714722740949582657776770e-1

    r[ 3607].Re=-4.37177559277490968003831994792562900e-1, .Im=-8.9923114690714722740949582657776770e-1

    r[ 3608].Re=-7.8374936110144488576878529784153215e-1, .Im= 6.2090471259095347811296505824429910e-1

    r[ 3609].Re=-7.8374936110144488576878529784153215e-1, .Im=-6.2090471259095347811296505824429910e-1

    r[ 3610].Re= 5.1475006348537322153902096033561970e-1, .Im= 8.5715379752024256632125798205379395e-1

    r[ 3611].Re= 5.1475006348537322153902096033561970e-1, .Im=-8.5715379752024256632125798205379395e-1

    r[ 3612].Re= 9.9388806408853191953767236554995175e-1, .Im= 1.0991934682978812820586256293609039375e-1

    r[ 3613].Re= 9.9388806408853191953767236554995175e-1, .Im=-1.0991934682978812820586256293609039375e-1

    r[ 3614].Re=-9.8982410208843318866200888805906285e-1, .Im= 1.41584602723463043316698417584120750e-1

    r[ 3615].Re=-9.8982410208843318866200888805906285e-1, .Im=-1.41584602723463043316698417584120750e-1

    r[ 3616].Re=-1.525907706762730069172118163578488671875e-2, .Im= 9.9975531677301732180751514533767475e-1

    r[ 3617].Re=-1.525907706762730069172118163578488671875e-2, .Im=-9.9975531677301732180751514533767475e-1

    r[ 3618].Re= 6.8261002741633636237139626246062105e-1, .Im= 7.3057463076799122880800041457405310e-1

    r[ 3619].Re= 6.8261002741633636237139626246062105e-1, .Im=-7.3057463076799122880800041457405310e-1

    r[ 3620].Re=-5.2409251139879342584748656008741815e-1, .Im= 8.515178867731721945588674316240940e-1

    r[ 3621].Re=-5.2409251139879342584748656008741815e-1, .Im=-8.515178867731721945588674316240940e-1

    r[ 3622].Re= 3.50640440114380336211752364761196075e-1, .Im= 9.3634446608335730743988278845790770e-1

    r[ 3623].Re= 3.50640440114380336211752364761196075e-1, .Im=-9.3634446608335730743988278845790770e-1

    r[ 3624].Re= 8.7703756754806894146980766890919765e-1, .Im= 4.80104322809165096064276667675585475e-1

    r[ 3625].Re= 8.7703756754806894146980766890919765e-1, .Im=-4.80104322809165096064276667675585475e-1

    r[ 3626].Re=-8.5564709431866226019280929904198270e-1, .Im= 5.1736059935818923261052759698941370e-1

    r[ 3627].Re=-8.5564709431866226019280929904198270e-1, .Im=-5.1736059935818923261052759698941370e-1

    r[ 3628].Re=-1.964475558523228471141663931121001875e-1, .Im= 9.8039029906021457616560610404121685e-1

    r[ 3629].Re=-1.964475558523228471141663931121001875e-1, .Im=-9.8039029906021457616560610404121685e-1

    r[ 3630].Re=-9.9340743402314546361964175957837140e-1, .Im= 1.136566714581207920842231828828516875e-1

    r[ 3631].Re=-9.9340743402314546361964175957837140e-1, .Im=-1.136566714581207920842231828828516875e-1

    r[ 3632].Re= 7.7610889994165821459404241977608760e-1, .Im= 6.3035882032611278980027691432042045e-1

    r[ 3633].Re= 7.7610889994165821459404241977608760e-1, .Im=-6.3035882032611278980027691432042045e-1

    r[ 3634].Re=-1.566687045134510791744020252735936000e-1, .Im= 9.875113886879980373834087004070170e-1

    r[ 3635].Re=-1.566687045134510791744020252735936000e-1, .Im=-9.875113886879980373834087004070170e-1

    r[ 3636].Re= 9.7728777675694877835610441252356395e-1, .Im= 2.113814293205099337225050248889601750e-1

    r[ 3637].Re= 9.7728777675694877835610441252356395e-1, .Im=-2.113814293205099337225050248889601750e-1

    r[ 3638].Re=-7.4016628235964809778835160614107735e-1, .Im= 6.7226228822756817216088620625669135e-1

    r[ 3639].Re=-7.4016628235964809778835160614107735e-1, .Im=-6.7226228822756817216088620625669135e-1

    r[ 3640].Re= 2.53799540678355917133757202464039425e-1, .Im= 9.6710256804416727671735998228541575e-1

    r[ 3641].Re= 2.53799540678355917133757202464039425e-1, .Im=-9.6710256804416727671735998228541575e-1

    r[ 3642].Re=-6.6812579236122604520176082587568085e-1, .Im= 7.4390342518417196249203016122919505e-1

    r[ 3643].Re=-6.6812579236122604520176082587568085e-1, .Im=-7.4390342518417196249203016122919505e-1

    r[ 3644].Re= 6.5900637058233790810390928527340290e-1, .Im= 7.5193822799015797020416584928170775e-1

    r[ 3645].Re= 6.5900637058233790810390928527340290e-1, .Im=-7.5193822799015797020416584928170775e-1

    r[ 3646].Re=-9.7953749553405766725688863516552370e-1, .Im= 2.007098036593216727752064798551145875e-1

    r[ 3647].Re=-9.7953749553405766725688863516552370e-1, .Im=-2.007098036593216727752064798551145875e-1

    r[ 3648].Re= 9.4884284824962217275157172480248845e-1, .Im= 3.15287817084564381264755184020032150e-1

    r[ 3649].Re= 9.4884284824962217275157172480248845e-1, .Im=-3.15287817084564381264755184020032150e-1

    r[ 3650].Re=-2.72609716116778866279446447151713050e-1, .Im= 9.6198527396414590384665643796324725e-1

    r[ 3651].Re=-2.72609716116778866279446447151713050e-1, .Im=-9.6198527396414590384665643796324725e-1

    r[ 3652].Re= 4.16225569020831853705999492376577100e-1, .Im= 9.0910149771206705260340186214307320e-1

    r[ 3653].Re= 4.16225569020831853705999492376577100e-1, .Im=-9.0910149771206705260340186214307320e-1

    r[ 3654].Re=-9.0424539280495253024128032848238945e-1, .Im= 4.26750119417417805856018730992218475e-1

    r[ 3655].Re=-9.0424539280495253024128032848238945e-1, .Im=-4.26750119417417805856018730992218475e-1

    r[ 3656].Re= 3.1275156504507323207420199651096481250e-2, .Im= 9.9936634232333765304190364986425265e-1

    r[ 3657].Re= 3.1275156504507323207420199651096481250e-2, .Im=-9.9936634232333765304190364986425265e-1

    r[ 3658].Re= 8.1394650581670779931897641290561295e-1, .Im= 5.8067763852566200988292166584869845e-1

    r[ 3659].Re= 8.1394650581670779931897641290561295e-1, .Im=-5.8067763852566200988292166584869845e-1

    r[ 3660].Re=-5.9213007568412689973769147400162180e-1, .Im= 8.0569016049499087017693454981781540e-1

    r[ 3661].Re=-5.9213007568412689973769147400162180e-1, .Im=-8.0569016049499087017693454981781540e-1

    r[ 3662].Re= 9.9980468141346701127503138195606875e-1, .Im= 1.95720764590063510401929391946396203125e-2

    r[ 3663].Re= 9.9980468141346701127503138195606875e-1, .Im=-1.95720764590063510401929391946396203125e-2

    r[ 3664].Re= 1.567718474292989772056472475014743375e-1, .Im= 9.8748497623220521379749925472424365e-1

    r[ 3665].Re= 1.567718474292989772056472475014743375e-1, .Im=-9.8748497623220521379749925472424365e-1

    r[ 3666].Re=-9.5000673281490222166212333831936120e-1, .Im= 3.11908597691412825536616537647205400e-1

    r[ 3667].Re=-9.5000673281490222166212333831936120e-1, .Im=-3.11908597691412825536616537647205400e-1

    r[ 3668].Re=-3.81331198862615849964896597157348875e-1, .Im= 9.2430560641202608174182842049049210e-1

    r[ 3669].Re=-3.81331198862615849964896597157348875e-1, .Im=-9.2430560641202608174182842049049210e-1

    r[ 3670].Re= 6.6633890298155162845716859010281040e-1, .Im= 7.4542954557244389679482310384628360e-1

    r[ 3671].Re= 6.6633890298155162845716859010281040e-1, .Im=-7.4542954557244389679482310384628360e-1

    r[ 3672].Re=-8.0456462492458180602028505745693105e-1, .Im= 5.9367124242026625413615192883298730e-1

    r[ 3673].Re=-8.0456462492458180602028505745693105e-1, .Im=-5.9367124242026625413615192883298730e-1

    r[ 3674].Re= 9.476916526270421359257056792557705e-1, .Im= 3.18772154312149058608127916158991850e-1

    r[ 3675].Re= 9.476916526270421359257056792557705e-1, .Im=-3.18772154312149058608127916158991850e-1

    r[ 3676].Re= 6.552738713410874438203279623849084375e-2, .Im= 9.9772013294722261544933417098945935e-1

    r[ 3677].Re= 6.552738713410874438203279623849084375e-2, .Im=-9.9772013294722261544933417098945935e-1

    r[ 3678].Re=-9.9881677820388015121011449082288890e-1, .Im= 4.6526714023862755786886680198222165625e-2

    r[ 3679].Re=-9.9881677820388015121011449082288890e-1, .Im=-4.6526714023862755786886680198222165625e-2

    r[ 3680].Re= 5.0314934623644780309348334412788970e-1, .Im= 8.640141915043573206389737606514245e-1

    r[ 3681].Re= 5.0314934623644780309348334412788970e-1, .Im=-8.640141915043573206389737606514245e-1

    r[ 3682].Re=-4.61257669688328320045656028014491300e-1, .Im= 8.8713238295221519269517784778145140e-1

    r[ 3683].Re=-4.61257669688328320045656028014491300e-1, .Im=-8.8713238295221519269517784778145140e-1

    r[ 3684].Re= 9.2360601227617045161366604588693005e-1, .Im= 3.82977168851070859378893374014296550e-1

    r[ 3685].Re= 9.2360601227617045161366604588693005e-1, .Im=-3.82977168851070859378893374014296550e-1

    r[ 3686].Re=-8.4924522255448009477873938521952365e-1, .Im= 5.2780404213837361915295787184732030e-1

    r[ 3687].Re=-8.4924522255448009477873938521952365e-1, .Im=-5.2780404213837361915295787184732030e-1

    r[ 3688].Re= 9.6348417608272285406201262958347795e-1, .Im= 2.67261783095564753320871886899112700e-1

    r[ 3689].Re= 9.6348417608272285406201262958347795e-1, .Im=-2.67261783095564753320871886899112700e-1

    r[ 3690].Re=-4.829559366634237488336012233958171875e-2, .Im= 9.9870196702392888266075487990747205e-1

    r[ 3691].Re=-4.829559366634237488336012233958171875e-2, .Im=-9.9870196702392888266075487990747205e-1

    r[ 3692].Re= 3.84795178700350071210323221748694775e-1, .Im= 9.2283430368817209732412720768479630e-1

    r[ 3693].Re= 3.84795178700350071210323221748694775e-1, .Im=-9.2283430368817209732412720768479630e-1

    r[ 3694].Re=-7.2936801215014634980349228499107990e-1, .Im= 6.8394673582713105819408383467816745e-1

    r[ 3695].Re=-7.2936801215014634980349228499107990e-1, .Im=-6.8394673582713105819408383467816745e-1

    r[ 3696].Re=-8.1675713903724478370804717997089025e-1, .Im= 5.7678004809704730426744845317443830e-1

    r[ 3697].Re=-8.1675713903724478370804717997089025e-1, .Im=-5.7678004809704730426744845317443830e-1

    r[ 3698].Re= 7.3524328587723464245584636955754830e-1, .Im= 6.7758074853797800596311162735219110e-1

    r[ 3699].Re= 7.3524328587723464245584636955754830e-1, .Im=-6.7758074853797800596311162735219110e-1

    r[ 3700].Re=-2.56085817945315874499812025533174150e-1, .Im= 9.6652032702685197751435453028534535e-1

    r[ 3701].Re=-2.56085817945315874499812025533174150e-1, .Im=-9.6652032702685197751435453028534535e-1

    r[ 3702].Re= 7.0638419817336528527818018119432960e-1, .Im= 7.0759643617772904899965169533970765e-1

    r[ 3703].Re= 7.0638419817336528527818018119432960e-1, .Im=-7.0759643617772904899965169533970765e-1

    r[ 3704].Re=-9.7063924514956667621845554094761610e-1, .Im= 2.4011939765468751084576126686442875e-1

    r[ 3705].Re=-9.7063924514956667621845554094761610e-1, .Im=-2.4011939765468751084576126686442875e-1

    r[ 3706].Re= 2.84464817821837023803510646757786150e-1, .Im= 9.5852759994855385450307494465960185e-1

    r[ 3707].Re= 2.84464817821837023803510646757786150e-1, .Im=-9.5852759994855385450307494465960185e-1

    r[ 3708].Re=-4.93532647863959172962466936951386725e-1, .Im= 8.6958379661599405352490066434256730e-1

    r[ 3709].Re=-4.93532647863959172962466936951386725e-1, .Im=-8.6958379661599405352490066434256730e-1

    r[ 3710].Re= 9.9428172357655375535046005097683515e-1, .Im= 1.0625997727743262399879853319362155000e-1

    r[ 3711].Re= 9.9428172357655375535046005097683515e-1, .Im=-1.0625997727743262399879853319362155000e-1

    r[ 3712].Re=-9.037304355712728609617556685407180e-1, .Im= 4.27859851580787042824027821552590450e-1

    r[ 3713].Re=-9.037304355712728609617556685407180e-1, .Im=-4.27859851580787042824027821552590450e-1

    r[ 3714].Re= 4.67835271165531918491353735589655100e-1, .Im= 8.8365322197744256005336183079634790e-1

    r[ 3715].Re= 4.67835271165531918491353735589655100e-1, .Im=-8.8365322197744256005336183079634790e-1

    r[ 3716].Re= 8.6562346379620380698582948753028175e-1, .Im= 5.0039472552812913619391110842116175e-1

    r[ 3717].Re= 8.6562346379620380698582948753028175e-1, .Im=-5.0039472552812913619391110842116175e-1

    r[ 3718].Re=-1.287888882918468980154358405343373250e-1, .Im= 9.9154701745863105255551772643229920e-1

    r[ 3719].Re=-1.287888882918468980154358405343373250e-1, .Im=-9.9154701745863105255551772643229920e-1

    r[ 3720].Re=-9.9148235355617753139512160487356595e-1, .Im= 1.294487568416185230280035511896130625e-1

    r[ 3721].Re=-9.9148235355617753139512160487356595e-1, .Im=-1.294487568416185230280035511896130625e-1

    r[ 3722].Re= 6.098170846774222386699193521053530e-1, .Im= 7.9235387641211918463568508741445835e-1

    r[ 3723].Re= 6.098170846774222386699193521053530e-1, .Im=-7.9235387641211918463568508741445835e-1

    r[ 3724].Re=-6.1556572841055645639585236494895070e-1, .Im= 7.8794673720910701764097439081524495e-1

    r[ 3725].Re=-6.1556572841055645639585236494895070e-1, .Im=-7.8794673720910701764097439081524495e-1

    r[ 3726].Re=-4.227002504267904012258405543889239062500e-3, .Im= 9.9985946284279403339922964732977560e-1

    r[ 3727].Re=-4.227002504267904012258405543889239062500e-3, .Im=-9.9985946284279403339922964732977560e-1

    r[ 3728].Re= 9.9884909393515386444306614066590555e-1, .Im= 4.7698930367165680299645913464701150000e-2

    r[ 3729].Re= 9.9884909393515386444306614066590555e-1, .Im=-4.7698930367165680299645913464701150000e-2

    r[ 3730].Re=-3.71113887557517063697787307319231325e-1, .Im= 9.2846228204892167212847198243252930e-1

    r[ 3731].Re=-3.71113887557517063697787307319231325e-1, .Im=-9.2846228204892167212847198243252930e-1

    r[ 3732].Re=-9.277637586717306650285763680585660e-1, .Im= 3.72868342952030806802810047884122450e-1

    r[ 3733].Re=-9.277637586717306650285763680585660e-1, .Im=-3.72868342952030806802810047884122450e-1

    r[ 3734].Re= 8.3134077846907183939606511557940390e-1, .Im= 5.5548026090479640792807458637980740e-1

    r[ 3735].Re= 8.3134077846907183939606511557940390e-1, .Im=-5.5548026090479640792807458637980740e-1

    r[ 3736].Re= 2.205034742738187503174884795953403125e-1, .Im= 9.7524603086544747743147354412940330e-1

    r[ 3737].Re= 2.205034742738187503174884795953403125e-1, .Im=-9.7524603086544747743147354412940330e-1

    r[ 3738].Re=-9.9941954666135279783389933072612620e-1, .Im= 3.06074661022159161261058102354581921875e-2

    r[ 3739].Re=-9.9941954666135279783389933072612620e-1, .Im=-3.06074661022159161261058102354581921875e-2

    r[ 3740].Re= 7.7223336527787322935978409077506510e-1, .Im= 6.3510108989834290760256862995447590e-1

    r[ 3741].Re= 7.7223336527787322935978409077506510e-1, .Im=-6.3510108989834290760256862995447590e-1

    r[ 3742].Re=-5.1573764583904369018796387535985555e-1, .Im= 8.5660656825060599306453923418303020e-1

    r[ 3743].Re=-5.1573764583904369018796387535985555e-1, .Im=-8.5660656825060599306453923418303020e-1

    r[ 3744].Re= 9.7856535542763067869742599214077925e-1, .Im= 2.053933131112266607942729024216532625e-1

    r[ 3745].Re= 9.7856535542763067869742599214077925e-1, .Im=-2.053933131112266607942729024216532625e-1

    r[ 3746].Re=-7.4834728780988080121261418753420e-1, .Im= 6.6314619752604286873065575491636990e-1

    r[ 3747].Re=-7.4834728780988080121261418753420e-1, .Im=-6.6314619752604286873065575491636990e-1

    r[ 3748].Re= 2.26472470530480529671280010006739750e-1, .Im= 9.7387613464733446821952611571759915e-1

    r[ 3749].Re= 2.26472470530480529671280010006739750e-1, .Im=-9.7387613464733446821952611571759915e-1

    r[ 3750].Re=-3.35603105370484378067175157411838875e-1, .Im= 9.4187894099515589996229891767143270e-1

    r[ 3751].Re=-3.35603105370484378067175157411838875e-1, .Im=-9.4187894099515589996229891767143270e-1

    r[ 3752].Re= 5.5508660282044930411871064279694110e-1, .Im= 8.3161029340328740389054473780561235e-1

    r[ 3753].Re= 5.5508660282044930411871064279694110e-1, .Im=-8.3161029340328740389054473780561235e-1

    r[ 3754].Re=-9.5593283963747699427671022931463085e-1, .Im= 2.93236441196533192954376545458217150e-1

    r[ 3755].Re=-9.5593283963747699427671022931463085e-1, .Im=-2.93236441196533192954376545458217150e-1

    r[ 3756].Re= 9.0424611046977021455717249409644860e-1, .Im= 4.26642540654504465180707484250888225e-1

    r[ 3757].Re= 9.0424611046977021455717249409644860e-1, .Im=-4.26642540654504465180707484250888225e-1

    r[ 3758].Re=-6.6721394256642108100407995152636430e-1, .Im= 7.4471225467283430621279194383532740e-1

    r[ 3759].Re=-6.6721394256642108100407995152636430e-1, .Im=-7.4471225467283430621279194383532740e-1

    r[ 3760].Re= 1.0213990263984379369688326733012217500e-1, .Im= 9.946323582536767959894064006221015e-1

    r[ 3761].Re= 1.0213990263984379369688326733012217500e-1, .Im=-9.946323582536767959894064006221015e-1

    r[ 3762].Re= 4.49338389478074973215626641831477150e-1, .Im= 8.931895396651801100063039484666660e-1

    r[ 3763].Re= 4.49338389478074973215626641831477150e-1, .Im=-8.931895396651801100063039484666660e-1

    r[ 3764].Re=-8.8053909698874732736584292069892395e-1, .Im= 4.73757193068951198977600824946421175e-1

    r[ 3765].Re=-8.8053909698874732736584292069892395e-1, .Im=-4.73757193068951198977600824946421175e-1

    r[ 3766].Re= 9.8879490588764895608875349353183990e-1, .Im= 1.487592629878228267514828075945843000e-1

    r[ 3767].Re= 9.8879490588764895608875349353183990e-1, .Im=-1.487592629878228267514828075945843000e-1

    r[ 3768].Re=-4.15024954919382793594451186436344850e-1, .Im= 9.0966893817241845088261698037968015e-1

    r[ 3769].Re=-4.15024954919382793594451186436344850e-1, .Im=-9.0966893817241845088261698037968015e-1

    r[ 3770].Re= 8.5053092739615698825161871354794125e-1, .Im= 5.2561195957758877206345005106413735e-1

    r[ 3771].Re= 8.5053092739615698825161871354794125e-1, .Im=-5.2561195957758877206345005106413735e-1

    r[ 3772].Re=-9.8146904409571922300870028266217555e-1, .Im= 1.910929165345173208478968263079877875e-1

    r[ 3773].Re=-9.8146904409571922300870028266217555e-1, .Im=-1.910929165345173208478968263079877875e-1

    r[ 3774].Re= 3.29915792788747774810786950183683075e-1, .Im= 9.4386309555647696090119325162959285e-1

    r[ 3775].Re= 3.29915792788747774810786950183683075e-1, .Im=-9.4386309555647696090119325162959285e-1

    r[ 3776].Re=-2.287455454349874017783150748073239750e-1, .Im= 9.7335532862069984449959747507818970e-1

    r[ 3777].Re=-2.287455454349874017783150748073239750e-1, .Im=-9.7335532862069984449959747507818970e-1

    r[ 3778].Re= 8.0677279815997526846160781133221460e-1, .Im= 5.9060574915011332386427511664805930e-1

    r[ 3779].Re= 8.0677279815997526846160781133221460e-1, .Im=-5.9060574915011332386427511664805930e-1

    r[ 3780].Re=-7.6278106502747389239260655813268385e-1, .Im= 6.4647296541498466826425328690675085e-1

    r[ 3781].Re=-7.6278106502747389239260655813268385e-1, .Im=-6.4647296541498466826425328690675085e-1

    r[ 3782].Re=-8.739473232030896265865038685660692500e-2, .Im= 9.9603360207440028162295675429049875e-1

    r[ 3783].Re=-8.739473232030896265865038685660692500e-2, .Im=-9.9603360207440028162295675429049875e-1

    r[ 3784].Re= 9.7266427143126432675046544318320225e-1, .Im= 2.316931049995957503373489316800259875e-1

    r[ 3785].Re= 9.7266427143126432675046544318320225e-1, .Im=-2.316931049995957503373489316800259875e-1

    r[ 3786].Re=-9.772648767317606566251697586267255e-1, .Im= 2.114849445091499802185097678375313875e-1

    r[ 3787].Re=-9.772648767317606566251697586267255e-1, .Im=-2.114849445091499802185097678375313875e-1

    r[ 3788].Re= 6.4132029771582910182559089662390760e-1, .Im= 7.6706275057576822629101798156625590e-1

    r[ 3789].Re= 6.4132029771582910182559089662390760e-1, .Im=-7.6706275057576822629101798156625590e-1

    r[ 3790].Re=-5.9016761427481823076846012554597105e-1, .Im= 8.0714465894314013638677351991645990e-1

    r[ 3791].Re=-5.9016761427481823076846012554597105e-1, .Im=-8.0714465894314013638677351991645990e-1

    r[ 3792].Re= 2.383841617600348516958774780505336750e-1, .Im= 9.7102652924246590782075827519292940e-1

    r[ 3793].Re= 2.383841617600348516958774780505336750e-1, .Im=-9.7102652924246590782075827519292940e-1

    r[ 3794].Re= 6.308222240697199112435811230170656875e-2, .Im= 9.9786301877844973962083940932643595e-1

    r[ 3795].Re= 6.308222240697199112435811230170656875e-2, .Im=-9.9786301877844973962083940932643595e-1

    r[ 3796].Re=-9.6792903083114034679113046877318990e-1, .Im= 2.50814394804814988493291139093344075e-1

    r[ 3797].Re=-9.6792903083114034679113046877318990e-1, .Im=-2.50814394804814988493291139093344075e-1

    r[ 3798].Re= 9.0633434576928828541042548749828710e-1, .Im= 4.22212346542139516092362327981390975e-1

    r[ 3799].Re= 9.0633434576928828541042548749828710e-1, .Im=-4.22212346542139516092362327981390975e-1

    r[ 3800].Re=-5.9902930664378251091051197363412935e-1, .Im= 8.0057940844586816808714502258226275e-1

    r[ 3801].Re=-5.9902930664378251091051197363412935e-1, .Im=-8.0057940844586816808714502258226275e-1

    r[ 3802].Re= 9.9727883804488726138259835352073420e-1, .Im= 7.33488476578948167539095948086469375e-2

    r[ 3803].Re= 9.9727883804488726138259835352073420e-1, .Im=-7.33488476578948167539095948086469375e-2

    r[ 3804].Re=-8.2098098823475340601873995183268560e-1, .Im= 5.7076534912804177679390704724937675e-1

    r[ 3805].Re=-8.2098098823475340601873995183268560e-1, .Im=-5.7076534912804177679390704724937675e-1

    r[ 3806].Re= 5.6423072268370844106755157554289325e-1, .Im= 8.2543889614369292395679167384514585e-1

    r[ 3807].Re= 5.6423072268370844106755157554289325e-1, .Im=-8.2543889614369292395679167384514585e-1

    r[ 3808].Re=-2.53703044263746846365137344037066200e-1, .Im= 9.6714663966725977761740296045900320e-1

    r[ 3809].Re=-2.53703044263746846365137344037066200e-1, .Im=-9.6714663966725977761740296045900320e-1

    r[ 3810].Re= 7.4837426156964037549101931290351785e-1, .Im= 6.6304497407355889038171881111338730e-1

    r[ 3811].Re= 7.4837426156964037549101931290351785e-1, .Im=-6.6304497407355889038171881111338730e-1

    r[ 3812].Re=-9.96426780985011473212864530069055e-1, .Im= 8.31916137153701634732172465191979375e-2

    r[ 3813].Re=-9.96426780985011473212864530069055e-1, .Im=-8.31916137153701634732172465191979375e-2

    r[ 3814].Re= 3.09026099367457951494486678711837150e-1, .Im= 9.508917501350021561634662248252425e-1

    r[ 3815].Re= 3.09026099367457951494486678711837150e-1, .Im=-9.508917501350021561634662248252425e-1

    r[ 3816].Re=-4.13902140032867349450640404029400075e-1, .Im= 9.1017920354193249110608121554832905e-1

    r[ 3817].Re=-4.13902140032867349450640404029400075e-1, .Im=-9.1017920354193249110608121554832905e-1

    r[ 3818].Re= 9.3533409075743767502331138530280440e-1, .Im= 3.53378343108569192843049222574336450e-1

    r[ 3819].Re= 9.3533409075743767502331138530280440e-1, .Im=-3.53378343108569192843049222574336450e-1

    r[ 3820].Re=-8.8570121140605151399682881674380040e-1, .Im= 4.64013800816482135935814312688307825e-1

    r[ 3821].Re=-8.8570121140605151399682881674380040e-1, .Im=-4.64013800816482135935814312688307825e-1

    r[ 3822].Re= 5.5815027906772740617924455364118330e-1, .Im= 8.2955502629932620362041006956133060e-1

    r[ 3823].Re= 5.5815027906772740617924455364118330e-1, .Im=-8.2955502629932620362041006956133060e-1

    r[ 3824].Re=-5.3197192379626070946052607268939025000e-2, .Im= 9.9845763430743827981928006920497860e-1

    r[ 3825].Re=-5.3197192379626070946052607268939025000e-2, .Im=-9.9845763430743827981928006920497860e-1

    r[ 3826].Re=-7.2852337415951751165010819022427310e-1, .Im= 6.848454161276746887665467511396855e-1

    r[ 3827].Re=-7.2852337415951751165010819022427310e-1, .Im=-6.848454161276746887665467511396855e-1

    r[ 3828].Re= 9.8077123696851231660076564367045645e-1, .Im= 1.946034000854222345555655238058534375e-1

    r[ 3829].Re= 9.8077123696851231660076564367045645e-1, .Im=-1.946034000854222345555655238058534375e-1

    r[ 3830].Re=-9.13507971130398180314990952410880703125e-3, .Im= 9.9983035838284006757703537004999815e-1

    r[ 3831].Re=-9.13507971130398180314990952410880703125e-3, .Im=-9.9983035838284006757703537004999815e-1

    r[ 3832].Re=-9.2076037443767133616745468316366895e-1, .Im= 3.8985037066024685881160394274047575e-1

    r[ 3833].Re=-9.2076037443767133616745468316366895e-1, .Im=-3.8985037066024685881160394274047575e-1

    r[ 3834].Re= 7.6439503420300214386884363193530585e-1, .Im= 6.445136115243991214995844529767055e-1

    r[ 3835].Re= 7.6439503420300214386884363193530585e-1, .Im=-6.445136115243991214995844529767055e-1

    r[ 3836].Re=-5.7722949296320413825611694846884345e-1, .Im= 8.1642881584363347080568473757011815e-1

    r[ 3837].Re=-5.7722949296320413825611694846884345e-1, .Im=-8.1642881584363347080568473757011815e-1

    r[ 3838].Re= 4.52604311528298219879928865339024900e-1, .Im= 8.9154028145518338099861921364208680e-1

    r[ 3839].Re= 4.52604311528298219879928865339024900e-1, .Im=-8.9154028145518338099861921364208680e-1

    r[ 3840].Re=-8.3063598806960359244300207137712275e-1, .Im= 5.5660332354272534782779757733806035e-1

    r[ 3841].Re=-8.3063598806960359244300207137712275e-1, .Im=-5.5660332354272534782779757733806035e-1

    r[ 3842].Re= 8.9895142633546565313906739902449770e-1, .Im= 4.37683361468680698358468816877575575e-1

    r[ 3843].Re= 8.9895142633546565313906739902449770e-1, .Im=-4.37683361468680698358468816877575575e-1

    r[ 3844].Re=-2.65529525728809168150235109351342525e-1, .Im= 9.6396953744179370016098573614726770e-1

    r[ 3845].Re=-2.65529525728809168150235109351342525e-1, .Im=-9.6396953744179370016098573614726770e-1

    r[ 3846].Re=-9.9600023811083937541610566768213175e-1, .Im= 8.806586751257466927356176711327861875e-2

    r[ 3847].Re=-9.9600023811083937541610566768213175e-1, .Im=-8.806586751257466927356176711327861875e-2

    r[ 3848].Re= 3.88194749085070289762455786330974650e-1, .Im= 9.2142436426761231693660647579235955e-1

    r[ 3849].Re= 3.88194749085070289762455786330974650e-1, .Im=-9.2142436426761231693660647579235955e-1

    r[ 3850].Re= 9.9996239912223727763773695187410335e-1, .Im= 8.5638447696552051635610069979520625000e-3

    r[ 3851].Re= 9.9996239912223727763773695187410335e-1, .Im=-8.5638447696552051635610069979520625000e-3

    r[ 3852].Re=-4.64499650948929199145709389995317900e-1, .Im= 8.8542980244846791748614123207516965e-1

    r[ 3853].Re=-4.64499650948929199145709389995317900e-1, .Im=-8.8542980244846791748614123207516965e-1

    r[ 3854].Re= 7.0291590494450240100832161260768770e-1, .Im= 7.1104151655226555117650377724203280e-1

    r[ 3855].Re= 7.0291590494450240100832161260768770e-1, .Im=-7.1104151655226555117650377724203280e-1

    r[ 3856].Re=-7.0375568951078759649675475884578190e-1, .Im= 7.1028165892289596428099684999324380e-1

    r[ 3857].Re=-7.0375568951078759649675475884578190e-1, .Im=-7.1028165892289596428099684999324380e-1

    r[ 3858].Re= 1.446677907762531634094926857869722875e-1, .Im= 9.8933243805228310296939753243350420e-1

    r[ 3859].Re= 1.446677907762531634094926857869722875e-1, .Im=-9.8933243805228310296939753243350420e-1

    r[ 3860].Re=-9.37901023198905003930292423319770e-1, .Im= 3.46602684074318712070805759140057475e-1

    r[ 3861].Re=-9.37901023198905003930292423319770e-1, .Im=-3.46602684074318712070805759140057475e-1

    r[ 3862].Re= 8.5690529185935038203325575523194855e-1, .Im= 5.1515769927194465793718336499296125e-1

    r[ 3863].Re= 8.5690529185935038203325575523194855e-1, .Im=-5.1515769927194465793718336499296125e-1

    r[ 3864].Re=-1.0445896208906715885156302192626753750e-1, .Im= 9.9440075703445229837740271250368095e-1

    r[ 3865].Re=-1.0445896208906715885156302192626753750e-1, .Im=-9.9440075703445229837740271250368095e-1

    r[ 3866].Re= 9.5628601367138132971490449563134460e-1, .Im= 2.91956679611432512455593268896336650e-1

    r[ 3867].Re= 9.5628601367138132971490449563134460e-1, .Im=-2.91956679611432512455593268896336650e-1

    r[ 3868].Re=-9.7432504473873937644867737617460075e-1, .Im= 2.246385491546121493389165379994665250e-1

    r[ 3869].Re=-9.7432504473873937644867737617460075e-1, .Im=-2.246385491546121493389165379994665250e-1

    r[ 3870].Re= 6.9766536697180658865846680782851760e-1, .Im= 7.1619280315728550689868825429584830e-1

    r[ 3871].Re= 6.9766536697180658865846680782851760e-1, .Im=-7.1619280315728550689868825429584830e-1

    r[ 3872].Re=-3.9374863415437721947398586053168400e-1, .Im= 9.19091277919301563592568982130615e-1

    r[ 3873].Re=-3.9374863415437721947398586053168400e-1, .Im=-9.19091277919301563592568982130615e-1

    r[ 3874].Re= 3.12516661931594996737260316876927375e-1, .Im= 9.4976486050560482432558728760341180e-1

    r[ 3875].Re= 3.12516661931594996737260316876927375e-1, .Im=-9.4976486050560482432558728760341180e-1

    r[ 3876].Re=-7.7608558540548899795652459943084975e-1, .Im= 6.3045988038522826624188155619776805e-1

    r[ 3877].Re=-7.7608558540548899795652459943084975e-1, .Im=-6.3045988038522826624188155619776805e-1

    r[ 3878].Re= 9.9153318086838182487952053634217005e-1, .Im= 1.293633660091839387984435916223446750e-1

    r[ 3879].Re= 9.9153318086838182487952053634217005e-1, .Im=-1.293633660091839387984435916223446750e-1

    r[ 3880].Re=-3.4711606094271979516818760203022975e-1, .Im= 9.3769653371268935071469741160399280e-1

    r[ 3881].Re=-3.4711606094271979516818760203022975e-1, .Im=-9.3769653371268935071469741160399280e-1

    r[ 3882].Re=-9.9950434218229600169536297471495345e-1, .Im= 2.81656134769983565457884822080814031250e-2

    r[ 3883].Re=-9.9950434218229600169536297471495345e-1, .Im=-2.81656134769983565457884822080814031250e-2

    r[ 3884].Re= 5.2208603294636868330513834735029375e-1, .Im= 8.5272195738389811037194476739387025e-1

    r[ 3885].Re= 5.2208603294636868330513834735029375e-1, .Im=-8.5272195738389811037194476739387025e-1

    r[ 3886].Re= 7.163735160302860116576795235232566250e-2, .Im= 9.9729931924988513003427215153351425e-1

    r[ 3887].Re= 7.163735160302860116576795235232566250e-2, .Im=-9.9729931924988513003427215153351425e-1

    r[ 3888].Re=-6.5248743318959201431539440818596630e-1, .Im= 7.5764068211757773507741831053863275e-1

    r[ 3889].Re=-6.5248743318959201431539440818596630e-1, .Im=-7.5764068211757773507741831053863275e-1

    r[ 3890].Re= 8.7228023037985191745491420078906230e-1, .Im= 4.88686221546298094065008399411453850e-1

    r[ 3891].Re= 8.7228023037985191745491420078906230e-1, .Im=-4.88686221546298094065008399411453850e-1

    r[ 3892].Re=-9.0476682949037923187063370278337970e-1, .Im= 4.25633649850259365710059000775800075e-1

    r[ 3893].Re=-9.0476682949037923187063370278337970e-1, .Im=-4.25633649850259365710059000775800075e-1

    r[ 3894].Re= 6.1271195621398055752848677002475595e-1, .Im= 7.9009876750625751551382336401729840e-1

    r[ 3895].Re= 6.1271195621398055752848677002475595e-1, .Im=-7.9009876750625751551382336401729840e-1

    r[ 3896].Re=-1.651349364407242170660339297683094625e-1, .Im= 9.8614523164183387482495390941039655e-1

    r[ 3897].Re=-1.651349364407242170660339297683094625e-1, .Im=-9.8614523164183387482495390941039655e-1

    r[ 3898].Re= 9.361838953992039913387657179555390e-1, .Im= 3.51081056158080773155205633884179400e-1

    r[ 3899].Re= 9.361838953992039913387657179555390e-1, .Im=-3.51081056158080773155205633884179400e-1

    r[ 3900].Re=-8.7047418172451418438839709779131225e-1, .Im= 4.91979697958820405556679133951547550e-1

    r[ 3901].Re=-8.7047418172451418438839709779131225e-1, .Im=-4.91979697958820405556679133951547550e-1

    r[ 3902].Re= 2.121281052223446539350959483272163125e-1, .Im= 9.7708795914416401995339356290060095e-1

    r[ 3903].Re= 2.121281052223446539350959483272163125e-1, .Im=-9.7708795914416401995339356290060095e-1

    r[ 3904].Re=-5.0520807505642795209865880678989920e-1, .Im= 8.6286104449829170714991732893395235e-1

    r[ 3905].Re=-5.0520807505642795209865880678989920e-1, .Im=-8.6286104449829170714991732893395235e-1

    r[ 3906].Re= 8.1465179509110319244769016222562640e-1, .Im= 5.7968785154334456777291961770970370e-1

    r[ 3907].Re= 8.1465179509110319244769016222562640e-1, .Im=-5.7968785154334456777291961770970370e-1

    r[ 3908].Re= 2.14858610934239198375639290361505109375e-2, .Im= 9.9963986571923690860330680152401325e-1

    r[ 3909].Re= 2.14858610934239198375639290361505109375e-2, .Im=-9.9963986571923690860330680152401325e-1

    r[ 3910].Re=-9.8625668791179665895185735280392690e-1, .Im= 1.645907889087994124821534569491632250e-1

    r[ 3911].Re=-9.8625668791179665895185735280392690e-1, .Im=-1.645907889087994124821534569491632250e-1

    r[ 3912].Re= 9.949171831056060621989445280632935e-1, .Im= 1.0017208531355878409208060020318953125e-1

    r[ 3913].Re= 9.949171831056060621989445280632935e-1, .Im=-1.0017208531355878409208060020318953125e-1

    r[ 3914].Re=-6.2517264878467770916614654197474010e-1, .Im= 7.8034709365613497134006593114463610e-1

    r[ 3915].Re=-6.2517264878467770916614654197474010e-1, .Im=-7.8034709365613497134006593114463610e-1

    r[ 3916].Re= 5.3352023430145267823832000431139020e-1, .Im= 8.4561327081943604699887373499223030e-1

    r[ 3917].Re= 5.3352023430145267823832000431139020e-1, .Im=-8.4561327081943604699887373499223030e-1

    r[ 3918].Re=-7.9502268913564400065752124646678565e-1, .Im= 6.0639816233824650471007089436170645e-1

    r[ 3919].Re=-7.9502268913564400065752124646678565e-1, .Im=-6.0639816233824650471007089436170645e-1

    r[ 3920].Re= 8.0240892071608171942642684371094215e-1, .Im= 5.9651068850041510938098099359194745e-1

    r[ 3921].Re= 8.0240892071608171942642684371094215e-1, .Im=-5.9651068850041510938098099359194745e-1

    r[ 3922].Re=-2.036390722954670717825820247526280500e-1, .Im= 9.7891935003375052382068588485708460e-1

    r[ 3923].Re=-2.036390722954670717825820247526280500e-1, .Im=-9.7891935003375052382068588485708460e-1

    r[ 3924].Re=-9.4207828460722231600499299020157195e-1, .Im= 3.35088368464910246746768507364322425e-1

    r[ 3925].Re=-9.4207828460722231600499299020157195e-1, .Im=-3.35088368464910246746768507364322425e-1

    r[ 3926].Re= 7.1585645248187901312775238693575370e-1, .Im= 6.980093010853980484142766727018170e-1

    r[ 3927].Re= 7.1585645248187901312775238693575370e-1, .Im=-6.980093010853980484142766727018170e-1

    r[ 3928].Re= 1.676380219649444835994245295296423125e-1, .Im= 9.8570176021003153010724417981691655e-1

    r[ 3929].Re= 1.676380219649444835994245295296423125e-1, .Im=-9.8570176021003153010724417981691655e-1

    r[ 3930].Re=-9.777934640081612505113639599585440e-1, .Im= 2.090953444661490245870538728922838250e-1

    r[ 3931].Re=-9.777934640081612505113639599585440e-1, .Im=-2.090953444661490245870538728922838250e-1

    r[ 3932].Re= 9.6668845675177073051287379712448455e-1, .Im= 2.55443398895019491146030077288742175e-1

    r[ 3933].Re= 9.6668845675177073051287379712448455e-1, .Im=-2.55443398895019491146030077288742175e-1

    r[ 3934].Re=-2.89063676980718331499531359440879875e-1, .Im= 9.5718151909918414155242771812481805e-1

    r[ 3935].Re=-2.89063676980718331499531359440879875e-1, .Im=-9.5718151909918414155242771812481805e-1

    r[ 3936].Re= 4.19549329245266722221430200079339550e-1, .Im= 9.075594828987451068158520683937240e-1

    r[ 3937].Re= 4.19549329245266722221430200079339550e-1, .Im=-9.075594828987451068158520683937240e-1

    r[ 3938].Re=-7.1066886573206389243750891182571645e-1, .Im= 7.0335959887111110244717337991460225e-1

    r[ 3939].Re=-7.1066886573206389243750891182571645e-1, .Im=-7.0335959887111110244717337991460225e-1

    r[ 3940].Re= 9.2776749211672804307227124809287485e-1, .Im= 3.7276346314082559052494048046355600e-1

    r[ 3941].Re= 9.2776749211672804307227124809287485e-1, .Im=-3.7276346314082559052494048046355600e-1

    r[ 3942].Re=-4.48156623137985710148001317065791225e-1, .Im= 8.9381063406957295125465634555439460e-1

    r[ 3943].Re=-4.48156623137985710148001317065791225e-1, .Im=-8.9381063406957295125465634555439460e-1

    r[ 3944].Re= 3.54076205415511935381545072232256625e-1, .Im= 9.3506464925365029294823671079939230e-1

    r[ 3945].Re= 3.54076205415511935381545072232256625e-1, .Im=-9.3506464925365029294823671079939230e-1

    r[ 3946].Re=-8.7227635652756141393382449678028930e-1, .Im= 4.88792481119359745189711929924669675e-1

    r[ 3947].Re=-8.7227635652756141393382449678028930e-1, .Im=-4.88792481119359745189711929924669675e-1

    r[ 3948].Re= 9.7624678356194061201733802590752020e-1, .Im= 2.161698524943064247949564560258295375e-1

    r[ 3949].Re= 9.7624678356194061201733802590752020e-1, .Im=-2.161698524943064247949564560258295375e-1

    r[ 3950].Re=-7.88537599188011140149967559409560625e-2, .Im= 9.9676010680081783554840058059198780e-1

    r[ 3951].Re=-7.88537599188011140149967559409560625e-2, .Im=-9.9676010680081783554840058059198780e-1

    r[ 3952].Re=-9.9823266458847970117318482152768410e-1, .Im= 5.7535738561712186645014099894979153125e-2

    r[ 3953].Re=-9.9823266458847970117318482152768410e-1, .Im=-5.7535738561712186645014099894979153125e-2

    r[ 3954].Re= 6.2234118791482884169852241029730065e-1, .Im= 7.8253672169527244140141419848077930e-1

    r[ 3955].Re= 6.2234118791482884169852241029730065e-1, .Im=-7.8253672169527244140141419848077930e-1

    r[ 3956].Re=-5.9607568748990513718410966248484325e-1, .Im= 8.0278778001374473394236019885283890e-1

    r[ 3957].Re=-5.9607568748990513718410966248484325e-1, .Im=-8.0278778001374473394236019885283890e-1

    r[ 3958].Re= 9.9771281980004433709297018140205180e-1, .Im= 6.724400416655726409054238956741755625e-2

    r[ 3959].Re= 9.9771281980004433709297018140205180e-1, .Im=-6.724400416655726409054238956741755625e-2

    r[ 3960].Re= 2.300389168839219455886535570243722750e-1, .Im= 9.7302630862034067416033167319255880e-1

    r[ 3961].Re= 2.300389168839219455886535570243722750e-1, .Im=-9.7302630862034067416033167319255880e-1

    r[ 3962].Re=-8.4205749701615240088159453080152160e-1, .Im= 5.3919094812083412371350732428254555e-1

    r[ 3963].Re=-8.4205749701615240088159453080152160e-1, .Im=-5.3919094812083412371350732428254555e-1

    r[ 3964].Re= 7.7687241358537417745822040160419415e-1, .Im= 6.2941251168093115264667858355096540e-1

    r[ 3965].Re= 7.7687241358537417745822040160419415e-1, .Im=-6.2941251168093115264667858355096540e-1

    r[ 3966].Re=-1.312151904796971524369553208089200750e-1, .Im= 9.9121414215178238471537497389363120e-1

    r[ 3967].Re=-1.312151904796971524369553208089200750e-1, .Im=-9.9121414215178238471537497389363120e-1

    r[ 3968].Re= 8.8342848688079844698961551330285145e-1, .Im= 4.68251565896420196555283155248616800e-1

    r[ 3969].Re= 8.8342848688079844698961551330285145e-1, .Im=-4.68251565896420196555283155248616800e-1

    r[ 3970].Re=-9.2822741643494433017025357912643810e-1, .Im= 3.71736053221893125719788031346979550e-1

    r[ 3971].Re=-9.2822741643494433017025357912643810e-1, .Im=-3.71736053221893125719788031346979550e-1

    r[ 3972].Re=-5.3345620919538883075716739767813120e-1, .Im= 8.4569532151650750328997219185112040e-1

    r[ 3973].Re=-5.3345620919538883075716739767813120e-1, .Im=-8.4569532151650750328997219185112040e-1

    r[ 3974].Re= 4.72163112114916627692906558877439225e-1, .Im= 8.8134113210962217177524280486977655e-1

    r[ 3975].Re= 4.72163112114916627692906558877439225e-1, .Im=-8.8134113210962217177524280486977655e-1

    r[ 3976].Re= 1.13091328160069018449185307417792500e-1, .Im= 9.9343682006057321132175275124609470e-1

    r[ 3977].Re= 1.13091328160069018449185307417792500e-1, .Im=-9.9343682006057321132175275124609470e-1

    r[ 3978].Re=-9.9472681953572250623807349256821905e-1, .Im= 1.0148235947867242923159381007280898750e-1

    r[ 3979].Re=-9.9472681953572250623807349256821905e-1, .Im=-1.0148235947867242923159381007280898750e-1

    r[ 3980].Re= 8.2169307394453450221760704152984540e-1, .Im= 5.6966534264994017622285582547192460e-1

    r[ 3981].Re= 8.2169307394453450221760704152984540e-1, .Im=-5.6966534264994017622285582547192460e-1

    r[ 3982].Re=-3.3674747624830153602815130398084875e-1, .Im= 9.4146637608225869353617554224911145e-1

    r[ 3983].Re=-3.3674747624830153602815130398084875e-1, .Im=-9.4146637608225869353617554224911145e-1

    r[ 3984].Re= 9.8841663915412214524991441066958940e-1, .Im= 1.51186678505247057424654144597298000e-1

    r[ 3985].Re= 9.8841663915412214524991441066958940e-1, .Im=-1.51186678505247057424654144597298000e-1

    r[ 3986].Re=-7.6437041368994662615676816130871880e-1, .Im= 6.4461453597247841962314396369038145e-1

    r[ 3987].Re=-7.6437041368994662615676816130871880e-1, .Im=-6.4461453597247841962314396369038145e-1

    r[ 3988].Re= 3.32219902264754951559666551474947475e-1, .Im= 9.430388739034193390509130949794780e-1

    r[ 3989].Re= 3.32219902264754951559666551474947475e-1, .Im=-9.430388739034193390509130949794780e-1

    r[ 3990].Re=-9.5805431318247036287516493757721035e-1, .Im= 2.86202794511722979908796560266637225e-1

    r[ 3991].Re=-9.5805431318247036287516493757721035e-1, .Im=-2.86202794511722979908796560266637225e-1

    r[ 3992].Re= 6.5346774902450921462815358609077520e-1, .Im= 7.5675433578514184063124048407189545e-1

    r[ 3993].Re= 6.5346774902450921462815358609077520e-1, .Im=-7.5675433578514184063124048407189545e-1

    r[ 3994].Re=-3.26348110257669909994859835933311825e-1, .Im= 9.4511019658204720172989254933781920e-1

    r[ 3995].Re=-3.26348110257669909994859835933311825e-1, .Im=-9.4511019658204720172989254933781920e-1

    r[ 3996].Re= 9.5263543283699314567769533823593515e-1, .Im= 3.03645053233673578585438690424780350e-1

    r[ 3997].Re= 9.5263543283699314567769533823593515e-1, .Im=-3.03645053233673578585438690424780350e-1

    r[ 3998].Re=-6.422140772691378174386045429855585e-1, .Im= 7.6636398043247377920295093645108860e-1

    r[ 3999].Re=-6.422140772691378174386045429855585e-1, .Im=-7.6636398043247377920295093645108860e-1

    r[ 4000].Re= 1.809072096500288773235354256030404875e-1, .Im= 9.8334832151783468923156306118471545e-1

    r[ 4001].Re= 1.809072096500288773235354256030404875e-1, .Im=-9.8334832151783468923156306118471545e-1

    r[ 4002].Re=-8.5116848662217592380585529099334960e-1, .Im= 5.2466954379107078043631418040604330e-1

    r[ 4003].Re=-8.5116848662217592380585529099334960e-1, .Im=-5.2466954379107078043631418040604330e-1

    r[ 4004].Re= 5.5203242192189649895084357922314665e-1, .Im= 8.3363005824998281934057331454823720e-1

    r[ 4005].Re= 5.5203242192189649895084357922314665e-1, .Im=-8.3363005824998281934057331454823720e-1

    r[ 4006].Re= 9.1394297123011114525326092916657215e-1, .Im= 4.05489045240517820278824956403695975e-1

    r[ 4007].Re= 9.1394297123011114525326092916657215e-1, .Im=-4.05489045240517820278824956403695975e-1

    r[ 4008].Re=-8.9625110123544959872532444933312945e-1, .Im= 4.43287144898689366989685822773026300e-1

    r[ 4009].Re=-8.9625110123544959872532444933312945e-1, .Im=-4.43287144898689366989685822773026300e-1

    r[ 4010].Re=-4.0961660615387196493486499093705787500e-2, .Im= 9.990341861938859535641199727251660e-1

    r[ 4011].Re=-4.0961660615387196493486499093705787500e-2, .Im=-9.990341861938859535641199727251660e-1

    r[ 4012].Re= 7.2688711453754484281830627878662195e-1, .Im= 6.8653655805389024457952018565265460e-1

    r[ 4013].Re= 7.2688711453754484281830627878662195e-1, .Im=-6.8653655805389024457952018565265460e-1

    r[ 4014].Re=-4.78552474320298182330901681780233025e-1, .Im= 8.7792926972988538647513223622809160e-1

    r[ 4015].Re=-4.78552474320298182330901681780233025e-1, .Im=-8.7792926972988538647513223622809160e-1

    r[ 4016].Re=-9.9083829064395756436312012738198970e-1, .Im= 1.343144723449497535128216441080439750e-1

    r[ 4017].Re=-9.9083829064395756436312012738198970e-1, .Im=-1.343144723449497535128216441080439750e-1

    r[ 4018].Re= 9.9998815975348209761364159930963065e-1, .Im= 4.893362093655809728909300559962502734375e-3

    r[ 4019].Re= 9.9998815975348209761364159930963065e-1, .Im=-4.893362093655809728909300559962502734375e-3

    r[ 4020].Re=-1.904386451336156638181051903302432000e-1, .Im= 9.8157519147706873141601136012468485e-1

    r[ 4021].Re=-1.904386451336156638181051903302432000e-1, .Im=-9.8157519147706873141601136012468485e-1

    r[ 4022].Re= 4.43860984487444099055863944158772925e-1, .Im= 8.9592562621921356669218994284165090e-1

    r[ 4023].Re= 4.43860984487444099055863944158772925e-1, .Im=-8.9592562621921356669218994284165090e-1

    r[ 4024].Re=-6.7718822878134143916639686722191980e-1, .Im= 7.3566231806551540817196155330748295e-1

    r[ 4025].Re=-6.7718822878134143916639686722191980e-1, .Im=-7.3566231806551540817196155330748295e-1

    r[ 4026].Re= 8.4469342874425179523711904039373620e-1, .Im= 5.3494886880855463395789684000192210e-1

    r[ 4027].Re= 8.4469342874425179523711904039373620e-1, .Im=-5.3494886880855463395789684000192210e-1

    r[ 4028].Re=-9.168924997999041703877765030483715e-1, .Im= 3.98868342103741946313988364636315950e-1

    r[ 4029].Re=-9.168924997999041703877765030483715e-1, .Im=-3.98868342103741946313988364636315950e-1

    r[ 4030].Re= 3.9849618046539386773119417739508206250e-2, .Im= 9.9907328364894609773472211600164880e-1

    r[ 4031].Re= 3.9849618046539386773119417739508206250e-2, .Im=-9.9907328364894609773472211600164880e-1

    r[ 4032].Re= 5.8625230946506501350512507997336795e-1, .Im= 8.0993756628020030507997262247954495e-1

    r[ 4033].Re= 5.8625230946506501350512507997336795e-1, .Im=-8.0993756628020030507997262247954495e-1

    r[ 4034].Re=-5.4685266409105270923873831634409725e-1, .Im= 8.3707940858433615982647779674152840e-1

    r[ 4035].Re=-5.4685266409105270923873831634409725e-1, .Im=-8.3707940858433615982647779674152840e-1

    r[ 4036].Re= 9.8353886476899410329366446603671645e-1, .Im= 1.801600263751050312599488734122132875e-1

    r[ 4037].Re= 9.8353886476899410329366446603671645e-1, .Im=-1.801600263751050312599488734122132875e-1

    r[ 4038].Re=-9.8459028632600464892021818741341120e-1, .Im= 1.742332569427978983256366518617141875e-1

    r[ 4039].Re=-9.8459028632600464892021818741341120e-1, .Im=-1.742332569427978983256366518617141875e-1

    r[ 4040].Re= 1.591916759645665979672202183792251125e-1, .Im= 9.8711263720499742291281108919065445e-1

    r[ 4041].Re= 1.591916759645665979672202183792251125e-1, .Im=-9.8711263720499742291281108919065445e-1

    r[ 4042].Re= 8.7878206162465466455557816516375165e-1, .Im= 4.7688412216062908699498734677035825e-1

    r[ 4043].Re= 8.7878206162465466455557816516375165e-1, .Im=-4.7688412216062908699498734677035825e-1

    r[ 4044].Re=-7.4263635038758402107106348921661265e-1, .Im= 6.6952398557389458666477821680018675e-1

    r[ 4045].Re=-7.4263635038758402107106348921661265e-1, .Im=-6.6952398557389458666477821680018675e-1

    r[ 4046].Re=-2.32335609689683919576452808541944250e-1, .Im= 9.7250700514761900805638106248807160e-1

    r[ 4047].Re=-2.32335609689683919576452808541944250e-1, .Im=-9.7250700514761900805638106248807160e-1

    r[ 4048].Re= 4.83992721673146497618489547676290375e-1, .Im= 8.7490651916609030180893569195177405e-1

    r[ 4049].Re= 4.83992721673146497618489547676290375e-1, .Im=-8.7490651916609030180893569195177405e-1

    r[ 4050].Re=-8.0091330033900942630964436830254270e-1, .Im= 5.985862038018582298448677647684235e-1

    r[ 4051].Re=-8.0091330033900942630964436830254270e-1, .Im=-5.985862038018582298448677647684235e-1

    r[ 4052].Re= 9.5190159775065419367479080392513420e-1, .Im= 3.059819784876593451450332850072300e-1

    r[ 4053].Re= 9.5190159775065419367479080392513420e-1, .Im=-3.059819784876593451450332850072300e-1

    r[ 4054].Re=-9.6446651841505059987724735037772915e-1, .Im= 2.63827344050556300558696420921478400e-1

    r[ 4055].Re=-9.6446651841505059987724735037772915e-1, .Im=-2.63827344050556300558696420921478400e-1

    r[ 4056].Re= 3.05536720542459394600598443503258725e-1, .Im= 9.5203462751791101403853190277004610e-1

    r[ 4057].Re= 3.05536720542459394600598443503258725e-1, .Im=-9.5203462751791101403853190277004610e-1

    r[ 4058].Re= 6.6450623530205255029557065427070480e-1, .Im= 7.4707372099447555413576083083171395e-1

    r[ 4059].Re= 6.6450623530205255029557065427070480e-1, .Im=-7.4707372099447555413576083083171395e-1

    r[ 4060].Re=-4.00485096178396893229489705845480775e-1, .Im= 9.1617634722283569637113487260648980e-1

    r[ 4061].Re=-4.00485096178396893229489705845480775e-1, .Im=-9.1617634722283569637113487260648980e-1

    r[ 4062].Re= 9.9912545096488336593409940178389660e-1, .Im= 4.1586408744403752235641036349989006250e-2

    r[ 4063].Re= 9.9912545096488336593409940178389660e-1, .Im=-4.1586408744403752235641036349989006250e-2

    r[ 4064].Re=-8.9948715874962414940085864145657975e-1, .Im= 4.36681513720765079877850212142220675e-1

    r[ 4065].Re=-8.9948715874962414940085864145657975e-1, .Im=-4.36681513720765079877850212142220675e-1

    r[ 4066].Re=-9.71560489095569246309480604395503125e-2, .Im= 9.9514392908348003885521393385715780e-1

    r[ 4067].Re=-9.71560489095569246309480604395503125e-2, .Im=-9.9514392908348003885521393385715780e-1

    r[ 4068].Re= 2.419370920614260234149384132251725500e-1, .Im= 9.7013691814289093606760161492275070e-1

    r[ 4069].Re= 2.419370920614260234149384132251725500e-1, .Im=-9.7013691814289093606760161492275070e-1

    r[ 4070].Re=-7.0113263531458602795254364536958745e-1, .Im= 7.1287509597108489334260639225249175e-1

    r[ 4071].Re=-7.0113263531458602795254364536958745e-1, .Im=-7.1287509597108489334260639225249175e-1

    r[ 4072].Re= 8.2653433293743505672068749845493580e-1, .Im= 5.6259286714074363544568768702447410e-1

    r[ 4073].Re= 8.2653433293743505672068749845493580e-1, .Im=-5.6259286714074363544568768702447410e-1

    r[ 4074].Re=-3.68839036276299103711551197193330150e-1, .Im= 9.2935394143680682965680261986562980e-1

    r[ 4075].Re=-3.68839036276299103711551197193330150e-1, .Im=-9.2935394143680682965680261986562980e-1

    r[ 4076].Re= 9.1344824038945371391662320093018930e-1, .Im= 4.06599529262925418748864103690721075e-1

    r[ 4077].Re= 9.1344824038945371391662320093018930e-1, .Im=-4.06599529262925418748864103690721075e-1

    r[ 4078].Re=-9.9955631266963385073154313431587070e-1, .Im= 2.572005719212058436062839916758093750e-2

    r[ 4079].Re=-9.9955631266963385073154313431587070e-1, .Im=-2.572005719212058436062839916758093750e-2

    r[ 4080].Re= 8.750001567713483474619806656846776250e-2, .Im= 9.9601793114310088750329441609210330e-1

    r[ 4081].Re= 8.750001567713483474619806656846776250e-2, .Im=-9.9601793114310088750329441609210330e-1

    r[ 4082].Re= 6.0103568645784422042055439305840990e-1, .Im= 7.9903256379986553614713784554623995e-1

    r[ 4083].Re= 6.0103568645784422042055439305840990e-1, .Im=-7.9903256379986553614713784554623995e-1

    r[ 4084].Re=-7.3104807545605698937407623816397970e-1, .Im= 6.821707727990553582486654704553075e-1

    r[ 4085].Re=-7.3104807545605698937407623816397970e-1, .Im=-6.821707727990553582486654704553075e-1

    r[ 4086].Re= 9.7035292018534036184718161166529170e-1, .Im= 2.412014277845421494905764348004595375e-1

    r[ 4087].Re= 9.7035292018534036184718161166529170e-1, .Im=-2.412014277845421494905764348004595375e-1

    r[ 4088].Re=-9.4167083202243728745628459364525040e-1, .Im= 3.36233874598365234387387090464471825e-1

    r[ 4089].Re=-9.4167083202243728745628459364525040e-1, .Im=-3.36233874598365234387387090464471825e-1

    r[ 4090].Re=-2.01603015723764780742222058051993359375e-2, .Im= 9.9965924968668151695538881540414875e-1

    r[ 4091].Re=-2.01603015723764780742222058051993359375e-2, .Im=-9.9965924968668151695538881540414875e-1

    r[ 4092].Re= 7.6043258275685432501234117808053265e-1, .Im= 6.4918345226208340470464008831186220e-1

    r[ 4093].Re= 7.6043258275685432501234117808053265e-1, .Im=-6.4918345226208340470464008831186220e-1

    r[ 4094].Re=-5.2826574309262042117296687138150445e-1, .Im= 8.489463927151407185434095481468830e-1

    r[ 4095].Re=-5.2826574309262042117296687138150445e-1, .Im=-8.489463927151407185434095481468830e-1

    r[ 4096].Re= 4.06170159421753607098537486308487125e-1, .Im= 9.1364116183935628612289292505010960e-1

    r[ 4097].Re= 4.06170159421753607098537486308487125e-1, .Im=-9.1364116183935628612289292505010960e-1

    r[ 4098].Re=-9.4962180914689897637259718976565635e-1, .Im= 3.13063327725927598166322241013403975e-1

    r[ 4099].Re=-9.4962180914689897637259718976565635e-1, .Im=-3.13063327725927598166322241013403975e-1

    r[ 4100].Re= 9.8628658014572501144812122220173475e-1, .Im= 1.644915721957487531046382400745642250e-1

    r[ 4101].Re= 9.8628658014572501144812122220173475e-1, .Im=-1.644915721957487531046382400745642250e-1

    r[ 4102].Re=-3.95984844113765666051563130167778575e-1, .Im= 9.1812006450442018579138903078273870e-1

    r[ 4103].Re=-3.95984844113765666051563130167778575e-1, .Im=-9.1812006450442018579138903078273870e-1

    r[ 4104].Re= 1.325415815398178209782997782895108625e-1, .Im= 9.9103217509506735805047128451406020e-1

    r[ 4105].Re= 1.325415815398178209782997782895108625e-1, .Im=-9.9103217509506735805047128451406020e-1

    r[ 4106].Re=-9.9737340579649935712325259373756125e-1, .Im= 7.098079200416572420717642444287775625e-2

    r[ 4107].Re=-9.9737340579649935712325259373756125e-1, .Im=-7.098079200416572420717642444287775625e-2

    r[ 4108].Re= 7.8830822904191899525017106498125940e-1, .Im= 6.1503344038378593428006979593192225e-1

    r[ 4109].Re= 7.8830822904191899525017106498125940e-1, .Im=-6.1503344038378593428006979593192225e-1

    r[ 4110].Re=-4.74235795251162772778741327783791325e-1, .Im= 8.8026595668155571683399784888024440e-1

    r[ 4111].Re=-4.74235795251162772778741327783791325e-1, .Im=-8.8026595668155571683399784888024440e-1

    r[ 4112].Re= 6.6176267320044290798364272632170465e-1, .Im= 7.4949637749720476875836538965813815e-1

    r[ 4113].Re= 6.6176267320044290798364272632170465e-1, .Im=-7.4949637749720476875836538965813815e-1

    r[ 4114].Re=-8.0312224794962727703051541539025490e-1, .Im= 5.9563866312624080823212580071412955e-1

    r[ 4115].Re=-8.0312224794962727703051541539025490e-1, .Im=-5.9563866312624080823212580071412955e-1

    r[ 4116].Re= 9.4083379612750139830978923782822675e-1, .Im= 3.38430392590693518428679453791119150e-1

    r[ 4117].Re= 9.4083379612750139830978923782822675e-1, .Im=-3.38430392590693518428679453791119150e-1

    r[ 4118].Re=-2.227800017789116071575961086637107625e-1, .Im= 9.7473655545039639136462028545793145e-1

    r[ 4119].Re=-2.227800017789116071575961086637107625e-1, .Im=-9.7473655545039639136462028545793145e-1

    r[ 4120].Re= 3.66637135981723094602102719363756475e-1, .Im= 9.3020370781228700618470384142710825e-1

    r[ 4121].Re= 3.66637135981723094602102719363756475e-1, .Im=-9.3020370781228700618470384142710825e-1

    r[ 4122].Re=-8.4468052462483178555174845314468255e-1, .Im= 5.3505443427239995912714221049100160e-1

    r[ 4123].Re=-8.4468052462483178555174845314468255e-1, .Im=-5.3505443427239995912714221049100160e-1

    r[ 4124].Re= 8.8570780277854155304595451525528915e-1, .Im= 4.63908762174814692791358083923114450e-1

    r[ 4125].Re= 8.8570780277854155304595451525528915e-1, .Im=-4.63908762174814692791358083923114450e-1

    r[ 4126].Re=-6.2802944468968957547616582814953285e-1, .Im= 7.7803130730640468470937776146456595e-1

    r[ 4127].Re=-6.2802944468968957547616582814953285e-1, .Im=-7.7803130730640468470937776146456595e-1

    r[ 4128].Re= 6.7812195370583927545027336236671540e-1, .Im= 7.3474119939610760265935596180497665e-1

    r[ 4129].Re= 6.7812195370583927545027336236671540e-1, .Im=-7.3474119939610760265935596180497665e-1

    r[ 4130].Re=-9.8801665299399765718391108748619440e-1, .Im= 1.536996855508137027612747260718606375e-1

    r[ 4131].Re=-9.8801665299399765718391108748619440e-1, .Im=-1.536996855508137027612747260718606375e-1

    r[ 4132].Re= 1.65782082585254585127554349810452546875e-2, .Im= 9.997309847260235082799795236496720e-1

    r[ 4133].Re= 1.65782082585254585127554349810452546875e-2, .Im=-9.997309847260235082799795236496720e-1

    r[ 4134].Re= 9.9332801521546421064101650699740275e-1, .Im= 1.1478679479068910895822597240112372500e-1

    r[ 4135].Re= 9.9332801521546421064101650699740275e-1, .Im=-1.1478679479068910895822597240112372500e-1

    r[ 4136].Re=-2.91413903027583853777571221144171425e-1, .Im= 9.5645754601818222528919477554154580e-1

    r[ 4137].Re=-2.91413903027583853777571221144171425e-1, .Im=-9.5645754601818222528919477554154580e-1

    r[ 4138].Re=-8.3806601644139222528906429943162945e-1, .Im= 5.4535982732209475898343953303992745e-1

    r[ 4139].Re=-8.3806601644139222528906429943162945e-1, .Im=-5.4535982732209475898343953303992745e-1

    r[ 4140].Re= 4.71076334262115592466102498292457300e-1, .Im= 8.8191303359938255646000015985919160e-1

    r[ 4141].Re= 4.71076334262115592466102498292457300e-1, .Im=-8.8191303359938255646000015985919160e-1

    r[ 4142].Re=-1.421304614736141058717322493976098375e-1, .Im= 9.8971816859975092484091874212026595e-1

    r[ 4143].Re=-1.421304614736141058717322493976098375e-1, .Im=-9.8971816859975092484091874212026595e-1

    r[ 4144].Re= 8.6067080068189572017445243545807895e-1, .Im= 5.0883908149458689784694342961302025e-1

    r[ 4145].Re= 8.6067080068189572017445243545807895e-1, .Im=-5.0883908149458689784694342961302025e-1

    r[ 4146].Re=-9.5263220224182376671961947067757135e-1, .Im= 3.03752690564146665685996140382485450e-1

    r[ 4147].Re=-9.5263220224182376671961947067757135e-1, .Im=-3.03752690564146665685996140382485450e-1

    r[ 4148].Re= 2.82121619576016058328349345174501650e-1, .Im= 9.5923536912954465716296681421226820e-1

    r[ 4149].Re= 2.82121619576016058328349345174501650e-1, .Im=-9.5923536912954465716296681421226820e-1

    r[ 4150].Re=-5.8422196913491331038414955401094630e-1, .Im= 8.1145215009453575127906788111431520e-1

    r[ 4151].Re=-5.8422196913491331038414955401094630e-1, .Im=-8.1145215009453575127906788111431520e-1

    r[ 4152].Re= 9.9832276095332461718356853452860375e-1, .Im= 5.7472902816353560462303562417218925000e-2

    r[ 4153].Re= 9.9832276095332461718356853452860375e-1, .Im=-5.7472902816353560462303562417218925000e-2

    r[ 4154].Re= 5.3971318666225520654933234254713170e-1, .Im= 8.416650221557322453236338333226740e-1

    r[ 4155].Re= 5.3971318666225520654933234254713170e-1, .Im=-8.416650221557322453236338333226740e-1

    r[ 4156].Re=-9.985673337147673578328976873308420e-1, .Im= 5.1421937214895185874752314703073350000e-2

    r[ 4157].Re=-9.985673337147673578328976873308420e-1, .Im=-5.1421937214895185874752314703073350000e-2

    r[ 4158].Re=-1.639281804681083365426985665180836750e-1, .Im= 9.8633779473137306315067007744801230e-1

    r[ 4159].Re=-1.639281804681083365426985665180836750e-1, .Im=-9.8633779473137306315067007744801230e-1

    r[ 4160].Re= 7.3273570761215756075301896999008020e-1, .Im= 6.8026949473878295382434089333401060e-1

    r[ 4161].Re= 7.3273570761215756075301896999008020e-1, .Im=-6.8026949473878295382434089333401060e-1

    r[ 4162].Re=-7.7993220641586558095070813578786325e-1, .Im= 6.2569402646779637144902608270058405e-1

    r[ 4163].Re=-7.7993220641586558095070813578786325e-1, .Im=-6.2569402646779637144902608270058405e-1

    r[ 4164].Re= 9.6283734265162068677312845466076395e-1, .Im= 2.69628646540425120914363787960610350e-1

    r[ 4165].Re= 9.6283734265162068677312845466076395e-1, .Im=-2.69628646540425120914363787960610350e-1

    r[ 4166].Re=-6.5804357037201188784791838770615865e-1, .Im= 7.5283044059697457051072433387162160e-1

    r[ 4167].Re=-6.5804357037201188784791838770615865e-1, .Im=-7.5283044059697457051072433387162160e-1

    r[ 4168].Re= 1.833255215855583708517428931372705750e-1, .Im= 9.8291292618271419723185999828274360e-1

    r[ 4169].Re= 1.833255215855583708517428931372705750e-1, .Im=-9.8291292618271419723185999828274360e-1

    r[ 4170].Re=-9.2499220590863040492024538252735510e-1, .Im= 3.79680724662113888712156040128320450e-1

    r[ 4171].Re=-9.2499220590863040492024538252735510e-1, .Im=-3.79680724662113888712156040128320450e-1

    r[ 4172].Re= 6.2138250297327746185516161858686245e-1, .Im= 7.8330743596930874073080985908745785e-1

    r[ 4173].Re= 6.2138250297327746185516161858686245e-1, .Im=-7.8330743596930874073080985908745785e-1

    r[ 4174].Re=-2.82029303488655347376123927460866975e-1, .Im= 9.5928196209225713442236838091048410e-1

    r[ 4175].Re=-2.82029303488655347376123927460866975e-1, .Im=-9.5928196209225713442236838091048410e-1

    r[ 4176].Re= 9.2867889357577704245727545639965680e-1, .Im= 3.70504105782940795776880804623942800e-1

    r[ 4177].Re= 9.2867889357577704245727545639965680e-1, .Im=-3.70504105782940795776880804623942800e-1

    r[ 4178].Re=-4.9033138561971045810139457898912950e-1, .Im= 8.714060298083445843531080754473805e-1

    r[ 4179].Re=-4.9033138561971045810139457898912950e-1, .Im=-8.714060298083445843531080754473805e-1

    r[ 4180].Re=-9.6637364100512812559173880799789910e-1, .Im= 2.56737785771415594204825083579635225e-1

    r[ 4181].Re=-9.6637364100512812559173880799789910e-1, .Im=-2.56737785771415594204825083579635225e-1

    r[ 4182].Re= 3.73465244628394033021834275132277975e-1, .Im= 9.2747640252913199354622975079109890e-1

    r[ 4183].Re= 3.73465244628394033021834275132277975e-1, .Im=-9.2747640252913199354622975079109890e-1

    r[ 4184].Re= 9.6793595815319777297958125927834770e-1, .Im= 2.50710887020962891469366695673670600e-1

    r[ 4185].Re= 9.6793595815319777297958125927834770e-1, .Im=-2.50710887020962891469366695673670600e-1

    r[ 4186].Re=-4.5863700401106689830132978613619340625e-2, .Im= 9.988154622766295398506031233409885e-1

    r[ 4187].Re=-4.5863700401106689830132978613619340625e-2, .Im=-9.988154622766295398506031233409885e-1

    r[ 4188].Re=-8.7703025409334256501381332782329990e-1, .Im= 4.80208308533535688233939708879915975e-1

    r[ 4189].Re=-8.7703025409334256501381332782329990e-1, .Im=-4.80208308533535688233939708879915975e-1

    r[ 4190].Re= 8.0604608399040600374974019359797235e-1, .Im= 5.9158465195539666758861585549311710e-1

    r[ 4191].Re= 8.0604608399040600374974019359797235e-1, .Im=-5.9158465195539666758861585549311710e-1

    r[ 4192].Re=-5.6315658675804269872600116286776025e-1, .Im= 8.2620482816970908235276738196262155e-1

    r[ 4193].Re=-5.6315658675804269872600116286776025e-1, .Im=-8.2620482816970908235276738196262155e-1

    r[ 4194].Re= 2.65624641934617156113773717152071175e-1, .Im= 9.639235095418605681061308132484555e-1

    r[ 4195].Re= 2.65624641934617156113773717152071175e-1, .Im=-9.639235095418605681061308132484555e-1

    r[ 4196].Re= 4.7183253009273118383504197481670415625e-2, .Im= 9.9875673942164933105658519707503725e-1

    r[ 4197].Re= 4.7183253009273118383504197481670415625e-2, .Im=-9.9875673942164933105658519707503725e-1

    r[ 4198].Re=-9.9299136333211801552778297264012505e-1, .Im= 1.1729416651014297479083126063414965625e-1

    r[ 4199].Re=-9.9299136333211801552778297264012505e-1, .Im=-1.1729416651014297479083126063414965625e-1

    r[ 4200].Re= 9.9618960077295903854377456809743305e-1, .Im= 8.676605271025009114005399624147685000e-2

    r[ 4201].Re= 9.9618960077295903854377456809743305e-1, .Im=-8.676605271025009114005399624147685000e-2

    r[ 4202].Re=-7.0895820723467817270346813529613425e-1, .Im= 7.0509843600035859711994135068380270e-1

    r[ 4203].Re=-7.0895820723467817270346813529613425e-1, .Im=-7.0509843600035859711994135068380270e-1

    r[ 4204].Re= 5.8029223486437597756548711913637815e-1, .Im= 8.1422679287811328130430865712696685e-1

    r[ 4205].Re= 5.8029223486437597756548711913637815e-1, .Im=-8.1422679287811328130430865712696685e-1

    r[ 4206].Re= 8.7525800604856807130005336148315105e-1, .Im= 4.83335720444460381628459799685515450e-1

    r[ 4207].Re= 8.7525800604856807130005336148315105e-1, .Im=-4.83335720444460381628459799685515450e-1

    r[ 4208].Re=-7.6119331347701502110680849000345915e-1, .Im= 6.483537518742755745293493419012520e-1

    r[ 4209].Re=-7.6119331347701502110680849000345915e-1, .Im=-6.483537518742755745293493419012520e-1

    r[ 4210].Re=-8.006898098939728425360584651571116250e-2, .Im= 9.9665565927344146324173834727844220e-1

    r[ 4211].Re=-8.006898098939728425360584651571116250e-2, .Im=-9.9665565927344146324173834727844220e-1

    r[ 4212].Re=-9.6082324420159403999264213780406860e-1, .Im= 2.7679075679697445755422791080491150e-1

    r[ 4213].Re=-9.6082324420159403999264213780406860e-1, .Im=-2.7679075679697445755422791080491150e-1

    r[ 4214].Re= 7.6987993541606014602507457311730830e-1, .Im= 6.3792951116717466764072241858229970e-1

    r[ 4215].Re= 7.6987993541606014602507457311730830e-1, .Im=-6.3792951116717466764072241858229970e-1

    r[ 4216].Re=-4.33879051594004250258507227044901800e-1, .Im= 9.0084347263978969966302656757761720e-1

    r[ 4217].Re=-4.33879051594004250258507227044901800e-1, .Im=-9.0084347263978969966302656757761720e-1

    r[ 4218].Re= 4.20669217304479536867489741780445900e-1, .Im= 9.0704261724891099838430363888619465e-1

    r[ 4219].Re= 4.20669217304479536867489741780445900e-1, .Im=-9.0704261724891099838430363888619465e-1

    r[ 4220].Re= 9.7517244230680033556524222149164415e-1, .Im= 2.209586169065713978643117343381163625e-1

    r[ 4221].Re= 9.7517244230680033556524222149164415e-1, .Im=-2.209586169065713978643117343381163625e-1

    r[ 4222].Re=-9.0839673685400901259612282956368285e-1, .Im= 4.17862032336110245100968541009933675e-1

    r[ 4223].Re=-9.0839673685400901259612282956368285e-1, .Im=-4.17862032336110245100968541009933675e-1

    r[ 4224].Re= 9.846932425795480725572161873060395000e-2, .Im= 9.9500234862512904054909768092329610e-1

    r[ 4225].Re= 9.846932425795480725572161873060395000e-2, .Im=-9.9500234862512904054909768092329610e-1

    r[ 4226].Re=-3.5971165680743527603979714513116050e-1, .Im= 9.3293800486317568498861874104477465e-1

    r[ 4227].Re=-3.5971165680743527603979714513116050e-1, .Im=-9.3293800486317568498861874104477465e-1

    r[ 4228].Re= 6.9415701328940482284224344766698775e-1, .Im= 7.1959760059475974536269404779886825e-1

    r[ 4229].Re= 6.9415701328940482284224344766698775e-1, .Im=-7.1959760059475974536269404779886825e-1

    r[ 4230].Re= 9.0268414612830050192116004836861975e-1, .Im= 4.29953655344861185305660455924225950e-1

    r[ 4231].Re= 9.0268414612830050192116004836861975e-1, .Im=-4.29953655344861185305660455924225950e-1

    r[ 4232].Re=-9.9971806026335496841994654459995215e-1, .Im= 1.83660761918562967509593875092832593750e-2

    r[ 4233].Re=-9.9971806026335496841994654459995215e-1, .Im=-1.83660761918562967509593875092832593750e-2

    r[ 4234].Re=-6.626412744796270626324030672549270e-1, .Im= 7.487853400445757534598101301526185e-1

    r[ 4235].Re=-6.626412744796270626324030672549270e-1, .Im=-7.487853400445757534598101301526185e-1

    r[ 4236].Re= 5.0843036084616866077112717903219160e-1, .Im= 8.6091755245260104256743716177879830e-1

    r[ 4237].Re= 5.0843036084616866077112717903219160e-1, .Im=-8.6091755245260104256743716177879830e-1

    r[ 4238].Re=-3.49398413891737924519276248247479075e-1, .Im= 9.3683816240558859256282175920205190e-1

    r[ 4239].Re=-3.49398413891737924519276248247479075e-1, .Im=-9.3683816240558859256282175920205190e-1

    r[ 4240].Re= 9.9948581271672443104847616268671115e-1, .Im= 3.180182388264665704902256493369350000e-2

    r[ 4241].Re= 9.9948581271672443104847616268671115e-1, .Im=-3.180182388264665704902256493369350000e-2

    r[ 4242].Re=-8.2375818379911336375442942880908955e-1, .Im= 5.667338426187026323432860408502165e-1

    r[ 4243].Re=-8.2375818379911336375442942880908955e-1, .Im=-5.667338426187026323432860408502165e-1

    r[ 4244].Re= 2.54991525904427085436054767342284300e-1, .Im= 9.6678644641125854874985634523909535e-1

    r[ 4245].Re= 2.54991525904427085436054767342284300e-1, .Im=-9.6678644641125854874985634523909535e-1

    r[ 4246].Re=-2.406512701227076500565260630537522875e-1, .Im= 9.7048318305461800381550574456923640e-1

    r[ 4247].Re=-2.406512701227076500565260630537522875e-1, .Im=-9.7048318305461800381550574456923640e-1

    r[ 4248].Re=-8.6129219379689081481643597726360890e-1, .Im= 5.0788833141989275787864244193769990e-1

    r[ 4249].Re=-8.6129219379689081481643597726360890e-1, .Im=-5.0788833141989275787864244193769990e-1

    r[ 4250].Re= 8.374028232032637575343869684729725e-1, .Im= 5.4628291442837850766522933554369955e-1

    r[ 4251].Re= 8.374028232032637575343869684729725e-1, .Im=-5.4628291442837850766522933554369955e-1

    r[ 4252].Re= 4.62413860164550938325334072942496275e-1, .Im= 8.8650227462287511936978035009815355e-1

    r[ 4253].Re= 4.62413860164550938325334072942496275e-1, .Im=-8.8650227462287511936978035009815355e-1

    r[ 4254].Re=-9.8262028078693441912605521793011575e-1, .Im= 1.85077633143330921861036131303990250e-1

    r[ 4255].Re=-9.8262028078693441912605521793011575e-1, .Im=-1.85077633143330921861036131303990250e-1

    r[ 4256].Re= 9.8331021256322193035970258279121480e-1, .Im= 1.813676440993006733215509029832901375e-1

    r[ 4257].Re= 9.8331021256322193035970258279121480e-1, .Im=-1.813676440993006733215509029832901375e-1

    r[ 4258].Re=-1.397201921047057093794308002543402750e-1, .Im= 9.9006118514457852608501298163901080e-1

    r[ 4259].Re=-1.397201921047057093794308002543402750e-1, .Im=-9.9006118514457852608501298163901080e-1

    r[ 4260].Re=-6.1265748354839155709328224475029855e-1, .Im= 7.9019126468097533599888038224889895e-1

    r[ 4261].Re=-6.1265748354839155709328224475029855e-1, .Im=-7.9019126468097533599888038224889895e-1

    r[ 4262].Re= 6.7541629533087343961739179576397870e-1, .Im= 7.3721278304341952836153950556763445e-1

    r[ 4263].Re= 6.7541629533087343961739179576397870e-1, .Im=-7.3721278304341952836153950556763445e-1

    r[ 4264].Re=-9.3489794851134910835810387652600180e-1, .Im= 3.54617608996661004550077223029802550e-1

    r[ 4265].Re=-9.3489794851134910835810387652600180e-1, .Im=-3.54617608996661004550077223029802550e-1

    r[ 4266].Re= 3.4944633660954939335940849787220940625e-2, .Im= 9.9925944785974274431339381408179175e-1

    r[ 4267].Re= 3.4944633660954939335940849787220940625e-2, .Im=-9.9925944785974274431339381408179175e-1

    r[ 4268].Re= 9.4450764854674806869638814532663670e-1, .Im= 3.28049028148218957401383022443042125e-1

    r[ 4269].Re= 9.4450764854674806869638814532663670e-1, .Im=-3.28049028148218957401383022443042125e-1

    r[ 4270].Re=-5.1153343981957877240063226054189725e-1, .Im= 8.5913281531514174016450624549179335e-1

    r[ 4271].Re=-5.1153343981957877240063226054189725e-1, .Im=-8.5913281531514174016450624549179335e-1

    r[ 4272].Re= 4.31744371881689459335973424458643400e-1, .Im= 9.0182154141689052639918600107193920e-1

    r[ 4273].Re= 4.31744371881689459335973424458643400e-1, .Im=-9.0182154141689052639918600107193920e-1

    r[ 4274].Re=-9.9662337517345067627871912918635640e-1, .Im= 8.07368704237673984192014131622272500e-2

    r[ 4275].Re=-9.9662337517345067627871912918635640e-1, .Im=-8.07368704237673984192014131622272500e-2

    r[ 4276].Re= 8.1677508382398134045843107742257415e-1, .Im= 5.7667525240472561343096913333283735e-1

    r[ 4277].Re= 8.1677508382398134045843107742257415e-1, .Im=-5.7667525240472561343096913333283735e-1

    r[ 4278].Re=-1.952512549948394460219702750691794750e-1, .Im= 9.8062236760831378301617178294691255e-1

    r[ 4279].Re=-1.952512549948394460219702750691794750e-1, .Im=-9.8062236760831378301617178294691255e-1

    r[ 4280].Re= 3.46057322146076484781218596253893325e-1, .Im= 9.3805661245830140870793911744840440e-1

    r[ 4281].Re= 3.46057322146076484781218596253893325e-1, .Im=-9.3805661245830140870793911744840440e-1

    r[ 4282].Re=-7.4754022606451431265384144353447480e-1, .Im= 6.6405540130381657260016936561441980e-1

    r[ 4283].Re=-7.4754022606451431265384144353447480e-1, .Im=-6.6405540130381657260016936561441980e-1

    r[ 4284].Re= 9.2124221593253119433342135380371470e-1, .Im= 3.88627373904411543836801001816638725e-1

    r[ 4285].Re= 9.2124221593253119433342135380371470e-1, .Im=-3.88627373904411543836801001816638725e-1

    r[ 4286].Re=-6.914712116078454151590904075419530e-1, .Im= 7.2225573324204683789417913430952465e-1

    r[ 4287].Re=-6.914712116078454151590904075419530e-1, .Im=-7.2225573324204683789417913430952465e-1

    r[ 4288].Re= 6.261685906596633488518932608712930e-1, .Im= 7.794882308589717867519652827468235e-1

    r[ 4289].Re= 6.261685906596633488518932608712930e-1, .Im=-7.794882308589717867519652827468235e-1

    r[ 4290].Re=-7.9129472960983460172457171211135570e-1, .Im= 6.1125656710484732592192358424654230e-1

    r[ 4291].Re=-7.9129472960983460172457171211135570e-1, .Im=-6.1125656710484732592192358424654230e-1

    r[ 4292].Re= 9.9120136969484551325848542546737005e-1, .Im= 1.317888230729346576985960837191669250e-1

    r[ 4293].Re= 9.9120136969484551325848542546737005e-1, .Im=-1.317888230729346576985960837191669250e-1

    r[ 4294].Re=-9.7460302419006394902822876247228120e-1, .Im= 2.234371739035550252783224323138711000e-1

    r[ 4295].Re=-9.7460302419006394902822876247228120e-1, .Im=-2.234371739035550252783224323138711000e-1

    r[ 4296].Re= 1.4223195106399866283197752636624500e-1, .Im= 9.8969249116995461346135698477155525e-1

    r[ 4297].Re= 1.4223195106399866283197752636624500e-1, .Im=-9.8969249116995461346135698477155525e-1

    r[ 4298].Re=-9.227048745823052122716489975573495000e-2, .Im= 9.9560303582063258698298113813507370e-1

    r[ 4299].Re=-9.227048745823052122716489975573495000e-2, .Im=-9.9560303582063258698298113813507370e-1

    r[ 4300].Re= 7.401947802156445543886320592719130e-1, .Im= 6.7216086421624543500996651346213180e-1

    r[ 4301].Re= 7.401947802156445543886320592719130e-1, .Im=-6.7216086421624543500996651346213180e-1

    r[ 4302].Re=-8.9020111480941677140066303763887840e-1, .Im= 4.55327269312785665178466842917259775e-1

    r[ 4303].Re=-8.9020111480941677140066303763887840e-1, .Im=-4.55327269312785665178466842917259775e-1

    r[ 4304].Re= 2.96181730480442106934191315303905850e-1, .Im= 9.5497316030418599730467121844412755e-1

    r[ 4305].Re= 2.96181730480442106934191315303905850e-1, .Im=-9.5497316030418599730467121844412755e-1

    r[ 4306].Re= 9.6447288823198717988560701996902935e-1, .Im= 2.63726441782343445918712632192182350e-1

    r[ 4307].Re= 9.6447288823198717988560701996902935e-1, .Im=-2.63726441782343445918712632192182350e-1

    r[ 4308].Re=-4.51443937578625942297350093213026400e-1, .Im= 8.9217156949679765620686566762742585e-1

    r[ 4309].Re=-4.51443937578625942297350093213026400e-1, .Im=-8.9217156949679765620686566762742585e-1

    r[ 4310].Re= 7.5402539242579258438325950919534075e-1, .Im= 6.5659118801856264369121163326781240e-1

    r[ 4311].Re= 7.5402539242579258438325950919534075e-1, .Im=-6.5659118801856264369121163326781240e-1

    r[ 4312].Re=-9.9937951758974075122665681192302145e-1, .Im= 3.183996556076351680530933663249015625e-2

    r[ 4313].Re=-9.9937951758974075122665681192302145e-1, .Im=-3.183996556076351680530933663249015625e-2

    r[ 4314].Re=-2.96088350913978559653116917615989200e-1, .Im= 9.550239188043821991769277701678220e-1

    r[ 4315].Re=-2.96088350913978559653116917615989200e-1, .Im=-9.550239188043821991769277701678220e-1

    r[ 4316].Re= 5.4794906632223172593398885510396210e-1, .Im= 8.3633161340425909990869968169135970e-1

    r[ 4317].Re= 5.4794906632223172593398885510396210e-1, .Im=-8.3633161340425909990869968169135970e-1

    r[ 4318].Re=-5.6010995185768464033060354267945510e-1, .Im= 8.2828172809095301776238784441375170e-1

    r[ 4319].Re=-5.6010995185768464033060354267945510e-1, .Im=-8.2828172809095301776238784441375170e-1

    r[ 4320].Re= 9.9708708996206585339905359433032570e-1, .Im= 7.578829039376455689591693953843786875e-2

    r[ 4321].Re= 9.9708708996206585339905359433032570e-1, .Im=-7.578829039376455689591693953843786875e-2

    r[ 4322].Re=-9.1835661944551194579844377585686740e-1, .Im= 3.95482477719617808720187213111785225e-1

    r[ 4323].Re=-9.1835661944551194579844377585686740e-1, .Im=-3.95482477719617808720187213111785225e-1

    r[ 4324].Re= 1.1673411290643052884430375115698552500e-1, .Im= 9.9302793361315888631679626996628940e-1

    r[ 4325].Re= 1.1673411290643052884430375115698552500e-1, .Im=-9.9302793361315888631679626996628940e-1

    r[ 4326].Re=-3.0106634982472058742475340409328054687500e-3, .Im= 9.9986769468915359659888508758740495e-1

    r[ 4327].Re=-3.0106634982472058742475340409328054687500e-3, .Im=-9.9986769468915359659888508758740495e-1

    r[ 4328].Re= 8.4925388283645231179974643964669665e-1, .Im= 5.2770073532170114205541722185444085e-1

    r[ 4329].Re= 8.4925388283645231179974643964669665e-1, .Im=-5.2770073532170114205541722185444085e-1

    r[ 4330].Re=-7.8677443706615646235036365396808830e-1, .Im= 6.170513301515603288294187223073095e-1

    r[ 4331].Re=-7.8677443706615646235036365396808830e-1, .Im=-6.170513301515603288294187223073095e-1

    r[ 4332].Re= 5.7529381993248185356293333825306035e-1, .Im= 8.1776552228136012434589474651147610e-1

    r[ 4333].Re= 5.7529381993248185356293333825306035e-1, .Im=-8.1776552228136012434589474651147610e-1

    r[ 4334].Re=-9.6478196583435360533798075266531665e-1, .Im= 2.6265133953070357586412342243420425e-1

    r[ 4335].Re=-9.6478196583435360533798075266531665e-1, .Im=-2.6265133953070357586412342243420425e-1

    r[ 4336].Re= 8.9463385002062678630352365871658545e-1, .Im= 4.46467472253540220705758656549733125e-1

    r[ 4337].Re= 8.9463385002062678630352365871658545e-1, .Im=-4.46467472253540220705758656549733125e-1

    r[ 4338].Re=-4.27248174428022819970607315553934300e-1, .Im= 9.0399964726903758727161175556830130e-1

    r[ 4339].Re=-4.27248174428022819970607315553934300e-1, .Im=-9.0399964726903758727161175556830130e-1

    r[ 4340].Re= 2.025468305360053067332160026126075500e-1, .Im= 9.7913511768901284604282864165725185e-1

    r[ 4341].Re= 2.025468305360053067332160026126075500e-1, .Im=-9.7913511768901284604282864165725185e-1

    r[ 4342].Re=-6.3182757043988191369976448186207560e-1, .Im= 7.7495247890168583726477891104877925e-1

    r[ 4343].Re=-6.3182757043988191369976448186207560e-1, .Im=-7.7495247890168583726477891104877925e-1

    r[ 4344].Re= 9.4207713398681847127846822331775910e-1, .Im= 3.34984418209470946603545371544896600e-1

    r[ 4345].Re= 9.4207713398681847127846822331775910e-1, .Im=-3.34984418209470946603545371544896600e-1

    r[ 4346].Re=-9.9368990919231225955599029475706625e-1, .Im= 1.1121045099114577892063238095943233750e-1

    r[ 4347].Re=-9.9368990919231225955599029475706625e-1, .Im=-1.1121045099114577892063238095943233750e-1

    r[ 4348].Re= 5.2729899146856906710922885395120825e-1, .Im= 8.4950751556245074347373247292125595e-1

    r[ 4349].Re= 5.2729899146856906710922885395120825e-1, .Im=-8.4950751556245074347373247292125595e-1

    r[ 4350].Re=-2.73796533510164863400859758257865900e-1, .Im= 9.6165047109991241836013387001003135e-1

    r[ 4351].Re=-2.73796533510164863400859758257865900e-1, .Im=-9.6165047109991241836013387001003135e-1

    r[ 4352].Re= 3.6207983496157380987057194943190550e-1, .Im= 9.3197997026939705111914236113079820e-1

    r[ 4353].Re= 3.6207983496157380987057194943190550e-1, .Im=-9.3197997026939705111914236113079820e-1

    r[ 4354].Re=-8.7346978255895690868015890373499130e-1, .Im= 4.86640037768079403157628348708385600e-1

    r[ 4355].Re=-8.7346978255895690868015890373499130e-1, .Im=-4.86640037768079403157628348708385600e-1

    r[ 4356].Re= 9.8986765155692324480440902334521520e-1, .Im= 1.414962350486133890736795137854642125e-1

    r[ 4357].Re= 9.8986765155692324480440902334521520e-1, .Im=-1.414962350486133890736795137854642125e-1

    r[ 4358].Re=-3.88111774473190007661571598873706525e-1, .Im= 9.2148621107248496198138809631927870e-1

    r[ 4359].Re=-3.88111774473190007661571598873706525e-1, .Im=-9.2148621107248496198138809631927870e-1

    r[ 4360].Re= 7.8071369894746411866037760773906480e-1, .Im= 6.2464307149520625905836368474410845e-1

    r[ 4361].Re= 7.8071369894746411866037760773906480e-1, .Im=-6.2464307149520625905836368474410845e-1

    r[ 4362].Re=-8.1177715068234412854053516639396545e-1, .Im= 5.8377441773824767512479638753575270e-1

    r[ 4363].Re=-8.1177715068234412854053516639396545e-1, .Im=-5.8377441773824767512479638753575270e-1

    r[ 4364].Re=-6.297627075247391736922963900724425625e-2, .Im= 9.978735226956091386441016766184475e-1

    r[ 4365].Re=-6.297627075247391736922963900724425625e-2, .Im=-9.978735226956091386441016766184475e-1

    r[ 4366].Re= 9.1094078879394346781595004358678120e-1, .Im= 4.12187123415303002804677134918165375e-1

    r[ 4367].Re= 9.1094078879394346781595004358678120e-1, .Im=-4.12187123415303002804677134918165375e-1

    r[ 4368].Re=-9.8664887712794269170046845829347145e-1, .Im= 1.621625470889005993235798541718395375e-1

    r[ 4369].Re=-9.8664887712794269170046845829347145e-1, .Im=-1.621625470889005993235798541718395375e-1

    r[ 4370].Re= 2.51440363629633401032492656668182450e-1, .Im= 9.6773192027777876766947429132414980e-1

    r[ 4371].Re= 2.51440363629633401032492656668182450e-1, .Im=-9.6773192027777876766947429132414980e-1

    r[ 4372].Re=-5.8619606584328787235449453874025490e-1, .Im= 8.1002695399358226602259946957929055e-1

    r[ 4373].Re=-5.8619606584328787235449453874025490e-1, .Im=-8.1002695399358226602259946957929055e-1

    r[ 4374].Re= 7.1243816628627987252997399991727430e-1, .Im= 7.0150879654374775906688910254160870e-1

    r[ 4375].Re= 7.1243816628627987252997399991727430e-1, .Im=-7.0150879654374775906688910254160870e-1

    r[ 4376].Re=-7.7142832616927403677209440502338110e-1, .Im= 6.3613892582179165646749652296421115e-1

    r[ 4377].Re=-7.7142832616927403677209440502338110e-1, .Im=-6.3613892582179165646749652296421115e-1

    r[ 4378].Re= 9.9969706817456849279324160306714475e-1, .Im= 2.44640298306153802787576978516881343750e-2

    r[ 4379].Re= 9.9969706817456849279324160306714475e-1, .Im=-2.44640298306153802787576978516881343750e-2

    r[ 4380].Re=-2.87200396735790945690336428697264625000e-2, .Im= 9.9945998490727860907867352580069560e-1

    r[ 4381].Re=-2.87200396735790945690336428697264625000e-2, .Im=-9.9945998490727860907867352580069560e-1

    r[ 4382].Re=-9.4490536252535384242889904271578415e-1, .Im= 3.26990963941709233964161285257432600e-1

    r[ 4383].Re=-9.4490536252535384242889904271578415e-1, .Im=-3.26990963941709233964161285257432600e-1

    r[ 4384].Re= 5.7127253654106502356313512791530225e-1, .Im= 8.2056802025316366577811777460738085e-1

    r[ 4385].Re= 5.7127253654106502356313512791530225e-1, .Im=-8.2056802025316366577811777460738085e-1

    r[ 4386].Re=-1.747807369323883253109386259893653875e-1, .Im= 9.8446780311946946451229223384871145e-1

    r[ 4387].Re=-1.747807369323883253109386259893653875e-1, .Im=-9.8446780311946946451229223384871145e-1

    r[ 4388].Re= 8.2996435747149432948788216890534385e-1, .Im= 5.5752177115916101701742491059121675e-1

    r[ 4389].Re= 8.2996435747149432948788216890534385e-1, .Im=-5.5752177115916101701742491059121675e-1

    r[ 4390].Re=-7.1326342044066048941886037937365470e-1, .Im= 7.0074233476882319404666077389265410e-1

    r[ 4391].Re=-7.1326342044066048941886037937365470e-1, .Im=-7.0074233476882319404666077389265410e-1

    r[ 4392].Re= 3.40306508384321471094580147109809325e-1, .Im= 9.4015969508366770135410206421511245e-1

    r[ 4393].Re= 3.40306508384321471094580147109809325e-1, .Im=-9.4015969508366770135410206421511245e-1

    r[ 4394].Re=-9.8874984884886873981457711124676275e-1, .Im= 1.488515532108090899665597817147499875e-1

    r[ 4395].Re=-9.8874984884886873981457711124676275e-1, .Im=-1.488515532108090899665597817147499875e-1

    r[ 4396].Re= 9.7907565032394372472879240376641970e-1, .Im= 2.030047216955978006680538783257361500e-1

    r[ 4397].Re= 9.7907565032394372472879240376641970e-1, .Im=-2.030047216955978006680538783257361500e-1

    r[ 4398].Re=-3.63141677585840538799999421826214525e-1, .Im= 9.3159570643552580548885089228861030e-1

    r[ 4399].Re=-3.63141677585840538799999421826214525e-1, .Im=-9.3159570643552580548885089228861030e-1

    r[ 4400].Re= 6.4226384780991041534292662618099710e-1, .Im= 7.6626892163149007419775671223760580e-1

    r[ 4401].Re= 6.4226384780991041534292662618099710e-1, .Im=-7.6626892163149007419775671223760580e-1

    r[ 4402].Re=-8.940730681792324885392986288934480e-1, .Im= 4.47664450042530193130119187117088575e-1

    r[ 4403].Re=-8.940730681792324885392986288934480e-1, .Im=-4.47664450042530193130119187117088575e-1

    r[ 4404].Re= 1.458827917182219380265451036393642375e-1, .Im= 9.8916280363036612754967791261151430e-1

    r[ 4405].Re= 1.458827917182219380265451036393642375e-1, .Im=-9.8916280363036612754967791261151430e-1

    r[ 4406].Re= 9.32712197862476943832632514386205e-1, .Im= 3.60234644778913981610912742326036075e-1

    r[ 4407].Re= 9.32712197862476943832632514386205e-1, .Im=-3.60234644778913981610912742326036075e-1

    r[ 4408].Re=-5.2929787467958222535457935009617355e-1, .Im= 8.482936135744018057991411296825390e-1

    r[ 4409].Re=-5.2929787467958222535457935009617355e-1, .Im=-8.482936135744018057991411296825390e-1

    r[ 4410].Re=-3.0544567556042800937632364366436375e-1, .Im= 9.5208392578492351265850857089390045e-1

    r[ 4411].Re=-3.0544567556042800937632364366436375e-1, .Im=-9.5208392578492351265850857089390045e-1

    r[ 4412].Re=-6.7266972342138175999792792936204930e-1, .Im= 7.3979679084244343023613055265741420e-1

    r[ 4413].Re=-6.7266972342138175999792792936204930e-1, .Im=-7.3979679084244343023613055265741420e-1

    r[ 4414].Re= 8.6745519084050848324096705255215055e-1, .Im= 4.97195481026249275213757528035785050e-1

    r[ 4415].Re= 8.6745519084050848324096705255215055e-1, .Im=-4.97195481026249275213757528035785050e-1

    r[ 4416].Re=-9.1979271743229507052319604554213580e-1, .Im= 3.92115017403573573595565449068089925e-1

    r[ 4417].Re=-9.1979271743229507052319604554213580e-1, .Im=-3.92115017403573573595565449068089925e-1

    r[ 4418].Re= 4.35050644349350645878615750916651450e-1, .Im= 9.0024349314290030843466183796408585e-1

    r[ 4419].Re= 4.35050644349350645878615750916651450e-1, .Im=-9.0024349314290030843466183796408585e-1

    r[ 4420].Re= 9.8805349406919085186729034830932505e-1, .Im= 1.536084710411448339684170605323743000e-1

    r[ 4421].Re= 9.8805349406919085186729034830932505e-1, .Im=-1.536084710411448339684170605323743000e-1

    r[ 4422].Re=-9.6249957191582524718143076825072055e-1, .Im= 2.70900420925265283944582961339619925e-1

    r[ 4423].Re=-9.6249957191582524718143076825072055e-1, .Im=-2.70900420925265283944582961339619925e-1

    r[ 4424].Re= 1.941456694702114182948804455008939750e-1, .Im= 9.8082162359436497744979988056002180e-1

    r[ 4425].Re= 1.941456694702114182948804455008939750e-1, .Im=-9.8082162359436497744979988056002180e-1

    r[ 4426].Re= 6.7991718214313123791470161449979055e-1, .Im= 7.3306314410625672550736453558783975e-1

    r[ 4427].Re= 6.7991718214313123791470161449979055e-1, .Im=-7.3306314410625672550736453558783975e-1

    r[ 4428].Re=-4.81765390143307214998458221089094875e-1, .Im= 8.7615384872822843487227828518371095e-1

    r[ 4429].Re=-4.81765390143307214998458221089094875e-1, .Im=-8.7615384872822843487227828518371095e-1

    r[ 4430].Re= 8.262856787176812989326180058924364375e-2, .Im= 9.9643793385135159823562389647122470e-1

    r[ 4431].Re= 8.262856787176812989326180058924364375e-2, .Im=-9.9643793385135159823562389647122470e-1

    r[ 4432].Re=-9.9987999941656691138547330410801805e-1, .Im= 4.891371612506327168357067591841769140625e-3

    r[ 4433].Re=-9.9987999941656691138547330410801805e-1, .Im=-4.891371612506327168357067591841769140625e-3

    r[ 4434].Re= 9.5771403655166043034085987528669645e-1, .Im= 2.87272802349384570597123911284143100e-1

    r[ 4435].Re= 9.5771403655166043034085987528669645e-1, .Im=-2.87272802349384570597123911284143100e-1

    r[ 4436].Re=-2.120277750984841391712620861653704125e-1, .Im= 9.7712395979385557875929180227103640e-1

    r[ 4437].Re=-2.120277750984841391712620861653704125e-1, .Im=-9.7712395979385557875929180227103640e-1

    r[ 4438].Re= 7.9504399465057362661468687292654065e-1, .Im= 6.062958887456253442849174462025985e-1

    r[ 4439].Re= 7.9504399465057362661468687292654065e-1, .Im=-6.062958887456253442849174462025985e-1

    r[ 4440].Re=-8.3132569830686731116031751298578455e-1, .Im= 5.555842014420742103197881078813225e-1

    r[ 4441].Re=-8.3132569830686731116031751298578455e-1, .Im=-5.555842014420742103197881078813225e-1

    r[ 4442].Re= 4.94673074123679112901186272210907175e-1, .Im= 8.6891044949273277264722992185852490e-1

    r[ 4443].Re= 4.94673074123679112901186272210907175e-1, .Im=-8.6891044949273277264722992185852490e-1

    r[ 4444].Re=-4.4267534211332137950023479788796975e-1, .Im= 8.9653761688487965120231137916562145e-1

    r[ 4445].Re=-4.4267534211332137950023479788796975e-1, .Im=-8.9653761688487965120231137916562145e-1

    r[ 4446].Re= 7.7995512807251654585627420601667835e-1, .Im= 6.2559282136007599017801794616389085e-1

    r[ 4447].Re= 7.7995512807251654585627420601667835e-1, .Im=-6.2559282136007599017801794616389085e-1

    r[ 4448].Re=-7.5077896263230414763967246472020630e-1, .Im= 6.6037711951537658716659962010453455e-1

    r[ 4449].Re=-7.5077896263230414763967246472020630e-1, .Im=-6.6037711951537658716659962010453455e-1

    r[ 4450].Re= 9.9901604645520780678680239361710845e-1, .Im= 4.4027779264346048049283410819043637500e-2

    r[ 4451].Re= 9.9901604645520780678680239361710845e-1, .Im=-4.4027779264346048049283410819043637500e-2

    r[ 4452].Re=-1.1542514482012981857916855688017676250e-1, .Im= 9.9318994840145058411451373103773220e-1

    r[ 4453].Re=-1.1542514482012981857916855688017676250e-1, .Im=-9.9318994840145058411451373103773220e-1

    r[ 4454].Re=-9.3661452504089981463408776107826270e-1, .Im= 3.50033561477466115263723622774705275e-1

    r[ 4455].Re=-9.3661452504089981463408776107826270e-1, .Im=-3.50033561477466115263723622774705275e-1

    r[ 4456].Re= 2.89155978955128734053658945413189925e-1, .Im= 9.5713216505157938662762262538308275e-1

    r[ 4457].Re= 2.89155978955128734053658945413189925e-1, .Im=-9.5713216505157938662762262538308275e-1

    r[ 4458].Re=-6.2038087732838453902672881667967885e-1, .Im= 7.8416171528350897546033593243919310e-1

    r[ 4459].Re=-6.2038087732838453902672881667967885e-1, .Im=-7.8416171528350897546033593243919310e-1

    r[ 4460].Re= 8.9789024234118730571907462945091535e-1, .Im= 4.39888881824056721114857282373122850e-1

    r[ 4461].Re= 8.9789024234118730571907462945091535e-1, .Im=-4.39888881824056721114857282373122850e-1

    r[ 4462].Re=-9.8003152549445293750807195465313270e-1, .Im= 1.982964640138180911765886094144661875e-1

    r[ 4463].Re=-9.8003152549445293750807195465313270e-1, .Im=-1.982964640138180911765886094144661875e-1

    r[ 4464].Re= 4.74308168975324018212802457128418600e-1, .Im= 8.8019026020051593928172906089457680e-1

    r[ 4465].Re= 4.74308168975324018212802457128418600e-1, .Im=-8.8019026020051593928172906089457680e-1

    r[ 4466].Re= 9.23836278393256639385189288304900390625e-3, .Im= 9.998292115175705374596759611449670e-1

    r[ 4467].Re= 9.23836278393256639385189288304900390625e-3, .Im=-9.998292115175705374596759611449670e-1

    r[ 4468].Re= 9.5521740640493013607681405119365080e-1, .Im= 2.95460131666754943768893326705438075e-1

    r[ 4469].Re= 9.5521740640493013607681405119365080e-1, .Im=-2.95460131666754943768893326705438075e-1

    r[ 4470].Re=-8.6438530468786267668690470600267870e-1, .Im= 5.0260403800560848885936593433143570e-1

    r[ 4471].Re=-8.6438530468786267668690470600267870e-1, .Im=-5.0260403800560848885936593433143570e-1

    r[ 4472].Re= 6.2808202652710787283751869836123660e-1, .Im= 7.7793834675368567221909188447170890e-1

    r[ 4473].Re= 6.2808202652710787283751869836123660e-1, .Im=-7.7793834675368567221909188447170890e-1

    r[ 4474].Re=-5.220193896466415184320908338122535e-1, .Im= 8.528013733106587501708872878225520e-1

    r[ 4475].Re=-5.220193896466415184320908338122535e-1, .Im=-8.528013733106587501708872878225520e-1

    r[ 4476].Re= 5.819827359867880273158746717854228125e-2, .Im= 9.9816844361810941332890934063470920e-1

    r[ 4477].Re= 5.819827359867880273158746717854228125e-2, .Im=-9.9816844361810941332890934063470920e-1

    r[ 4478].Re=-9.954421583473254120377760045812465e-1, .Im= 9.416270506309171173242589247820433125e-2

    r[ 4479].Re=-9.954421583473254120377760045812465e-1, .Im=-9.416270506309171173242589247820433125e-2

    r[ 4480].Re= 9.7702291615443381811445533458027055e-1, .Im= 2.125843284584039427631552143793669500e-1

    r[ 4481].Re= 9.7702291615443381811445533458027055e-1, .Im=-2.125843284584039427631552143793669500e-1

    r[ 4482].Re=-2.454129663297527352838756087294314000e-1, .Im= 9.6929465389705049549462501090602015e-1

    r[ 4483].Re=-2.454129663297527352838756087294314000e-1, .Im=-9.6929465389705049549462501090602015e-1

    r[ 4484].Re= 5.9318050357874840816663208897807635e-1, .Im= 8.0486822346759245849767694380716420e-1

    r[ 4485].Re= 5.9318050357874840816663208897807635e-1, .Im=-8.0486822346759245849767694380716420e-1

    r[ 4486].Re=-8.6926535061667908887983458043891005e-1, .Im= 4.94124805122806987078831753024132900e-1

    r[ 4487].Re=-8.6926535061667908887983458043891005e-1, .Im=-4.94124805122806987078831753024132900e-1

    r[ 4488].Re= 8.5501990808707661884113804262597110e-1, .Im= 5.1829607161136792559119612633367065e-1

    r[ 4489].Re= 8.5501990808707661884113804262597110e-1, .Im=-5.1829607161136792559119612633367065e-1

    r[ 4490].Re=-4.03854240299635680599976694793440400e-1, .Im= 9.146846819073412016010138358979020e-1

    r[ 4491].Re=-4.03854240299635680599976694793440400e-1, .Im=-9.146846819073412016010138358979020e-1

    r[ 4492].Re= 3.79137241895407761660408141324296575e-1, .Im= 9.2517263928930404404127330053597685e-1

    r[ 4493].Re= 3.79137241895407761660408141324296575e-1, .Im=-9.2517263928930404404127330053597685e-1

    r[ 4494].Re=-7.1668308773875322170709978308877905e-1, .Im= 6.9723102224386834802061230220715515e-1

    r[ 4495].Re=-7.1668308773875322170709978308877905e-1, .Im=-6.9723102224386834802061230220715515e-1

    r[ 4496].Re= 9.9466849561345105357190732320304960e-1, .Im= 1.0261714019412507270523349234281340000e-1

    r[ 4497].Re= 9.9466849561345105357190732320304960e-1, .Im=-1.0261714019412507270523349234281340000e-1

    r[ 4498].Re=-9.7293091278756105300118406375986520e-1, .Im= 2.306000757839891668332654717232799125e-1

    r[ 4499].Re=-9.7293091278756105300118406375986520e-1, .Im=-2.306000757839891668332654717232799125e-1

    r[ 4500].Re= 2.157127836244470686644092438655206875e-1, .Im= 9.7631636665543253261745348936528895e-1

    r[ 4501].Re= 2.157127836244470686644092438655206875e-1, .Im=-9.7631636665543253261745348936528895e-1

    r[ 4502].Re= 7.2266791786719752899159630032954735e-1, .Im= 6.9097562689736391483563693327596410e-1

    r[ 4503].Re= 7.2266791786719752899159630032954735e-1, .Im=-6.9097562689736391483563693327596410e-1

    r[ 4504].Re=-7.3685677649108649589493325038347390e-1, .Im= 6.7587358504953232163359189144102855e-1

    r[ 4505].Re=-7.3685677649108649589493325038347390e-1, .Im=-6.7587358504953232163359189144102855e-1

    r[ 4506].Re=-5.80937600956349803338341075686912500e-2, .Im= 9.9817673238847925976102715139859355e-1

    r[ 4507].Re=-5.80937600956349803338341075686912500e-2, .Im=-9.9817673238847925976102715139859355e-1

    r[ 4508].Re= 9.0582293701184279921534425739082505e-1, .Im= 4.23315802771729421394297787628602225e-1

    r[ 4509].Re= 9.0582293701184279921534425739082505e-1, .Im=-4.23315802771729421394297787628602225e-1

    r[ 4510].Re=-9.0684280262868921518304432538570835e-1, .Im= 4.21205279772230212209649380383780225e-1

    r[ 4511].Re=-9.0684280262868921518304432538570835e-1, .Im=-4.21205279772230212209649380383780225e-1

    r[ 4512].Re=-3.18239080268396701267619164354982775e-1, .Im= 9.47885971965741647160541560879210e-1

    r[ 4513].Re=-3.18239080268396701267619164354982775e-1, .Im=-9.47885971965741647160541560879210e-1

    r[ 4514].Re= 8.506004879381111327685260903308516875e-2, .Im= 9.9624411558295933311057979153702035e-1

    r[ 4515].Re= 8.506004879381111327685260903308516875e-2, .Im=-9.9624411558295933311057979153702035e-1

    r[ 4516].Re= 8.4140255774908589980753959025605580e-1, .Im= 5.4011200278408033614852001846884375e-1

    r[ 4517].Re= 8.4140255774908589980753959025605580e-1, .Im=-5.4011200278408033614852001846884375e-1

    r[ 4518].Re=-9.9801941579429931383771190667175685e-1, .Im= 6.1189630195092409303825320421310606250e-2

    r[ 4519].Re=-9.9801941579429931383771190667175685e-1, .Im=-6.1189630195092409303825320421310606250e-2

    r[ 4520].Re= 3.97198376465899283260796437389217300e-1, .Im= 9.1756185308757254315281670642434615e-1

    r[ 4521].Re= 3.97198376465899283260796437389217300e-1, .Im=-9.1756185308757254315281670642434615e-1

    r[ 4522].Re= 9.9975434217658598612388232140801845e-1, .Im= 2.20205672177268864386778801645050406250e-2

    r[ 4523].Re= 9.9975434217658598612388232140801845e-1, .Im=-2.20205672177268864386778801645050406250e-2

    r[ 4524].Re=-6.0878809273650114075593364759697575e-1, .Im= 7.9318124497704278752507889294065535e-1

    r[ 4525].Re=-6.0878809273650114075593364759697575e-1, .Im=-7.9318124497704278752507889294065535e-1

    r[ 4526].Re=-4.66681690839927276748255735583370550e-1, .Im= 8.8428989951623926391022223469917660e-1

    r[ 4527].Re=-4.66681690839927276748255735583370550e-1, .Im=-8.8428989951623926391022223469917660e-1

    r[ 4528].Re= 7.098482214295436243389758601551875e-1, .Im= 7.0413538848682044601900997804477810e-1

    r[ 4529].Re= 7.098482214295436243389758601551875e-1, .Im=-7.0413538848682044601900997804477810e-1

    r[ 4530].Re=-8.2583736241753569196077933156630020e-1, .Im= 5.6371765174428600797540411804220635e-1

    r[ 4531].Re=-8.2583736241753569196077933156630020e-1, .Im=-5.6371765174428600797540411804220635e-1

    r[ 4532].Re= 3.4720327268877021476001232258568050e-1, .Im= 9.3764080693285134504577627012622540e-1

    r[ 4533].Re= 3.4720327268877021476001232258568050e-1, .Im=-9.3764080693285134504577627012622540e-1

    r[ 4534].Re=-9.573620139182978938663381995866075e-1, .Im= 2.8854041741473945847928916919045150e-1

    r[ 4535].Re=-9.573620139182978938663381995866075e-1, .Im=-2.8854041741473945847928916919045150e-1

    r[ 4536].Re= 9.3445798735125706890869423659751190e-1, .Im= 3.55656148267857685763004838008782825e-1

    r[ 4537].Re= 9.3445798735125706890869423659751190e-1, .Im=-3.55656148267857685763004838008782825e-1

    r[ 4538].Re=-1.457809253368134438932912644304451500e-1, .Im= 9.8918591542899270141475653872475955e-1

    r[ 4539].Re=-1.457809253368134438932912644304451500e-1, .Im=-9.8918591542899270141475653872475955e-1

    r[ 4540].Re= 5.4178344486626706100196315674111245e-1, .Im= 8.4032955617521210012199617267469875e-1

    r[ 4541].Re= 5.4178344486626706100196315674111245e-1, .Im=-8.4032955617521210012199617267469875e-1

    r[ 4542].Re=-5.6921566023197145423040410605608485e-1, .Im= 8.220515358019779839082730177324265e-1

    r[ 4543].Re=-5.6921566023197145423040410605608485e-1, .Im=-8.220515358019779839082730177324265e-1

    r[ 4544].Re= 8.0892483324733832628083973759203215e-1, .Im= 5.8762886143303194597109495589393190e-1

    r[ 4545].Re= 8.0892483324733832628083973759203215e-1, .Im=-5.8762886143303194597109495589393190e-1

    r[ 4546].Re=-9.9983248710949246262913447935716245e-1, .Im= 1.101456444240145500501615316579773203125e-2

    r[ 4547].Re=-9.9983248710949246262913447935716245e-1, .Im=-1.101456444240145500501615316579773203125e-2

    r[ 4548].Re=-3.3625936410621143357602136347850318750e-2, .Im= 9.9930419692196037484421822227886875e-1

    r[ 4549].Re=-3.3625936410621143357602136347850318750e-2, .Im=-9.9930419692196037484421822227886875e-1

    r[ 4550].Re= 9.7294701503617120330602574540534985e-1, .Im= 2.304937321895809965166534993841196375e-1

    r[ 4551].Re= 9.7294701503617120330602574540534985e-1, .Im=-2.304937321895809965166534993841196375e-1

    r[ 4552].Re=-6.6902801348123364100217713712481780e-1, .Im= 7.430875875892869464323098327440675e-1

    r[ 4553].Re=-6.6902801348123364100217713712481780e-1, .Im=-7.430875875892869464323098327440675e-1

    r[ 4554].Re= 2.001474517013411003052425485293497250e-1, .Im= 9.7961359522797319954179329215548930e-1

    r[ 4555].Re= 2.001474517013411003052425485293497250e-1, .Im=-9.7961359522797319954179329215548930e-1

    r[ 4556].Re=-9.3002874435882920689522279644734225e-1, .Im= 3.67179815164926204307249690828029975e-1

    r[ 4557].Re=-9.3002874435882920689522279644734225e-1, .Im=-3.67179815164926204307249690828029975e-1

    r[ 4558].Re= 6.4507759621211002709628701268229630e-1, .Im= 7.6391881629472158099503076300607060e-1

    r[ 4559].Re= 6.4507759621211002709628701268229630e-1, .Im=-7.6391881629472158099503076300607060e-1

    r[ 4560].Re= 9.4807859360952362326457887320430015e-1, .Im= 3.17619404138448802044081276108045125e-1

    r[ 4561].Re= 9.4807859360952362326457887320430015e-1, .Im=-3.17619404138448802044081276108045125e-1

    r[ 4562].Re=-2.024490106057194038768898280977737125e-1, .Im= 9.7916843351856086563600456429412585e-1

    r[ 4563].Re=-2.024490106057194038768898280977737125e-1, .Im=-9.7916843351856086563600456429412585e-1

    r[ 4564].Re=-9.2639230178451104080750155844725665e-1, .Im= 3.76288810701175424622277887465315850e-1

    r[ 4565].Re=-9.2639230178451104080750155844725665e-1, .Im=-3.76288810701175424622277887465315850e-1

    r[ 4566].Re= 5.314528908108648863617418101057410e-1, .Im= 8.4690377470552147265436815359862520e-1

    r[ 4567].Re= 5.314528908108648863617418101057410e-1, .Im=-8.4690377470552147265436815359862520e-1

    r[ 4568].Re=-4.54720733070404281583876127115217950e-1, .Im= 8.9049194316305235741282331218826580e-1

    r[ 4569].Re=-4.54720733070404281583876127115217950e-1, .Im=-8.9049194316305235741282331218826580e-1

    r[ 4570].Re= 9.9699297234574513204563572799088430e-1, .Im= 7.701342545129567784822910425646113750e-2

    r[ 4571].Re= 9.9699297234574513204563572799088430e-1, .Im=-7.701342545129567784822910425646113750e-2

    r[ 4572].Re=-8.0602626769282859076071190429502165e-1, .Im= 5.9168812437827178474236688998644240e-1

    r[ 4573].Re=-8.0602626769282859076071190429502165e-1, .Im=-5.9168812437827178474236688998644240e-1

    r[ 4574].Re= 2.7977526272111896687988519261125475e-1, .Im= 9.5990936365026136023459457646822555e-1

    r[ 4575].Re= 2.7977526272111896687988519261125475e-1, .Im=-9.5990936365026136023459457646822555e-1

    r[ 4576].Re=-2.60808975100192574902990827467874600e-1, .Im= 9.6525061870724282453437581352773120e-1

    r[ 4577].Re=-2.60808975100192574902990827467874600e-1, .Im=-9.6525061870724282453437581352773120e-1

    r[ 4578].Re= 7.5723295064537887721911602056934495e-1, .Im= 6.5289909273408763823454137309454380e-1

    r[ 4579].Re= 7.5723295064537887721911602056934495e-1, .Im=-6.5289909273408763823454137309454380e-1

    r[ 4580].Re=-9.8215030641500500330209888488752765e-1, .Im= 1.874883870313894806969301498611457625e-1

    r[ 4581].Re=-9.8215030641500500330209888488752765e-1, .Im=-1.874883870313894806969301498611457625e-1

    r[ 4582].Re= 1.33755798132969894176369507476920250e-1, .Im= 9.9087808382751163538415539733250625e-1

    r[ 4583].Re= 1.33755798132969894176369507476920250e-1, .Im=-9.9087808382751163538415539733250625e-1

    r[ 4584].Re= 8.6867309949688287229463412586483170e-1, .Im= 4.95083687340349465344502277730498450e-1

    r[ 4585].Re= 8.6867309949688287229463412586483170e-1, .Im=-4.95083687340349465344502277730498450e-1

    r[ 4586].Re=-6.8614824363068194212900152706424705e-1, .Im= 7.27310629573095668298776672600070e-1

    r[ 4587].Re=-6.8614824363068194212900152706424705e-1, .Im=-7.27310629573095668298776672600070e-1

    r[ 4588].Re= 4.58055971679406037644355365046067150e-1, .Im= 8.8875282069517158589633254450745880e-1

    r[ 4589].Re= 4.58055971679406037644355365046067150e-1, .Im=-8.8875282069517158589633254450745880e-1

    r[ 4590].Re=-8.5689763256318229878161218948662280e-1, .Im= 5.1526511433809785156512361936620435e-1

    r[ 4591].Re=-8.5689763256318229878161218948662280e-1, .Im=-5.1526511433809785156512361936620435e-1

    r[ 4592].Re= 9.8101093040368358977332263748394325e-1, .Im= 1.933946968378465747218086789871449500e-1

    r[ 4593].Re= 9.8101093040368358977332263748394325e-1, .Im=-1.933946968378465747218086789871449500e-1

    r[ 4594].Re=-3.20554828565624949643364516305155100e-1, .Im= 9.4709003427398597008135538999340495e-1

    r[ 4595].Re=-3.20554828565624949643364516305155100e-1, .Im=-9.4709003427398597008135538999340495e-1

    r[ 4596].Re=-9.9622554303006438658485421910881995e-1, .Im= 8.56189734412864944523846588708693125e-2

    r[ 4597].Re=-9.9622554303006438658485421910881995e-1, .Im=-8.56189734412864944523846588708693125e-2

    r[ 4598].Re= 7.3688767014793443710374276633956465e-1, .Im= 6.7577057619243463548741601698566225e-1

    r[ 4599].Re= 7.3688767014793443710374276633956465e-1, .Im=-6.7577057619243463548741601698566225e-1

    r[ 4600].Re=-1.1054770231050921325266500616635311875e-1, .Im= 9.9374347140553764834436378805548880e-1

    r[ 4601].Re=-1.1054770231050921325266500616635311875e-1, .Im=-9.9374347140553764834436378805548880e-1

    r[ 4602].Re= 5.9809710459446852048870368889765810e-1, .Im= 8.0122049963638741765237227809848260e-1

    r[ 4603].Re= 5.9809710459446852048870368889765810e-1, .Im=-8.0122049963638741765237227809848260e-1

    r[ 4604].Re=-7.7297988504260561892778014225768855e-1, .Im= 6.3426109287083798360384889747365375e-1

    r[ 4605].Re=-7.7297988504260561892778014225768855e-1, .Im=-6.3426109287083798360384889747365375e-1

    r[ 4606].Re=-5.5502569276018232091729487365228120e-1, .Im= 8.3169586606256051819485719533986410e-1

    r[ 4607].Re=-5.5502569276018232091729487365228120e-1, .Im=-8.3169586606256051819485719533986410e-1

    r[ 4608].Re= 9.62508666333360296540888612071285e-1, .Im= 2.70799617250425728176566053662099875e-1

    r[ 4609].Re= 9.62508666333360296540888612071285e-1, .Im=-2.70799617250425728176566053662099875e-1

    r[ 4610].Re= 1.628150740232660320661040032064192875e-1, .Im= 9.8650596761331010853268708160612730e-1

    r[ 4611].Re= 1.628150740232660320661040032064192875e-1, .Im=-9.8650596761331010853268708160612730e-1

    r[ 4612].Re=-9.4883956601473240510813411674462255e-1, .Im= 3.15395539880471920124449525246745900e-1

    r[ 4613].Re=-9.4883956601473240510813411674462255e-1, .Im=-3.15395539880471920124449525246745900e-1

    r[ 4614].Re= 8.8111524178027000875346175234881225e-1, .Im= 4.72579951249812779678904917091131200e-1

    r[ 4615].Re= 8.8111524178027000875346175234881225e-1, .Im=-4.72579951249812779678904917091131200e-1

    r[ 4616].Re= 6.1851575783274950759427213142771506250e-2, .Im= 9.9794230884267531855869037826778365e-1

    r[ 4617].Re= 6.1851575783274950759427213142771506250e-2, .Im=-9.9794230884267531855869037826778365e-1

    r[ 4618].Re=-5.0307849214182753794233349253772755e-1, .Im= 8.6409441163432199051186444194172505e-1

    r[ 4619].Re=-5.0307849214182753794233349253772755e-1, .Im=-8.6409441163432199051186444194172505e-1

    r[ 4620].Re= 9.2027683622426381671033368547796270e-1, .Im= 3.90872769761478833228096618768176975e-1

    r[ 4621].Re= 9.2027683622426381671033368547796270e-1, .Im=-3.90872769761478833228096618768176975e-1

    r[ 4622].Re=-8.8399236925443591683659860791522075e-1, .Im= 4.67279794193058484186309442520723675e-1

    r[ 4623].Re=-8.8399236925443591683659860791522075e-1, .Im=-4.67279794193058484186309442520723675e-1

    r[ 4624].Re= 4.09530683515920534976118005943135350e-1, .Im= 9.1212840991938848311804122204193845e-1

    r[ 4625].Re= 4.09530683515920534976118005943135350e-1, .Im=-9.1212840991938848311804122204193845e-1

    r[ 4626].Re=-6.4127233196043176288725362610421140e-1, .Im= 7.6715828433222910121003224048763510e-1

    r[ 4627].Re=-6.4127233196043176288725362610421140e-1, .Im=-7.6715828433222910121003224048763510e-1

    r[ 4628].Re= 9.9274805492270923323872011678759005e-1, .Im= 1.1964403854055133402667365771776530625e-1

    r[ 4629].Re= 9.9274805492270923323872011678759005e-1, .Im=-1.1964403854055133402667365771776530625e-1

    r[ 4630].Re=-9.8502608303200411832278859947109590e-1, .Im= 1.718288242980317293007175294405897125e-1

    r[ 4631].Re=-9.8502608303200411832278859947109590e-1, .Im=-1.718288242980317293007175294405897125e-1

    r[ 4632].Re= 4.96785024355496263037679227636544950e-1, .Im= 8.6769642822613102239870386256370690e-1

    r[ 4633].Re= 4.96785024355496263037679227636544950e-1, .Im=-8.6769642822613102239870386256370690e-1

    r[ 4634].Re=-1.590916413138466212195964999409625250e-1, .Im= 9.8713869212620619641995745041640475e-1

    r[ 4635].Re=-1.590916413138466212195964999409625250e-1, .Im=-9.8713869212620619641995745041640475e-1

    r[ 4636].Re= 6.9062969209081770394220711750676855e-1, .Im= 7.2299771424800574060043345525627955e-1

    r[ 4637].Re= 6.9062969209081770394220711750676855e-1, .Im=-7.2299771424800574060043345525627955e-1

    r[ 4638].Re=-7.4180703377446244317638956999871875e-1, .Im= 6.7043332492221041629676392403780480e-1

    r[ 4639].Re=-7.4180703377446244317638956999871875e-1, .Im=-6.7043332492221041629676392403780480e-1

    r[ 4640].Re=-6.663733774858127123508211298030800625e-2, .Im= 9.9764961331196133631493694338132625e-1

    r[ 4641].Re=-6.663733774858127123508211298030800625e-2, .Im=-9.9764961331196133631493694338132625e-1

    r[ 4642].Re= 7.9947725850143736003872163564665240e-1, .Im= 6.0044499168743437067519153060857205e-1

    r[ 4643].Re= 7.9947725850143736003872163564665240e-1, .Im=-6.0044499168743437067519153060857205e-1

    r[ 4644].Re=-9.9179191989438586496419247851008545e-1, .Im= 1.27033242939078083733051016679382875e-1

    r[ 4645].Re=-9.9179191989438586496419247851008545e-1, .Im=-1.27033242939078083733051016679382875e-1

    r[ 4646].Re= 3.2181542862099643542705962317995725e-1, .Im= 9.4664330931914963951356867255526590e-1

    r[ 4647].Re= 3.2181542862099643542705962317995725e-1, .Im=-9.4664330931914963951356867255526590e-1

    r[ 4648].Re= 9.9931865350436532846600812263204715e-1, .Im= 3.669291201222242559953912177661550000e-2

    r[ 4649].Re= 9.9931865350436532846600812263204715e-1, .Im=-3.669291201222242559953912177661550000e-2

    r[ 4650].Re=-5.4275242333186435317315954307559875e-1, .Im= 8.3975473202382544535282704600831490e-1

    r[ 4651].Re=-5.4275242333186435317315954307559875e-1, .Im=-8.3975473202382544535282704600831490e-1

    r[ 4652].Re=-8.8852516180443519289156029117293655e-1, .Im= 4.58580950772040307761301392019959150e-1

    r[ 4653].Re=-8.8852516180443519289156029117293655e-1, .Im=-4.58580950772040307761301392019959150e-1

    r[ 4654].Re= 6.3945388832049809835211817699018865e-1, .Im= 7.6863545213600648065011000653612425e-1

    r[ 4655].Re= 6.3945388832049809835211817699018865e-1, .Im=-7.6863545213600648065011000653612425e-1

    r[ 4656].Re=-2.74977550441465101727089859195984875e-1, .Im= 9.6132267930890347162886655496549790e-1

    r[ 4657].Re=-2.74977550441465101727089859195984875e-1, .Im=-9.6132267930890347162886655496549790e-1

    r[ 4658].Re= 9.2499468409978724547926276500220410e-1, .Im= 3.79573313347773666492912525427527725e-1

    r[ 4659].Re= 9.2499468409978724547926276500220410e-1, .Im=-3.79573313347773666492912525427527725e-1

    r[ 4660].Re=-8.2027301559609910874826255167135965e-1, .Im= 5.7176757247826259789036384972860105e-1

    r[ 4661].Re=-8.2027301559609910874826255167135965e-1, .Im=-5.7176757247826259789036384972860105e-1

    r[ 4662].Re= 9.482492667006912900884429973302758125e-2, .Im= 9.9534895287397184837629993126029145e-1

    r[ 4663].Re= 9.482492667006912900884429973302758125e-2, .Im=-9.9534895287397184837629993126029145e-1

    r[ 4664].Re=-4.25017957559844339332499885131255700e-1, .Im= 9.0504387242452766226818994255154390e-1

    r[ 4665].Re=-4.25017957559844339332499885131255700e-1, .Im=-9.0504387242452766226818994255154390e-1

    r[ 4666].Re= 9.4531658440636712192883805983001365e-1, .Im= 3.25722651563787213291334410314448175e-1

    r[ 4667].Re= 9.4531658440636712192883805983001365e-1, .Im=-3.25722651563787213291334410314448175e-1

    r[ 4668].Re=-9.5152030293390055248892167583107945e-1, .Im= 3.07241134345443200892589175055036300e-1

    r[ 4669].Re=-9.5152030293390055248892167583107945e-1, .Im=-3.07241134345443200892589175055036300e-1

    r[ 4670].Re= 3.68926776648577148254304347574361575e-1, .Im= 9.2929430791622469332224909521755760e-1

    r[ 4671].Re= 3.68926776648577148254304347574361575e-1, .Im=-9.2929430791622469332224909521755760e-1

    r[ 4672].Re=-1.542433473820223055472666828791261625e-1, .Im= 9.8790550422186640400212809254298915e-1

    r[ 4673].Re=-1.542433473820223055472666828791261625e-1, .Im=-9.8790550422186640400212809254298915e-1

    r[ 4674].Re= 8.3269314125679871896323902547010220e-1, .Im= 5.534558580234919533680226777505595e-1

    r[ 4675].Re= 8.3269314125679871896323902547010220e-1, .Im=-5.534558580234919533680226777505595e-1

    r[ 4676].Re=-9.720910400212346980097777304763440e-1, .Im= 2.341694613733511232123163381402264250e-1

    r[ 4677].Re=-9.720910400212346980097777304763440e-1, .Im=-2.341694613733511232123163381402264250e-1

    r[ 4678].Re= 2.443263874380664224528203476438648000e-1, .Im= 9.6954699761653406753225681313779205e-1

    r[ 4679].Re= 2.443263874380664224528203476438648000e-1, .Im=-9.6954699761653406753225681313779205e-1

    r[ 4680].Re=-6.5062167466024467543661558011081065e-1, .Im= 7.5924876656709427980018745074630710e-1

    r[ 4681].Re=-6.5062167466024467543661558011081065e-1, .Im=-7.5924876656709427980018745074630710e-1

    r[ 4682].Re= 7.0552161037413685384933614841429515e-1, .Im= 7.0846895257098652098903812657226805e-1

    r[ 4683].Re= 7.0552161037413685384933614841429515e-1, .Im=-7.0846895257098652098903812657226805e-1

    r[ 4684].Re=-8.0818595855574526520825884290388785e-1, .Im= 5.887339285818532497174260242900345e-1

    r[ 4685].Re=-8.0818595855574526520825884290388785e-1, .Im=-5.887339285818532497174260242900345e-1

    r[ 4686].Re= 9.8484474601583238406732334624393840e-1, .Im= 1.729325515353528353035272857596282750e-1

    r[ 4687].Re= 9.8484474601583238406732334624393840e-1, .Im=-1.729325515353528353035272857596282750e-1

    r[ 4688].Re=-1.0812568074019675290475817064361763125e-1, .Im= 9.9400354521535039253876675502397115e-1

    r[ 4689].Re=-1.0812568074019675290475817064361763125e-1, .Im=-9.9400354521535039253876675502397115e-1

    r[ 4690].Re= 8.3941216170985322175823739598854440e-1, .Im= 5.4321535122554676089379199765971860e-1

    r[ 4691].Re= 8.3941216170985322175823739598854440e-1, .Im=-5.4321535122554676089379199765971860e-1

    r[ 4692].Re=-9.129382824833741638670403517608065e-1, .Im= 4.07818553904102376606033431016840025e-1

    r[ 4693].Re=-9.129382824833741638670403517608065e-1, .Im=-4.07818553904102376606033431016840025e-1

    r[ 4694].Re= 2.39237689710202552917372997853817640625e-2, .Im= 9.9957398962440480172375600886880420e-1

    r[ 4695].Re= 2.39237689710202552917372997853817640625e-2, .Im=-9.9957398962440480172375600886880420e-1

    r[ 4696].Re=-5.7924173916823751273597054023412055e-1, .Im= 8.1501587488296323158465384040027855e-1

    r[ 4697].Re=-5.7924173916823751273597054023412055e-1, .Im=-8.1501587488296323158465384040027855e-1

    r[ 4698].Re= 5.6117959446924159383485175567329860e-1, .Im= 8.2750109667490656661925640946719795e-1

    r[ 4699].Re= 5.6117959446924159383485175567329860e-1, .Im=-8.2750109667490656661925640946719795e-1

    r[ 4700].Re=-9.9844866530453069142225785981281660e-1, .Im= 5.3857884861445173840799327535933115625e-2

    r[ 4701].Re=-9.9844866530453069142225785981281660e-1, .Im=-5.3857884861445173840799327535933115625e-2

    r[ 4702].Re= 9.9360913398169081744981667725369330e-1, .Im= 1.1234419152841794431463284809069591250e-1

    r[ 4703].Re= 9.9360913398169081744981667725369330e-1, .Im=-1.1234419152841794431463284809069591250e-1

    r[ 4704].Re=-3.39057786251698523027897635984118075e-1, .Im= 9.4062510960233369772254263807553795e-1

    r[ 4705].Re=-3.39057786251698523027897635984118075e-1, .Im=-9.4062510960233369772254263807553795e-1

    r[ 4706].Re= 5.1893552904389217417246982222422955e-1, .Im= 8.5462782410991844361802804996841585e-1

    r[ 4707].Re= 5.1893552904389217417246982222422955e-1, .Im=-8.5462782410991844361802804996841585e-1

    r[ 4708].Re=-6.816811256821263542704514293291140e-1, .Im= 7.3150020192947384778392461157636715e-1

    r[ 4709].Re=-6.816811256821263542704514293291140e-1, .Im=-7.3150020192947384778392461157636715e-1

    r[ 4710].Re= 7.6754555504767951745748177927453070e-1, .Im= 6.4075079717887128971653964981669560e-1

    r[ 4711].Re= 7.6754555504767951745748177927453070e-1, .Im=-6.4075079717887128971653964981669560e-1

    r[ 4712].Re=-9.6853095531281485630614724868792105e-1, .Im= 2.484319829623126141271427513856906375e-1

    r[ 4713].Re=-9.6853095531281485630614724868792105e-1, .Im=-2.484319829623126141271427513856906375e-1

    r[ 4714].Re= 9.0214790998317961889796379182371310e-1, .Im= 4.31058447162623870063669073715573175e-1

    r[ 4715].Re= 9.0214790998317961889796379182371310e-1, .Im=-4.31058447162623870063669073715573175e-1

    r[ 4716].Re=-3.79051388479205275672256902907975e-1, .Im= 9.2523590773667141462510699057020245e-1

    r[ 4717].Re=-3.79051388479205275672256902907975e-1, .Im=-9.2523590773667141462510699057020245e-1

    r[ 4718].Re= 2.216888259392200966058084077303647000e-1, .Im= 9.749773980385960658878730100695975e-1

    r[ 4719].Re= 2.216888259392200966058084077303647000e-1, .Im=-9.749773980385960658878730100695975e-1

    r[ 4720].Re= 9.6916173337563094047908407446811905e-1, .Im= 2.459608002207933630245406675385311125e-1

    r[ 4721].Re= 9.6916173337563094047908407446811905e-1, .Im=-2.459608002207933630245406675385311125e-1

    r[ 4722].Re=-7.9872067309859173800390408359817225e-1, .Im= 6.015171504225860221737320898682810e-1

    r[ 4723].Re=-7.9872067309859173800390408359817225e-1, .Im=-6.015171504225860221737320898682810e-1

    r[ 4724].Re= 3.02023888491516512289081219932995725e-1, .Im= 9.5314235451785755959264179182355290e-1

    r[ 4725].Re= 3.02023888491516512289081219932995725e-1, .Im=-9.5314235451785755959264179182355290e-1

    r[ 4726].Re=-9.9049656350593884290844925999408585e-1, .Im= 1.36730686515951410653357811497699000e-1

    r[ 4727].Re=-9.9049656350593884290844925999408585e-1, .Im=-1.36730686515951410653357811497699000e-1

    r[ 4728].Re= 4.48235199930323624517569669478689300e-1, .Im= 8.937380513928465664008626845316030e-1

    r[ 4729].Re= 4.48235199930323624517569669478689300e-1, .Im=-8.937380513928465664008626845316030e-1

    r[ 4730].Re=-2.370923866967032389574399076082045125e-1, .Im= 9.7134873655575526552041765171452425e-1

    r[ 4731].Re=-2.370923866967032389574399076082045125e-1, .Im=-9.7134873655575526552041765171452425e-1

    r[ 4732].Re= 9.9985229491578919702732264340738765e-1, .Im= 1.71264545044856088262807958244593453125e-2

    r[ 4733].Re= 9.9985229491578919702732264340738765e-1, .Im=-1.71264545044856088262807958244593453125e-2

    r[ 4734].Re=-5.7423957473916364957489122389233670e-1, .Im= 8.1854905957831147755854317438206635e-1

    r[ 4735].Re=-5.7423957473916364957489122389233670e-1, .Im=-8.1854905957831147755854317438206635e-1

    r[ 4736].Re=-9.0214383537741460461489850786165330e-1, .Im= 4.31165605406749030681368139994447100e-1

    r[ 4737].Re=-9.0214383537741460461489850786165330e-1, .Im=-4.31165605406749030681368139994447100e-1

    r[ 4738].Re= 6.6816858702895298716128991145524195e-1, .Im= 7.4380888141028245197361457030638120e-1

    r[ 4739].Re= 6.6816858702895298716128991145524195e-1, .Im=-7.4380888141028245197361457030638120e-1

    r[ 4740].Re= 1.291384269070187940098293211121926953125e-2, .Im= 9.9977338194372711299706679710652675e-1

    r[ 4741].Re= 1.291384269070187940098293211121926953125e-2, .Im=-9.9977338194372711299706679710652675e-1

    r[ 4742].Re= 8.9571414391034676061309482975048010e-1, .Im= 4.44284565475881798590762628009542800e-1

    r[ 4743].Re= 8.9571414391034676061309482975048010e-1, .Im=-4.44284565475881798590762628009542800e-1

    r[ 4744].Re=-7.2008145230104381173674710225895975e-1, .Im= 6.9371468580367889877891229843953620e-1

    r[ 4745].Re=-7.2008145230104381173674710225895975e-1, .Im=-6.9371468580367889877891229843953620e-1

    r[ 4746].Re= 1.398220198496177013591790228019817625e-1, .Im= 9.9003904785176566338833481495385055e-1

    r[ 4747].Re= 1.398220198496177013591790228019817625e-1, .Im=-9.9003904785176566338833481495385055e-1

    r[ 4748].Re=-8.7583959053135773675791142522939480e-1, .Im= 4.82363503479527888639921684443834225e-1

    r[ 4749].Re=-8.7583959053135773675791142522939480e-1, .Im=-4.82363503479527888639921684443834225e-1

    r[ 4750].Re= 7.8679802479563432093812025414081290e-1, .Im= 6.1694771399653347554448146183858625e-1

    r[ 4751].Re= 7.8679802479563432093812025414081290e-1, .Im=-6.1694771399653347554448146183858625e-1

    r[ 4752].Re=-3.85846962427460860034500456094974650e-1, .Im= 9.2242101114619534651950516490614970e-1

    r[ 4753].Re=-3.85846962427460860034500456094974650e-1, .Im=-9.2242101114619534651950516490614970e-1

    r[ 4754].Re= 6.0688625453413336252594945108285170e-1, .Im= 7.9458762819234984853267178550595415e-1

    r[ 4755].Re= 6.0688625453413336252594945108285170e-1, .Im=-7.9458762819234984853267178550595415e-1

    r[ 4756].Re= 9.895069038788972815012812134227715e-1, .Im= 1.439145784666851224375960782708716500e-1

    r[ 4757].Re= 9.895069038788972815012812134227715e-1, .Im=-1.439145784666851224375960782708716500e-1

    r[ 4758].Re=-9.9510365238704134860370231763226910e-1, .Im= 9.781632292129521788481838484585750625e-2

    r[ 4759].Re=-9.9510365238704134860370231763226910e-1, .Im=-9.781632292129521788481838484585750625e-2

    r[ 4760].Re=-2.489693561678966993166994825514848250e-1, .Im= 9.6837191555193868897077891233493570e-1

    r[ 4761].Re=-2.489693561678966993166994825514848250e-1, .Im=-9.6837191555193868897077891233493570e-1

    r[ 4762].Re= 3.57519200025460170966340456288889975e-1, .Im= 9.3374523631496764153325784718617795e-1

    r[ 4763].Re= 3.57519200025460170966340456288889975e-1, .Im=-9.3374523631496764153325784718617795e-1

    r[ 4764].Re=-9.4728781511656068303750544146168975e-1, .Im= 3.20032236424881433300981825595954425e-1

    r[ 4765].Re=-9.4728781511656068303750544146168975e-1, .Im=-3.20032236424881433300981825595954425e-1

    r[ 4766].Re= 8.782030564911136316652573441388085e-1, .Im= 4.77966900755252610544232538813957925e-1

    r[ 4767].Re= 8.782030564911136316652573441388085e-1, .Im=-4.77966900755252610544232538813957925e-1

    r[ 4768].Re=-4.87121071371498237656538776718662100e-1, .Im= 8.731877787227754206256236102490220e-1

    r[ 4769].Re=-4.87121071371498237656538776718662100e-1, .Im=-8.731877787227754206256236102490220e-1

    r[ 4770].Re= 2.76083722640630899181068969028274281250e-2, .Im= 9.9948865314267421045002492974163030e-1

    r[ 4771].Re= 2.76083722640630899181068969028274281250e-2, .Im=-9.9948865314267421045002492974163030e-1

    r[ 4772].Re=-9.2312951967019740706632546789478510e-1, .Im= 3.84203833236856917565660296531859775e-1

    r[ 4773].Re=-9.2312951967019740706632546789478510e-1, .Im=-3.84203833236856917565660296531859775e-1

    r[ 4774].Re= 9.5911722013848943468872221274068575e-1, .Im= 2.8257007574824338780317134478536900e-1

    r[ 4775].Re= 9.5911722013848943468872221274068575e-1, .Im=-2.8257007574824338780317134478536900e-1

    r[ 4776].Re= 2.62095900540851578508494412744767025e-1, .Im= 9.6489058539746108689172388039878565e-1

    r[ 4777].Re= 2.62095900540851578508494412744767025e-1, .Im=-9.6489058539746108689172388039878565e-1

    r[ 4778].Re=-6.2325400813079556705531558691291135e-1, .Im= 7.8186262353205371322673045142437330e-1

    r[ 4779].Re=-6.2325400813079556705531558691291135e-1, .Im=-7.8186262353205371322673045142437330e-1

    r[ 4780].Re= 7.3024642200560740956660765732522120e-1, .Im= 6.8295780810590756004785362165421245e-1

    r[ 4781].Re= 7.3024642200560740956660765732522120e-1, .Im=-6.8295780810590756004785362165421245e-1

    r[ 4782].Re=-7.519103897650342149816538039885926875e-2, .Im= 9.9702795927318943469686018943320955e-1

    r[ 4783].Re=-7.519103897650342149816538039885926875e-2, .Im=-9.9702795927318943469686018943320955e-1

    r[ 4784].Re=-9.762264802783290340570943044440355e-1, .Im= 2.162686503872918719615370264364173625e-1

    r[ 4785].Re=-9.762264802783290340570943044440355e-1, .Im=-2.162686503872918719615370264364173625e-1

    r[ 4786].Re= 9.7805955643625730466794720996404065e-1, .Im= 2.078023312403736444498036917138961125e-1

    r[ 4787].Re= 9.7805955643625730466794720996404065e-1, .Im=-2.078023312403736444498036917138961125e-1

    r[ 4788].Re=-7.6672480825942013193952107030781915e-1, .Im= 6.4178991250616523878136376879410815e-1

    r[ 4789].Re=-7.6672480825942013193952107030781915e-1, .Im=-6.4178991250616523878136376879410815e-1

    r[ 4790].Re= 4.85055076369348303622075491148279975e-1, .Im= 8.7431586170526209844666709614102725e-1

    r[ 4791].Re= 4.85055076369348303622075491148279975e-1, .Im=-8.7431586170526209844666709614102725e-1

    r[ 4792].Re=-4.07200938938275469602956491144141175e-1, .Im= 9.1320386015875487650816921814111990e-1

    r[ 4793].Re=-4.07200938938275469602956491144141175e-1, .Im=-9.1320386015875487650816921814111990e-1

    r[ 4794].Re= 8.2029024652964221964168700651498510e-1, .Im= 5.7166234706413632249422107634018175e-1

    r[ 4795].Re= 8.2029024652964221964168700651498510e-1, .Im=-5.7166234706413632249422107634018175e-1

    r[ 4796].Re=-8.4005851825656985276680188690079375e-1, .Im= 5.4229014020015631203364137036260215e-1

    r[ 4797].Re=-8.4005851825656985276680188690079375e-1, .Im=-5.4229014020015631203364137036260215e-1

    r[ 4798].Re= 4.77551080679153805430559032174642175e-1, .Im= 8.7843173127627438567799345037201415e-1

    r[ 4799].Re= 4.77551080679153805430559032174642175e-1, .Im=-8.7843173127627438567799345037201415e-1

    r[ 4800].Re=-2.07246671453036240828637915001309000e-1, .Im= 9.7815537685905307174749623300158415e-1

    r[ 4801].Re=-2.07246671453036240828637915001309000e-1, .Im=-9.7815537685905307174749623300158415e-1

    r[ 4802].Re= 3.1139068319143876906185397501758416015625e-3, .Im= 9.9986731506724579876532743583084080e-1

    r[ 4803].Re= 3.1139068319143876906185397501758416015625e-3, .Im=-9.9986731506724579876532743583084080e-1

    r[ 4804].Re=-9.9967947288449610088179042577394280e-1, .Im= 2.08256887831033236924138662971017765625e-2

    r[ 4805].Re=-9.9967947288449610088179042577394280e-1, .Im=-2.08256887831033236924138662971017765625e-2

    r[ 4806].Re= 9.9607659614173649220703055107151155e-1, .Im= 8.798618029146887398184162520919926250e-2

    r[ 4807].Re= 9.9607659614173649220703055107151155e-1, .Im=-8.798618029146887398184162520919926250e-2

    r[ 4808].Re= 7.4348857791876499234717812214512375e-1, .Im= 6.6852264235383684898295086895814165e-1

    r[ 4809].Re= 7.4348857791876499234717812214512375e-1, .Im=-6.6852264235383684898295086895814165e-1

    r[ 4810].Re=-6.9762664432815424397915649024071170e-1, .Im= 7.1629312836160796695850194737431590e-1

    r[ 4811].Re=-6.9762664432815424397915649024071170e-1, .Im=-7.1629312836160796695850194737431590e-1

    r[ 4812].Re= 3.75749424058355208089210464095231125e-1, .Im= 9.2656505906811936768008308717980980e-1

    r[ 4813].Re= 3.75749424058355208089210464095231125e-1, .Im=-9.2656505906811936768008308717980980e-1

    r[ 4814].Re=-7.0721763511562341086857941263588145e-1, .Im= 7.0682386979542366489681626262608915e-1

    r[ 4815].Re=-7.0721763511562341086857941263588145e-1, .Im=-7.0682386979542366489681626262608915e-1

    r[ 4816].Re= 9.3959505582572577786493184248683970e-1, .Im= 3.41893852426067901273398774719680650e-1

    r[ 4817].Re= 9.3959505582572577786493184248683970e-1, .Im=-3.41893852426067901273398774719680650e-1

    r[ 4818].Re=-9.8074927562741398556767080663121305e-1, .Im= 1.947079381918441209897707722120685500e-1

    r[ 4819].Re=-9.8074927562741398556767080663121305e-1, .Im=-1.947079381918441209897707722120685500e-1

    r[ 4820].Re= 1.796977662517513785189748887205496375e-1, .Im= 9.835766583953962083342048572376370e-1

    r[ 4821].Re= 1.796977662517513785189748887205496375e-1, .Im=-9.835766583953962083342048572376370e-1

    r[ 4822].Re= 8.7169006838636975409428941929945720e-1, .Im= 4.89753888721899399705250743863871300e-1

    r[ 4823].Re= 8.7169006838636975409428941929945720e-1, .Im=-4.89753888721899399705250743863871300e-1

    r[ 4824].Re=-4.59068960729232866668780843610875300e-1, .Im= 8.8825664584226815545520139494328755e-1

    r[ 4825].Re=-4.59068960729232866668780843610875300e-1, .Im=-8.8825664584226815545520139494328755e-1

    r[ 4826].Re=-2.97264725221076497874150845746044050e-1, .Im= 9.5465512966651355775127285596681755e-1

    r[ 4827].Re=-2.97264725221076497874150845746044050e-1, .Im=-9.5465512966651355775127285596681755e-1

    r[ 4828].Re= 6.0591885108204579513113685607095245e-1, .Im= 7.9533706919553304182102237973595035e-1

    r[ 4829].Re= 6.0591885108204579513113685607095245e-1, .Im=-7.9533706919553304182102237973595035e-1

    r[ 4830].Re=-8.5309428769795681013476951193297280e-1, .Im= 5.2155262544542124736324240075191480e-1

    r[ 4831].Re=-8.5309428769795681013476951193297280e-1, .Im=-5.2155262544542124736324240075191480e-1

    r[ 4832].Re= 9.5805787025876343321328931779135015e-1, .Im= 2.86095872418363761369164421921595925e-1

    r[ 4833].Re= 9.5805787025876343321328931779135015e-1, .Im=-2.86095872418363761369164421921595925e-1

    r[ 4834].Re=-9.4000731705881568345262166985776275e-1, .Im= 3.40852019243433002060328362858854225e-1

    r[ 4835].Re=-9.4000731705881568345262166985776275e-1, .Im=-3.40852019243433002060328362858854225e-1

    r[ 4836].Re=-1.844225453522992663746293828808120375e-1, .Im= 9.8272305490925215831765626717242410e-1

    r[ 4837].Re=-1.844225453522992663746293828808120375e-1, .Im=-9.8272305490925215831765626717242410e-1

    r[ 4838].Re= 6.3187774127754026132208764465758575e-1, .Im= 7.7485774289724507202237191449967210e-1

    r[ 4839].Re= 6.3187774127754026132208764465758575e-1, .Im=-7.7485774289724507202237191449967210e-1

    r[ 4840].Re=-6.039200826399070409777891654812265e-1, .Im= 7.9689518699183059524671079998370260e-1

    r[ 4841].Re=-6.039200826399070409777891654812265e-1, .Im=-7.9689518699183059524671079998370260e-1

    r[ 4842].Re= 9.8217887310182416804593685810687020e-1, .Im= 1.873846193182139296951049800554756000e-1

    r[ 4843].Re= 9.8217887310182416804593685810687020e-1, .Im=-1.873846193182139296951049800554756000e-1

    r[ 4844].Re= 2.69179000295594328395765160166774875e-1, .Im= 9.6294625306971659561838805529987435e-1

    r[ 4845].Re= 2.69179000295594328395765160166774875e-1, .Im=-9.6294625306971659561838805529987435e-1

    r[ 4846].Re=-9.9435115839373222623720494084409435e-1, .Im= 1.0512276928338107340188400939950951875e-1

    r[ 4847].Re=-9.9435115839373222623720494084409435e-1, .Im=-1.0512276928338107340188400939950951875e-1

    r[ 4848].Re= 1.0944135422433082238669044272683095000e-1, .Im= 9.9386089183123504930961189529625695e-1

    r[ 4849].Re= 1.0944135422433082238669044272683095000e-1, .Im=-9.9386089183123504930961189529625695e-1

    r[ 4850].Re= 7.7377225853698938795588446737383490e-1, .Im= 6.3320395545827723449150425949483175e-1

    r[ 4851].Re= 7.7377225853698938795588446737383490e-1, .Im=-6.3320395545827723449150425949483175e-1

    r[ 4852].Re=-7.8450555387277964847214661858743055e-1, .Im= 6.1995244194529963710493802864220920e-1

    r[ 4853].Re=-7.8450555387277964847214661858743055e-1, .Im=-6.1995244194529963710493802864220920e-1

    r[ 4854].Re=-4.3166345247269222173969183131703175e-1, .Im= 9.0189113639448670323162104978109705e-1

    r[ 4855].Re=-4.3166345247269222173969183131703175e-1, .Im=-9.0189113639448670323162104978109705e-1

    r[ 4856].Re= 9.1737441362659133403667510719969865e-1, .Im= 3.97631576359255278774185171641875050e-1

    r[ 4857].Re= 9.1737441362659133403667510719969865e-1, .Im=-3.97631576359255278774185171641875050e-1

    r[ 4858].Re=-2.25976124589264831810098144160292562500e-2, .Im= 9.9961634868491100469611865264596415e-1

    r[ 4859].Re=-2.25976124589264831810098144160292562500e-2, .Im=-9.9961634868491100469611865264596415e-1

    r[ 4860].Re=-9.6380562960970184160913731830078175e-1, .Im= 2.66180817381163836721214011049596575e-1

    r[ 4861].Re=-9.6380562960970184160913731830078175e-1, .Im=-2.66180817381163836721214011049596575e-1

    r[ 4862].Re= 5.6623657918147429768396250437945125e-1, .Im= 8.2405001281556322645371892576804380e-1

    r[ 4863].Re= 5.6623657918147429768396250437945125e-1, .Im=-8.2405001281556322645371892576804380e-1

    r[ 4864].Re= 9.9762557556599684716047704569064080e-1, .Im= 6.846220503891217723513307191751664375e-2

    r[ 4865].Re= 9.9762557556599684716047704569064080e-1, .Im=-6.846220503891217723513307191751664375e-2

    r[ 4866].Re=-7.5399671783985089401625145910657010e-1, .Im= 6.5669501067425029017243787166080435e-1

    r[ 4867].Re=-7.5399671783985089401625145910657010e-1, .Im=-6.5669501067425029017243787166080435e-1

    r[ 4868].Re= 7.774450348865363791261984260927420000e-2, .Im= 9.9684091961249454705296102474676445e-1

    r[ 4869].Re= 7.774450348865363791261984260927420000e-2, .Im=-9.9684091961249454705296102474676445e-1

    r[ 4870].Re=-8.4401852493482609762764923289068970e-1, .Im= 5.3609480595797254220968852678197435e-1

    r[ 4871].Re=-8.4401852493482609762764923289068970e-1, .Im=-5.3609480595797254220968852678197435e-1

    r[ 4872].Re= 7.0116863684098340581130059945280660e-1, .Im= 7.1277575187925645838760146943968720e-1

    r[ 4873].Re= 7.0116863684098340581130059945280660e-1, .Im=-7.1277575187925645838760146943968720e-1

    r[ 4874].Re=-5.1886769649875497112390121401404030e-1, .Im= 8.5471018956477540218230615209904495e-1

    r[ 4875].Re=-5.1886769649875497112390121401404030e-1, .Im=-8.5471018956477540218230615209904495e-1

    r[ 4876].Re= 8.5942678506433811680409462496754710e-1, .Im= 5.1095967757565230460414795743417925e-1

    r[ 4877].Re= 8.5942678506433811680409462496754710e-1, .Im=-5.1095967757565230460414795743417925e-1

    r[ 4878].Re=-9.9891404515005155495543931465363125e-1, .Im= 4.4075779510449053510967587499180806250e-2

    r[ 4879].Re=-9.9891404515005155495543931465363125e-1, .Im=-4.4075779510449053510967587499180806250e-2

    r[ 4880].Re= 4.13984506097200333218921741718077100e-1, .Im= 9.1011111149320644830851279039052315e-1

    r[ 4881].Re= 4.13984506097200333218921741718077100e-1, .Im=-9.1011111149320644830851279039052315e-1

    r[ 4882].Re=-6.468945653732253164847065818321425e-1, .Im= 7.6241751982083871830297994165448470e-1

    r[ 4883].Re=-6.468945653732253164847065818321425e-1, .Im=-7.6241751982083871830297994165448470e-1

    r[ 4884].Re=-1.868234084483648416163958927427302000e-1, .Im= 9.8225499167618690599113051575841380e-1

    r[ 4885].Re=-1.868234084483648416163958927427302000e-1, .Im=-9.8225499167618690599113051575841380e-1

    r[ 4886].Re= 9.3831737504089074430879691135487515e-1, .Im= 3.45342340598535746387653944111661975e-1

    r[ 4887].Re= 9.3831737504089074430879691135487515e-1, .Im=-3.45342340598535746387653944111661975e-1

    r[ 4888].Re= 4.98920122845348035234280814620433375e-1, .Im= 8.6646703039782413391378668165998530e-1

    r[ 4889].Re= 4.98920122845348035234280814620433375e-1, .Im=-8.6646703039782413391378668165998530e-1

    r[ 4890].Re=-9.0890538864444969657796491446788420e-1, .Im= 4.16757669718126333435748165356926600e-1

    r[ 4891].Re=-9.0890538864444969657796491446788420e-1, .Im=-4.16757669718126333435748165356926600e-1

    r[ 4892].Re= 2.133320458681298159575590034364722625e-1, .Im= 9.7683242856006491372511391091393305e-1

    r[ 4893].Re= 2.133320458681298159575590034364722625e-1, .Im=-9.7683242856006491372511391091393305e-1

    r[ 4894].Re= 9.8648427672677663213818277654354460e-1, .Im= 1.632774333888409312720568777876906000e-1

    r[ 4895].Re= 9.8648427672677663213818277654354460e-1, .Im=-1.632774333888409312720568777876906000e-1

    r[ 4896].Re=-5.4479521267086328251139093481469895e-1, .Im= 8.3842986200274827179867997983819805e-1

    r[ 4897].Re=-5.4479521267086328251139093481469895e-1, .Im=-8.3842986200274827179867997983819805e-1

    r[ 4898].Re=-9.8724735642404404245553450891748070e-1, .Im= 1.585473216048638722686092705771443375e-1

    r[ 4899].Re=-9.8724735642404404245553450891748070e-1, .Im=-1.585473216048638722686092705771443375e-1

    r[ 4900].Re=-8.49577677259963498501704748377960625e-2, .Im= 9.9625895945518849750044410029659045e-1

    r[ 4901].Re=-8.49577677259963498501704748377960625e-2, .Im=-9.9625895945518849750044410029659045e-1

    r[ 4902].Re= 8.1250758410484391625061562081100415e-1, .Im= 5.8266479198381460058442371519049625e-1

    r[ 4903].Re= 8.1250758410484391625061562081100415e-1, .Im=-5.8266479198381460058442371519049625e-1

    r[ 4904].Re= 5.2625743045558481814083506833412680e-1, .Im= 8.5014355855411460893833464069757610e-1

    r[ 4905].Re= 5.2625743045558481814083506833412680e-1, .Im=-8.5014355855411460893833464069757610e-1

    r[ 4906].Re=-5.073080967358999382454953774868045e-1, .Im= 8.6162896044344972068529386888258155e-1

    r[ 4907].Re=-5.073080967358999382454953774868045e-1, .Im=-8.6162896044344972068529386888258155e-1

    r[ 4908].Re= 9.9872471695724440721164683054666965e-1, .Im= 5.0138872530354754164516606351753578125e-2

    r[ 4909].Re= 9.9872471695724440721164683054666965e-1, .Im=-5.0138872530354754164516606351753578125e-2

    r[ 4910].Re=-8.8168301846279573119602446240605785e-1, .Im= 4.71602218592482302916835124051431175e-1

    r[ 4911].Re=-8.8168301846279573119602446240605785e-1, .Im=-4.71602218592482302916835124051431175e-1

    r[ 4912].Re=-2.275605337651102622054111179750179750e-1, .Im= 9.7364000675569628562300295016029845e-1

    r[ 4913].Re=-2.275605337651102622054111179750179750e-1, .Im=-9.7364000675569628562300295016029845e-1

    r[ 4914].Re= 4.02808848621110215937335397029528375e-1, .Im= 9.151123744316973507295642775716260e-1

    r[ 4915].Re= 4.02808848621110215937335397029528375e-1, .Im=-9.151123744316973507295642775716260e-1

    r[ 4916].Re=-9.5875600468966315492735930092749185e-1, .Im= 2.83841228056018746173094768892042325e-1

    r[ 4917].Re=-9.5875600468966315492735930092749185e-1, .Im=-2.83841228056018746173094768892042325e-1

    r[ 4918].Re= 8.5247068374882761787603158154524860e-1, .Im= 5.224890043255034921543256132281385e-1

    r[ 4919].Re= 8.5247068374882761787603158154524860e-1, .Im=-5.224890043255034921543256132281385e-1

    r[ 4920].Re=-3.43654663746653210587567173206480200e-1, .Im= 9.3895897650825299596277773162000810e-1

    r[ 4921].Re=-3.43654663746653210587567173206480200e-1, .Im=-9.3895897650825299596277773162000810e-1

    r[ 4922].Re= 6.7360849381704712701690596077241930e-1, .Im= 7.3887999783313762502956478783744385e-1

    r[ 4923].Re= 6.7360849381704712701690596077241930e-1, .Im=-7.3887999783313762502956478783744385e-1

    r[ 4924].Re=-8.9894942871985672461221383855445310e-1, .Im= 4.37791229542448867562143277609720825e-1

    r[ 4925].Re=-8.9894942871985672461221383855445310e-1, .Im=-4.37791229542448867562143277609720825e-1

    r[ 4926].Re= 9.273018541645811074758398717676755e-1, .Im= 3.73902325192215723159705476064118550e-1

    r[ 4927].Re= 9.273018541645811074758398717676755e-1, .Im=-3.73902325192215723159705476064118550e-1

    r[ 4928].Re= 1.2160798249090588873944085435141460000e-1, .Im= 9.9244426925920403714798112559947185e-1

    r[ 4929].Re= 1.2160798249090588873944085435141460000e-1, .Im=-9.9244426925920403714798112559947185e-1

    r[ 4930].Re=-7.2768721409138714673048298209323545e-1, .Im= 6.8574532856558445548245117606711570e-1

    r[ 4931].Re=-7.2768721409138714673048298209323545e-1, .Im=-6.8574532856558445548245117606711570e-1

    r[ 4932].Re= 3.25279056504187591425392156452289775e-1, .Im= 9.4546280696177087410347894547157920e-1

    r[ 4933].Re= 3.25279056504187591425392156452289775e-1, .Im=-9.4546280696177087410347894547157920e-1

    r[ 4934].Re=-9.7879991559361878561418279787176285e-1, .Im= 2.042947290799962400953404539905022750e-1

    r[ 4935].Re=-9.7879991559361878561418279787176285e-1, .Im=-2.042947290799962400953404539905022750e-1

    r[ 4936].Re= 9.1542140361065083009606269115465690e-1, .Im= 4.02114246949261899821692622936097900e-1

    r[ 4937].Re= 9.1542140361065083009606269115465690e-1, .Im=-4.02114246949261899821692622936097900e-1

    r[ 4938].Re=-2.85552137841783293392694531576125875e-1, .Im= 9.5822428904982392960931747438735325e-1

    r[ 4939].Re=-2.85552137841783293392694531576125875e-1, .Im=-9.5822428904982392960931747438735325e-1

    r[ 4940].Re= 2.312393384549494002033753758951206625e-1, .Im= 9.7274481177194949133024692855542525e-1

    r[ 4941].Re= 2.312393384549494002033753758951206625e-1, .Im=-9.7274481177194949133024692855542525e-1

    r[ 4942].Re=-7.5880876456162393850490843760780990e-1, .Im= 6.5113196366883230314925867787678725e-1

    r[ 4943].Re=-7.5880876456162393850490843760780990e-1, .Im=-6.5113196366883230314925867787678725e-1

    r[ 4944].Re= 9.9231014592434219068195488944184035e-1, .Im= 1.2328985472715284221756348870258079375e-1

    r[ 4945].Re= 9.9231014592434219068195488944184035e-1, .Im=-1.2328985472715284221756348870258079375e-1

    r[ 4946].Re=-3.3212930888982744592752283097070175e-1, .Im= 9.4309504135180299844165574540966190e-1

    r[ 4947].Re=-3.3212930888982744592752283097070175e-1, .Im=-9.4309504135180299844165574540966190e-1

    r[ 4948].Re= 7.1757648638329096790755556867225095e-1, .Im= 6.9626202552999572059633237586240280e-1

    r[ 4949].Re= 7.1757648638329096790755556867225095e-1, .Im=-6.9626202552999572059633237586240280e-1

    r[ 4950].Re=-9.9709827698309061450032686479971740e-1, .Im= 7.463268316200694085793543308682273750e-2

    r[ 4951].Re=-9.9709827698309061450032686479971740e-1, .Im=-7.463268316200694085793543308682273750e-2

    r[ 4952].Re= 6.4882094744804075236999096887302580e-1, .Im= 7.6074335322740649356632047783932645e-1

    r[ 4953].Re= 6.4882094744804075236999096887302580e-1, .Im=-7.6074335322740649356632047783932645e-1

    r[ 4954].Re=-5.9312219886853023709250010142568495e-1, .Im= 8.0495779614858742334604357893113045e-1

    r[ 4955].Re=-5.9312219886853023709250010142568495e-1, .Im=-8.0495779614858742334604357893113045e-1

    r[ 4956].Re=-1.239232079173419598383532047591870625e-1, .Im= 9.9215807988834681108158974893740375e-1

    r[ 4957].Re=-1.239232079173419598383532047591870625e-1, .Im=-9.9215807988834681108158974893740375e-1

    r[ 4958].Re= 9.7093978278049741792443683152669105e-1, .Im= 2.388370673743627770058139958564424875e-1

    r[ 4959].Re= 9.7093978278049741792443683152669105e-1, .Im=-2.388370673743627770058139958564424875e-1

    r[ 4960].Re=-8.2927546896532267073354205422219820e-1, .Im= 5.5864963458969696397105053620180115e-1

    r[ 4961].Re=-8.2927546896532267073354205422219820e-1, .Im=-5.5864963458969696397105053620180115e-1

    r[ 4962].Re= 3.17175621187756939800550526342703950e-1, .Im= 9.4821868738142123245182801838382145e-1

    r[ 4963].Re= 3.17175621187756939800550526342703950e-1, .Im=-9.4821868738142123245182801838382145e-1

    r[ 4964].Re=-9.335829143153735465432419005082920e-1, .Im= 3.58064168916826575106426844286033875e-1

    r[ 4965].Re=-9.335829143153735465432419005082920e-1, .Im=-3.58064168916826575106426844286033875e-1

    r[ 4966].Re= 8.0458186607697990133658549893880260e-1, .Im= 5.9356512762108182279519041912863030e-1

    r[ 4967].Re= 8.0458186607697990133658549893880260e-1, .Im=-5.9356512762108182279519041912863030e-1

    r[ 4968].Re=-3.8519840417780053243301807697207550000e-2, .Im= 9.9911779345132945007179614549386315e-1

    r[ 4969].Re=-3.8519840417780053243301807697207550000e-2, .Im=-9.9911779345132945007179614549386315e-1

    r[ 4970].Re= 5.8428056469636580061433051014319060e-1, .Im= 8.1136574183413479044446603438700545e-1

    r[ 4971].Re= 5.8428056469636580061433051014319060e-1, .Im=-8.1136574183413479044446603438700545e-1

    r[ 4972].Re=-6.59874092476104179283424855384510e-1, .Im= 7.5122486761432694102325058338465165e-1

    r[ 4973].Re=-6.59874092476104179283424855384510e-1, .Im=-7.5122486761432694102325058338465165e-1

    r[ 4974].Re= 9.5114094917740021895014024266856720e-1, .Im= 3.08301144631145107588565679179737325e-1

    r[ 4975].Re= 9.5114094917740021895014024266856720e-1, .Im=-3.08301144631145107588565679179737325e-1

    r[ 4976].Re=-9.9916542294068044771648828827892430e-1, .Im= 3.7958606213694311148909577013910165625e-2

    r[ 4977].Re=-9.9916542294068044771648828827892430e-1, .Im=-3.7958606213694311148909577013910165625e-2

    r[ 4978].Re= 1.0335163681411285718780845854780636250e-1, .Im= 9.945129995979756776236513360345270e-1

    r[ 4979].Re= 1.0335163681411285718780845854780636250e-1, .Im=-9.945129995979756776236513360345270e-1

    r[ 4980].Re=-4.40480129041137313805620578932575875e-1, .Im= 8.9763357497401563556138626154279335e-1

    r[ 4981].Re=-4.40480129041137313805620578932575875e-1, .Im=-8.9763357497401563556138626154279335e-1

    r[ 4982].Re= 8.8628008309144645782140514711500145e-1, .Im= 4.62831363076907753573152604076312850e-1

    r[ 4983].Re= 8.8628008309144645782140514711500145e-1, .Im=-4.62831363076907753573152604076312850e-1

    r[ 4984].Re= 4.41650890792870842727069202737766300e-1, .Im= 8.9701468157655805946149030205560845e-1

    r[ 4985].Re= 4.41650890792870842727069202737766300e-1, .Im=-8.9701468157655805946149030205560845e-1

    r[ 4986].Re=-8.6003783628049101928070285794092340e-1, .Im= 5.1000873677737790234942849565413780e-1

    r[ 4987].Re=-8.6003783628049101928070285794092340e-1, .Im=-5.1000873677737790234942849565413780e-1

    r[ 4988].Re=-5.3656128614419473787933156927465460e-1, .Im= 8.4371463676529434572159971139626575e-1

    r[ 4989].Re=-5.3656128614419473787933156927465460e-1, .Im=-8.4371463676529434572159971139626575e-1

    r[ 4990].Re=-7.9352126163417102677755110562429760e-1, .Im= 6.0834845620076649641561061798711305e-1

    r[ 4991].Re=-7.9352126163417102677755110562429760e-1, .Im=-6.0834845620076649641561061798711305e-1

    r[ 4992].Re= 7.5162157158557796332587486176635135e-1, .Im= 6.5936383747745452854616132754017595e-1

    r[ 4993].Re= 7.5162157158557796332587486176635135e-1, .Im=-6.5936383747745452854616132754017595e-1

    r[ 4994].Re=-4.9520266164208154302528441803588065625e-2, .Im= 9.9863328238733017894190879815141670e-1

    r[ 4995].Re=-4.9520266164208154302528441803588065625e-2, .Im=-9.9863328238733017894190879815141670e-1

    r[ 4996].Re= 9.9959868108873295433625116857001555e-1, .Im= 2.81363239558501745940510829768754765625e-2

    r[ 4997].Re= 9.9959868108873295433625116857001555e-1, .Im=-2.81363239558501745940510829768754765625e-2

    r[ 4998].Re=-9.6667933767660696453560831287177275e-1, .Im= 2.55550552851149637145766746471053900e-1

    r[ 4999].Re=-9.6667933767660696453560831287177275e-1, .Im=-2.55550552851149637145766746471053900e-1

    r[ 5000].Re= 4.27328648502977470613473087723832575e-1, .Im= 9.039325863106167924243550260143820e-1

    r[ 5001].Re= 4.27328648502977470613473087723832575e-1, .Im=-9.039325863106167924243550260143820e-1

    r[ 5002].Re= 9.5375942460506446529677759826881810e-1, .Im= 3.0014576127927472537493258641916325e-1

    r[ 5003].Re= 9.5375942460506446529677759826881810e-1, .Im=-3.0014576127927472537493258641916325e-1

    r[ 5004].Re=-3.75663704109947427234317274269415050e-1, .Im= 9.2662463169902076209893948544049635e-1

    r[ 5005].Re=-3.75663704109947427234317274269415050e-1, .Im=-9.2662463169902076209893948544049635e-1

    r[ 5006].Re=-6.9500447905725859509828978843870570e-1, .Im= 7.1884989545411315248202299699187275e-1

    r[ 5007].Re=-6.9500447905725859509828978843870570e-1, .Im=-7.1884989545411315248202299699187275e-1

    r[ 5008].Re= 5.9022341828198299218399824894731860e-1, .Im= 8.0705721472524150073013515793718395e-1

    r[ 5009].Re= 5.9022341828198299218399824894731860e-1, .Im=-8.0705721472524150073013515793718395e-1

    r[ 5010].Re=-9.4329921971522567858414731745142485e-1, .Im= 3.31610222861461467758203980338294050e-1

    r[ 5011].Re=-9.4329921971522567858414731745142485e-1, .Im=-3.31610222861461467758203980338294050e-1

    r[ 5012].Re=-1.687495992909827102756992189824813875e-1, .Im= 9.8551911044875384337871082607307470e-1

    r[ 5013].Re=-1.687495992909827102756992189824813875e-1, .Im=-9.8551911044875384337871082607307470e-1

    r[ 5014].Re= 8.258493261650969863296722905943170e-1, .Im= 5.6361248589603785141832759109092875e-1

    r[ 5015].Re= 8.258493261650969863296722905943170e-1, .Im=-5.6361248589603785141832759109092875e-1

    r[ 5016].Re= 1.71271761213820428171317189480760125e-1, .Im= 9.8508698164140096054097739397548135e-1

    r[ 5017].Re= 1.71271761213820428171317189480760125e-1, .Im=-9.8508698164140096054097739397548135e-1

    r[ 5018].Re=-9.894603866479102505238074627413880e-1, .Im= 1.440121921225877288375016860300092875e-1

    r[ 5019].Re=-9.894603866479102505238074627413880e-1, .Im=-1.440121921225877288375016860300092875e-1

    r[ 5020].Re= 9.9037259386508391667547357428702525e-1, .Im= 1.378541899058463582328215579764219000e-1

    r[ 5021].Re= 9.9037259386508391667547357428702525e-1, .Im=-1.378541899058463582328215579764219000e-1

    r[ 5022].Re=-3.11271302735468990974254666070919475e-1, .Im= 9.50194589741461537180100549448980e-1

    r[ 5023].Re=-3.11271302735468990974254666070919475e-1, .Im=-9.50194589741461537180100549448980e-1

    r[ 5024].Re= 2.92685532182387853072924599473481050e-1, .Im= 9.5605853657722861260737090560724025e-1

    r[ 5025].Re= 2.92685532182387853072924599473481050e-1, .Im=-9.5605853657722861260737090560724025e-1

    r[ 5026].Re=-8.3605819860746033445053626564913425e-1, .Im= 5.4845029286651136857244637212716040e-1

    r[ 5027].Re=-8.3605819860746033445053626564913425e-1, .Im=-5.4845029286651136857244637212716040e-1

    r[ 5028].Re= 8.6377024492907839015032323004561475e-1, .Im= 5.0355958958197311048365918395575135e-1

    r[ 5029].Re= 8.6377024492907839015032323004561475e-1, .Im=-5.0355958958197311048365918395575135e-1

    r[ 5030].Re=-6.1363318353998019816231135337147860e-1, .Im= 7.894377372997141151245159562677145e-1

    r[ 5031].Re=-6.1363318353998019816231135337147860e-1, .Im=-7.894377372997141151245159562677145e-1

    r[ 5032].Re= 6.5530485258311321761226508897379970e-1, .Im= 7.5515473130192511952429867960745465e-1

    r[ 5033].Re= 6.5530485258311321761226508897379970e-1, .Im=-7.5515473130192511952429867960745465e-1

    r[ 5034].Re=-9.3137133115145775974497155402787025e-1, .Im= 3.63774562217706542988082674128236225e-1

    r[ 5035].Re=-9.3137133115145775974497155402787025e-1, .Im=-3.63774562217706542988082674128236225e-1

    r[ 5036].Re= 5.2084140747386584169298373581113990625e-2, .Im= 9.9850757067515971687754472441156390e-1

    r[ 5037].Re= 5.2084140747386584169298373581113990625e-2, .Im=-9.9850757067515971687754472441156390e-1

    r[ 5038].Re= 9.9516798422921526334761210819124240e-1, .Im= 9.774209000495499843896851643876288750e-2

    r[ 5039].Re= 9.9516798422921526334761210819124240e-1, .Im=-9.774209000495499843896851643876288750e-2

    r[ 5040].Re=-3.58576283060536238345150650275172650e-1, .Im= 9.3337289628699082744134329914231780e-1

    r[ 5041].Re=-3.58576283060536238345150650275172650e-1, .Im=-9.3337289628699082744134329914231780e-1

    r[ 5042].Re= 5.1055235888500738461459604877745730e-1, .Im= 8.5967186814622731372281805306556630e-1

    r[ 5043].Re= 5.1055235888500738461459604877745730e-1, .Im=-8.5967186814622731372281805306556630e-1

    r[ 5044].Re=-9.8373449664181822349462436250178140e-1, .Im= 1.790555407341159754874837517490959625e-1

    r[ 5045].Re=-9.8373449664181822349462436250178140e-1, .Im=-1.790555407341159754874837517490959625e-1

    r[ 5046].Re= 2.72705758921287066964822543013724475e-1, .Im= 9.6193885875626550241435097632347605e-1

    r[ 5047].Re= 2.72705758921287066964822543013724475e-1, .Im=-9.6193885875626550241435097632347605e-1

    r[ 5048].Re= 9.0839899198629237009328107887995425e-1, .Im= 4.17759298125039757465515322110150e-1

    r[ 5049].Re= 9.0839899198629237009328107887995425e-1, .Im=-4.17759298125039757465515322110150e-1

    r[ 5050].Re=-6.7808181558162661239919088984606785e-1, .Im= 7.3483801232948187109883519951836205e-1

    r[ 5051].Re=-6.7808181558162661239919088984606785e-1, .Im=-7.3483801232948187109883519951836205e-1

    r[ 5052].Re=-1.348600666853674578948840689918142625e-1, .Im= 9.9074003515289499333107414713595060e-1

    r[ 5053].Re=-1.348600666853674578948840689918142625e-1, .Im=-9.9074003515289499333107414713595060e-1

    r[ 5054].Re= 7.2605050309203778002853368889191185e-1, .Im= 6.8741837197567579043067098609753880e-1

    r[ 5055].Re= 7.2605050309203778002853368889191185e-1, .Im=-6.8741837197567579043067098609753880e-1

    r[ 5056].Re=-8.9297408747806239492916802191757595e-1, .Im= 4.49867527947892531514639813394751375e-1

    r[ 5057].Re=-8.9297408747806239492916802191757595e-1, .Im=-4.49867527947892531514639813394751375e-1

    r[ 5058].Re= 9.8053809289929017012354961480014025e-1, .Im= 1.95808561189846130901059950701892375e-1

    r[ 5059].Re= 9.8053809289929017012354961480014025e-1, .Im=-1.95808561189846130901059950701892375e-1

    r[ 5060].Re=-4.94601911759083745501186513138236475e-1, .Im= 8.6898629897101298258377255478990260e-1

    r[ 5061].Re=-4.94601911759083745501186513138236475e-1, .Im=-8.6898629897101298258377255478990260e-1

    r[ 5062].Re=-7.3438189853137258999993264296790580e-1, .Im= 6.7857110001426257372969530479167585e-1

    r[ 5063].Re=-7.3438189853137258999993264296790580e-1, .Im=-6.7857110001426257372969530479167585e-1

    r[ 5064].Re= 5.4896855321664184135244113349472170e-1, .Im= 8.356679977957806038091348455054685e-1

    r[ 5065].Re= 5.4896855321664184135244113349472170e-1, .Im=-8.356679977957806038091348455054685e-1

    r[ 5066].Re= 4.3510584388011544487717685569805325000e-2, .Im= 9.9890856831233354462540319218533110e-1

    r[ 5067].Re= 4.3510584388011544487717685569805325000e-2, .Im=-9.9890856831233354462540319218533110e-1

    r[ 5068].Re= 8.460050937766017131735907241818495e-1, .Im= 5.3289251453301766936476724367821585e-1

    r[ 5069].Re= 8.460050937766017131735907241818495e-1, .Im=-5.3289251453301766936476724367821585e-1

    r[ 5070].Re=-8.1463738138920427367395404871786010e-1, .Im= 5.7979116201977487499163999018492175e-1

    r[ 5071].Re=-8.1463738138920427367395404871786010e-1, .Im=-5.7979116201977487499163999018492175e-1

    r[ 5072].Re=-9.9762715255994527385752235204563475e-1, .Im= 6.730068571870148619318285909685073125e-2

    r[ 5073].Re=-9.9762715255994527385752235204563475e-1, .Im=-6.730068571870148619318285909685073125e-2

    r[ 5074].Re= 9.3093231845255142165029837997280990e-1, .Im= 3.64809298794664726983683067373931400e-1

    r[ 5075].Re= 9.3093231845255142165029837997280990e-1, .Im=-3.64809298794664726983683067373931400e-1

    r[ 5076].Re= 3.92707197806597907430159466457553200e-1, .Im= 9.1950150812721953563766419392777605e-1

    r[ 5077].Re= 3.92707197806597907430159466457553200e-1, .Im=-9.1950150812721953563766419392777605e-1

    r[ 5078].Re=-2.204060930793543815475743485876591875e-1, .Im= 9.7528168336281240158314176369458435e-1

    r[ 5079].Re=-2.204060930793543815475743485876591875e-1, .Im=-9.7528168336281240158314176369458435e-1

    r[ 5080].Re= 6.1657328756588991591769399747136045e-1, .Im= 7.8709714445722367415214648644905535e-1

    r[ 5081].Re= 6.1657328756588991591769399747136045e-1, .Im=-7.8709714445722367415214648644905535e-1

    r[ 5082].Re=-4.7316611364725058574975946612539700e-1, .Im= 8.8084436145829592135214625159278510e-1

    r[ 5083].Re=-4.7316611364725058574975946612539700e-1, .Im=-8.8084436145829592135214625159278510e-1

    r[ 5084].Re=-9.5375634490735061721267129541956815e-1, .Im= 3.00247045793912259448177337617380525e-1

    r[ 5085].Re=-9.5375634490735061721267129541956815e-1, .Im=-3.00247045793912259448177337617380525e-1

    r[ 5086].Re= 9.9818311090985101241557231332990340e-1, .Im= 5.9919437192649083190332248705090021875e-2

    r[ 5087].Re= 9.9818311090985101241557231332990340e-1, .Im=-5.9919437192649083190332248705090021875e-2

    r[ 5088].Re= 1.53142401597511718103206135310756500e-1, .Im= 9.8806966022929254567230827888124620e-1

    r[ 5089].Re= 1.53142401597511718103206135310756500e-1, .Im=-9.8806966022929254567230827888124620e-1

    r[ 5090].Re=-9.7237657333466320785930747661041095e-1, .Im= 2.329875377893926846617489445634419000e-1

    r[ 5091].Re=-9.7237657333466320785930747661041095e-1, .Im=-2.329875377893926846617489445634419000e-1

    r[ 5092].Re= 7.9206111478642704515351624650065785e-1, .Im= 6.1019362623285222646529746270971370e-1

    r[ 5093].Re= 7.9206111478642704515351624650065785e-1, .Im=-6.1019362623285222646529746270971370e-1

    r[ 5094].Re=-2.66714301233785811007237498415634025e-1, .Im= 9.6363592770111516916387017772649410e-1

    r[ 5095].Re=-2.66714301233785811007237498415634025e-1, .Im=-9.6363592770111516916387017772649410e-1

    r[ 5096].Re=-8.680622720195969588274920170078985e-1, .Im= 4.96242260665644752126723915353068150e-1

    r[ 5097].Re=-8.680622720195969588274920170078985e-1, .Im=-4.96242260665644752126723915353068150e-1

    r[ 5098].Re= 8.9188286385762161057044750123168340e-1, .Im= 4.51939076587524413142205048643518225e-1

    r[ 5099].Re= 8.9188286385762161057044750123168340e-1, .Im=-4.51939076587524413142205048643518225e-1

    r[ 5100].Re=-1.157481095043120904175548702141895703125e-2, .Im= 9.9979369588514066524709278382943010e-1

    r[ 5101].Re=-1.157481095043120904175548702141895703125e-2, .Im=-9.9979369588514066524709278382943010e-1

    r[ 5102].Re=-5.6617623019206442247508448417647740e-1, .Im= 8.2413786650117748511235049591050480e-1

    r[ 5103].Re=-5.6617623019206442247508448417647740e-1, .Im=-8.2413786650117748511235049591050480e-1

    r[ 5104].Re=-7.7838350435263270465924279051250775e-1, .Im= 6.2759805424006409602100120537215840e-1

    r[ 5105].Re=-7.7838350435263270465924279051250775e-1, .Im=-6.2759805424006409602100120537215840e-1

    r[ 5106].Re= 4.65667946051884662495012889849022025e-1, .Im= 8.8478174590174762936811703184503130e-1

    r[ 5107].Re= 4.65667946051884662495012889849022025e-1, .Im=-8.8478174590174762936811703184503130e-1

    r[ 5108].Re=-1.0081266581868028597845921012776670625e-1, .Im= 9.9476528467230307395396948777488430e-1

    r[ 5109].Re=-1.0081266581868028597845921012776670625e-1, .Im=-9.9476528467230307395396948777488430e-1

    r[ 5110].Re=-6.3562287786747873052917157110641710e-1, .Im= 7.7185541769157806069046046104631385e-1

    r[ 5111].Re=-6.3562287786747873052917157110641710e-1, .Im=-7.7185541769157806069046046104631385e-1

    r[ 5112].Re= 9.7434196702317998894926631692214865e-1, .Im= 2.245322181573230213569303259646403500e-1

    r[ 5113].Re= 9.7434196702317998894926631692214865e-1, .Im=-2.245322181573230213569303259646403500e-1

    r[ 5114].Re= 6.8795345907035243548932612611679360e-1, .Im= 7.2553417283481969057845617498969655e-1

    r[ 5115].Re= 6.8795345907035243548932612611679360e-1, .Im=-7.2553417283481969057845617498969655e-1

    r[ 5116].Re=-9.1591831351029673324859459171420890e-1, .Im= 4.01099929241197250551209663171903225e-1

    r[ 5117].Re=-9.1591831351029673324859459171420890e-1, .Im=-4.01099929241197250551209663171903225e-1

    r[ 5118].Re= 7.6360767557589015464003523447900075e-1, .Im= 6.4544046056083359541588606589357365e-1

    r[ 5119].Re= 7.6360767557589015464003523447900075e-1, .Im=-6.4544046056083359541588606589357365e-1

    r[ 5120].Re= 3.34542716846257248697327213449170800e-1, .Im= 9.4222755704441130131243653522687960e-1

    r[ 5121].Re= 3.34542716846257248697327213449170800e-1, .Im=-9.4222755704441130131243653522687960e-1

    r[ 5122].Re= 9.657552724818504463755175493133720e-1, .Im= 2.58988846880686962581563648200244625e-1

    r[ 5123].Re= 9.657552724818504463755175493133720e-1, .Im=-2.58988846880686962581563648200244625e-1

    r[ 5124].Re= 1.893419092302959239049187090131454125e-1, .Im= 9.8177042471628062081379084702348335e-1

    r[ 5125].Re= 1.893419092302959239049187090131454125e-1, .Im=-9.8177042471628062081379084702348335e-1

    r[ 5126].Re=-9.9240987997076357540748858809820375e-1, .Im= 1.2216618076684941651688376396123203125e-1

    r[ 5127].Re=-9.9240987997076357540748858809820375e-1, .Im=-1.2216618076684941651688376396123203125e-1

    r[ 5128].Re=-4.17252850455072155089197849520132875e-1, .Im= 9.0866416639910185804041020674048920e-1

    r[ 5129].Re=-4.17252850455072155089197849520132875e-1, .Im=-9.0866416639910185804041020674048920e-1

    p2[ 0]=1.500000e+01

    p2[ 1]=1.500000e+00

    p2[ 2]=1.500000e+00

    p2[ 3]=1.500000e+00

    p2[ 4]=1.500000e+00

    p2[ 5]=1.500000e+00

    p2[ 6]=1.500000e+00

    p2[ 7]=1.500000e+00

    p2[ 8]=1.500000e+00

    p2[ 9]=1.500000e+00

    p2[ 10]=1.500000e+00

    p2[ 11]=1.500000e+00

    p2[ 12]=1.500000e+00

    p2[ 13]=1.500000e+00

    p2[ 14]=1.500000e+00

    p2[ 15]=1.500000e+00

    p2[ 16]=1.500000e+00

    p2[ 17]=1.500000e+00

    p2[ 18]=1.500000e+00

    p2[ 19]=1.500000e+00

    p2[ 20]=1.500000e+00

    p2[ 21]=1.500000e+00

    p2[ 22]=1.500000e+00

    p2[ 23]=1.500000e+00

    p2[ 24]=1.500000e+00

    p2[ 25]=1.500000e+00

    p2[ 26]=1.500000e+00

    p2[ 27]=1.500000e+00

    p2[ 28]=1.500000e+00

    p2[ 29]=1.500000e+00

    p2[ 30]=1.500000e+00

    p2[ 31]=1.500000e+00

    p2[ 32]=1.500000e+00

    p2[ 33]=1.500000e+00

    p2[ 34]=1.500000e+00

    p2[ 35]=1.500000e+00

    p2[ 36]=1.500000e+00

    p2[ 37]=1.500000e+00

    p2[ 38]=1.500000e+00

    p2[ 39]=1.500000e+00

    p2[ 40]=1.500000e+00

    p2[ 41]=1.500000e+00

    p2[ 42]=1.500000e+00

    p2[ 43]=1.500000e+00

    p2[ 44]=1.500000e+00

    p2[ 45]=1.500000e+00

    p2[ 46]=1.500000e+00

    p2[ 47]=1.500000e+00

    p2[ 48]=1.500000e+00

    p2[ 49]=1.500000e+00

    p2[ 50]=1.500000e+00

    p2[ 51]=1.500000e+00

    p2[ 52]=1.500000e+00

    p2[ 53]=1.500000e+00

    p2[ 54]=1.500000e+00

    p2[ 55]=1.500000e+00

    p2[ 56]=1.500000e+00

    p2[ 57]=1.500000e+00

    p2[ 58]=1.500000e+00

    p2[ 59]=1.500000e+00

    p2[ 60]=1.500000e+00

    p2[ 61]=1.500000e+00

    p2[ 62]=1.500000e+00

    p2[ 63]=1.500000e+00

    p2[ 64]=1.500000e+00

    p2[ 65]=1.500000e+00

    p2[ 66]=1.500000e+00

    p2[ 67]=1.500000e+00

    p2[ 68]=1.500000e+00

    p2[ 69]=1.500000e+00

    p2[ 70]=1.500000e+00

    p2[ 71]=1.500000e+00

    p2[ 72]=1.500000e+00

    p2[ 73]=1.500000e+00

    p2[ 74]=1.500000e+00

    p2[ 75]=1.500000e+00

    p2[ 76]=1.500000e+00

    p2[ 77]=1.500000e+00

    p2[ 78]=1.500000e+00

    p2[ 79]=1.500000e+00

    p2[ 80]=1.500000e+00

    p2[ 81]=1.500000e+00

    p2[ 82]=1.500000e+00

    p2[ 83]=1.500000e+00

    p2[ 84]=1.500000e+00

    p2[ 85]=1.500000e+00

    p2[ 86]=1.500000e+00

    p2[ 87]=1.500000e+00

    p2[ 88]=1.500000e+00

    p2[ 89]=1.500000e+00

    p2[ 90]=1.500000e+00

    p2[ 91]=1.500000e+00

    p2[ 92]=1.500000e+00

    p2[ 93]=1.500000e+00

    p2[ 94]=1.500000e+00

    p2[ 95]=1.500000e+00

    p2[ 96]=1.500000e+00

    p2[ 97]=1.500000e+00

    p2[ 98]=1.500000e+00

    p2[ 99]=1.500000e+00

    p2[ 100]=1.500000e+00

    p2[ 101]=1.500000e+00

    p2[ 102]=1.500000e+00

    p2[ 103]=1.500000e+00

    p2[ 104]=1.500000e+00

    p2[ 105]=1.500000e+00

    p2[ 106]=1.500000e+00

    p2[ 107]=1.500000e+00

    p2[ 108]=1.500000e+00

    p2[ 109]=1.500000e+00

    p2[ 110]=1.500000e+00

    p2[ 111]=1.500000e+00

    p2[ 112]=1.500000e+00

    p2[ 113]=1.500000e+00

    p2[ 114]=1.500000e+00

    p2[ 115]=1.500000e+00

    p2[ 116]=1.500000e+00

    p2[ 117]=1.500000e+00

    p2[ 118]=1.500000e+00

    p2[ 119]=1.500000e+00

    p2[ 120]=1.500000e+00

    p2[ 121]=1.500000e+00

    p2[ 122]=1.500000e+00

    p2[ 123]=1.500000e+00

    p2[ 124]=1.500000e+00

    p2[ 125]=1.500000e+00

    p2[ 126]=1.500000e+00

    p2[ 127]=1.500000e+00

    p2[ 128]=1.500000e+00

    p2[ 129]=1.500000e+00

    p2[ 130]=1.500000e+00

    p2[ 131]=1.500000e+00

    p2[ 132]=1.500000e+00

    p2[ 133]=1.500000e+00

    p2[ 134]=1.500000e+00

    p2[ 135]=1.500000e+00

    p2[ 136]=1.500000e+00

    p2[ 137]=1.500000e+00

    p2[ 138]=1.500000e+00

    p2[ 139]=1.500000e+00

    p2[ 140]=1.500000e+00

    p2[ 141]=1.500000e+00

    p2[ 142]=1.500000e+00

    p2[ 143]=1.500000e+00

    p2[ 144]=1.500000e+00

    p2[ 145]=1.500000e+00

    p2[ 146]=1.500000e+00

    p2[ 147]=1.500000e+00

    p2[ 148]=1.500000e+00

    p2[ 149]=1.500000e+00

    p2[ 150]=1.500000e+00

    p2[ 151]=1.500000e+00

    p2[ 152]=1.500000e+00

    p2[ 153]=1.500000e+00

    p2[ 154]=1.500000e+00

    p2[ 155]=1.500000e+00

    p2[ 156]=1.500000e+00

    p2[ 157]=1.500000e+00

    p2[ 158]=1.500000e+00

    p2[ 159]=1.500000e+00

    p2[ 160]=1.500000e+00

    p2[ 161]=1.500000e+00

    p2[ 162]=1.500000e+00

    p2[ 163]=1.500000e+00

    p2[ 164]=1.500000e+00

    p2[ 165]=1.500000e+00

    p2[ 166]=1.500000e+00

    p2[ 167]=1.500000e+00

    p2[ 168]=1.500000e+00

    p2[ 169]=1.500000e+00

    p2[ 170]=1.500000e+00

    p2[ 171]=1.500000e+00

    p2[ 172]=1.500000e+00

    p2[ 173]=1.500000e+00

    p2[ 174]=1.500000e+00

    p2[ 175]=1.500000e+00

    p2[ 176]=1.500000e+00

    p2[ 177]=1.500000e+00

    p2[ 178]=1.500000e+00

    p2[ 179]=1.500000e+00

    p2[ 180]=1.500000e+00

    p2[ 181]=1.500000e+00

    p2[ 182]=1.500000e+00

    p2[ 183]=1.500000e+00

    p2[ 184]=1.500000e+00

    p2[ 185]=1.500000e+00

    p2[ 186]=1.500000e+00

    p2[ 187]=1.500000e+00

    p2[ 188]=1.500000e+00

    p2[ 189]=1.500000e+00

    p2[ 190]=1.500000e+00

    p2[ 191]=1.500000e+00

    p2[ 192]=1.500000e+00

    p2[ 193]=1.500000e+00

    p2[ 194]=1.500000e+00

    p2[ 195]=1.500000e+00

    p2[ 196]=1.500000e+00

    p2[ 197]=1.500000e+00

    p2[ 198]=1.500000e+00

    p2[ 199]=1.500000e+00

    p2[ 200]=1.500000e+00

    p2[ 201]=1.500000e+00

    p2[ 202]=1.500000e+00

    p2[ 203]=1.500000e+00

    p2[ 204]=1.500000e+00

    p2[ 205]=1.500000e+00

    p2[ 206]=1.500000e+00

    p2[ 207]=1.500000e+00

    p2[ 208]=1.500000e+00

    p2[ 209]=1.500000e+00

    p2[ 210]=1.500000e+00

    p2[ 211]=1.500000e+00

    p2[ 212]=1.500000e+00

    p2[ 213]=1.500000e+00

    p2[ 214]=1.500000e+00

    p2[ 215]=1.500000e+00

    p2[ 216]=1.500000e+00

    p2[ 217]=1.500000e+00

    p2[ 218]=1.500000e+00

    p2[ 219]=1.500000e+00

    p2[ 220]=1.500000e+00

    p2[ 221]=1.500000e+00

    p2[ 222]=1.500000e+00

    p2[ 223]=1.500000e+00

    p2[ 224]=1.500000e+00

    p2[ 225]=1.500000e+00

    p2[ 226]=1.500000e+00

    p2[ 227]=1.500000e+00

    p2[ 228]=1.500000e+00

    p2[ 229]=1.500000e+00

    p2[ 230]=1.500000e+00

    p2[ 231]=1.500000e+00

    p2[ 232]=1.500000e+00

    p2[ 233]=1.500000e+00

    p2[ 234]=1.500000e+00

    p2[ 235]=1.500000e+00

    p2[ 236]=1.500000e+00

    p2[ 237]=1.500000e+00

    p2[ 238]=1.500000e+00

    p2[ 239]=1.500000e+00

    p2[ 240]=1.500000e+00

    p2[ 241]=1.500000e+00

    p2[ 242]=1.500000e+00

    p2[ 243]=1.500000e+00

    p2[ 244]=1.500000e+00

    p2[ 245]=1.500000e+00

    p2[ 246]=1.500000e+00

    p2[ 247]=1.500000e+00

    p2[ 248]=1.500000e+00

    p2[ 249]=1.500000e+00

    p2[ 250]=1.500000e+00

    p2[ 251]=1.500000e+00

    p2[ 252]=1.500000e+00

    p2[ 253]=1.500000e+00

    p2[ 254]=1.500000e+00

    p2[ 255]=1.500000e+00

    p2[ 256]=1.500000e+00

    p2[ 257]=1.500000e+00

    p2[ 258]=1.500000e+00

    p2[ 259]=1.500000e+00

    p2[ 260]=1.500000e+00

    p2[ 261]=1.500000e+00

    p2[ 262]=1.500000e+00

    p2[ 263]=1.500000e+00

    p2[ 264]=1.500000e+00

    p2[ 265]=1.500000e+00

    p2[ 266]=1.500000e+00

    p2[ 267]=1.500000e+00

    p2[ 268]=1.500000e+00

    p2[ 269]=1.500000e+00

    p2[ 270]=1.500000e+00

    p2[ 271]=1.500000e+00

    p2[ 272]=1.500000e+00

    p2[ 273]=1.500000e+00

    p2[ 274]=1.500000e+00

    p2[ 275]=1.500000e+00

    p2[ 276]=1.500000e+00

    p2[ 277]=1.500000e+00

    p2[ 278]=1.500000e+00

    p2[ 279]=1.500000e+00

    p2[ 280]=1.500000e+00

    p2[ 281]=1.500000e+00

    p2[ 282]=1.500000e+00

    p2[ 283]=1.500000e+00

    p2[ 284]=1.500000e+00

    p2[ 285]=1.500000e+00

    p2[ 286]=1.500000e+00

    p2[ 287]=1.500000e+00

    p2[ 288]=1.500000e+00

    p2[ 289]=1.500000e+00

    p2[ 290]=1.500000e+00

    p2[ 291]=1.500000e+00

    p2[ 292]=1.500000e+00

    p2[ 293]=1.500000e+00

    p2[ 294]=1.500000e+00

    p2[ 295]=1.500000e+00

    p2[ 296]=1.500000e+00

    p2[ 297]=1.500000e+00

    p2[ 298]=1.500000e+00

    p2[ 299]=1.500000e+00

    p2[ 300]=1.500000e+00

    p2[ 301]=1.500000e+00

    p2[ 302]=1.500000e+00

    p2[ 303]=1.500000e+00

    p2[ 304]=1.500000e+00

    p2[ 305]=1.500000e+00

    p2[ 306]=1.500000e+00

    p2[ 307]=1.500000e+00

    p2[ 308]=1.500000e+00

    p2[ 309]=1.500000e+00

    p2[ 310]=1.500000e+00

    p2[ 311]=1.500000e+00

    p2[ 312]=1.500000e+00

    p2[ 313]=1.500000e+00

    p2[ 314]=1.500000e+00

    p2[ 315]=1.500000e+00

    p2[ 316]=1.500000e+00

    p2[ 317]=1.500000e+00

    p2[ 318]=1.500000e+00

    p2[ 319]=1.500000e+00

    p2[ 320]=1.500000e+00

    p2[ 321]=1.500000e+00

    p2[ 322]=1.500000e+00

    p2[ 323]=1.500000e+00

    p2[ 324]=1.500000e+00

    p2[ 325]=1.500000e+00

    p2[ 326]=1.500000e+00

    p2[ 327]=1.500000e+00

    p2[ 328]=1.500000e+00

    p2[ 329]=1.500000e+00

    p2[ 330]=1.500000e+00

    p2[ 331]=1.500000e+00

    p2[ 332]=1.500000e+00

    p2[ 333]=1.500000e+00

    p2[ 334]=1.500000e+00

    p2[ 335]=1.500000e+00

    p2[ 336]=1.500000e+00

    p2[ 337]=1.500000e+00

    p2[ 338]=1.500000e+00

    p2[ 339]=1.500000e+00

    p2[ 340]=1.500000e+00

    p2[ 341]=1.500000e+00

    p2[ 342]=1.500000e+00

    p2[ 343]=1.500000e+00

    p2[ 344]=1.500000e+00

    p2[ 345]=1.500000e+00

    p2[ 346]=1.500000e+00

    p2[ 347]=1.500000e+00

    p2[ 348]=1.500000e+00

    p2[ 349]=1.500000e+00

    p2[ 350]=1.500000e+00

    p2[ 351]=1.500000e+00

    p2[ 352]=1.500000e+00

    p2[ 353]=1.500000e+00

    p2[ 354]=1.500000e+00

    p2[ 355]=1.500000e+00

    p2[ 356]=1.500000e+00

    p2[ 357]=1.500000e+00

    p2[ 358]=1.500000e+00

    p2[ 359]=1.500000e+00

    p2[ 360]=1.500000e+00

    p2[ 361]=1.500000e+00

    p2[ 362]=1.500000e+00

    p2[ 363]=1.500000e+00

    p2[ 364]=1.500000e+00

    p2[ 365]=1.500000e+00

    p2[ 366]=1.500000e+00

    p2[ 367]=1.500000e+00

    p2[ 368]=1.500000e+00

    p2[ 369]=1.500000e+00

    p2[ 370]=1.500000e+00

    p2[ 371]=1.500000e+00

    p2[ 372]=1.500000e+00

    p2[ 373]=1.500000e+00

    p2[ 374]=1.500000e+00

    p2[ 375]=1.500000e+00

    p2[ 376]=1.500000e+00

    p2[ 377]=1.500000e+00

    p2[ 378]=1.500000e+00

    p2[ 379]=1.500000e+00

    p2[ 380]=1.500000e+00

    p2[ 381]=1.500000e+00

    p2[ 382]=1.500000e+00

    p2[ 383]=1.500000e+00

    p2[ 384]=1.500000e+00

    p2[ 385]=1.500000e+00

    p2[ 386]=1.500000e+00

    p2[ 387]=1.500000e+00

    p2[ 388]=1.500000e+00

    p2[ 389]=1.500000e+00

    p2[ 390]=1.500000e+00

    p2[ 391]=1.500000e+00

    p2[ 392]=1.500000e+00

    p2[ 393]=1.500000e+00

    p2[ 394]=1.500000e+00

    p2[ 395]=1.500000e+00

    p2[ 396]=1.500000e+00

    p2[ 397]=1.500000e+00

    p2[ 398]=1.500000e+00

    p2[ 399]=1.500000e+00

    p2[ 400]=1.500000e+00

    p2[ 401]=1.500000e+00

    p2[ 402]=1.500000e+00

    p2[ 403]=1.500000e+00

    p2[ 404]=1.500000e+00

    p2[ 405]=1.500000e+00

    p2[ 406]=1.500000e+00

    p2[ 407]=1.500000e+00

    p2[ 408]=1.500000e+00

    p2[ 409]=1.500000e+00

    p2[ 410]=1.500000e+00

    p2[ 411]=1.500000e+00

    p2[ 412]=1.500000e+00

    p2[ 413]=1.500000e+00

    p2[ 414]=1.500000e+00

    p2[ 415]=1.500000e+00

    p2[ 416]=1.500000e+00

    p2[ 417]=1.500000e+00

    p2[ 418]=1.500000e+00

    p2[ 419]=1.500000e+00

    p2[ 420]=1.500000e+00

    p2[ 421]=1.500000e+00

    p2[ 422]=1.500000e+00

    p2[ 423]=1.500000e+00

    p2[ 424]=1.500000e+00

    p2[ 425]=1.500000e+00

    p2[ 426]=1.500000e+00

    p2[ 427]=1.500000e+00

    p2[ 428]=1.500000e+00

    p2[ 429]=1.500000e+00

    p2[ 430]=1.500000e+00

    p2[ 431]=1.500000e+00

    p2[ 432]=1.500000e+00

    p2[ 433]=1.500000e+00

    p2[ 434]=1.500000e+00

    p2[ 435]=1.500000e+00

    p2[ 436]=1.500000e+00

    p2[ 437]=1.500000e+00

    p2[ 438]=1.500000e+00

    p2[ 439]=1.500000e+00

    p2[ 440]=1.500000e+00

    p2[ 441]=1.500000e+00

    p2[ 442]=1.500000e+00

    p2[ 443]=1.500000e+00

    p2[ 444]=1.500000e+00

    p2[ 445]=1.500000e+00

    p2[ 446]=1.500000e+00

    p2[ 447]=1.500000e+00

    p2[ 448]=1.500000e+00

    p2[ 449]=1.500000e+00

    p2[ 450]=1.500000e+00

    p2[ 451]=1.500000e+00

    p2[ 452]=1.500000e+00

    p2[ 453]=1.500000e+00

    p2[ 454]=1.500000e+00

    p2[ 455]=1.500000e+00

    p2[ 456]=1.500000e+00

    p2[ 457]=1.500000e+00

    p2[ 458]=1.500000e+00

    p2[ 459]=1.500000e+00

    p2[ 460]=1.500000e+00

    p2[ 461]=1.500000e+00

    p2[ 462]=1.500000e+00

    p2[ 463]=1.500000e+00

    p2[ 464]=1.500000e+00

    p2[ 465]=1.500000e+00

    p2[ 466]=1.500000e+00

    p2[ 467]=1.500000e+00

    p2[ 468]=1.500000e+00

    p2[ 469]=1.500000e+00

    p2[ 470]=1.500000e+00

    p2[ 471]=1.500000e+00

    p2[ 472]=1.500000e+00

    p2[ 473]=1.500000e+00

    p2[ 474]=1.500000e+00

    p2[ 475]=1.500000e+00

    p2[ 476]=1.500000e+00

    p2[ 477]=1.500000e+00

    p2[ 478]=1.500000e+00

    p2[ 479]=1.500000e+00

    p2[ 480]=1.500000e+00

    p2[ 481]=1.500000e+00

    p2[ 482]=1.500000e+00

    p2[ 483]=1.500000e+00

    p2[ 484]=1.500000e+00

    p2[ 485]=1.500000e+00

    p2[ 486]=1.500000e+00

    p2[ 487]=1.500000e+00

    p2[ 488]=1.500000e+00

    p2[ 489]=1.500000e+00

    p2[ 490]=1.500000e+00

    p2[ 491]=1.500000e+00

    p2[ 492]=1.500000e+00

    p2[ 493]=1.500000e+00

    p2[ 494]=1.500000e+00

    p2[ 495]=1.500000e+00

    p2[ 496]=1.500000e+00

    p2[ 497]=1.500000e+00

    p2[ 498]=1.500000e+00

    p2[ 499]=1.500000e+00

    p2[ 500]=1.500000e+00

    p2[ 501]=1.500000e+00

    p2[ 502]=1.500000e+00

    p2[ 503]=1.500000e+00

    p2[ 504]=1.500000e+00

    p2[ 505]=1.500000e+00

    p2[ 506]=1.500000e+00

    p2[ 507]=1.500000e+00

    p2[ 508]=1.500000e+00

    p2[ 509]=1.500000e+00

    p2[ 510]=1.500000e+00

    p2[ 511]=1.500000e+00

    p2[ 512]=1.500000e+00

    p2[ 513]=1.500000e+00

    p2[ 514]=1.500000e+00

    p2[ 515]=1.500000e+00

    p2[ 516]=1.500000e+00

    p2[ 517]=1.500000e+00

    p2[ 518]=1.500000e+00

    p2[ 519]=1.500000e+00

    p2[ 520]=1.500000e+00

    p2[ 521]=1.500000e+00

    p2[ 522]=1.500000e+00

    p2[ 523]=1.500000e+00

    p2[ 524]=1.500000e+00

    p2[ 525]=1.500000e+00

    p2[ 526]=1.500000e+00

    p2[ 527]=1.500000e+00

    p2[ 528]=1.500000e+00

    p2[ 529]=1.500000e+00

    p2[ 530]=1.500000e+00

    p2[ 531]=1.500000e+00

    p2[ 532]=1.500000e+00

    p2[ 533]=1.500000e+00

    p2[ 534]=1.500000e+00

    p2[ 535]=1.500000e+00

    p2[ 536]=1.500000e+00

    p2[ 537]=1.500000e+00

    p2[ 538]=1.500000e+00

    p2[ 539]=1.500000e+00

    p2[ 540]=1.500000e+00

    p2[ 541]=1.500000e+00

    p2[ 542]=1.500000e+00

    p2[ 543]=1.500000e+00

    p2[ 544]=1.500000e+00

    p2[ 545]=1.500000e+00

    p2[ 546]=1.500000e+00

    p2[ 547]=1.500000e+00

    p2[ 548]=1.500000e+00

    p2[ 549]=1.500000e+00

    p2[ 550]=1.500000e+00

    p2[ 551]=1.500000e+00

    p2[ 552]=1.500000e+00

    p2[ 553]=1.500000e+00

    p2[ 554]=1.500000e+00

    p2[ 555]=1.500000e+00

    p2[ 556]=1.500000e+00

    p2[ 557]=1.500000e+00

    p2[ 558]=1.500000e+00

    p2[ 559]=1.500000e+00

    p2[ 560]=1.500000e+00

    p2[ 561]=1.500000e+00

    p2[ 562]=1.500000e+00

    p2[ 563]=1.500000e+00

    p2[ 564]=1.500000e+00

    p2[ 565]=1.500000e+00

    p2[ 566]=1.500000e+00

    p2[ 567]=1.500000e+00

    p2[ 568]=1.500000e+00

    p2[ 569]=1.500000e+00

    p2[ 570]=1.500000e+00

    p2[ 571]=1.500000e+00

    p2[ 572]=1.500000e+00

    p2[ 573]=1.500000e+00

    p2[ 574]=1.500000e+00

    p2[ 575]=1.500000e+00

    p2[ 576]=1.500000e+00

    p2[ 577]=1.500000e+00

    p2[ 578]=1.500000e+00

    p2[ 579]=1.500000e+00

    p2[ 580]=1.500000e+00

    p2[ 581]=1.500000e+00

    p2[ 582]=1.500000e+00

    p2[ 583]=1.500000e+00

    p2[ 584]=1.500000e+00

    p2[ 585]=1.500000e+00

    p2[ 586]=1.500000e+00

    p2[ 587]=1.500000e+00

    p2[ 588]=1.500000e+00

    p2[ 589]=1.500000e+00

    p2[ 590]=1.500000e+00

    p2[ 591]=1.500000e+00

    p2[ 592]=1.500000e+00

    p2[ 593]=1.500000e+00

    p2[ 594]=1.500000e+00

    p2[ 595]=1.500000e+00

    p2[ 596]=1.500000e+00

    p2[ 597]=1.500000e+00

    p2[ 598]=1.500000e+00

    p2[ 599]=1.500000e+00

    p2[ 600]=1.500000e+00

    p2[ 601]=1.500000e+00

    p2[ 602]=1.500000e+00

    p2[ 603]=1.500000e+00

    p2[ 604]=1.500000e+00

    p2[ 605]=1.500000e+00

    p2[ 606]=1.500000e+00

    p2[ 607]=1.500000e+00

    p2[ 608]=1.500000e+00

    p2[ 609]=1.500000e+00

    p2[ 610]=1.500000e+00

    p2[ 611]=1.500000e+00

    p2[ 612]=1.500000e+00

    p2[ 613]=1.500000e+00

    p2[ 614]=1.500000e+00

    p2[ 615]=1.500000e+00

    p2[ 616]=1.500000e+00

    p2[ 617]=1.500000e+00

    p2[ 618]=1.500000e+00

    p2[ 619]=1.500000e+00

    p2[ 620]=1.500000e+00

    p2[ 621]=1.500000e+00

    p2[ 622]=1.500000e+00

    p2[ 623]=1.500000e+00

    p2[ 624]=1.500000e+00

    p2[ 625]=1.500000e+00

    p2[ 626]=1.500000e+00

    p2[ 627]=1.500000e+00

    p2[ 628]=1.500000e+00

    p2[ 629]=1.500000e+00

    p2[ 630]=1.500000e+00

    p2[ 631]=1.500000e+00

    p2[ 632]=1.500000e+00

    p2[ 633]=1.500000e+00

    p2[ 634]=1.500000e+00

    p2[ 635]=1.500000e+00

    p2[ 636]=1.500000e+00

    p2[ 637]=1.500000e+00

    p2[ 638]=1.500000e+00

    p2[ 639]=1.500000e+00

    p2[ 640]=1.500000e+00

    p2[ 641]=1.500000e+00

    p2[ 642]=1.500000e+00

    p2[ 643]=1.500000e+00

    p2[ 644]=1.500000e+00

    p2[ 645]=1.500000e+00

    p2[ 646]=1.500000e+00

    p2[ 647]=1.500000e+00

    p2[ 648]=1.500000e+00

    p2[ 649]=1.500000e+00

    p2[ 650]=1.500000e+00

    p2[ 651]=1.500000e+00

    p2[ 652]=1.500000e+00

    p2[ 653]=1.500000e+00

    p2[ 654]=1.500000e+00

    p2[ 655]=1.500000e+00

    p2[ 656]=1.500000e+00

    p2[ 657]=1.500000e+00

    p2[ 658]=1.500000e+00

    p2[ 659]=1.500000e+00

    p2[ 660]=1.500000e+00

    p2[ 661]=1.500000e+00

    p2[ 662]=1.500000e+00

    p2[ 663]=1.500000e+00

    p2[ 664]=1.500000e+00

    p2[ 665]=1.500000e+00

    p2[ 666]=1.500000e+00

    p2[ 667]=1.500000e+00

    p2[ 668]=1.500000e+00

    p2[ 669]=1.500000e+00

    p2[ 670]=1.500000e+00

    p2[ 671]=1.500000e+00

    p2[ 672]=1.500000e+00

    p2[ 673]=1.500000e+00

    p2[ 674]=1.500000e+00

    p2[ 675]=1.500000e+00

    p2[ 676]=1.500000e+00

    p2[ 677]=1.500000e+00

    p2[ 678]=1.500000e+00

    p2[ 679]=1.500000e+00

    p2[ 680]=1.500000e+00

    p2[ 681]=1.500000e+00

    p2[ 682]=1.500000e+00

    p2[ 683]=1.500000e+00

    p2[ 684]=1.500000e+00

    p2[ 685]=1.500000e+00

    p2[ 686]=1.500000e+00

    p2[ 687]=1.500000e+00

    p2[ 688]=1.500000e+00

    p2[ 689]=1.500000e+00

    p2[ 690]=1.500000e+00

    p2[ 691]=1.500000e+00

    p2[ 692]=1.500000e+00

    p2[ 693]=1.500000e+00

    p2[ 694]=1.500000e+00

    p2[ 695]=1.500000e+00

    p2[ 696]=1.500000e+00

    p2[ 697]=1.500000e+00

    p2[ 698]=1.500000e+00

    p2[ 699]=1.500000e+00

    p2[ 700]=1.500000e+00

    p2[ 701]=1.500000e+00

    p2[ 702]=1.500000e+00

    p2[ 703]=1.500000e+00

    p2[ 704]=1.500000e+00

    p2[ 705]=1.500000e+00

    p2[ 706]=1.500000e+00

    p2[ 707]=1.500000e+00

    p2[ 708]=1.500000e+00

    p2[ 709]=1.500000e+00

    p2[ 710]=1.500000e+00

    p2[ 711]=1.500000e+00

    p2[ 712]=1.500000e+00

    p2[ 713]=1.500000e+00

    p2[ 714]=1.500000e+00

    p2[ 715]=1.500000e+00

    p2[ 716]=1.500000e+00

    p2[ 717]=1.500000e+00

    p2[ 718]=1.500000e+00

    p2[ 719]=1.500000e+00

    p2[ 720]=1.500000e+00

    p2[ 721]=1.500000e+00

    p2[ 722]=1.500000e+00

    p2[ 723]=1.500000e+00

    p2[ 724]=1.500000e+00

    p2[ 725]=1.500000e+00

    p2[ 726]=1.500000e+00

    p2[ 727]=1.500000e+00

    p2[ 728]=1.500000e+00

    p2[ 729]=1.500000e+00

    p2[ 730]=1.500000e+00

    p2[ 731]=1.500000e+00

    p2[ 732]=1.500000e+00

    p2[ 733]=1.500000e+00

    p2[ 734]=1.500000e+00

    p2[ 735]=1.500000e+00

    p2[ 736]=1.500000e+00

    p2[ 737]=1.500000e+00

    p2[ 738]=1.500000e+00

    p2[ 739]=1.500000e+00

    p2[ 740]=1.500000e+00

    p2[ 741]=1.500000e+00

    p2[ 742]=1.500000e+00

    p2[ 743]=1.500000e+00

    p2[ 744]=1.500000e+00

    p2[ 745]=1.500000e+00

    p2[ 746]=1.500000e+00

    p2[ 747]=1.500000e+00

    p2[ 748]=1.500000e+00

    p2[ 749]=1.500000e+00

    p2[ 750]=1.500000e+00

    p2[ 751]=1.500000e+00

    p2[ 752]=1.500000e+00

    p2[ 753]=1.500000e+00

    p2[ 754]=1.500000e+00

    p2[ 755]=1.500000e+00

    p2[ 756]=1.500000e+00

    p2[ 757]=1.500000e+00

    p2[ 758]=1.500000e+00

    p2[ 759]=1.500000e+00

    p2[ 760]=1.500000e+00

    p2[ 761]=1.500000e+00

    p2[ 762]=1.500000e+00

    p2[ 763]=1.500000e+00

    p2[ 764]=1.500000e+00

    p2[ 765]=1.500000e+00

    p2[ 766]=1.500000e+00

    p2[ 767]=1.500000e+00

    p2[ 768]=1.500000e+00

    p2[ 769]=1.500000e+00

    p2[ 770]=1.500000e+00

    p2[ 771]=1.500000e+00

    p2[ 772]=1.500000e+00

    p2[ 773]=1.500000e+00

    p2[ 774]=1.500000e+00

    p2[ 775]=1.500000e+00

    p2[ 776]=1.500000e+00

    p2[ 777]=1.500000e+00

    p2[ 778]=1.500000e+00

    p2[ 779]=1.500000e+00

    p2[ 780]=1.500000e+00

    p2[ 781]=1.500000e+00

    p2[ 782]=1.500000e+00

    p2[ 783]=1.500000e+00

    p2[ 784]=1.500000e+00

    p2[ 785]=1.500000e+00

    p2[ 786]=1.500000e+00

    p2[ 787]=1.500000e+00

    p2[ 788]=1.500000e+00

    p2[ 789]=1.500000e+00

    p2[ 790]=1.500000e+00

    p2[ 791]=1.500000e+00

    p2[ 792]=1.500000e+00

    p2[ 793]=1.500000e+00

    p2[ 794]=1.500000e+00

    p2[ 795]=1.500000e+00

    p2[ 796]=1.500000e+00

    p2[ 797]=1.500000e+00

    p2[ 798]=1.500000e+00

    p2[ 799]=1.500000e+00

    p2[ 800]=1.500000e+00

    p2[ 801]=1.500000e+00

    p2[ 802]=1.500000e+00

    p2[ 803]=1.500000e+00

    p2[ 804]=1.500000e+00

    p2[ 805]=1.500000e+00

    p2[ 806]=1.500000e+00

    p2[ 807]=1.500000e+00

    p2[ 808]=1.500000e+00

    p2[ 809]=1.500000e+00

    p2[ 810]=1.500000e+00

    p2[ 811]=1.500000e+00

    p2[ 812]=1.500000e+00

    p2[ 813]=1.500000e+00

    p2[ 814]=1.500000e+00

    p2[ 815]=1.500000e+00

    p2[ 816]=1.500000e+00

    p2[ 817]=1.500000e+00

    p2[ 818]=1.500000e+00

    p2[ 819]=1.500000e+00

    p2[ 820]=1.500000e+00

    p2[ 821]=1.500000e+00

    p2[ 822]=1.500000e+00

    p2[ 823]=1.500000e+00

    p2[ 824]=1.500000e+00

    p2[ 825]=1.500000e+00

    p2[ 826]=1.500000e+00

    p2[ 827]=1.500000e+00

    p2[ 828]=1.500000e+00

    p2[ 829]=1.500000e+00

    p2[ 830]=1.500000e+00

    p2[ 831]=1.500000e+00

    p2[ 832]=1.500000e+00

    p2[ 833]=1.500000e+00

    p2[ 834]=1.500000e+00

    p2[ 835]=1.500000e+00

    p2[ 836]=1.500000e+00

    p2[ 837]=1.500000e+00

    p2[ 838]=1.500000e+00

    p2[ 839]=1.500000e+00

    p2[ 840]=1.500000e+00

    p2[ 841]=1.500000e+00

    p2[ 842]=1.500000e+00

    p2[ 843]=1.500000e+00

    p2[ 844]=1.500000e+00

    p2[ 845]=1.500000e+00

    p2[ 846]=1.500000e+00

    p2[ 847]=1.500000e+00

    p2[ 848]=1.500000e+00

    p2[ 849]=1.500000e+00

    p2[ 850]=1.500000e+00

    p2[ 851]=1.500000e+00

    p2[ 852]=1.500000e+00

    p2[ 853]=1.500000e+00

    p2[ 854]=1.500000e+00

    p2[ 855]=1.500000e+00

    p2[ 856]=1.500000e+00

    p2[ 857]=1.500000e+00

    p2[ 858]=1.500000e+00

    p2[ 859]=1.500000e+00

    p2[ 860]=1.500000e+00

    p2[ 861]=1.500000e+00

    p2[ 862]=1.500000e+00

    p2[ 863]=1.500000e+00

    p2[ 864]=1.500000e+00

    p2[ 865]=1.500000e+00

    p2[ 866]=1.500000e+00

    p2[ 867]=1.500000e+00

    p2[ 868]=1.500000e+00

    p2[ 869]=1.500000e+00

    p2[ 870]=1.500000e+00

    p2[ 871]=1.500000e+00

    p2[ 872]=1.500000e+00

    p2[ 873]=1.500000e+00

    p2[ 874]=1.500000e+00

    p2[ 875]=1.500000e+00

    p2[ 876]=1.500000e+00

    p2[ 877]=1.500000e+00

    p2[ 878]=1.500000e+00

    p2[ 879]=1.500000e+00

    p2[ 880]=1.500000e+00

    p2[ 881]=1.500000e+00

    p2[ 882]=1.500000e+00

    p2[ 883]=1.500000e+00

    p2[ 884]=1.500000e+00

    p2[ 885]=1.500000e+00

    p2[ 886]=1.500000e+00

    p2[ 887]=1.500000e+00

    p2[ 888]=1.500000e+00

    p2[ 889]=1.500000e+00

    p2[ 890]=1.500000e+00

    p2[ 891]=1.500000e+00

    p2[ 892]=1.500000e+00

    p2[ 893]=1.500000e+00

    p2[ 894]=1.500000e+00

    p2[ 895]=1.500000e+00

    p2[ 896]=1.500000e+00

    p2[ 897]=1.500000e+00

    p2[ 898]=1.500000e+00

    p2[ 899]=1.500000e+00

    p2[ 900]=1.500000e+00

    p2[ 901]=1.500000e+00

    p2[ 902]=1.500000e+00

    p2[ 903]=1.500000e+00

    p2[ 904]=1.500000e+00

    p2[ 905]=1.500000e+00

    p2[ 906]=1.500000e+00

    p2[ 907]=1.500000e+00

    p2[ 908]=1.500000e+00

    p2[ 909]=1.500000e+00

    p2[ 910]=1.500000e+00

    p2[ 911]=1.500000e+00

    p2[ 912]=1.500000e+00

    p2[ 913]=1.500000e+00

    p2[ 914]=1.500000e+00

    p2[ 915]=1.500000e+00

    p2[ 916]=1.500000e+00

    p2[ 917]=1.500000e+00

    p2[ 918]=1.500000e+00

    p2[ 919]=1.500000e+00

    p2[ 920]=1.500000e+00

    p2[ 921]=1.500000e+00

    p2[ 922]=1.500000e+00

    p2[ 923]=1.500000e+00

    p2[ 924]=1.500000e+00

    p2[ 925]=1.500000e+00

    p2[ 926]=1.500000e+00

    p2[ 927]=1.500000e+00

    p2[ 928]=1.500000e+00

    p2[ 929]=1.500000e+00

    p2[ 930]=1.500000e+00

    p2[ 931]=1.500000e+00

    p2[ 932]=1.500000e+00

    p2[ 933]=1.500000e+00

    p2[ 934]=1.500000e+00

    p2[ 935]=1.500000e+00

    p2[ 936]=1.500000e+00

    p2[ 937]=1.500000e+00

    p2[ 938]=1.500000e+00

    p2[ 939]=1.500000e+00

    p2[ 940]=1.500000e+00

    p2[ 941]=1.500000e+00

    p2[ 942]=1.500000e+00

    p2[ 943]=1.500000e+00

    p2[ 944]=1.500000e+00

    p2[ 945]=1.500000e+00

    p2[ 946]=1.500000e+00

    p2[ 947]=1.500000e+00

    p2[ 948]=1.500000e+00

    p2[ 949]=1.500000e+00

    p2[ 950]=1.500000e+00

    p2[ 951]=1.500000e+00

    p2[ 952]=1.500000e+00

    p2[ 953]=1.500000e+00

    p2[ 954]=1.500000e+00

    p2[ 955]=1.500000e+00

    p2[ 956]=1.500000e+00

    p2[ 957]=1.500000e+00

    p2[ 958]=1.500000e+00

    p2[ 959]=1.500000e+00

    p2[ 960]=1.500000e+00

    p2[ 961]=1.500000e+00

    p2[ 962]=1.500000e+00

    p2[ 963]=1.500000e+00

    p2[ 964]=1.500000e+00

    p2[ 965]=1.500000e+00

    p2[ 966]=1.500000e+00

    p2[ 967]=1.500000e+00

    p2[ 968]=1.500000e+00

    p2[ 969]=1.500000e+00

    p2[ 970]=1.500000e+00

    p2[ 971]=1.500000e+00

    p2[ 972]=1.500000e+00

    p2[ 973]=1.500000e+00

    p2[ 974]=1.500000e+00

    p2[ 975]=1.500000e+00

    p2[ 976]=1.500000e+00

    p2[ 977]=1.500000e+00

    p2[ 978]=1.500000e+00

    p2[ 979]=1.500000e+00

    p2[ 980]=1.500000e+00

    p2[ 981]=1.500000e+00

    p2[ 982]=1.500000e+00

    p2[ 983]=1.500000e+00

    p2[ 984]=1.500000e+00

    p2[ 985]=1.500000e+00

    p2[ 986]=1.500000e+00

    p2[ 987]=1.500000e+00

    p2[ 988]=1.500000e+00

    p2[ 989]=1.500000e+00

    p2[ 990]=1.500000e+00

    p2[ 991]=1.500000e+00

    p2[ 992]=1.500000e+00

    p2[ 993]=1.500000e+00

    p2[ 994]=1.500000e+00

    p2[ 995]=1.500000e+00

    p2[ 996]=1.500000e+00

    p2[ 997]=1.500000e+00

    p2[ 998]=1.500000e+00

    p2[ 999]=1.500000e+00

    p2[ 1000]=2.000000e+00

    p2[ 1001]=1.500000e+00

    p2[ 1002]=1.500000e+00

    p2[ 1003]=1.500000e+00

    p2[ 1004]=1.500000e+00

    p2[ 1005]=1.500000e+00

    p2[ 1006]=1.500000e+00

    p2[ 1007]=1.500000e+00

    p2[ 1008]=1.500000e+00

    p2[ 1009]=1.500000e+00

    p2[ 1010]=1.500000e+00

    p2[ 1011]=1.500000e+00

    p2[ 1012]=1.500000e+00

    p2[ 1013]=1.500000e+00

    p2[ 1014]=1.500000e+00

    p2[ 1015]=1.500000e+00

    p2[ 1016]=1.500000e+00

    p2[ 1017]=1.500000e+00

    p2[ 1018]=1.500000e+00

    p2[ 1019]=1.500000e+00

    p2[ 1020]=1.500000e+00

    p2[ 1021]=1.500000e+00

    p2[ 1022]=1.500000e+00

    p2[ 1023]=1.500000e+00

    p2[ 1024]=1.500000e+00

    p2[ 1025]=1.500000e+00

    p2[ 1026]=1.500000e+00

    p2[ 1027]=1.500000e+00

    p2[ 1028]=1.500000e+00

    p2[ 1029]=1.500000e+00

    p2[ 1030]=1.500000e+00

    p2[ 1031]=1.500000e+00

    p2[ 1032]=1.500000e+00

    p2[ 1033]=1.500000e+00

    p2[ 1034]=1.500000e+00

    p2[ 1035]=1.500000e+00

    p2[ 1036]=1.500000e+00

    p2[ 1037]=1.500000e+00

    p2[ 1038]=1.500000e+00

    p2[ 1039]=1.500000e+00

    p2[ 1040]=1.500000e+00

    p2[ 1041]=1.500000e+00

    p2[ 1042]=1.500000e+00

    p2[ 1043]=1.500000e+00

    p2[ 1044]=1.500000e+00

    p2[ 1045]=1.500000e+00

    p2[ 1046]=1.500000e+00

    p2[ 1047]=1.500000e+00

    p2[ 1048]=1.500000e+00

    p2[ 1049]=1.500000e+00

    p2[ 1050]=1.500000e+00

    p2[ 1051]=1.500000e+00

    p2[ 1052]=1.500000e+00

    p2[ 1053]=1.500000e+00

    p2[ 1054]=1.500000e+00

    p2[ 1055]=1.500000e+00

    p2[ 1056]=1.500000e+00

    p2[ 1057]=1.500000e+00

    p2[ 1058]=1.500000e+00

    p2[ 1059]=1.500000e+00

    p2[ 1060]=1.500000e+00

    p2[ 1061]=1.500000e+00

    p2[ 1062]=1.500000e+00

    p2[ 1063]=1.500000e+00

    p2[ 1064]=1.500000e+00

    p2[ 1065]=1.500000e+00

    p2[ 1066]=1.500000e+00

    p2[ 1067]=1.500000e+00

    p2[ 1068]=1.500000e+00

    p2[ 1069]=1.500000e+00

    p2[ 1070]=1.500000e+00

    p2[ 1071]=1.500000e+00

    p2[ 1072]=1.500000e+00

    p2[ 1073]=1.500000e+00

    p2[ 1074]=1.500000e+00

    p2[ 1075]=1.500000e+00

    p2[ 1076]=1.500000e+00

    p2[ 1077]=1.500000e+00

    p2[ 1078]=1.500000e+00

    p2[ 1079]=1.500000e+00

    p2[ 1080]=1.500000e+00

    p2[ 1081]=1.500000e+00

    p2[ 1082]=1.500000e+00

    p2[ 1083]=1.500000e+00

    p2[ 1084]=1.500000e+00

    p2[ 1085]=1.500000e+00

    p2[ 1086]=1.500000e+00

    p2[ 1087]=1.500000e+00

    p2[ 1088]=1.500000e+00

    p2[ 1089]=1.500000e+00

    p2[ 1090]=1.500000e+00

    p2[ 1091]=1.500000e+00

    p2[ 1092]=1.500000e+00

    p2[ 1093]=1.500000e+00

    p2[ 1094]=1.500000e+00

    p2[ 1095]=1.500000e+00

    p2[ 1096]=1.500000e+00

    p2[ 1097]=1.500000e+00

    p2[ 1098]=1.500000e+00

    p2[ 1099]=1.500000e+00

    p2[ 1100]=1.500000e+00

    p2[ 1101]=1.500000e+00

    p2[ 1102]=1.500000e+00

    p2[ 1103]=1.500000e+00

    p2[ 1104]=1.500000e+00

    p2[ 1105]=1.500000e+00

    p2[ 1106]=1.500000e+00

    p2[ 1107]=1.500000e+00

    p2[ 1108]=1.500000e+00

    p2[ 1109]=1.500000e+00

    p2[ 1110]=1.500000e+00

    p2[ 1111]=1.500001e+00

    p2[ 1112]=1.500001e+00

    p2[ 1113]=1.500000e+00

    p2[ 1114]=1.500000e+00

    p2[ 1115]=1.500000e+00

    p2[ 1116]=1.500000e+00

    p2[ 1117]=1.500000e+00

    p2[ 1118]=1.500000e+00

    p2[ 1119]=1.500000e+00

    p2[ 1120]=1.500000e+00

    p2[ 1121]=1.500000e+00

    p2[ 1122]=1.500000e+00

    p2[ 1123]=1.500000e+00

    p2[ 1124]=1.500000e+00

    p2[ 1125]=1.500000e+00

    p2[ 1126]=1.500000e+00

    p2[ 1127]=1.500000e+00

    p2[ 1128]=1.500000e+00

    p2[ 1129]=1.500000e+00

    p2[ 1130]=1.500000e+00

    p2[ 1131]=1.500000e+00

    p2[ 1132]=1.500000e+00

    p2[ 1133]=1.500001e+00

    p2[ 1134]=1.500000e+00

    p2[ 1135]=1.500000e+00

    p2[ 1136]=1.500000e+00

    p2[ 1137]=1.500000e+00

    p2[ 1138]=1.500000e+00

    p2[ 1139]=1.500000e+00

    p2[ 1140]=1.500000e+00

    p2[ 1141]=1.500000e+00

    p2[ 1142]=1.499999e+00

    p2[ 1143]=1.500000e+00

    p2[ 1144]=1.500001e+00

    p2[ 1145]=1.500000e+00

    p2[ 1146]=1.500000e+00

    p2[ 1147]=1.500000e+00

    p2[ 1148]=1.500000e+00

    p2[ 1149]=1.500000e+00

    p2[ 1150]=1.500000e+00

    p2[ 1151]=1.500000e+00

    p2[ 1152]=1.500000e+00

    p2[ 1153]=1.500000e+00

    p2[ 1154]=1.500000e+00

    p2[ 1155]=1.500000e+00

    p2[ 1156]=1.500000e+00

    p2[ 1157]=1.500000e+00

    p2[ 1158]=1.500000e+00

    p2[ 1159]=1.500000e+00

    p2[ 1160]=1.500000e+00

    p2[ 1161]=1.500000e+00

    p2[ 1162]=1.500000e+00

    p2[ 1163]=1.500000e+00

    p2[ 1164]=1.500000e+00

    p2[ 1165]=1.500000e+00

    p2[ 1166]=1.500000e+00

    p2[ 1167]=1.500000e+00

    p2[ 1168]=1.500000e+00

    p2[ 1169]=1.500000e+00

    p2[ 1170]=1.500000e+00

    p2[ 1171]=1.500000e+00

    p2[ 1172]=1.500000e+00

    p2[ 1173]=1.500000e+00

    p2[ 1174]=1.500000e+00

    p2[ 1175]=1.500000e+00

    p2[ 1176]=1.500000e+00

    p2[ 1177]=1.500000e+00

    p2[ 1178]=1.500000e+00

    p2[ 1179]=1.500000e+00

    p2[ 1180]=1.500000e+00

    p2[ 1181]=1.500000e+00

    p2[ 1182]=1.500000e+00

    p2[ 1183]=1.500000e+00

    p2[ 1184]=1.500000e+00

    p2[ 1185]=1.500001e+00

    p2[ 1186]=1.500000e+00

    p2[ 1187]=1.499999e+00

    p2[ 1188]=1.499999e+00

    p2[ 1189]=1.500000e+00

    p2[ 1190]=1.500000e+00

    p2[ 1191]=1.500000e+00

    p2[ 1192]=1.500000e+00

    p2[ 1193]=1.500000e+00

    p2[ 1194]=1.500000e+00

    p2[ 1195]=1.500000e+00

    p2[ 1196]=1.500000e+00

    p2[ 1197]=1.500000e+00

    p2[ 1198]=1.500000e+00

    p2[ 1199]=1.500000e+00

    p2[ 1200]=1.500000e+00

    p2[ 1201]=1.500000e+00

    p2[ 1202]=1.500000e+00

    p2[ 1203]=1.500000e+00

    p2[ 1204]=1.500000e+00

    p2[ 1205]=1.500000e+00

    p2[ 1206]=1.500000e+00

    p2[ 1207]=1.500000e+00

    p2[ 1208]=1.500000e+00

    p2[ 1209]=1.500000e+00

    p2[ 1210]=1.500001e+00

    p2[ 1211]=1.500000e+00

    p2[ 1212]=1.499999e+00

    p2[ 1213]=1.500000e+00

    p2[ 1214]=1.500000e+00

    p2[ 1215]=1.499999e+00

    p2[ 1216]=1.500000e+00

    p2[ 1217]=1.500000e+00

    p2[ 1218]=1.500000e+00

    p2[ 1219]=1.500000e+00

    p2[ 1220]=1.500000e+00

    p2[ 1221]=1.500000e+00

    p2[ 1222]=1.500000e+00

    p2[ 1223]=1.500000e+00

    p2[ 1224]=1.500000e+00

    p2[ 1225]=1.500000e+00

    p2[ 1226]=1.500000e+00

    p2[ 1227]=1.500000e+00

    p2[ 1228]=1.500000e+00

    p2[ 1229]=1.500000e+00

    p2[ 1230]=1.500000e+00

    p2[ 1231]=1.500000e+00

    p2[ 1232]=1.500000e+00

    p2[ 1233]=1.500000e+00

    p2[ 1234]=1.500000e+00

    p2[ 1235]=1.500000e+00

    p2[ 1236]=1.499999e+00

    p2[ 1237]=1.500000e+00

    p2[ 1238]=1.500001e+00

    p2[ 1239]=1.500000e+00

    p2[ 1240]=1.499999e+00

    p2[ 1241]=1.499999e+00

    p2[ 1242]=1.500000e+00

    p2[ 1243]=1.500000e+00

    p2[ 1244]=1.500000e+00

    p2[ 1245]=1.500000e+00

    p2[ 1246]=1.500000e+00

    p2[ 1247]=1.500000e+00

    p2[ 1248]=1.500000e+00

    p2[ 1249]=1.500000e+00

    p2[ 1250]=1.500000e+00

    p2[ 1251]=1.500000e+00

    p2[ 1252]=1.500000e+00

    p2[ 1253]=1.500000e+00

    p2[ 1254]=1.500000e+00

    p2[ 1255]=1.500000e+00

    p2[ 1256]=1.500000e+00

    p2[ 1257]=1.500000e+00

    p2[ 1258]=1.500001e+00

    p2[ 1259]=1.500000e+00

    p2[ 1260]=1.500000e+00

    p2[ 1261]=1.500000e+00

    p2[ 1262]=1.500000e+00

    p2[ 1263]=1.500000e+00

    p2[ 1264]=1.500000e+00

    p2[ 1265]=1.500000e+00

    p2[ 1266]=1.500000e+00

    p2[ 1267]=1.500000e+00

    p2[ 1268]=1.500000e+00

    p2[ 1269]=1.500000e+00

    p2[ 1270]=1.500000e+00

    p2[ 1271]=1.500000e+00

    p2[ 1272]=1.500000e+00

    p2[ 1273]=1.500000e+00

    p2[ 1274]=1.500000e+00

    p2[ 1275]=1.500000e+00

    p2[ 1276]=1.500000e+00

    p2[ 1277]=1.500000e+00

    p2[ 1278]=1.500000e+00

    p2[ 1279]=1.500001e+00

    p2[ 1280]=1.500000e+00

    p2[ 1281]=1.500000e+00

    p2[ 1282]=1.500000e+00

    p2[ 1283]=1.500000e+00

    p2[ 1284]=1.500000e+00

    p2[ 1285]=1.500000e+00

    p2[ 1286]=1.500001e+00

    p2[ 1287]=1.500000e+00

    p2[ 1288]=1.499999e+00

    p2[ 1289]=1.500000e+00

    p2[ 1290]=1.500000e+00

    p2[ 1291]=1.500001e+00

    p2[ 1292]=1.500000e+00

    p2[ 1293]=1.500000e+00

    p2[ 1294]=1.499999e+00

    p2[ 1295]=1.500000e+00

    p2[ 1296]=1.500000e+00

    p2[ 1297]=1.500001e+00

    p2[ 1298]=1.500000e+00

    p2[ 1299]=1.500000e+00

    p2[ 1300]=1.500000e+00

    p2[ 1301]=1.500000e+00

    p2[ 1302]=1.500000e+00

    p2[ 1303]=1.500000e+00

    p2[ 1304]=1.500000e+00

    p2[ 1305]=1.500000e+00

    p2[ 1306]=1.500000e+00

    p2[ 1307]=1.500000e+00

    p2[ 1308]=1.500000e+00

    p2[ 1309]=1.500000e+00

    p2[ 1310]=1.500000e+00

    p2[ 1311]=1.500001e+00

    p2[ 1312]=1.500000e+00

    p2[ 1313]=1.500000e+00

    p2[ 1314]=1.500000e+00

    p2[ 1315]=1.500000e+00

    p2[ 1316]=1.500000e+00

    p2[ 1317]=1.500000e+00

    p2[ 1318]=1.500000e+00

    p2[ 1319]=1.500000e+00

    p2[ 1320]=1.500000e+00

    p2[ 1321]=1.500000e+00

    p2[ 1322]=1.500000e+00

    p2[ 1323]=1.500000e+00

    p2[ 1324]=1.500000e+00

    p2[ 1325]=1.500000e+00

    p2[ 1326]=1.500000e+00

    p2[ 1327]=1.500000e+00

    p2[ 1328]=1.500000e+00

    p2[ 1329]=1.500000e+00

    p2[ 1330]=1.500000e+00

    p2[ 1331]=1.500000e+00

    p2[ 1332]=1.500001e+00

    p2[ 1333]=1.500000e+00

    p2[ 1334]=1.500000e+00

    p2[ 1335]=1.500000e+00

    p2[ 1336]=1.500000e+00

    p2[ 1337]=1.500000e+00

    p2[ 1338]=1.500000e+00

    p2[ 1339]=1.500000e+00

    p2[ 1340]=1.500000e+00

    p2[ 1341]=1.499999e+00

    p2[ 1342]=1.500000e+00

    p2[ 1343]=1.500000e+00

    p2[ 1344]=1.500000e+00

    p2[ 1345]=1.500000e+00

    p2[ 1346]=1.500000e+00

    p2[ 1347]=1.500000e+00

    p2[ 1348]=1.500000e+00

    p2[ 1349]=1.500000e+00

    p2[ 1350]=1.500000e+00

    p2[ 1351]=1.500000e+00

    p2[ 1352]=1.500000e+00

    p2[ 1353]=1.500000e+00

    p2[ 1354]=1.500000e+00

    p2[ 1355]=1.500000e+00

    p2[ 1356]=1.500000e+00

    p2[ 1357]=1.500000e+00

    p2[ 1358]=1.500000e+00

    p2[ 1359]=1.500000e+00

    p2[ 1360]=1.500000e+00

    p2[ 1361]=1.500000e+00

    p2[ 1362]=1.499999e+00

    p2[ 1363]=1.500000e+00

    p2[ 1364]=1.500000e+00

    p2[ 1365]=1.500000e+00

    p2[ 1366]=1.500000e+00

    p2[ 1367]=1.500000e+00

    p2[ 1368]=1.500000e+00

    p2[ 1369]=1.500000e+00

    p2[ 1370]=1.500000e+00

    p2[ 1371]=1.500000e+00

    p2[ 1372]=1.500000e+00

    p2[ 1373]=1.500000e+00

    p2[ 1374]=1.500000e+00

    p2[ 1375]=1.500000e+00

    p2[ 1376]=1.500000e+00

    p2[ 1377]=1.500000e+00

    p2[ 1378]=1.500000e+00

    p2[ 1379]=1.500000e+00

    p2[ 1380]=1.500000e+00

    p2[ 1381]=1.500000e+00

    p2[ 1382]=1.500000e+00

    p2[ 1383]=1.500000e+00

    p2[ 1384]=1.500000e+00

    p2[ 1385]=1.500000e+00

    p2[ 1386]=1.500000e+00

    p2[ 1387]=1.500000e+00

    p2[ 1388]=1.500000e+00

    p2[ 1389]=1.500000e+00

    p2[ 1390]=1.500000e+00

    p2[ 1391]=1.500000e+00

    p2[ 1392]=1.500000e+00

    p2[ 1393]=1.500000e+00

    p2[ 1394]=1.500000e+00

    p2[ 1395]=1.500000e+00

    p2[ 1396]=1.500000e+00

    p2[ 1397]=1.500000e+00

    p2[ 1398]=1.500000e+00

    p2[ 1399]=1.500000e+00

    p2[ 1400]=1.500000e+00

    p2[ 1401]=1.500000e+00

    p2[ 1402]=1.500000e+00

    p2[ 1403]=1.500000e+00

    p2[ 1404]=1.500000e+00

    p2[ 1405]=1.500000e+00

    p2[ 1406]=1.500000e+00

    p2[ 1407]=1.500000e+00

    p2[ 1408]=1.500000e+00

    p2[ 1409]=1.500000e+00

    p2[ 1410]=1.500000e+00

    p2[ 1411]=1.500000e+00

    p2[ 1412]=1.500001e+00

    p2[ 1413]=1.500000e+00

    p2[ 1414]=1.499999e+00

    p2[ 1415]=1.500000e+00

    p2[ 1416]=1.500000e+00

    p2[ 1417]=1.500000e+00

    p2[ 1418]=1.500000e+00

    p2[ 1419]=1.500000e+00

    p2[ 1420]=1.500000e+00

    p2[ 1421]=1.500000e+00

    p2[ 1422]=1.500000e+00

    p2[ 1423]=1.500000e+00

    p2[ 1424]=1.500000e+00

    p2[ 1425]=1.500000e+00

    p2[ 1426]=1.500000e+00

    p2[ 1427]=1.500000e+00

    p2[ 1428]=1.500000e+00

    p2[ 1429]=1.500000e+00

    p2[ 1430]=1.500000e+00

    p2[ 1431]=1.500000e+00

    p2[ 1432]=1.500000e+00

    p2[ 1433]=1.500000e+00

    p2[ 1434]=1.500000e+00

    p2[ 1435]=1.500000e+00

    p2[ 1436]=1.500000e+00

    p2[ 1437]=1.500000e+00

    p2[ 1438]=1.500000e+00

    p2[ 1439]=1.500000e+00

    p2[ 1440]=1.500000e+00

    p2[ 1441]=1.500000e+00

    p2[ 1442]=1.500000e+00

    p2[ 1443]=1.500000e+00

    p2[ 1444]=1.500000e+00

    p2[ 1445]=1.500000e+00

    p2[ 1446]=1.500000e+00

    p2[ 1447]=1.500000e+00

    p2[ 1448]=1.500000e+00

    p2[ 1449]=1.500000e+00

    p2[ 1450]=1.500000e+00

    p2[ 1451]=1.500000e+00

    p2[ 1452]=1.500000e+00

    p2[ 1453]=1.500000e+00

    p2[ 1454]=1.500000e+00

    p2[ 1455]=1.500000e+00

    p2[ 1456]=1.500000e+00

    p2[ 1457]=1.500000e+00

    p2[ 1458]=1.500000e+00

    p2[ 1459]=1.500000e+00

    p2[ 1460]=1.500000e+00

    p2[ 1461]=1.500000e+00

    p2[ 1462]=1.500000e+00

    p2[ 1463]=1.500000e+00

    p2[ 1464]=1.500000e+00

    p2[ 1465]=1.500000e+00

    p2[ 1466]=1.500000e+00

    p2[ 1467]=1.500000e+00

    p2[ 1468]=1.500000e+00

    p2[ 1469]=1.500000e+00

    p2[ 1470]=1.500000e+00

    p2[ 1471]=1.500000e+00

    p2[ 1472]=1.500000e+00

    p2[ 1473]=1.500000e+00

    p2[ 1474]=1.500000e+00

    p2[ 1475]=1.500000e+00

    p2[ 1476]=1.500000e+00

    p2[ 1477]=1.500000e+00

    p2[ 1478]=1.500000e+00

    p2[ 1479]=1.500000e+00

    p2[ 1480]=1.500000e+00

    p2[ 1481]=1.500000e+00

    p2[ 1482]=1.500000e+00

    p2[ 1483]=1.500000e+00

    p2[ 1484]=1.500000e+00

    p2[ 1485]=1.500000e+00

    p2[ 1486]=1.500000e+00

    p2[ 1487]=1.500000e+00

    p2[ 1488]=1.500000e+00

    p2[ 1489]=1.500000e+00

    p2[ 1490]=1.500000e+00

    p2[ 1491]=1.500000e+00

    p2[ 1492]=1.500000e+00

    p2[ 1493]=1.500000e+00

    p2[ 1494]=1.500000e+00

    p2[ 1495]=1.500000e+00

    p2[ 1496]=1.500000e+00

    p2[ 1497]=1.500000e+00

    p2[ 1498]=1.500000e+00

    p2[ 1499]=1.500000e+00

    p2[ 1500]=1.500000e+00

    p2[ 1501]=1.500000e+00

    p2[ 1502]=1.500000e+00

    p2[ 1503]=1.500000e+00

    p2[ 1504]=1.500000e+00

    p2[ 1505]=1.500000e+00

    p2[ 1506]=1.500000e+00

    p2[ 1507]=1.500000e+00

    p2[ 1508]=1.500000e+00

    p2[ 1509]=1.500000e+00

    p2[ 1510]=1.500000e+00

    p2[ 1511]=1.500000e+00

    p2[ 1512]=1.500000e+00

    p2[ 1513]=1.500000e+00

    p2[ 1514]=1.500000e+00

    p2[ 1515]=1.500000e+00

    p2[ 1516]=1.500000e+00

    p2[ 1517]=1.500000e+00

    p2[ 1518]=1.500000e+00

    p2[ 1519]=1.500000e+00

    p2[ 1520]=1.500000e+00

    p2[ 1521]=1.500000e+00

    p2[ 1522]=1.500000e+00

    p2[ 1523]=1.500000e+00

    p2[ 1524]=1.500000e+00

    p2[ 1525]=1.500000e+00

    p2[ 1526]=1.500000e+00

    p2[ 1527]=1.500000e+00

    p2[ 1528]=1.500000e+00

    p2[ 1529]=1.500000e+00

    p2[ 1530]=1.500000e+00

    p2[ 1531]=1.500000e+00

    p2[ 1532]=1.500000e+00

    p2[ 1533]=1.500000e+00

    p2[ 1534]=1.500000e+00

    p2[ 1535]=1.500000e+00

    p2[ 1536]=1.500000e+00

    p2[ 1537]=1.500000e+00

    p2[ 1538]=1.500000e+00

    p2[ 1539]=1.500000e+00

    p2[ 1540]=1.500000e+00

    p2[ 1541]=1.499999e+00

    p2[ 1542]=1.500000e+00

    p2[ 1543]=1.500000e+00

    p2[ 1544]=1.500000e+00

    p2[ 1545]=1.500000e+00

    p2[ 1546]=1.500000e+00

    p2[ 1547]=1.500000e+00

    p2[ 1548]=1.500000e+00

    p2[ 1549]=1.500000e+00

    p2[ 1550]=1.500000e+00

    p2[ 1551]=1.500000e+00

    p2[ 1552]=1.500000e+00

    p2[ 1553]=1.500000e+00

    p2[ 1554]=1.500000e+00

    p2[ 1555]=1.500000e+00

    p2[ 1556]=1.500000e+00

    p2[ 1557]=1.500000e+00

    p2[ 1558]=1.500000e+00

    p2[ 1559]=1.500000e+00

    p2[ 1560]=1.500000e+00

    p2[ 1561]=1.500000e+00

    p2[ 1562]=1.500000e+00

    p2[ 1563]=1.500000e+00

    p2[ 1564]=1.500001e+00

    p2[ 1565]=1.500000e+00

    p2[ 1566]=1.500000e+00

    p2[ 1567]=1.500000e+00

    p2[ 1568]=1.500000e+00

    p2[ 1569]=1.500000e+00

    p2[ 1570]=1.500000e+00

    p2[ 1571]=1.500000e+00

    p2[ 1572]=1.500000e+00

    p2[ 1573]=1.500000e+00

    p2[ 1574]=1.500000e+00

    p2[ 1575]=1.500000e+00

    p2[ 1576]=1.500000e+00

    p2[ 1577]=1.500000e+00

    p2[ 1578]=1.500000e+00

    p2[ 1579]=1.500000e+00

    p2[ 1580]=1.500000e+00

    p2[ 1581]=1.500000e+00

    p2[ 1582]=1.500000e+00

    p2[ 1583]=1.500000e+00

    p2[ 1584]=1.500000e+00

    p2[ 1585]=1.500000e+00

    p2[ 1586]=1.500000e+00

    p2[ 1587]=1.500000e+00

    p2[ 1588]=1.500000e+00

    p2[ 1589]=1.500000e+00

    p2[ 1590]=1.500000e+00

    p2[ 1591]=1.500000e+00

    p2[ 1592]=1.500000e+00

    p2[ 1593]=1.500000e+00

    p2[ 1594]=1.500000e+00

    p2[ 1595]=1.500000e+00

    p2[ 1596]=1.500000e+00

    p2[ 1597]=1.500001e+00

    p2[ 1598]=1.500000e+00

    p2[ 1599]=1.500000e+00

    p2[ 1600]=1.500000e+00

    p2[ 1601]=1.500000e+00

    p2[ 1602]=1.500000e+00

    p2[ 1603]=1.500000e+00

    p2[ 1604]=1.500000e+00

    p2[ 1605]=1.500000e+00

    p2[ 1606]=1.500000e+00

    p2[ 1607]=1.500000e+00

    p2[ 1608]=1.500000e+00

    p2[ 1609]=1.500000e+00

    p2[ 1610]=1.500000e+00

    p2[ 1611]=1.500000e+00

    p2[ 1612]=1.500000e+00

    p2[ 1613]=1.500000e+00

    p2[ 1614]=1.500000e+00

    p2[ 1615]=1.500000e+00

    p2[ 1616]=1.500000e+00

    p2[ 1617]=1.500000e+00

    p2[ 1618]=1.500000e+00

    p2[ 1619]=1.500000e+00

    p2[ 1620]=1.500000e+00

    p2[ 1621]=1.500000e+00

    p2[ 1622]=1.500000e+00

    p2[ 1623]=1.500000e+00

    p2[ 1624]=1.500000e+00

    p2[ 1625]=1.500000e+00

    p2[ 1626]=1.500000e+00

    p2[ 1627]=1.500000e+00

    p2[ 1628]=1.500000e+00

    p2[ 1629]=1.500000e+00

    p2[ 1630]=1.500000e+00

    p2[ 1631]=1.500000e+00

    p2[ 1632]=1.500000e+00

    p2[ 1633]=1.500000e+00

    p2[ 1634]=1.500000e+00

    p2[ 1635]=1.500000e+00

    p2[ 1636]=1.500000e+00

    p2[ 1637]=1.500000e+00

    p2[ 1638]=1.500000e+00

    p2[ 1639]=1.500000e+00

    p2[ 1640]=1.500000e+00

    p2[ 1641]=1.500000e+00

    p2[ 1642]=1.500000e+00

    p2[ 1643]=1.500000e+00

    p2[ 1644]=1.500000e+00

    p2[ 1645]=1.500000e+00

    p2[ 1646]=1.500000e+00

    p2[ 1647]=1.500000e+00

    p2[ 1648]=1.500000e+00

    p2[ 1649]=1.500000e+00

    p2[ 1650]=1.500000e+00

    p2[ 1651]=1.500000e+00

    p2[ 1652]=1.500000e+00

    p2[ 1653]=1.500000e+00

    p2[ 1654]=1.500001e+00

    p2[ 1655]=1.500000e+00

    p2[ 1656]=1.500000e+00

    p2[ 1657]=1.500000e+00

    p2[ 1658]=1.500000e+00

    p2[ 1659]=1.500000e+00

    p2[ 1660]=1.500000e+00

    p2[ 1661]=1.500000e+00

    p2[ 1662]=1.500000e+00

    p2[ 1663]=1.500000e+00

    p2[ 1664]=1.500000e+00

    p2[ 1665]=1.500001e+00

    p2[ 1666]=1.500000e+00

    p2[ 1667]=1.500000e+00

    p2[ 1668]=1.500000e+00

    p2[ 1669]=1.500000e+00

    p2[ 1670]=1.500000e+00

    p2[ 1671]=1.500000e+00

    p2[ 1672]=1.500000e+00

    p2[ 1673]=1.500000e+00

    p2[ 1674]=1.500000e+00

    p2[ 1675]=1.500000e+00

    p2[ 1676]=1.500000e+00

    p2[ 1677]=1.500000e+00

    p2[ 1678]=1.500001e+00

    p2[ 1679]=1.500000e+00

    p2[ 1680]=1.499999e+00

    p2[ 1681]=1.500000e+00

    p2[ 1682]=1.500000e+00

    p2[ 1683]=1.500000e+00

    p2[ 1684]=1.500000e+00

    p2[ 1685]=1.500000e+00

    p2[ 1686]=1.500000e+00

    p2[ 1687]=1.500000e+00

    p2[ 1688]=1.500000e+00

    p2[ 1689]=1.500000e+00

    p2[ 1690]=1.500000e+00

    p2[ 1691]=1.500000e+00

    p2[ 1692]=1.500000e+00

    p2[ 1693]=1.500000e+00

    p2[ 1694]=1.500000e+00

    p2[ 1695]=1.500000e+00

    p2[ 1696]=1.500000e+00

    p2[ 1697]=1.500000e+00

    p2[ 1698]=1.500000e+00

    p2[ 1699]=1.500000e+00

    p2[ 1700]=1.500000e+00

    p2[ 1701]=1.500000e+00

    p2[ 1702]=1.500000e+00

    p2[ 1703]=1.500000e+00

    p2[ 1704]=1.500000e+00

    p2[ 1705]=1.500000e+00

    p2[ 1706]=1.500000e+00

    p2[ 1707]=1.500000e+00

    p2[ 1708]=1.500000e+00

    p2[ 1709]=1.499999e+00

    p2[ 1710]=1.500000e+00

    p2[ 1711]=1.500000e+00

    p2[ 1712]=1.500000e+00

    p2[ 1713]=1.500000e+00

    p2[ 1714]=1.500000e+00

    p2[ 1715]=1.500000e+00

    p2[ 1716]=1.500000e+00

    p2[ 1717]=1.500001e+00

    p2[ 1718]=1.500000e+00

    p2[ 1719]=1.500000e+00

    p2[ 1720]=1.500000e+00

    p2[ 1721]=1.500000e+00

    p2[ 1722]=1.500001e+00

    p2[ 1723]=1.500000e+00

    p2[ 1724]=1.500000e+00

    p2[ 1725]=1.500000e+00

    p2[ 1726]=1.500000e+00

    p2[ 1727]=1.500000e+00

    p2[ 1728]=1.500000e+00

    p2[ 1729]=1.500000e+00

    p2[ 1730]=1.500000e+00

    p2[ 1731]=1.500000e+00

    p2[ 1732]=1.500000e+00

    p2[ 1733]=1.500000e+00

    p2[ 1734]=1.500000e+00

    p2[ 1735]=1.500000e+00

    p2[ 1736]=1.500000e+00

    p2[ 1737]=1.500000e+00

    p2[ 1738]=1.500000e+00

    p2[ 1739]=1.500000e+00

    p2[ 1740]=1.500000e+00

    p2[ 1741]=1.500000e+00

    p2[ 1742]=1.500000e+00

    p2[ 1743]=1.500000e+00

    p2[ 1744]=1.500000e+00

    p2[ 1745]=1.500000e+00

    p2[ 1746]=1.500000e+00

    p2[ 1747]=1.500000e+00

    p2[ 1748]=1.500000e+00

    p2[ 1749]=1.500000e+00

    p2[ 1750]=1.500000e+00

    p2[ 1751]=1.500000e+00

    p2[ 1752]=1.500000e+00

    p2[ 1753]=1.500000e+00

    p2[ 1754]=1.500000e+00

    p2[ 1755]=1.500000e+00

    p2[ 1756]=1.500000e+00

    p2[ 1757]=1.500000e+00

    p2[ 1758]=1.500000e+00

    p2[ 1759]=1.500000e+00

    p2[ 1760]=1.500000e+00

    p2[ 1761]=1.500000e+00

    p2[ 1762]=1.500000e+00

    p2[ 1763]=1.500000e+00

    p2[ 1764]=1.500000e+00

    p2[ 1765]=1.500000e+00

    p2[ 1766]=1.500000e+00

    p2[ 1767]=1.500000e+00

    p2[ 1768]=1.500000e+00

    p2[ 1769]=1.500000e+00

    p2[ 1770]=1.500000e+00

    p2[ 1771]=1.500000e+00

    p2[ 1772]=1.500000e+00

    p2[ 1773]=1.500000e+00

    p2[ 1774]=1.500000e+00

    p2[ 1775]=1.500000e+00

    p2[ 1776]=1.500000e+00

    p2[ 1777]=1.500000e+00

    p2[ 1778]=1.500000e+00

    p2[ 1779]=1.500000e+00

    p2[ 1780]=1.500000e+00

    p2[ 1781]=1.500000e+00

    p2[ 1782]=1.500000e+00

    p2[ 1783]=1.500000e+00

    p2[ 1784]=1.500000e+00

    p2[ 1785]=1.500000e+00

    p2[ 1786]=1.500000e+00

    p2[ 1787]=1.500000e+00

    p2[ 1788]=1.500000e+00

    p2[ 1789]=1.500000e+00

    p2[ 1790]=1.500000e+00

    p2[ 1791]=1.500000e+00

    p2[ 1792]=1.500000e+00

    p2[ 1793]=1.500000e+00

    p2[ 1794]=1.500000e+00

    p2[ 1795]=1.500000e+00

    p2[ 1796]=1.500000e+00

    p2[ 1797]=1.500000e+00

    p2[ 1798]=1.500000e+00

    p2[ 1799]=1.500000e+00

    p2[ 1800]=1.500000e+00

    p2[ 1801]=1.500000e+00

    p2[ 1802]=1.500000e+00

    p2[ 1803]=1.500000e+00

    p2[ 1804]=1.500000e+00

    p2[ 1805]=1.500000e+00

    p2[ 1806]=1.500000e+00

    p2[ 1807]=1.500000e+00

    p2[ 1808]=1.500000e+00

    p2[ 1809]=1.500000e+00

    p2[ 1810]=1.500000e+00

    p2[ 1811]=1.500000e+00

    p2[ 1812]=1.500000e+00

    p2[ 1813]=1.500000e+00

    p2[ 1814]=1.500000e+00

    p2[ 1815]=1.500000e+00

    p2[ 1816]=1.500000e+00

    p2[ 1817]=1.500000e+00

    p2[ 1818]=1.500000e+00

    p2[ 1819]=1.500000e+00

    p2[ 1820]=1.500000e+00

    p2[ 1821]=1.500000e+00

    p2[ 1822]=1.500000e+00

    p2[ 1823]=1.500000e+00

    p2[ 1824]=1.500000e+00

    p2[ 1825]=1.500000e+00

    p2[ 1826]=1.500000e+00

    p2[ 1827]=1.500000e+00

    p2[ 1828]=1.500000e+00

    p2[ 1829]=1.500000e+00

    p2[ 1830]=1.500000e+00

    p2[ 1831]=1.500000e+00

    p2[ 1832]=1.500000e+00

    p2[ 1833]=1.500000e+00

    p2[ 1834]=1.500000e+00

    p2[ 1835]=1.500000e+00

    p2[ 1836]=1.500000e+00

    p2[ 1837]=1.500000e+00

    p2[ 1838]=1.500000e+00

    p2[ 1839]=1.500000e+00

    p2[ 1840]=1.500000e+00

    p2[ 1841]=1.500000e+00

    p2[ 1842]=1.500000e+00

    p2[ 1843]=1.500000e+00

    p2[ 1844]=1.500000e+00

    p2[ 1845]=1.500000e+00

    p2[ 1846]=1.500000e+00

    p2[ 1847]=1.500000e+00

    p2[ 1848]=1.500000e+00

    p2[ 1849]=1.500000e+00

    p2[ 1850]=1.500000e+00

    p2[ 1851]=1.500000e+00

    p2[ 1852]=1.500000e+00

    p2[ 1853]=1.500000e+00

    p2[ 1854]=1.500000e+00

    p2[ 1855]=1.500000e+00

    p2[ 1856]=1.500000e+00

    p2[ 1857]=1.500000e+00

    p2[ 1858]=1.500000e+00

    p2[ 1859]=1.500000e+00

    p2[ 1860]=1.500000e+00

    p2[ 1861]=1.500000e+00

    p2[ 1862]=1.500000e+00

    p2[ 1863]=1.500000e+00

    p2[ 1864]=1.500000e+00

    p2[ 1865]=1.500000e+00

    p2[ 1866]=1.500000e+00

    p2[ 1867]=1.500000e+00

    p2[ 1868]=1.500000e+00

    p2[ 1869]=1.500000e+00

    p2[ 1870]=1.500000e+00

    p2[ 1871]=1.500000e+00

    p2[ 1872]=1.500000e+00

    p2[ 1873]=1.500000e+00

    p2[ 1874]=1.500000e+00

    p2[ 1875]=1.500000e+00

    p2[ 1876]=1.500000e+00

    p2[ 1877]=1.500000e+00

    p2[ 1878]=1.500000e+00

    p2[ 1879]=1.500000e+00

    p2[ 1880]=1.500000e+00

    p2[ 1881]=1.500000e+00

    p2[ 1882]=1.500000e+00

    p2[ 1883]=1.500000e+00

    p2[ 1884]=1.500000e+00

    p2[ 1885]=1.500000e+00

    p2[ 1886]=1.500000e+00

    p2[ 1887]=1.500000e+00

    p2[ 1888]=1.500000e+00

    p2[ 1889]=1.500000e+00

    p2[ 1890]=1.500000e+00

    p2[ 1891]=1.500000e+00

    p2[ 1892]=1.500000e+00

    p2[ 1893]=1.500000e+00

    p2[ 1894]=1.500000e+00

    p2[ 1895]=1.500000e+00

    p2[ 1896]=1.500000e+00

    p2[ 1897]=1.500000e+00

    p2[ 1898]=1.500000e+00

    p2[ 1899]=1.500000e+00

    p2[ 1900]=1.500000e+00

    p2[ 1901]=1.500000e+00

    p2[ 1902]=1.500000e+00

    p2[ 1903]=1.500000e+00

    p2[ 1904]=1.500000e+00

    p2[ 1905]=1.500000e+00

    p2[ 1906]=1.500000e+00

    p2[ 1907]=1.500000e+00

    p2[ 1908]=1.500000e+00

    p2[ 1909]=1.500000e+00

    p2[ 1910]=1.500000e+00

    p2[ 1911]=1.500000e+00

    p2[ 1912]=1.500000e+00

    p2[ 1913]=1.500000e+00

    p2[ 1914]=1.500000e+00

    p2[ 1915]=1.500000e+00

    p2[ 1916]=1.500000e+00

    p2[ 1917]=1.500000e+00

    p2[ 1918]=1.500000e+00

    p2[ 1919]=1.500000e+00

    p2[ 1920]=1.500000e+00

    p2[ 1921]=1.500000e+00

    p2[ 1922]=1.500000e+00

    p2[ 1923]=1.500000e+00

    p2[ 1924]=1.500000e+00

    p2[ 1925]=1.500000e+00

    p2[ 1926]=1.499999e+00

    p2[ 1927]=1.500000e+00

    p2[ 1928]=1.500000e+00

    p2[ 1929]=1.500000e+00

    p2[ 1930]=1.500000e+00

    p2[ 1931]=1.500000e+00

    p2[ 1932]=1.500000e+00

    p2[ 1933]=1.500000e+00

    p2[ 1934]=1.500000e+00

    p2[ 1935]=1.500000e+00

    p2[ 1936]=1.500000e+00

    p2[ 1937]=1.500000e+00

    p2[ 1938]=1.500000e+00

    p2[ 1939]=1.500000e+00

    p2[ 1940]=1.500000e+00

    p2[ 1941]=1.500000e+00

    p2[ 1942]=1.500000e+00

    p2[ 1943]=1.500000e+00

    p2[ 1944]=1.500000e+00

    p2[ 1945]=1.500000e+00

    p2[ 1946]=1.500000e+00

    p2[ 1947]=1.500000e+00

    p2[ 1948]=1.500000e+00

    p2[ 1949]=1.500000e+00

    p2[ 1950]=1.500000e+00

    p2[ 1951]=1.500000e+00

    p2[ 1952]=1.500000e+00

    p2[ 1953]=1.500000e+00

    p2[ 1954]=1.500000e+00

    p2[ 1955]=1.500000e+00

    p2[ 1956]=1.500000e+00

    p2[ 1957]=1.500000e+00

    p2[ 1958]=1.500000e+00

    p2[ 1959]=1.500000e+00

    p2[ 1960]=1.500000e+00

    p2[ 1961]=1.500000e+00

    p2[ 1962]=1.500000e+00

    p2[ 1963]=1.500000e+00

    p2[ 1964]=1.500000e+00

    p2[ 1965]=1.500000e+00

    p2[ 1966]=1.500000e+00

    p2[ 1967]=1.500000e+00

    p2[ 1968]=1.500000e+00

    p2[ 1969]=1.500000e+00

    p2[ 1970]=1.500000e+00

    p2[ 1971]=1.500000e+00

    p2[ 1972]=1.500000e+00

    p2[ 1973]=1.500000e+00

    p2[ 1974]=1.500000e+00

    p2[ 1975]=1.500000e+00

    p2[ 1976]=1.500000e+00

    p2[ 1977]=1.500000e+00

    p2[ 1978]=1.500000e+00

    p2[ 1979]=1.500000e+00

    p2[ 1980]=1.500000e+00

    p2[ 1981]=1.500000e+00

    p2[ 1982]=1.500000e+00

    p2[ 1983]=1.500000e+00

    p2[ 1984]=1.500000e+00

    p2[ 1985]=1.500000e+00

    p2[ 1986]=1.500000e+00

    p2[ 1987]=1.500000e+00

    p2[ 1988]=1.500000e+00

    p2[ 1989]=1.500000e+00

    p2[ 1990]=1.500000e+00

    p2[ 1991]=1.500000e+00

    p2[ 1992]=1.500000e+00

    p2[ 1993]=1.500000e+00

    p2[ 1994]=1.500000e+00

    p2[ 1995]=1.500000e+00

    p2[ 1996]=1.500000e+00

    p2[ 1997]=1.500000e+00

    p2[ 1998]=1.500000e+00

    p2[ 1999]=1.500000e+00

    p2[ 2000]=1.500000e+00

    p2[ 2001]=1.500000e+00

    p2[ 2002]=1.500000e+00

    p2[ 2003]=1.500000e+00

    p2[ 2004]=1.500000e+00

    p2[ 2005]=1.500000e+00

    p2[ 2006]=1.500000e+00

    p2[ 2007]=1.500000e+00

    p2[ 2008]=1.500000e+00

    p2[ 2009]=1.500000e+00

    p2[ 2010]=1.500000e+00

    p2[ 2011]=1.500000e+00

    p2[ 2012]=1.500000e+00

    p2[ 2013]=1.500000e+00

    p2[ 2014]=1.500000e+00

    p2[ 2015]=1.500000e+00

    p2[ 2016]=1.500000e+00

    p2[ 2017]=1.500000e+00

    p2[ 2018]=1.500000e+00

    p2[ 2019]=1.500000e+00

    p2[ 2020]=1.500000e+00

    p2[ 2021]=1.500000e+00

    p2[ 2022]=1.500000e+00

    p2[ 2023]=1.500000e+00

    p2[ 2024]=1.500000e+00

    p2[ 2025]=1.500000e+00

    p2[ 2026]=1.500000e+00

    p2[ 2027]=1.500000e+00

    p2[ 2028]=1.500000e+00

    p2[ 2029]=1.500000e+00

    p2[ 2030]=1.500000e+00

    p2[ 2031]=1.500000e+00

    p2[ 2032]=1.500000e+00

    p2[ 2033]=1.500000e+00

    p2[ 2034]=1.500000e+00

    p2[ 2035]=1.500000e+00

    p2[ 2036]=1.500000e+00

    p2[ 2037]=1.500000e+00

    p2[ 2038]=1.500000e+00

    p2[ 2039]=1.500000e+00

    p2[ 2040]=1.500000e+00

    p2[ 2041]=1.500000e+00

    p2[ 2042]=1.500000e+00

    p2[ 2043]=1.500000e+00

    p2[ 2044]=1.500000e+00

    p2[ 2045]=1.500000e+00

    p2[ 2046]=1.500000e+00

    p2[ 2047]=1.500000e+00

    p2[ 2048]=1.500000e+00

    p2[ 2049]=1.500000e+00

    p2[ 2050]=1.500000e+00

    p2[ 2051]=1.500000e+00

    p2[ 2052]=1.500000e+00

    p2[ 2053]=1.500000e+00

    p2[ 2054]=1.500000e+00

    p2[ 2055]=1.500000e+00

    p2[ 2056]=1.500000e+00

    p2[ 2057]=1.500000e+00

    p2[ 2058]=1.500000e+00

    p2[ 2059]=1.500000e+00

    p2[ 2060]=1.500000e+00

    p2[ 2061]=1.500000e+00

    p2[ 2062]=1.500000e+00

    p2[ 2063]=1.500000e+00

    p2[ 2064]=1.500000e+00

    p2[ 2065]=1.500000e+00

    p2[ 2066]=1.500000e+00

    p2[ 2067]=1.500000e+00

    p2[ 2068]=1.500000e+00

    p2[ 2069]=1.500000e+00

    p2[ 2070]=1.500000e+00

    p2[ 2071]=1.500000e+00

    p2[ 2072]=1.500000e+00

    p2[ 2073]=1.500000e+00

    p2[ 2074]=1.500000e+00

    p2[ 2075]=1.500000e+00

    p2[ 2076]=1.500000e+00

    p2[ 2077]=1.500000e+00

    p2[ 2078]=1.500000e+00

    p2[ 2079]=1.500000e+00

    p2[ 2080]=1.500000e+00

    p2[ 2081]=1.500000e+00

    p2[ 2082]=1.500000e+00

    p2[ 2083]=1.500000e+00

    p2[ 2084]=1.500000e+00

    p2[ 2085]=1.500000e+00

    p2[ 2086]=1.500000e+00

    p2[ 2087]=1.500000e+00

    p2[ 2088]=1.500000e+00

    p2[ 2089]=1.500000e+00

    p2[ 2090]=1.500000e+00

    p2[ 2091]=1.500000e+00

    p2[ 2092]=1.500000e+00

    p2[ 2093]=1.500000e+00

    p2[ 2094]=1.500000e+00

    p2[ 2095]=1.500000e+00

    p2[ 2096]=1.500000e+00

    p2[ 2097]=1.500000e+00

    p2[ 2098]=1.500000e+00

    p2[ 2099]=1.500000e+00

    p2[ 2100]=1.500000e+00

    p2[ 2101]=1.500000e+00

    p2[ 2102]=1.500000e+00

    p2[ 2103]=1.500000e+00

    p2[ 2104]=1.500000e+00

    p2[ 2105]=1.500000e+00

    p2[ 2106]=1.500000e+00

    p2[ 2107]=1.500000e+00

    p2[ 2108]=1.500000e+00

    p2[ 2109]=1.500000e+00

    p2[ 2110]=1.500000e+00

    p2[ 2111]=1.500000e+00

    p2[ 2112]=1.500000e+00

    p2[ 2113]=1.500000e+00

    p2[ 2114]=1.500000e+00

    p2[ 2115]=1.500000e+00

    p2[ 2116]=1.500000e+00

    p2[ 2117]=1.500000e+00

    p2[ 2118]=1.500000e+00

    p2[ 2119]=1.500000e+00

    p2[ 2120]=1.500000e+00

    p2[ 2121]=1.500000e+00

    p2[ 2122]=1.500000e+00

    p2[ 2123]=1.500000e+00

    p2[ 2124]=1.500000e+00

    p2[ 2125]=1.500000e+00

    p2[ 2126]=1.500000e+00

    p2[ 2127]=1.500000e+00

    p2[ 2128]=1.500000e+00

    p2[ 2129]=1.500000e+00

    p2[ 2130]=1.500000e+00

    p2[ 2131]=1.500000e+00

    p2[ 2132]=1.500000e+00

    p2[ 2133]=1.500000e+00

    p2[ 2134]=1.500000e+00

    p2[ 2135]=1.500000e+00

    p2[ 2136]=1.500000e+00

    p2[ 2137]=1.500000e+00

    p2[ 2138]=1.500000e+00

    p2[ 2139]=1.500000e+00

    p2[ 2140]=1.500000e+00

    p2[ 2141]=1.500000e+00

    p2[ 2142]=1.500000e+00

    p2[ 2143]=1.500000e+00

    p2[ 2144]=1.500000e+00

    p2[ 2145]=1.500000e+00

    p2[ 2146]=1.500000e+00

    p2[ 2147]=1.500000e+00

    p2[ 2148]=1.500001e+00

    p2[ 2149]=1.500000e+00

    p2[ 2150]=1.500000e+00

    p2[ 2151]=1.500000e+00

    p2[ 2152]=1.500000e+00

    p2[ 2153]=1.500000e+00

    p2[ 2154]=1.500000e+00

    p2[ 2155]=1.500000e+00

    p2[ 2156]=1.500000e+00

    p2[ 2157]=1.500000e+00

    p2[ 2158]=1.500000e+00

    p2[ 2159]=1.500000e+00

    p2[ 2160]=1.500000e+00

    p2[ 2161]=1.500000e+00

    p2[ 2162]=1.500000e+00

    p2[ 2163]=1.500000e+00

    p2[ 2164]=1.500000e+00

    p2[ 2165]=1.500000e+00

    p2[ 2166]=1.500000e+00

    p2[ 2167]=1.500000e+00

    p2[ 2168]=1.500000e+00

    p2[ 2169]=1.500000e+00

    p2[ 2170]=1.500000e+00

    p2[ 2171]=1.500000e+00

    p2[ 2172]=1.500000e+00

    p2[ 2173]=1.500000e+00

    p2[ 2174]=1.500000e+00

    p2[ 2175]=1.500000e+00

    p2[ 2176]=1.500000e+00

    p2[ 2177]=1.500000e+00

    p2[ 2178]=1.500000e+00

    p2[ 2179]=1.500000e+00

    p2[ 2180]=1.500000e+00

    p2[ 2181]=1.500000e+00

    p2[ 2182]=1.500000e+00

    p2[ 2183]=1.500000e+00

    p2[ 2184]=1.500000e+00

    p2[ 2185]=1.500000e+00

    p2[ 2186]=1.500000e+00

    p2[ 2187]=1.500000e+00

    p2[ 2188]=1.500000e+00

    p2[ 2189]=1.500000e+00

    p2[ 2190]=1.500000e+00

    p2[ 2191]=1.500000e+00

    p2[ 2192]=1.500000e+00

    p2[ 2193]=1.500000e+00

    p2[ 2194]=1.500000e+00

    p2[ 2195]=1.500000e+00

    p2[ 2196]=1.500000e+00

    p2[ 2197]=1.500000e+00

    p2[ 2198]=1.500000e+00

    p2[ 2199]=1.500000e+00

    p2[ 2200]=1.500000e+00

    p2[ 2201]=1.500000e+00

    p2[ 2202]=1.500000e+00

    p2[ 2203]=1.500000e+00

    p2[ 2204]=1.500000e+00

    p2[ 2205]=1.500000e+00

    p2[ 2206]=1.500000e+00

    p2[ 2207]=1.500000e+00

    p2[ 2208]=1.500000e+00

    p2[ 2209]=1.500000e+00

    p2[ 2210]=1.500000e+00

    p2[ 2211]=1.500000e+00

    p2[ 2212]=1.500000e+00

    p2[ 2213]=1.500000e+00

    p2[ 2214]=1.500000e+00

    p2[ 2215]=1.500000e+00

    p2[ 2216]=1.500000e+00

    p2[ 2217]=1.500000e+00

    p2[ 2218]=1.500000e+00

    p2[ 2219]=1.500000e+00

    p2[ 2220]=1.500000e+00

    p2[ 2221]=1.500000e+00

    p2[ 2222]=1.500000e+00

    p2[ 2223]=1.500000e+00

    p2[ 2224]=1.500000e+00

    p2[ 2225]=1.500000e+00

    p2[ 2226]=1.500000e+00

    p2[ 2227]=1.500000e+00

    p2[ 2228]=1.500000e+00

    p2[ 2229]=1.500000e+00

    p2[ 2230]=1.500000e+00

    p2[ 2231]=1.500000e+00

    p2[ 2232]=1.500000e+00

    p2[ 2233]=1.500000e+00

    p2[ 2234]=1.500000e+00

    p2[ 2235]=1.500000e+00

    p2[ 2236]=1.500000e+00

    p2[ 2237]=1.500000e+00

    p2[ 2238]=1.500000e+00

    p2[ 2239]=1.500000e+00

    p2[ 2240]=1.500000e+00

    p2[ 2241]=1.500000e+00

    p2[ 2242]=1.500000e+00

    p2[ 2243]=1.500000e+00

    p2[ 2244]=1.500000e+00

    p2[ 2245]=1.500000e+00

    p2[ 2246]=1.500000e+00

    p2[ 2247]=1.500000e+00

    p2[ 2248]=1.500000e+00

    p2[ 2249]=1.500000e+00

    p2[ 2250]=1.500000e+00

    p2[ 2251]=1.500000e+00

    p2[ 2252]=1.500000e+00

    p2[ 2253]=1.500000e+00

    p2[ 2254]=1.500000e+00

    p2[ 2255]=1.500000e+00

    p2[ 2256]=1.500000e+00

    p2[ 2257]=1.500000e+00

    p2[ 2258]=1.500000e+00

    p2[ 2259]=1.500000e+00

    p2[ 2260]=1.500000e+00

    p2[ 2261]=1.500000e+00

    p2[ 2262]=1.500000e+00

    p2[ 2263]=1.500000e+00

    p2[ 2264]=1.500000e+00

    p2[ 2265]=1.500000e+00

    p2[ 2266]=1.500000e+00

    p2[ 2267]=1.500000e+00

    p2[ 2268]=1.500000e+00

    p2[ 2269]=1.500000e+00

    p2[ 2270]=1.500000e+00

    p2[ 2271]=1.500000e+00

    p2[ 2272]=1.500000e+00

    p2[ 2273]=1.500000e+00

    p2[ 2274]=1.500000e+00

    p2[ 2275]=1.500000e+00

    p2[ 2276]=1.500000e+00

    p2[ 2277]=1.500000e+00

    p2[ 2278]=1.500000e+00

    p2[ 2279]=1.500000e+00

    p2[ 2280]=1.500000e+00

    p2[ 2281]=1.500000e+00

    p2[ 2282]=1.500000e+00

    p2[ 2283]=1.500000e+00

    p2[ 2284]=1.500000e+00

    p2[ 2285]=1.500000e+00

    p2[ 2286]=1.500000e+00

    p2[ 2287]=1.500000e+00

    p2[ 2288]=1.500000e+00

    p2[ 2289]=1.500000e+00

    p2[ 2290]=1.500000e+00

    p2[ 2291]=1.500000e+00

    p2[ 2292]=1.500000e+00

    p2[ 2293]=1.500000e+00

    p2[ 2294]=1.500000e+00

    p2[ 2295]=1.500000e+00

    p2[ 2296]=1.500000e+00

    p2[ 2297]=1.500000e+00

    p2[ 2298]=1.500000e+00

    p2[ 2299]=1.500000e+00

    p2[ 2300]=1.500000e+00

    p2[ 2301]=1.500000e+00

    p2[ 2302]=1.500000e+00

    p2[ 2303]=1.500000e+00

    p2[ 2304]=1.500000e+00

    p2[ 2305]=1.500000e+00

    p2[ 2306]=1.500000e+00

    p2[ 2307]=1.500000e+00

    p2[ 2308]=1.500000e+00

    p2[ 2309]=1.500000e+00

    p2[ 2310]=1.500000e+00

    p2[ 2311]=1.500000e+00

    p2[ 2312]=1.500000e+00

    p2[ 2313]=1.500000e+00

    p2[ 2314]=1.500000e+00

    p2[ 2315]=1.500000e+00

    p2[ 2316]=1.500000e+00

    p2[ 2317]=1.500000e+00

    p2[ 2318]=1.500000e+00

    p2[ 2319]=1.500000e+00

    p2[ 2320]=1.500000e+00

    p2[ 2321]=1.500000e+00

    p2[ 2322]=1.500000e+00

    p2[ 2323]=1.500000e+00

    p2[ 2324]=1.500000e+00

    p2[ 2325]=1.500000e+00

    p2[ 2326]=1.500000e+00

    p2[ 2327]=1.500000e+00

    p2[ 2328]=1.500000e+00

    p2[ 2329]=1.500000e+00

    p2[ 2330]=1.500000e+00

    p2[ 2331]=1.500000e+00

    p2[ 2332]=1.500000e+00

    p2[ 2333]=1.500000e+00

    p2[ 2334]=1.500000e+00

    p2[ 2335]=1.500000e+00

    p2[ 2336]=1.500000e+00

    p2[ 2337]=1.500000e+00

    p2[ 2338]=1.500000e+00

    p2[ 2339]=1.500000e+00

    p2[ 2340]=1.500000e+00

    p2[ 2341]=1.500000e+00

    p2[ 2342]=1.500000e+00

    p2[ 2343]=1.500000e+00

    p2[ 2344]=1.500000e+00

    p2[ 2345]=1.500000e+00

    p2[ 2346]=1.500000e+00

    p2[ 2347]=1.500000e+00

    p2[ 2348]=1.500000e+00

    p2[ 2349]=1.500000e+00

    p2[ 2350]=1.500000e+00

    p2[ 2351]=1.500000e+00

    p2[ 2352]=1.500000e+00

    p2[ 2353]=1.500000e+00

    p2[ 2354]=1.500000e+00

    p2[ 2355]=1.500000e+00

    p2[ 2356]=1.500000e+00

    p2[ 2357]=1.500000e+00

    p2[ 2358]=1.500000e+00

    p2[ 2359]=1.500000e+00

    p2[ 2360]=1.500000e+00

    p2[ 2361]=1.500000e+00

    p2[ 2362]=1.500000e+00

    p2[ 2363]=1.500000e+00

    p2[ 2364]=1.500000e+00

    p2[ 2365]=1.500000e+00

    p2[ 2366]=1.500000e+00

    p2[ 2367]=1.500000e+00

    p2[ 2368]=1.500000e+00

    p2[ 2369]=1.500000e+00

    p2[ 2370]=1.500000e+00

    p2[ 2371]=1.500000e+00

    p2[ 2372]=1.500000e+00

    p2[ 2373]=1.500000e+00

    p2[ 2374]=1.499999e+00

    p2[ 2375]=1.500000e+00

    p2[ 2376]=1.500000e+00

    p2[ 2377]=1.500000e+00

    p2[ 2378]=1.500000e+00

    p2[ 2379]=1.500000e+00

    p2[ 2380]=1.500000e+00

    p2[ 2381]=1.500000e+00

    p2[ 2382]=1.500000e+00

    p2[ 2383]=1.500000e+00

    p2[ 2384]=1.500000e+00

    p2[ 2385]=1.500000e+00

    p2[ 2386]=1.500000e+00

    p2[ 2387]=1.500000e+00

    p2[ 2388]=1.500000e+00

    p2[ 2389]=1.500000e+00

    p2[ 2390]=1.500000e+00

    p2[ 2391]=1.500000e+00

    p2[ 2392]=1.500000e+00

    p2[ 2393]=1.500000e+00

    p2[ 2394]=1.500000e+00

    p2[ 2395]=1.500000e+00

    p2[ 2396]=1.500000e+00

    p2[ 2397]=1.500000e+00

    p2[ 2398]=1.500000e+00

    p2[ 2399]=1.500000e+00

    p2[ 2400]=1.500000e+00

    p2[ 2401]=1.500000e+00

    p2[ 2402]=1.500000e+00

    p2[ 2403]=1.500000e+00

    p2[ 2404]=1.500000e+00

    p2[ 2405]=1.500000e+00

    p2[ 2406]=1.500000e+00

    p2[ 2407]=1.500000e+00

    p2[ 2408]=1.500000e+00

    p2[ 2409]=1.500000e+00

    p2[ 2410]=1.500000e+00

    p2[ 2411]=1.500000e+00

    p2[ 2412]=1.500000e+00

    p2[ 2413]=1.500000e+00

    p2[ 2414]=1.500000e+00

    p2[ 2415]=1.500000e+00

    p2[ 2416]=1.500000e+00

    p2[ 2417]=1.500000e+00

    p2[ 2418]=1.500000e+00

    p2[ 2419]=1.500000e+00

    p2[ 2420]=1.500000e+00

    p2[ 2421]=1.500000e+00

    p2[ 2422]=1.500000e+00

    p2[ 2423]=1.500000e+00

    p2[ 2424]=1.500000e+00

    p2[ 2425]=1.500000e+00

    p2[ 2426]=1.500000e+00

    p2[ 2427]=1.500000e+00

    p2[ 2428]=1.500000e+00

    p2[ 2429]=1.500000e+00

    p2[ 2430]=1.500000e+00

    p2[ 2431]=1.500000e+00

    p2[ 2432]=1.500000e+00

    p2[ 2433]=1.500000e+00

    p2[ 2434]=1.500000e+00

    p2[ 2435]=1.500000e+00

    p2[ 2436]=1.500000e+00

    p2[ 2437]=1.500000e+00

    p2[ 2438]=1.500000e+00

    p2[ 2439]=1.500000e+00

    p2[ 2440]=1.500000e+00

    p2[ 2441]=1.500000e+00

    p2[ 2442]=1.500000e+00

    p2[ 2443]=1.500000e+00

    p2[ 2444]=1.500000e+00

    p2[ 2445]=1.500000e+00

    p2[ 2446]=1.500000e+00

    p2[ 2447]=1.500000e+00

    p2[ 2448]=1.500000e+00

    p2[ 2449]=1.500000e+00

    p2[ 2450]=1.500000e+00

    p2[ 2451]=1.500000e+00

    p2[ 2452]=1.500000e+00

    p2[ 2453]=1.500000e+00

    p2[ 2454]=1.500000e+00

    p2[ 2455]=1.500000e+00

    p2[ 2456]=1.500000e+00

    p2[ 2457]=1.500000e+00

    p2[ 2458]=1.500000e+00

    p2[ 2459]=1.500000e+00

    p2[ 2460]=1.500000e+00

    p2[ 2461]=1.500000e+00

    p2[ 2462]=1.500000e+00

    p2[ 2463]=1.500000e+00

    p2[ 2464]=1.500000e+00

    p2[ 2465]=1.500000e+00

    p2[ 2466]=1.500000e+00

    p2[ 2467]=1.500000e+00

    p2[ 2468]=1.500000e+00

    p2[ 2469]=1.500000e+00

    p2[ 2470]=1.500000e+00

    p2[ 2471]=1.500000e+00

    p2[ 2472]=1.500000e+00

    p2[ 2473]=1.500000e+00

    p2[ 2474]=1.500000e+00

    p2[ 2475]=1.500000e+00

    p2[ 2476]=1.500000e+00

    p2[ 2477]=1.500000e+00

    p2[ 2478]=1.500000e+00

    p2[ 2479]=1.500000e+00

    p2[ 2480]=1.500000e+00

    p2[ 2481]=1.500000e+00

    p2[ 2482]=1.500000e+00

    p2[ 2483]=1.500000e+00

    p2[ 2484]=1.500000e+00

    p2[ 2485]=1.500000e+00

    p2[ 2486]=1.500000e+00

    p2[ 2487]=1.500000e+00

    p2[ 2488]=1.500000e+00

    p2[ 2489]=1.500000e+00

    p2[ 2490]=1.500000e+00

    p2[ 2491]=1.500000e+00

    p2[ 2492]=1.500000e+00

    p2[ 2493]=1.500000e+00

    p2[ 2494]=1.500000e+00

    p2[ 2495]=1.500001e+00

    p2[ 2496]=1.500000e+00

    p2[ 2497]=1.500000e+00

    p2[ 2498]=1.500000e+00

    p2[ 2499]=1.500000e+00

    p2[ 2500]=1.500000e+00

    p2[ 2501]=1.500000e+00

    p2[ 2502]=1.500000e+00

    p2[ 2503]=1.500000e+00

    p2[ 2504]=1.500000e+00

    p2[ 2505]=1.500000e+00

    p2[ 2506]=1.500000e+00

    p2[ 2507]=1.500000e+00

    p2[ 2508]=1.500000e+00

    p2[ 2509]=1.500000e+00

    p2[ 2510]=1.500000e+00

    p2[ 2511]=1.500000e+00

    p2[ 2512]=1.500000e+00

    p2[ 2513]=1.500000e+00

    p2[ 2514]=1.500000e+00

    p2[ 2515]=1.500000e+00

    p2[ 2516]=1.500000e+00

    p2[ 2517]=1.500000e+00

    p2[ 2518]=1.500000e+00

    p2[ 2519]=1.500000e+00

    p2[ 2520]=1.500000e+00

    p2[ 2521]=1.500000e+00

    p2[ 2522]=1.500000e+00

    p2[ 2523]=1.500000e+00

    p2[ 2524]=1.500000e+00

    p2[ 2525]=1.500000e+00

    p2[ 2526]=1.500000e+00

    p2[ 2527]=1.500000e+00

    p2[ 2528]=1.500000e+00

    p2[ 2529]=1.500000e+00

    p2[ 2530]=1.500000e+00

    p2[ 2531]=1.500000e+00

    p2[ 2532]=1.500000e+00

    p2[ 2533]=1.500000e+00

    p2[ 2534]=1.500000e+00

    p2[ 2535]=1.500000e+00

    p2[ 2536]=1.500000e+00

    p2[ 2537]=1.500000e+00

    p2[ 2538]=1.500000e+00

    p2[ 2539]=1.500000e+00

    p2[ 2540]=1.500000e+00

    p2[ 2541]=1.500000e+00

    p2[ 2542]=1.500000e+00

    p2[ 2543]=1.500000e+00

    p2[ 2544]=1.500000e+00

    p2[ 2545]=1.500000e+00

    p2[ 2546]=1.500000e+00

    p2[ 2547]=1.500000e+00

    p2[ 2548]=1.500000e+00

    p2[ 2549]=1.500000e+00

    p2[ 2550]=1.500000e+00

    p2[ 2551]=1.499999e+00

    p2[ 2552]=1.500000e+00

    p2[ 2553]=1.500000e+00

    p2[ 2554]=1.500000e+00

    p2[ 2555]=1.500000e+00

    p2[ 2556]=1.500000e+00

    p2[ 2557]=1.500000e+00

    p2[ 2558]=1.500000e+00

    p2[ 2559]=1.499999e+00

    p2[ 2560]=1.500000e+00

    p2[ 2561]=1.500000e+00

    p2[ 2562]=1.500000e+00

    p2[ 2563]=1.500000e+00

    p2[ 2564]=1.500000e+00

    p2[ 2565]=1.500000e+00

    p2[ 2566]=1.499999e+00

    p2[ 2567]=1.499999e+00

    p2[ 2568]=1.500000e+00

    p2[ 2569]=1.500000e+00

    p2[ 2570]=1.500000e+00

    p2[ 2571]=1.500000e+00

    p2[ 2572]=1.500000e+00

    p2[ 2573]=1.500000e+00

    p2[ 2574]=1.500000e+00

    p2[ 2575]=1.500000e+00

    p2[ 2576]=1.500000e+00

    p2[ 2577]=1.499999e+00

    p2[ 2578]=1.499999e+00

    p2[ 2579]=1.500000e+00

    p2[ 2580]=1.500000e+00

    p2[ 2581]=1.500000e+00

    p2[ 2582]=1.500000e+00

    p2[ 2583]=1.500000e+00

    p2[ 2584]=1.500000e+00

    p2[ 2585]=1.500000e+00

    p2[ 2586]=1.500000e+00

    p2[ 2587]=1.500000e+00

    p2[ 2588]=1.500000e+00

    p2[ 2589]=1.500000e+00

    p2[ 2590]=1.500000e+00

    p2[ 2591]=1.500000e+00

    p2[ 2592]=1.500000e+00

    p2[ 2593]=1.500000e+00

    p2[ 2594]=1.499999e+00

    p2[ 2595]=1.500000e+00

    p2[ 2596]=1.500000e+00

    p2[ 2597]=1.500000e+00

    p2[ 2598]=1.500000e+00

    p2[ 2599]=1.500000e+00

    p2[ 2600]=1.500000e+00

    p2[ 2601]=1.500000e+00

    p2[ 2602]=1.500000e+00

    p2[ 2603]=1.500000e+00

    p2[ 2604]=1.500000e+00

    p2[ 2605]=1.500000e+00

    p2[ 2606]=1.500000e+00

    p2[ 2607]=1.500000e+00

    p2[ 2608]=1.500000e+00

    p2[ 2609]=1.500000e+00

    p2[ 2610]=1.500000e+00

    p2[ 2611]=1.500000e+00

    p2[ 2612]=1.500000e+00

    p2[ 2613]=1.500000e+00

    p2[ 2614]=1.500000e+00

    p2[ 2615]=1.500000e+00

    p2[ 2616]=1.500000e+00

    p2[ 2617]=1.500000e+00

    p2[ 2618]=1.500000e+00

    p2[ 2619]=1.500000e+00

    p2[ 2620]=1.500001e+00

    p2[ 2621]=1.500000e+00

    p2[ 2622]=1.500000e+00

    p2[ 2623]=1.500000e+00

    p2[ 2624]=1.500000e+00

    p2[ 2625]=1.500000e+00

    p2[ 2626]=1.500000e+00

    p2[ 2627]=1.500000e+00

    p2[ 2628]=1.500000e+00

    p2[ 2629]=1.500000e+00

    p2[ 2630]=1.500000e+00

    p2[ 2631]=1.500001e+00

    p2[ 2632]=1.500000e+00

    p2[ 2633]=1.500000e+00

    p2[ 2634]=1.500000e+00

    p2[ 2635]=1.500000e+00

    p2[ 2636]=1.500000e+00

    p2[ 2637]=1.500001e+00

    p2[ 2638]=1.500000e+00

    p2[ 2639]=1.500000e+00

    p2[ 2640]=1.500000e+00

    p2[ 2641]=1.500000e+00

    p2[ 2642]=1.500000e+00

    p2[ 2643]=1.500000e+00

    p2[ 2644]=1.500000e+00

    p2[ 2645]=1.500000e+00

    p2[ 2646]=1.500000e+00

    p2[ 2647]=1.500001e+00

    p2[ 2648]=1.500000e+00

    p2[ 2649]=1.500000e+00

    p2[ 2650]=1.500000e+00

    p2[ 2651]=1.500000e+00

    p2[ 2652]=1.500000e+00

    p2[ 2653]=1.500000e+00

    p2[ 2654]=1.500000e+00

    p2[ 2655]=1.500001e+00

    p2[ 2656]=1.500000e+00

    p2[ 2657]=1.500000e+00

    p2[ 2658]=1.500000e+00

    p2[ 2659]=1.500000e+00

    p2[ 2660]=1.500000e+00

    p2[ 2661]=1.500000e+00

    p2[ 2662]=1.500000e+00

    p2[ 2663]=1.500000e+00

    p2[ 2664]=1.500000e+00

    p2[ 2665]=1.500000e+00

    p2[ 2666]=1.500000e+00

    p2[ 2667]=1.500000e+00

    p2[ 2668]=1.500000e+00

    p2[ 2669]=1.500000e+00

    p2[ 2670]=1.500000e+00

    p2[ 2671]=1.500000e+00

    p2[ 2672]=1.500000e+00

    p2[ 2673]=1.500000e+00

    p2[ 2674]=1.500000e+00

    p2[ 2675]=1.500000e+00

    p2[ 2676]=1.500000e+00

    p2[ 2677]=1.500000e+00

    p2[ 2678]=1.499999e+00

    p2[ 2679]=1.500000e+00

    p2[ 2680]=1.500000e+00

    p2[ 2681]=1.500000e+00

    p2[ 2682]=1.500000e+00

    p2[ 2683]=1.500000e+00

    p2[ 2684]=1.500000e+00

    p2[ 2685]=1.500000e+00

    p2[ 2686]=1.500000e+00

    p2[ 2687]=1.500000e+00

    p2[ 2688]=1.500000e+00

    p2[ 2689]=1.500000e+00

    p2[ 2690]=1.500000e+00

    p2[ 2691]=1.500000e+00

    p2[ 2692]=1.500000e+00

    p2[ 2693]=1.500000e+00

    p2[ 2694]=1.500000e+00

    p2[ 2695]=1.500000e+00

    p2[ 2696]=1.500000e+00

    p2[ 2697]=1.500000e+00

    p2[ 2698]=1.500000e+00

    p2[ 2699]=1.500000e+00

    p2[ 2700]=1.500000e+00

    p2[ 2701]=1.500000e+00

    p2[ 2702]=1.500000e+00

    p2[ 2703]=1.500000e+00

    p2[ 2704]=1.500000e+00

    p2[ 2705]=1.500000e+00

    p2[ 2706]=1.500000e+00

    p2[ 2707]=1.500000e+00

    p2[ 2708]=1.500000e+00

    p2[ 2709]=1.500000e+00

    p2[ 2710]=1.500000e+00

    p2[ 2711]=1.500000e+00

    p2[ 2712]=1.500000e+00

    p2[ 2713]=1.500000e+00

    p2[ 2714]=1.500000e+00

    p2[ 2715]=1.500000e+00

    p2[ 2716]=1.500000e+00

    p2[ 2717]=1.500000e+00

    p2[ 2718]=1.500000e+00

    p2[ 2719]=1.500000e+00

    p2[ 2720]=1.500001e+00

    p2[ 2721]=1.500000e+00

    p2[ 2722]=1.500000e+00

    p2[ 2723]=1.500000e+00

    p2[ 2724]=1.500000e+00

    p2[ 2725]=1.500000e+00

    p2[ 2726]=1.500000e+00

    p2[ 2727]=1.500000e+00

    p2[ 2728]=1.500000e+00

    p2[ 2729]=1.500000e+00

    p2[ 2730]=1.500000e+00

    p2[ 2731]=1.500000e+00

    p2[ 2732]=1.500000e+00

    p2[ 2733]=1.500000e+00

    p2[ 2734]=1.500000e+00

    p2[ 2735]=1.500000e+00

    p2[ 2736]=1.500000e+00

    p2[ 2737]=1.500000e+00

    p2[ 2738]=1.500000e+00

    p2[ 2739]=1.500000e+00

    p2[ 2740]=1.500000e+00

    p2[ 2741]=1.500000e+00

    p2[ 2742]=1.500000e+00

    p2[ 2743]=1.500000e+00

    p2[ 2744]=1.500000e+00

    p2[ 2745]=1.500000e+00

    p2[ 2746]=1.500000e+00

    p2[ 2747]=1.500000e+00

    p2[ 2748]=1.500001e+00

    p2[ 2749]=1.500000e+00

    p2[ 2750]=1.500000e+00

    p2[ 2751]=1.500000e+00

    p2[ 2752]=1.500000e+00

    p2[ 2753]=1.500000e+00

    p2[ 2754]=1.500000e+00

    p2[ 2755]=1.500000e+00

    p2[ 2756]=1.500000e+00

    p2[ 2757]=1.500000e+00

    p2[ 2758]=1.500000e+00

    p2[ 2759]=1.500000e+00

    p2[ 2760]=1.500000e+00

    p2[ 2761]=1.500000e+00

    p2[ 2762]=1.500000e+00

    p2[ 2763]=1.500000e+00

    p2[ 2764]=1.500000e+00

    p2[ 2765]=1.500000e+00

    p2[ 2766]=1.500000e+00

    p2[ 2767]=1.500000e+00

    p2[ 2768]=1.500000e+00

    p2[ 2769]=1.500000e+00

    p2[ 2770]=1.500000e+00

    p2[ 2771]=1.500000e+00

    p2[ 2772]=1.500000e+00

    p2[ 2773]=1.500000e+00

    p2[ 2774]=1.500000e+00

    p2[ 2775]=1.500000e+00

    p2[ 2776]=1.500000e+00

    p2[ 2777]=1.500001e+00

    p2[ 2778]=1.500000e+00

    p2[ 2779]=1.500000e+00

    p2[ 2780]=1.500000e+00

    p2[ 2781]=1.500000e+00

    p2[ 2782]=1.500000e+00

    p2[ 2783]=1.500000e+00

    p2[ 2784]=1.500000e+00

    p2[ 2785]=1.500000e+00

    p2[ 2786]=1.500000e+00

    p2[ 2787]=1.500000e+00

    p2[ 2788]=1.500000e+00

    p2[ 2789]=1.500000e+00

    p2[ 2790]=1.500000e+00

    p2[ 2791]=1.500000e+00

    p2[ 2792]=1.500000e+00

    p2[ 2793]=1.500000e+00

    p2[ 2794]=1.500000e+00

    p2[ 2795]=1.500000e+00

    p2[ 2796]=1.500000e+00

    p2[ 2797]=1.500000e+00

    p2[ 2798]=1.500000e+00

    p2[ 2799]=1.500000e+00

    p2[ 2800]=1.500000e+00

    p2[ 2801]=1.500000e+00

    p2[ 2802]=1.500000e+00

    p2[ 2803]=1.500000e+00

    p2[ 2804]=1.500000e+00

    p2[ 2805]=1.500000e+00

    p2[ 2806]=1.500000e+00

    p2[ 2807]=1.500000e+00

    p2[ 2808]=1.500000e+00

    p2[ 2809]=1.500000e+00

    p2[ 2810]=1.500000e+00

    p2[ 2811]=1.500000e+00

    p2[ 2812]=1.500000e+00

    p2[ 2813]=1.500000e+00

    p2[ 2814]=1.500000e+00

    p2[ 2815]=1.500000e+00

    p2[ 2816]=1.500000e+00

    p2[ 2817]=1.500000e+00

    p2[ 2818]=1.500000e+00

    p2[ 2819]=1.500000e+00

    p2[ 2820]=1.500000e+00

    p2[ 2821]=1.500000e+00

    p2[ 2822]=1.500000e+00

    p2[ 2823]=1.500000e+00

    p2[ 2824]=1.500000e+00

    p2[ 2825]=1.500000e+00

    p2[ 2826]=1.500000e+00

    p2[ 2827]=1.500000e+00

    p2[ 2828]=1.500000e+00

    p2[ 2829]=1.500000e+00

    p2[ 2830]=1.500000e+00

    p2[ 2831]=1.500000e+00

    p2[ 2832]=1.500000e+00

    p2[ 2833]=1.499999e+00

    p2[ 2834]=1.500000e+00

    p2[ 2835]=1.500000e+00

    p2[ 2836]=1.500000e+00

    p2[ 2837]=1.500000e+00

    p2[ 2838]=1.500000e+00

    p2[ 2839]=1.500000e+00

    p2[ 2840]=1.500000e+00

    p2[ 2841]=1.500000e+00

    p2[ 2842]=1.500000e+00

    p2[ 2843]=1.500000e+00

    p2[ 2844]=1.500000e+00

    p2[ 2845]=1.500000e+00

    p2[ 2846]=1.499999e+00

    p2[ 2847]=1.500000e+00

    p2[ 2848]=1.500000e+00

    p2[ 2849]=1.500000e+00

    p2[ 2850]=1.500000e+00

    p2[ 2851]=1.500000e+00

    p2[ 2852]=1.500000e+00

    p2[ 2853]=1.499999e+00

    p2[ 2854]=1.499999e+00

    p2[ 2855]=1.500000e+00

    p2[ 2856]=1.500000e+00

    p2[ 2857]=1.500000e+00

    p2[ 2858]=1.500000e+00

    p2[ 2859]=1.500000e+00

    p2[ 2860]=1.500000e+00

    p2[ 2861]=1.500000e+00

    p2[ 2862]=1.500000e+00

    p2[ 2863]=1.500000e+00

    p2[ 2864]=1.500000e+00

    p2[ 2865]=1.500000e+00

    p2[ 2866]=1.500000e+00

    p2[ 2867]=1.500000e+00

    p2[ 2868]=1.500000e+00

    p2[ 2869]=1.500000e+00

    p2[ 2870]=1.500000e+00

    p2[ 2871]=1.499999e+00

    p2[ 2872]=1.500000e+00

    p2[ 2873]=1.500000e+00

    p2[ 2874]=1.500000e+00

    p2[ 2875]=1.500000e+00

    p2[ 2876]=1.500000e+00

    p2[ 2877]=1.500000e+00

    p2[ 2878]=1.500000e+00

    p2[ 2879]=1.500000e+00

    p2[ 2880]=1.500000e+00

    p2[ 2881]=1.500000e+00

    p2[ 2882]=1.500000e+00

    p2[ 2883]=1.500001e+00

    p2[ 2884]=1.500000e+00

    p2[ 2885]=1.500000e+00

    p2[ 2886]=1.500000e+00

    p2[ 2887]=1.500000e+00

    p2[ 2888]=1.500000e+00

    p2[ 2889]=1.500000e+00

    p2[ 2890]=1.500000e+00

    p2[ 2891]=1.500000e+00

    p2[ 2892]=1.500000e+00

    p2[ 2893]=1.500000e+00

    p2[ 2894]=1.500000e+00

    p2[ 2895]=1.500000e+00

    p2[ 2896]=1.500000e+00

    p2[ 2897]=1.500000e+00

    p2[ 2898]=1.500000e+00

    p2[ 2899]=1.500000e+00

    p2[ 2900]=1.500000e+00

    p2[ 2901]=1.500000e+00

    p2[ 2902]=1.500000e+00

    p2[ 2903]=1.500000e+00

    p2[ 2904]=1.500000e+00

    p2[ 2905]=1.500000e+00

    p2[ 2906]=1.500000e+00

    p2[ 2907]=1.500000e+00

    p2[ 2908]=1.500000e+00

    p2[ 2909]=1.500000e+00

    p2[ 2910]=1.500000e+00

    p2[ 2911]=1.500000e+00

    p2[ 2912]=1.500000e+00

    p2[ 2913]=1.500001e+00

    p2[ 2914]=1.500000e+00

    p2[ 2915]=1.500000e+00

    p2[ 2916]=1.500000e+00

    p2[ 2917]=1.500000e+00

    p2[ 2918]=1.500000e+00

    p2[ 2919]=1.500000e+00

    p2[ 2920]=1.500000e+00

    p2[ 2921]=1.500000e+00

    p2[ 2922]=1.500000e+00

    p2[ 2923]=1.500000e+00

    p2[ 2924]=1.500000e+00

    p2[ 2925]=1.500000e+00

    p2[ 2926]=1.500000e+00

    p2[ 2927]=1.500001e+00

    p2[ 2928]=1.500000e+00

    p2[ 2929]=1.500000e+00

    p2[ 2930]=1.500000e+00

    p2[ 2931]=1.500000e+00

    p2[ 2932]=1.500000e+00

    p2[ 2933]=1.500000e+00

    p2[ 2934]=1.500000e+00

    p2[ 2935]=1.500000e+00

    p2[ 2936]=1.500000e+00

    p2[ 2937]=1.500000e+00

    p2[ 2938]=1.500000e+00

    p2[ 2939]=1.500000e+00

    p2[ 2940]=1.500000e+00

    p2[ 2941]=1.500000e+00

    p2[ 2942]=1.500000e+00

    p2[ 2943]=1.500000e+00

    p2[ 2944]=1.500000e+00

    p2[ 2945]=1.500000e+00

    p2[ 2946]=1.500000e+00

    p2[ 2947]=1.500000e+00

    p2[ 2948]=1.500000e+00

    p2[ 2949]=1.500000e+00

    p2[ 2950]=1.500000e+00

    p2[ 2951]=1.500000e+00

    p2[ 2952]=1.500000e+00

    p2[ 2953]=1.500000e+00

    p2[ 2954]=1.500000e+00

    p2[ 2955]=1.500000e+00

    p2[ 2956]=1.500000e+00

    p2[ 2957]=1.500000e+00

    p2[ 2958]=1.500000e+00

    p2[ 2959]=1.500000e+00

    p2[ 2960]=1.500000e+00

    p2[ 2961]=1.500000e+00

    p2[ 2962]=1.500000e+00

    p2[ 2963]=1.500000e+00

    p2[ 2964]=1.500000e+00

    p2[ 2965]=1.500000e+00

    p2[ 2966]=1.500000e+00

    p2[ 2967]=1.500000e+00

    p2[ 2968]=1.500000e+00

    p2[ 2969]=1.500000e+00

    p2[ 2970]=1.500000e+00

    p2[ 2971]=1.500000e+00

    p2[ 2972]=1.500000e+00

    p2[ 2973]=1.500000e+00

    p2[ 2974]=1.500000e+00

    p2[ 2975]=1.500000e+00

    p2[ 2976]=1.500000e+00

    p2[ 2977]=1.500000e+00

    p2[ 2978]=1.500000e+00

    p2[ 2979]=1.500000e+00

    p2[ 2980]=1.500000e+00

    p2[ 2981]=1.500000e+00

    p2[ 2982]=1.500000e+00

    p2[ 2983]=1.500000e+00

    p2[ 2984]=1.500000e+00

    p2[ 2985]=1.500000e+00

    p2[ 2986]=1.500000e+00

    p2[ 2987]=1.500000e+00

    p2[ 2988]=1.500000e+00

    p2[ 2989]=1.500000e+00

    p2[ 2990]=1.500000e+00

    p2[ 2991]=1.500000e+00

    p2[ 2992]=1.500000e+00

    p2[ 2993]=1.500000e+00

    p2[ 2994]=1.500000e+00

    p2[ 2995]=1.500000e+00

    p2[ 2996]=1.500000e+00

    p2[ 2997]=1.500000e+00

    p2[ 2998]=1.500000e+00

    p2[ 2999]=1.500000e+00

    p2[ 3000]=1.500000e+00

    p2[ 3001]=1.500000e+00

    p2[ 3002]=1.500000e+00

    p2[ 3003]=1.500000e+00

    p2[ 3004]=1.500000e+00

    p2[ 3005]=1.500000e+00

    p2[ 3006]=1.500000e+00

    p2[ 3007]=1.500000e+00

    p2[ 3008]=1.500000e+00

    p2[ 3009]=1.500000e+00

    p2[ 3010]=1.500000e+00

    p2[ 3011]=1.500000e+00

    p2[ 3012]=1.500000e+00

    p2[ 3013]=1.500000e+00

    p2[ 3014]=1.500000e+00

    p2[ 3015]=1.500000e+00

    p2[ 3016]=1.500000e+00

    p2[ 3017]=1.500000e+00

    p2[ 3018]=1.500000e+00

    p2[ 3019]=1.500000e+00

    p2[ 3020]=1.500000e+00

    p2[ 3021]=1.500000e+00

    p2[ 3022]=1.500000e+00

    p2[ 3023]=1.500000e+00

    p2[ 3024]=1.500000e+00

    p2[ 3025]=1.500000e+00

    p2[ 3026]=1.500000e+00

    p2[ 3027]=1.500000e+00

    p2[ 3028]=1.500000e+00

    p2[ 3029]=1.500000e+00

    p2[ 3030]=1.500000e+00

    p2[ 3031]=1.500000e+00

    p2[ 3032]=1.500000e+00

    p2[ 3033]=1.500000e+00

    p2[ 3034]=1.500000e+00

    p2[ 3035]=1.500000e+00

    p2[ 3036]=1.500000e+00

    p2[ 3037]=1.500000e+00

    p2[ 3038]=1.500000e+00

    p2[ 3039]=1.500000e+00

    p2[ 3040]=1.500000e+00

    p2[ 3041]=1.500000e+00

    p2[ 3042]=1.500000e+00

    p2[ 3043]=1.500000e+00

    p2[ 3044]=1.500000e+00

    p2[ 3045]=1.500000e+00

    p2[ 3046]=1.500000e+00

    p2[ 3047]=1.500000e+00

    p2[ 3048]=1.500000e+00

    p2[ 3049]=1.500000e+00

    p2[ 3050]=1.500000e+00

    p2[ 3051]=1.500000e+00

    p2[ 3052]=1.500000e+00

    p2[ 3053]=1.500000e+00

    p2[ 3054]=1.500000e+00

    p2[ 3055]=1.500000e+00

    p2[ 3056]=1.500000e+00

    p2[ 3057]=1.500000e+00

    p2[ 3058]=1.500000e+00

    p2[ 3059]=1.500000e+00

    p2[ 3060]=1.500000e+00

    p2[ 3061]=1.500000e+00

    p2[ 3062]=1.500000e+00

    p2[ 3063]=1.500000e+00

    p2[ 3064]=1.500000e+00

    p2[ 3065]=1.500000e+00

    p2[ 3066]=1.500000e+00

    p2[ 3067]=1.500000e+00

    p2[ 3068]=1.500000e+00

    p2[ 3069]=1.500000e+00

    p2[ 3070]=1.500000e+00

    p2[ 3071]=1.499999e+00

    p2[ 3072]=1.500000e+00

    p2[ 3073]=1.500000e+00

    p2[ 3074]=1.500000e+00

    p2[ 3075]=1.500000e+00

    p2[ 3076]=1.500000e+00

    p2[ 3077]=1.500000e+00

    p2[ 3078]=1.500000e+00

    p2[ 3079]=1.500000e+00

    p2[ 3080]=1.500000e+00

    p2[ 3081]=1.500000e+00

    p2[ 3082]=1.500000e+00

    p2[ 3083]=1.500000e+00

    p2[ 3084]=1.500000e+00

    p2[ 3085]=1.500000e+00

    p2[ 3086]=1.500000e+00

    p2[ 3087]=1.500000e+00

    p2[ 3088]=1.500000e+00

    p2[ 3089]=1.500000e+00

    p2[ 3090]=1.500000e+00

    p2[ 3091]=1.500000e+00

    p2[ 3092]=1.500000e+00

    p2[ 3093]=1.500000e+00

    p2[ 3094]=1.500000e+00

    p2[ 3095]=1.500000e+00

    p2[ 3096]=1.500000e+00

    p2[ 3097]=1.500000e+00

    p2[ 3098]=1.500000e+00

    p2[ 3099]=1.500000e+00

    p2[ 3100]=1.499999e+00

    p2[ 3101]=1.500000e+00

    p2[ 3102]=1.500000e+00

    p2[ 3103]=1.500000e+00

    p2[ 3104]=1.500000e+00

    p2[ 3105]=1.500000e+00

    p2[ 3106]=1.500000e+00

    p2[ 3107]=1.500000e+00

    p2[ 3108]=1.500000e+00

    p2[ 3109]=1.499999e+00

    p2[ 3110]=1.500000e+00

    p2[ 3111]=1.500000e+00

    p2[ 3112]=1.500000e+00

    p2[ 3113]=1.500000e+00

    p2[ 3114]=1.500000e+00

    p2[ 3115]=1.500000e+00

    p2[ 3116]=1.500000e+00

    p2[ 3117]=1.500000e+00

    p2[ 3118]=1.500000e+00

    p2[ 3119]=1.500001e+00

    p2[ 3120]=1.500000e+00

    p2[ 3121]=1.500000e+00

    p2[ 3122]=1.500000e+00

    p2[ 3123]=1.500000e+00

    p2[ 3124]=1.500000e+00

    p2[ 3125]=1.500000e+00

    p2[ 3126]=1.500000e+00

    p2[ 3127]=1.500000e+00

    p2[ 3128]=1.500000e+00

    p2[ 3129]=1.500000e+00

    p2[ 3130]=1.500000e+00

    p2[ 3131]=1.500000e+00

    p2[ 3132]=1.500000e+00

    p2[ 3133]=1.500000e+00

    p2[ 3134]=1.500000e+00

    p2[ 3135]=1.500000e+00

    p2[ 3136]=1.500000e+00

    p2[ 3137]=1.500000e+00

    p2[ 3138]=1.500000e+00

    p2[ 3139]=1.500000e+00

    p2[ 3140]=1.500000e+00

    p2[ 3141]=1.500000e+00

    p2[ 3142]=1.500000e+00

    p2[ 3143]=1.500000e+00

    p2[ 3144]=1.500000e+00

    p2[ 3145]=1.500000e+00

    p2[ 3146]=1.500000e+00

    p2[ 3147]=1.500000e+00

    p2[ 3148]=1.500000e+00

    p2[ 3149]=1.500000e+00

    p2[ 3150]=1.500000e+00

    p2[ 3151]=1.500001e+00

    p2[ 3152]=1.500000e+00

    p2[ 3153]=1.500000e+00

    p2[ 3154]=1.500000e+00

    p2[ 3155]=1.500000e+00

    p2[ 3156]=1.500000e+00

    p2[ 3157]=1.500000e+00

    p2[ 3158]=1.500000e+00

    p2[ 3159]=1.500000e+00

    p2[ 3160]=1.500000e+00

    p2[ 3161]=1.500000e+00

    p2[ 3162]=1.500000e+00

    p2[ 3163]=1.500000e+00

    p2[ 3164]=1.500001e+00

    p2[ 3165]=1.500000e+00

    p2[ 3166]=1.500000e+00

    p2[ 3167]=1.500000e+00

    p2[ 3168]=1.500000e+00

    p2[ 3169]=1.500000e+00

    p2[ 3170]=1.500000e+00

    p2[ 3171]=1.500000e+00

    p2[ 3172]=1.500000e+00

    p2[ 3173]=1.500000e+00

    p2[ 3174]=1.500000e+00

    p2[ 3175]=1.500000e+00

    p2[ 3176]=1.500000e+00

    p2[ 3177]=1.500000e+00

    p2[ 3178]=1.500000e+00

    p2[ 3179]=1.500000e+00

    p2[ 3180]=1.500000e+00

    p2[ 3181]=1.500000e+00

    p2[ 3182]=1.500000e+00

    p2[ 3183]=1.500000e+00

    p2[ 3184]=1.500000e+00

    p2[ 3185]=1.500000e+00

    p2[ 3186]=1.500000e+00

    p2[ 3187]=1.500000e+00

    p2[ 3188]=1.500000e+00

    p2[ 3189]=1.500000e+00

    p2[ 3190]=1.500000e+00

    p2[ 3191]=1.500000e+00

    p2[ 3192]=1.500000e+00

    p2[ 3193]=1.500001e+00

    p2[ 3194]=1.500000e+00

    p2[ 3195]=1.500000e+00

    p2[ 3196]=1.500000e+00

    p2[ 3197]=1.500000e+00

    p2[ 3198]=1.500000e+00

    p2[ 3199]=1.500000e+00

    p2[ 3200]=1.500000e+00

    p2[ 3201]=1.500000e+00

    p2[ 3202]=1.500000e+00

    p2[ 3203]=1.500000e+00

    p2[ 3204]=1.500000e+00

    p2[ 3205]=1.500000e+00

    p2[ 3206]=1.500000e+00

    p2[ 3207]=1.499999e+00

    p2[ 3208]=1.500000e+00

    p2[ 3209]=1.500000e+00

    p2[ 3210]=1.500000e+00

    p2[ 3211]=1.500000e+00

    p2[ 3212]=1.500000e+00

    p2[ 3213]=1.500000e+00

    p2[ 3214]=1.500000e+00

    p2[ 3215]=1.500000e+00

    p2[ 3216]=1.500000e+00

    p2[ 3217]=1.500000e+00

    p2[ 3218]=1.500000e+00

    p2[ 3219]=1.500000e+00

    p2[ 3220]=1.500000e+00

    p2[ 3221]=1.500000e+00

    p2[ 3222]=1.500000e+00

    p2[ 3223]=1.500000e+00

    p2[ 3224]=1.500000e+00

    p2[ 3225]=1.500000e+00

    p2[ 3226]=1.500000e+00

    p2[ 3227]=1.500000e+00

    p2[ 3228]=1.500000e+00

    p2[ 3229]=1.500000e+00

    p2[ 3230]=1.500000e+00

    p2[ 3231]=1.500000e+00

    p2[ 3232]=1.500000e+00

    p2[ 3233]=1.500000e+00

    p2[ 3234]=1.500000e+00

    p2[ 3235]=1.500000e+00

    p2[ 3236]=1.500000e+00

    p2[ 3237]=1.500000e+00

    p2[ 3238]=1.500000e+00

    p2[ 3239]=1.500000e+00

    p2[ 3240]=1.500000e+00

    p2[ 3241]=1.500000e+00

    p2[ 3242]=1.500000e+00

    p2[ 3243]=1.500000e+00

    p2[ 3244]=1.500000e+00

    p2[ 3245]=1.500000e+00

    p2[ 3246]=1.500000e+00

    p2[ 3247]=1.500000e+00

    p2[ 3248]=1.500000e+00

    p2[ 3249]=1.500000e+00

    p2[ 3250]=1.500000e+00

    p2[ 3251]=1.500000e+00

    p2[ 3252]=1.500000e+00

    p2[ 3253]=1.500000e+00

    p2[ 3254]=1.500000e+00

    p2[ 3255]=1.500000e+00

    p2[ 3256]=1.500000e+00

    p2[ 3257]=1.500000e+00

    p2[ 3258]=1.500000e+00

    p2[ 3259]=1.500000e+00

    p2[ 3260]=1.500000e+00

    p2[ 3261]=1.500000e+00

    p2[ 3262]=1.500000e+00

    p2[ 3263]=1.500000e+00

    p2[ 3264]=1.500000e+00

    p2[ 3265]=1.500000e+00

    p2[ 3266]=1.500000e+00

    p2[ 3267]=1.500000e+00

    p2[ 3268]=1.500000e+00

    p2[ 3269]=1.500000e+00

    p2[ 3270]=1.500000e+00

    p2[ 3271]=1.500000e+00

    p2[ 3272]=1.500000e+00

    p2[ 3273]=1.500000e+00

    p2[ 3274]=1.500000e+00

    p2[ 3275]=1.500000e+00

    p2[ 3276]=1.500000e+00

    p2[ 3277]=1.500000e+00

    p2[ 3278]=1.500000e+00

    p2[ 3279]=1.500000e+00

    p2[ 3280]=1.500000e+00

    p2[ 3281]=1.500000e+00

    p2[ 3282]=1.500000e+00

    p2[ 3283]=1.500000e+00

    p2[ 3284]=1.500000e+00

    p2[ 3285]=1.500000e+00

    p2[ 3286]=1.500000e+00

    p2[ 3287]=1.500000e+00

    p2[ 3288]=1.500000e+00

    p2[ 3289]=1.500000e+00

    p2[ 3290]=1.500000e+00

    p2[ 3291]=1.500000e+00

    p2[ 3292]=1.500000e+00

    p2[ 3293]=1.500000e+00

    p2[ 3294]=1.500000e+00

    p2[ 3295]=1.500000e+00

    p2[ 3296]=1.500000e+00

    p2[ 3297]=1.500000e+00

    p2[ 3298]=1.500000e+00

    p2[ 3299]=1.500000e+00

    p2[ 3300]=1.500000e+00

    p2[ 3301]=1.500000e+00

    p2[ 3302]=1.500000e+00

    p2[ 3303]=1.500000e+00

    p2[ 3304]=1.500000e+00

    p2[ 3305]=1.500000e+00

    p2[ 3306]=1.500000e+00

    p2[ 3307]=1.500000e+00

    p2[ 3308]=1.500000e+00

    p2[ 3309]=1.500000e+00

    p2[ 3310]=1.500000e+00

    p2[ 3311]=1.500000e+00

    p2[ 3312]=1.500000e+00

    p2[ 3313]=1.500000e+00

    p2[ 3314]=1.500000e+00

    p2[ 3315]=1.500001e+00

    p2[ 3316]=1.500000e+00

    p2[ 3317]=1.500000e+00

    p2[ 3318]=1.500000e+00

    p2[ 3319]=1.500000e+00

    p2[ 3320]=1.500000e+00

    p2[ 3321]=1.500000e+00

    p2[ 3322]=1.500000e+00

    p2[ 3323]=1.500000e+00

    p2[ 3324]=1.500000e+00

    p2[ 3325]=1.500000e+00

    p2[ 3326]=1.500000e+00

    p2[ 3327]=1.500000e+00

    p2[ 3328]=1.500000e+00

    p2[ 3329]=1.500000e+00

    p2[ 3330]=1.500000e+00

    p2[ 3331]=1.500000e+00

    p2[ 3332]=1.500000e+00

    p2[ 3333]=1.500000e+00

    p2[ 3334]=1.500000e+00

    p2[ 3335]=1.500000e+00

    p2[ 3336]=1.500000e+00

    p2[ 3337]=1.500000e+00

    p2[ 3338]=1.500000e+00

    p2[ 3339]=1.500000e+00

    p2[ 3340]=1.500000e+00

    p2[ 3341]=1.500000e+00

    p2[ 3342]=1.500000e+00

    p2[ 3343]=1.500000e+00

    p2[ 3344]=1.500000e+00

    p2[ 3345]=1.500000e+00

    p2[ 3346]=1.500000e+00

    p2[ 3347]=1.500000e+00

    p2[ 3348]=1.500000e+00

    p2[ 3349]=1.500000e+00

    p2[ 3350]=1.500000e+00

    p2[ 3351]=1.500000e+00

    p2[ 3352]=1.500000e+00

    p2[ 3353]=1.500000e+00

    p2[ 3354]=1.500000e+00

    p2[ 3355]=1.500000e+00

    p2[ 3356]=1.500000e+00

    p2[ 3357]=1.500000e+00

    p2[ 3358]=1.500000e+00

    p2[ 3359]=1.500000e+00

    p2[ 3360]=1.500000e+00

    p2[ 3361]=1.500000e+00

    p2[ 3362]=1.500000e+00

    p2[ 3363]=1.500000e+00

    p2[ 3364]=1.500000e+00

    p2[ 3365]=1.500000e+00

    p2[ 3366]=1.500000e+00

    p2[ 3367]=1.500000e+00

    p2[ 3368]=1.500000e+00

    p2[ 3369]=1.500000e+00

    p2[ 3370]=1.500000e+00

    p2[ 3371]=1.500000e+00

    p2[ 3372]=1.500000e+00

    p2[ 3373]=1.500000e+00

    p2[ 3374]=1.500000e+00

    p2[ 3375]=1.500000e+00

    p2[ 3376]=1.500000e+00

    p2[ 3377]=1.500000e+00

    p2[ 3378]=1.500000e+00

    p2[ 3379]=1.500000e+00

    p2[ 3380]=1.500000e+00

    p2[ 3381]=1.500000e+00

    p2[ 3382]=1.500000e+00

    p2[ 3383]=1.500000e+00

    p2[ 3384]=1.499999e+00

    p2[ 3385]=1.500000e+00

    p2[ 3386]=1.500000e+00

    p2[ 3387]=1.500000e+00

    p2[ 3388]=1.500000e+00

    p2[ 3389]=1.500000e+00

    p2[ 3390]=1.500000e+00

    p2[ 3391]=1.500000e+00

    p2[ 3392]=1.500000e+00

    p2[ 3393]=1.500000e+00

    p2[ 3394]=1.500000e+00

    p2[ 3395]=1.500000e+00

    p2[ 3396]=1.500000e+00

    p2[ 3397]=1.500000e+00

    p2[ 3398]=1.500000e+00

    p2[ 3399]=1.500000e+00

    p2[ 3400]=1.500000e+00

    p2[ 3401]=1.500000e+00

    p2[ 3402]=1.500000e+00

    p2[ 3403]=1.500000e+00

    p2[ 3404]=1.500000e+00

    p2[ 3405]=1.500000e+00

    p2[ 3406]=1.500000e+00

    p2[ 3407]=1.500000e+00

    p2[ 3408]=1.500000e+00

    p2[ 3409]=1.500000e+00

    p2[ 3410]=1.500000e+00

    p2[ 3411]=1.500000e+00

    p2[ 3412]=1.500000e+00

    p2[ 3413]=1.500000e+00

    p2[ 3414]=1.500000e+00

    p2[ 3415]=1.500000e+00

    p2[ 3416]=1.500000e+00

    p2[ 3417]=1.500000e+00

    p2[ 3418]=1.500000e+00

    p2[ 3419]=1.500000e+00

    p2[ 3420]=1.500000e+00

    p2[ 3421]=1.500000e+00

    p2[ 3422]=1.500000e+00

    p2[ 3423]=1.500000e+00

    p2[ 3424]=1.500000e+00

    p2[ 3425]=1.500000e+00

    p2[ 3426]=1.500000e+00

    p2[ 3427]=1.500000e+00

    p2[ 3428]=1.500000e+00

    p2[ 3429]=1.500000e+00

    p2[ 3430]=1.500000e+00

    p2[ 3431]=1.500000e+00

    p2[ 3432]=1.500000e+00

    p2[ 3433]=1.500000e+00

    p2[ 3434]=1.500000e+00

    p2[ 3435]=1.500000e+00

    p2[ 3436]=1.500000e+00

    p2[ 3437]=1.500000e+00

    p2[ 3438]=1.500000e+00

    p2[ 3439]=1.500000e+00

    p2[ 3440]=1.500000e+00

    p2[ 3441]=1.500000e+00

    p2[ 3442]=1.500000e+00

    p2[ 3443]=1.500000e+00

    p2[ 3444]=1.500000e+00

    p2[ 3445]=1.500000e+00

    p2[ 3446]=1.500000e+00

    p2[ 3447]=1.500000e+00

    p2[ 3448]=1.500000e+00

    p2[ 3449]=1.500000e+00

    p2[ 3450]=1.500000e+00

    p2[ 3451]=1.500000e+00

    p2[ 3452]=1.500000e+00

    p2[ 3453]=1.500000e+00

    p2[ 3454]=1.500000e+00

    p2[ 3455]=1.500000e+00

    p2[ 3456]=1.500000e+00

    p2[ 3457]=1.500000e+00

    p2[ 3458]=1.500000e+00

    p2[ 3459]=1.500000e+00

    p2[ 3460]=1.500000e+00

    p2[ 3461]=1.500000e+00

    p2[ 3462]=1.500000e+00

    p2[ 3463]=1.500000e+00

    p2[ 3464]=1.500000e+00

    p2[ 3465]=1.500000e+00

    p2[ 3466]=1.500000e+00

    p2[ 3467]=1.500000e+00

    p2[ 3468]=1.500000e+00

    p2[ 3469]=1.500000e+00

    p2[ 3470]=1.500000e+00

    p2[ 3471]=1.499999e+00

    p2[ 3472]=1.500000e+00

    p2[ 3473]=1.500000e+00

    p2[ 3474]=1.500000e+00

    p2[ 3475]=1.500000e+00

    p2[ 3476]=1.500000e+00

    p2[ 3477]=1.500001e+00

    p2[ 3478]=1.500000e+00

    p2[ 3479]=1.500000e+00

    p2[ 3480]=1.500000e+00

    p2[ 3481]=1.500000e+00

    p2[ 3482]=1.500000e+00

    p2[ 3483]=1.500000e+00

    p2[ 3484]=1.500000e+00

    p2[ 3485]=1.500000e+00

    p2[ 3486]=1.500000e+00

    p2[ 3487]=1.500000e+00

    p2[ 3488]=1.500000e+00

    p2[ 3489]=1.500000e+00

    p2[ 3490]=1.500000e+00

    p2[ 3491]=1.500000e+00

    p2[ 3492]=1.500000e+00

    p2[ 3493]=1.500001e+00

    p2[ 3494]=1.500000e+00

    p2[ 3495]=1.500000e+00

    p2[ 3496]=1.500000e+00

    p2[ 3497]=1.500000e+00

    p2[ 3498]=1.500000e+00

    p2[ 3499]=1.500000e+00

    p2[ 3500]=1.500000e+00

    p2[ 3501]=1.500000e+00

    p2[ 3502]=1.499999e+00

    p2[ 3503]=1.500000e+00

    p2[ 3504]=1.500000e+00

    p2[ 3505]=1.500000e+00

    p2[ 3506]=1.500000e+00

    p2[ 3507]=1.500000e+00

    p2[ 3508]=1.500000e+00

    p2[ 3509]=1.500000e+00

    p2[ 3510]=1.500000e+00

    p2[ 3511]=1.500000e+00

    p2[ 3512]=1.500000e+00

    p2[ 3513]=1.500000e+00

    p2[ 3514]=1.500000e+00

    p2[ 3515]=1.500000e+00

    p2[ 3516]=1.500000e+00

    p2[ 3517]=1.500000e+00

    p2[ 3518]=1.500000e+00

    p2[ 3519]=1.500000e+00

    p2[ 3520]=1.500000e+00

    p2[ 3521]=1.500001e+00

    p2[ 3522]=1.500000e+00

    p2[ 3523]=1.500000e+00

    p2[ 3524]=1.500000e+00

    p2[ 3525]=1.500000e+00

    p2[ 3526]=1.500000e+00

    p2[ 3527]=1.500000e+00

    p2[ 3528]=1.500000e+00

    p2[ 3529]=1.500000e+00

    p2[ 3530]=1.500000e+00

    p2[ 3531]=1.500000e+00

    p2[ 3532]=1.500000e+00

    p2[ 3533]=1.500000e+00

    p2[ 3534]=1.500000e+00

    p2[ 3535]=1.500000e+00

    p2[ 3536]=1.500000e+00

    p2[ 3537]=1.500000e+00

    p2[ 3538]=1.500000e+00

    p2[ 3539]=1.500000e+00

    p2[ 3540]=1.500000e+00

    p2[ 3541]=1.500000e+00

    p2[ 3542]=1.500000e+00

    p2[ 3543]=1.500000e+00

    p2[ 3544]=1.500000e+00

    p2[ 3545]=1.500000e+00

    p2[ 3546]=1.500000e+00

    p2[ 3547]=1.500000e+00

    p2[ 3548]=1.500000e+00

    p2[ 3549]=1.500000e+00

    p2[ 3550]=1.500000e+00

    p2[ 3551]=1.500000e+00

    p2[ 3552]=1.500000e+00

    p2[ 3553]=1.500000e+00

    p2[ 3554]=1.500000e+00

    p2[ 3555]=1.500000e+00

    p2[ 3556]=1.500000e+00

    p2[ 3557]=1.500000e+00

    p2[ 3558]=1.500000e+00

    p2[ 3559]=1.500000e+00

    p2[ 3560]=1.500000e+00

    p2[ 3561]=1.500000e+00

    p2[ 3562]=1.500000e+00

    p2[ 3563]=1.500000e+00

    p2[ 3564]=1.500000e+00

    p2[ 3565]=1.500000e+00

    p2[ 3566]=1.500000e+00

    p2[ 3567]=1.500000e+00

    p2[ 3568]=1.500000e+00

    p2[ 3569]=1.500000e+00

    p2[ 3570]=1.500000e+00

    p2[ 3571]=1.500000e+00

    p2[ 3572]=1.500000e+00

    p2[ 3573]=1.500000e+00

    p2[ 3574]=1.500000e+00

    p2[ 3575]=1.500000e+00

    p2[ 3576]=1.500000e+00

    p2[ 3577]=1.500000e+00

    p2[ 3578]=1.500000e+00

    p2[ 3579]=1.500000e+00

    p2[ 3580]=1.500000e+00

    p2[ 3581]=1.500000e+00

    p2[ 3582]=1.500000e+00

    p2[ 3583]=1.500000e+00

    p2[ 3584]=1.500000e+00

    p2[ 3585]=1.500000e+00

    p2[ 3586]=1.500000e+00

    p2[ 3587]=1.500000e+00

    p2[ 3588]=1.500000e+00

    p2[ 3589]=1.500000e+00

    p2[ 3590]=1.500000e+00

    p2[ 3591]=1.500000e+00

    p2[ 3592]=1.500000e+00

    p2[ 3593]=1.500000e+00

    p2[ 3594]=1.500000e+00

    p2[ 3595]=1.500000e+00

    p2[ 3596]=1.500000e+00

    p2[ 3597]=1.500000e+00

    p2[ 3598]=1.500000e+00

    p2[ 3599]=1.499999e+00

    p2[ 3600]=1.500000e+00

    p2[ 3601]=1.500000e+00

    p2[ 3602]=1.500000e+00

    p2[ 3603]=1.500000e+00

    p2[ 3604]=1.500000e+00

    p2[ 3605]=1.500000e+00

    p2[ 3606]=1.500000e+00

    p2[ 3607]=1.500000e+00

    p2[ 3608]=1.500000e+00

    p2[ 3609]=1.500000e+00

    p2[ 3610]=1.500000e+00

    p2[ 3611]=1.500000e+00

    p2[ 3612]=1.500000e+00

    p2[ 3613]=1.500000e+00

    p2[ 3614]=1.500000e+00

    p2[ 3615]=1.500000e+00

    p2[ 3616]=1.500000e+00

    p2[ 3617]=1.500000e+00

    p2[ 3618]=1.500000e+00

    p2[ 3619]=1.500000e+00

    p2[ 3620]=1.500000e+00

    p2[ 3621]=1.500000e+00

    p2[ 3622]=1.500000e+00

    p2[ 3623]=1.500000e+00

    p2[ 3624]=1.500000e+00

    p2[ 3625]=1.500000e+00

    p2[ 3626]=1.500000e+00

    p2[ 3627]=1.500000e+00

    p2[ 3628]=1.500000e+00

    p2[ 3629]=1.500000e+00

    p2[ 3630]=1.500000e+00

    p2[ 3631]=1.500000e+00

    p2[ 3632]=1.500000e+00

    p2[ 3633]=1.500000e+00

    p2[ 3634]=1.500000e+00

    p2[ 3635]=1.500000e+00

    p2[ 3636]=1.500000e+00

    p2[ 3637]=1.500000e+00

    p2[ 3638]=1.500000e+00

    p2[ 3639]=1.500000e+00

    p2[ 3640]=1.500000e+00

    p2[ 3641]=1.500000e+00

    p2[ 3642]=1.500000e+00

    p2[ 3643]=1.500000e+00

    p2[ 3644]=1.500000e+00

    p2[ 3645]=1.500000e+00

    p2[ 3646]=1.500000e+00

    p2[ 3647]=1.500000e+00

    p2[ 3648]=1.500000e+00

    p2[ 3649]=1.500000e+00

    p2[ 3650]=1.500000e+00

    p2[ 3651]=1.500000e+00

    p2[ 3652]=1.500000e+00

    p2[ 3653]=1.500000e+00

    p2[ 3654]=1.500000e+00

    p2[ 3655]=1.500000e+00

    p2[ 3656]=1.500000e+00

    p2[ 3657]=1.500000e+00

    p2[ 3658]=1.500000e+00

    p2[ 3659]=1.500000e+00

    p2[ 3660]=1.500000e+00

    p2[ 3661]=1.500000e+00

    p2[ 3662]=1.500000e+00

    p2[ 3663]=1.500000e+00

    p2[ 3664]=1.500000e+00

    p2[ 3665]=1.500000e+00

    p2[ 3666]=1.500000e+00

    p2[ 3667]=1.500000e+00

    p2[ 3668]=1.500000e+00

    p2[ 3669]=1.500000e+00

    p2[ 3670]=1.500000e+00

    p2[ 3671]=1.500000e+00

    p2[ 3672]=1.500000e+00

    p2[ 3673]=1.500000e+00

    p2[ 3674]=1.500000e+00

    p2[ 3675]=1.500000e+00

    p2[ 3676]=1.500000e+00

    p2[ 3677]=1.500000e+00

    p2[ 3678]=1.500000e+00

    p2[ 3679]=1.500000e+00

    p2[ 3680]=1.500000e+00

    p2[ 3681]=1.500000e+00

    p2[ 3682]=1.500000e+00

    p2[ 3683]=1.500000e+00

    p2[ 3684]=1.500000e+00

    p2[ 3685]=1.500000e+00

    p2[ 3686]=1.500000e+00

    p2[ 3687]=1.500000e+00

    p2[ 3688]=1.500000e+00

    p2[ 3689]=1.500000e+00

    p2[ 3690]=1.500000e+00

    p2[ 3691]=1.500000e+00

    p2[ 3692]=1.500000e+00

    p2[ 3693]=1.500000e+00

    p2[ 3694]=1.500000e+00

    p2[ 3695]=1.500000e+00

    p2[ 3696]=1.500000e+00

    p2[ 3697]=1.500000e+00

    p2[ 3698]=1.500000e+00

    p2[ 3699]=1.500000e+00

    p2[ 3700]=1.500000e+00

    p2[ 3701]=1.500000e+00

    p2[ 3702]=1.500000e+00

    p2[ 3703]=1.500000e+00

    p2[ 3704]=1.500000e+00

    p2[ 3705]=1.500000e+00

    p2[ 3706]=1.500000e+00

    p2[ 3707]=1.500000e+00

    p2[ 3708]=1.500000e+00

    p2[ 3709]=1.500000e+00

    p2[ 3710]=1.500000e+00

    p2[ 3711]=1.500000e+00

    p2[ 3712]=1.500000e+00

    p2[ 3713]=1.500000e+00

    p2[ 3714]=1.500000e+00

    p2[ 3715]=1.500000e+00

    p2[ 3716]=1.500000e+00

    p2[ 3717]=1.500000e+00

    p2[ 3718]=1.500000e+00

    p2[ 3719]=1.500000e+00

    p2[ 3720]=1.500000e+00

    p2[ 3721]=1.500000e+00

    p2[ 3722]=1.500001e+00

    p2[ 3723]=1.500000e+00

    p2[ 3724]=1.500000e+00

    p2[ 3725]=1.500000e+00

    p2[ 3726]=1.500000e+00

    p2[ 3727]=1.500000e+00

    p2[ 3728]=1.500000e+00

    p2[ 3729]=1.500000e+00

    p2[ 3730]=1.500000e+00

    p2[ 3731]=1.500000e+00

    p2[ 3732]=1.500000e+00

    p2[ 3733]=1.500000e+00

    p2[ 3734]=1.500000e+00

    p2[ 3735]=1.500000e+00

    p2[ 3736]=1.500000e+00

    p2[ 3737]=1.500000e+00

    p2[ 3738]=1.500000e+00

    p2[ 3739]=1.500000e+00

    p2[ 3740]=1.500000e+00

    p2[ 3741]=1.500000e+00

    p2[ 3742]=1.500000e+00

    p2[ 3743]=1.500000e+00

    p2[ 3744]=1.500000e+00

    p2[ 3745]=1.500000e+00

    p2[ 3746]=1.500000e+00

    p2[ 3747]=1.500000e+00

    p2[ 3748]=1.500000e+00

    p2[ 3749]=1.500000e+00

    p2[ 3750]=1.500000e+00

    p2[ 3751]=1.500000e+00

    p2[ 3752]=1.500000e+00

    p2[ 3753]=1.500000e+00

    p2[ 3754]=1.500000e+00

    p2[ 3755]=1.500000e+00

    p2[ 3756]=1.500000e+00

    p2[ 3757]=1.500000e+00

    p2[ 3758]=1.500000e+00

    p2[ 3759]=1.500000e+00

    p2[ 3760]=1.500000e+00

    p2[ 3761]=1.500000e+00

    p2[ 3762]=1.500000e+00

    p2[ 3763]=1.500000e+00

    p2[ 3764]=1.500000e+00

    p2[ 3765]=1.500000e+00

    p2[ 3766]=1.500000e+00

    p2[ 3767]=1.500000e+00

    p2[ 3768]=1.500000e+00

    p2[ 3769]=1.500000e+00

    p2[ 3770]=1.500000e+00

    p2[ 3771]=1.500000e+00

    p2[ 3772]=1.500000e+00

    p2[ 3773]=1.500000e+00

    p2[ 3774]=1.500000e+00

    p2[ 3775]=1.500000e+00

    p2[ 3776]=1.500000e+00

    p2[ 3777]=1.500000e+00

    p2[ 3778]=1.500000e+00

    p2[ 3779]=1.500000e+00

    p2[ 3780]=1.500000e+00

    p2[ 3781]=1.500000e+00

    p2[ 3782]=1.500001e+00

    p2[ 3783]=1.500000e+00

    p2[ 3784]=1.500000e+00

    p2[ 3785]=1.500000e+00

    p2[ 3786]=1.500000e+00

    p2[ 3787]=1.500000e+00

    p2[ 3788]=1.500000e+00

    p2[ 3789]=1.500000e+00

    p2[ 3790]=1.500000e+00

    p2[ 3791]=1.500000e+00

    p2[ 3792]=1.500000e+00

    p2[ 3793]=1.500000e+00

    p2[ 3794]=1.500000e+00

    p2[ 3795]=1.500000e+00

    p2[ 3796]=1.500000e+00

    p2[ 3797]=1.500000e+00

    p2[ 3798]=1.500000e+00

    p2[ 3799]=1.500000e+00

    p2[ 3800]=1.500000e+00

    p2[ 3801]=1.500000e+00

    p2[ 3802]=1.500000e+00

    p2[ 3803]=1.500000e+00

    p2[ 3804]=1.500000e+00

    p2[ 3805]=1.500000e+00

    p2[ 3806]=1.500000e+00

    p2[ 3807]=1.500000e+00

    p2[ 3808]=1.500000e+00

    p2[ 3809]=1.500000e+00

    p2[ 3810]=1.500000e+00

    p2[ 3811]=1.500000e+00

    p2[ 3812]=1.500000e+00

    p2[ 3813]=1.500000e+00

    p2[ 3814]=1.500000e+00

    p2[ 3815]=1.500000e+00

    p2[ 3816]=1.500000e+00

    p2[ 3817]=1.500000e+00

    p2[ 3818]=1.500000e+00

    p2[ 3819]=1.500000e+00

    p2[ 3820]=1.500000e+00

    p2[ 3821]=1.500000e+00

    p2[ 3822]=1.500000e+00

    p2[ 3823]=1.500000e+00

    p2[ 3824]=1.500000e+00

    p2[ 3825]=1.500000e+00

    p2[ 3826]=1.500000e+00

    p2[ 3827]=1.500000e+00

    p2[ 3828]=1.500000e+00

    p2[ 3829]=1.500000e+00

    p2[ 3830]=1.500000e+00

    p2[ 3831]=1.500000e+00

    p2[ 3832]=1.500000e+00

    p2[ 3833]=1.500000e+00

    p2[ 3834]=1.500000e+00

    p2[ 3835]=1.500000e+00

    p2[ 3836]=1.500000e+00

    p2[ 3837]=1.500000e+00

    p2[ 3838]=1.500000e+00

    p2[ 3839]=1.500000e+00

    p2[ 3840]=1.500000e+00

    p2[ 3841]=1.500000e+00

    p2[ 3842]=1.500000e+00

    p2[ 3843]=1.500000e+00

    p2[ 3844]=1.500000e+00

    p2[ 3845]=1.500000e+00

    p2[ 3846]=1.500000e+00

    p2[ 3847]=1.500000e+00

    p2[ 3848]=1.500000e+00

    p2[ 3849]=1.500000e+00

    p2[ 3850]=1.500000e+00

    p2[ 3851]=1.500000e+00

    p2[ 3852]=1.500000e+00

    p2[ 3853]=1.500000e+00

    p2[ 3854]=1.500000e+00

    p2[ 3855]=1.500001e+00

    p2[ 3856]=1.500000e+00

    p2[ 3857]=1.500000e+00

    p2[ 3858]=1.500000e+00

    p2[ 3859]=1.500000e+00

    p2[ 3860]=1.500000e+00

    p2[ 3861]=1.500000e+00

    p2[ 3862]=1.500000e+00

    p2[ 3863]=1.500000e+00

    p2[ 3864]=1.500000e+00

    p2[ 3865]=1.500000e+00

    p2[ 3866]=1.500000e+00

    p2[ 3867]=1.499999e+00

    p2[ 3868]=1.500000e+00

    p2[ 3869]=1.500000e+00

    p2[ 3870]=1.500000e+00

    p2[ 3871]=1.500000e+00

    p2[ 3872]=1.500000e+00

    p2[ 3873]=1.500000e+00

    p2[ 3874]=1.500000e+00

    p2[ 3875]=1.500000e+00

    p2[ 3876]=1.500000e+00

    p2[ 3877]=1.500000e+00

    p2[ 3878]=1.500000e+00

    p2[ 3879]=1.500000e+00

    p2[ 3880]=1.500000e+00

    p2[ 3881]=1.500000e+00

    p2[ 3882]=1.500000e+00

    p2[ 3883]=1.500000e+00

    p2[ 3884]=1.500000e+00

    p2[ 3885]=1.500000e+00

    p2[ 3886]=1.500000e+00

    p2[ 3887]=1.500000e+00

    p2[ 3888]=1.500000e+00

    p2[ 3889]=1.500000e+00

    p2[ 3890]=1.500000e+00

    p2[ 3891]=1.500000e+00

    p2[ 3892]=1.500000e+00

    p2[ 3893]=1.500000e+00

    p2[ 3894]=1.500000e+00

    p2[ 3895]=1.500000e+00

    p2[ 3896]=1.500000e+00

    p2[ 3897]=1.500000e+00

    p2[ 3898]=1.500000e+00

    p2[ 3899]=1.500000e+00

    p2[ 3900]=1.500000e+00

    p2[ 3901]=1.500000e+00

    p2[ 3902]=1.500000e+00

    p2[ 3903]=1.500000e+00

    p2[ 3904]=1.500000e+00

    p2[ 3905]=1.500000e+00

    p2[ 3906]=1.500000e+00

    p2[ 3907]=1.500000e+00

    p2[ 3908]=1.500000e+00

    p2[ 3909]=1.500000e+00

    p2[ 3910]=1.500000e+00

    p2[ 3911]=1.500000e+00

    p2[ 3912]=1.500000e+00

    p2[ 3913]=1.500000e+00

    p2[ 3914]=1.500000e+00

    p2[ 3915]=1.500000e+00

    p2[ 3916]=1.500000e+00

    p2[ 3917]=1.500000e+00

    p2[ 3918]=1.500000e+00

    p2[ 3919]=1.500000e+00

    p2[ 3920]=1.500000e+00

    p2[ 3921]=1.500000e+00

    p2[ 3922]=1.500000e+00

    p2[ 3923]=1.500000e+00

    p2[ 3924]=1.500000e+00

    p2[ 3925]=1.500000e+00

    p2[ 3926]=1.500000e+00

    p2[ 3927]=1.500000e+00

    p2[ 3928]=1.500000e+00

    p2[ 3929]=1.500000e+00

    p2[ 3930]=1.500000e+00

    p2[ 3931]=1.500000e+00

    p2[ 3932]=1.500000e+00

    p2[ 3933]=1.500000e+00

    p2[ 3934]=1.500000e+00

    p2[ 3935]=1.500000e+00

    p2[ 3936]=1.500000e+00

    p2[ 3937]=1.500000e+00

    p2[ 3938]=1.500000e+00

    p2[ 3939]=1.500000e+00

    p2[ 3940]=1.500000e+00

    p2[ 3941]=1.500000e+00

    p2[ 3942]=1.500000e+00

    p2[ 3943]=1.500000e+00

    p2[ 3944]=1.500000e+00

    p2[ 3945]=1.500000e+00

    p2[ 3946]=1.500000e+00

    p2[ 3947]=1.500000e+00

    p2[ 3948]=1.500000e+00

    p2[ 3949]=1.500000e+00

    p2[ 3950]=1.500000e+00

    p2[ 3951]=1.500000e+00

    p2[ 3952]=1.500000e+00

    p2[ 3953]=1.500000e+00

    p2[ 3954]=1.500000e+00

    p2[ 3955]=1.500000e+00

    p2[ 3956]=1.500000e+00

    p2[ 3957]=1.500000e+00

    p2[ 3958]=1.500000e+00

    p2[ 3959]=1.500000e+00

    p2[ 3960]=1.500000e+00

    p2[ 3961]=1.500000e+00

    p2[ 3962]=1.500000e+00

    p2[ 3963]=1.500000e+00

    p2[ 3964]=1.500000e+00

    p2[ 3965]=1.500000e+00

    p2[ 3966]=1.500000e+00

    p2[ 3967]=1.500001e+00

    p2[ 3968]=1.500000e+00

    p2[ 3969]=1.500000e+00

    p2[ 3970]=1.500000e+00

    p2[ 3971]=1.500000e+00

    p2[ 3972]=1.500000e+00

    p2[ 3973]=1.500000e+00

    p2[ 3974]=1.500000e+00

    p2[ 3975]=1.500000e+00

    p2[ 3976]=1.500000e+00

    p2[ 3977]=1.500000e+00

    p2[ 3978]=1.500000e+00

    p2[ 3979]=1.500000e+00

    p2[ 3980]=1.500000e+00

    p2[ 3981]=1.500000e+00

    p2[ 3982]=1.500000e+00

    p2[ 3983]=1.500000e+00

    p2[ 3984]=1.500000e+00

    p2[ 3985]=1.500000e+00

    p2[ 3986]=1.500000e+00

    p2[ 3987]=1.500000e+00

    p2[ 3988]=1.500000e+00

    p2[ 3989]=1.500000e+00

    p2[ 3990]=1.500000e+00

    p2[ 3991]=1.500000e+00

    p2[ 3992]=1.500000e+00

    p2[ 3993]=1.500000e+00

    p2[ 3994]=1.500000e+00

    p2[ 3995]=1.500000e+00

    p2[ 3996]=1.500000e+00

    p2[ 3997]=1.500000e+00

    p2[ 3998]=1.500000e+00

    p2[ 3999]=1.500000e+00

    p2[ 4000]=1.500000e+00

    p2[ 4001]=1.500000e+00

    p2[ 4002]=1.500000e+00

    p2[ 4003]=1.500000e+00

    p2[ 4004]=1.500001e+00

    p2[ 4005]=1.500001e+00

    p2[ 4006]=1.500000e+00

    p2[ 4007]=1.500000e+00

    p2[ 4008]=1.500000e+00

    p2[ 4009]=1.500000e+00

    p2[ 4010]=1.500000e+00

    p2[ 4011]=1.500000e+00

    p2[ 4012]=1.500000e+00

    p2[ 4013]=1.500000e+00

    p2[ 4014]=1.500000e+00

    p2[ 4015]=1.500000e+00

    p2[ 4016]=1.500000e+00

    p2[ 4017]=1.500000e+00

    p2[ 4018]=1.500000e+00

    p2[ 4019]=1.500001e+00

    p2[ 4020]=1.500000e+00

    p2[ 4021]=1.500000e+00

    p2[ 4022]=1.500000e+00

    p2[ 4023]=1.500000e+00

    p2[ 4024]=1.500000e+00

    p2[ 4025]=1.500000e+00

    p2[ 4026]=1.500000e+00

    p2[ 4027]=1.500000e+00

    p2[ 4028]=1.500000e+00

    p2[ 4029]=1.500000e+00

    p2[ 4030]=1.500000e+00

    p2[ 4031]=1.500000e+00

    p2[ 4032]=1.500000e+00

    p2[ 4033]=1.500000e+00

    p2[ 4034]=1.500000e+00

    p2[ 4035]=1.500000e+00

    p2[ 4036]=1.500000e+00

    p2[ 4037]=1.500000e+00

    p2[ 4038]=1.500000e+00

    p2[ 4039]=1.500000e+00

    p2[ 4040]=1.500000e+00

    p2[ 4041]=1.500000e+00

    p2[ 4042]=1.500000e+00

    p2[ 4043]=1.499999e+00

    p2[ 4044]=1.500000e+00

    p2[ 4045]=1.500000e+00

    p2[ 4046]=1.500000e+00

    p2[ 4047]=1.500000e+00

    p2[ 4048]=1.500000e+00

    p2[ 4049]=1.500000e+00

    p2[ 4050]=1.500000e+00

    p2[ 4051]=1.500000e+00

    p2[ 4052]=1.500000e+00

    p2[ 4053]=1.500000e+00

    p2[ 4054]=1.500000e+00

    p2[ 4055]=1.500000e+00

    p2[ 4056]=1.500000e+00

    p2[ 4057]=1.500000e+00

    p2[ 4058]=1.500000e+00

    p2[ 4059]=1.500000e+00

    p2[ 4060]=1.500000e+00

    p2[ 4061]=1.500000e+00

    p2[ 4062]=1.500000e+00

    p2[ 4063]=1.500000e+00

    p2[ 4064]=1.500000e+00

    p2[ 4065]=1.500000e+00

    p2[ 4066]=1.500000e+00

    p2[ 4067]=1.500000e+00

    p2[ 4068]=1.500000e+00

    p2[ 4069]=1.500000e+00

    p2[ 4070]=1.500000e+00

    p2[ 4071]=1.500000e+00

    p2[ 4072]=1.500000e+00

    p2[ 4073]=1.500000e+00

    p2[ 4074]=1.500000e+00

    p2[ 4075]=1.500000e+00

    p2[ 4076]=1.500000e+00

    p2[ 4077]=1.500000e+00

    p2[ 4078]=1.500000e+00

    p2[ 4079]=1.500000e+00

    p2[ 4080]=1.500000e+00

    p2[ 4081]=1.500000e+00

    p2[ 4082]=1.500000e+00

    p2[ 4083]=1.500000e+00

    p2[ 4084]=1.500000e+00

    p2[ 4085]=1.500000e+00

    p2[ 4086]=1.500000e+00

    p2[ 4087]=1.500000e+00

    p2[ 4088]=1.500000e+00

    p2[ 4089]=1.500000e+00

    p2[ 4090]=1.500000e+00

    p2[ 4091]=1.500000e+00

    p2[ 4092]=1.500000e+00

    p2[ 4093]=1.500000e+00

    p2[ 4094]=1.500000e+00

    p2[ 4095]=1.500000e+00

    p2[ 4096]=1.500000e+00

    p2[ 4097]=1.500000e+00

    p2[ 4098]=1.500000e+00

    p2[ 4099]=1.500000e+00

    p2[ 4100]=1.500000e+00

    p2[ 4101]=1.500000e+00

    p2[ 4102]=1.500000e+00

    p2[ 4103]=1.500000e+00

    p2[ 4104]=1.500000e+00

    p2[ 4105]=1.500000e+00

    p2[ 4106]=1.500000e+00

    p2[ 4107]=1.500000e+00

    p2[ 4108]=1.500000e+00

    p2[ 4109]=1.500000e+00

    p2[ 4110]=1.500000e+00

    p2[ 4111]=1.500000e+00

    p2[ 4112]=1.500000e+00

    p2[ 4113]=1.500000e+00

    p2[ 4114]=1.500000e+00

    p2[ 4115]=1.500000e+00

    p2[ 4116]=1.500000e+00

    p2[ 4117]=1.500000e+00

    p2[ 4118]=1.500000e+00

    p2[ 4119]=1.500000e+00

    p2[ 4120]=1.500000e+00

    p2[ 4121]=1.500000e+00

    p2[ 4122]=1.500000e+00

    p2[ 4123]=1.500000e+00

    p2[ 4124]=1.500000e+00

    p2[ 4125]=1.500000e+00

    p2[ 4126]=1.500000e+00

    p2[ 4127]=1.500000e+00

    p2[ 4128]=1.500000e+00

    p2[ 4129]=1.500000e+00

    p2[ 4130]=1.500000e+00

    p2[ 4131]=1.500000e+00

    p2[ 4132]=1.500000e+00

    p2[ 4133]=1.500000e+00

    p2[ 4134]=1.500000e+00

    p2[ 4135]=1.500000e+00

    p2[ 4136]=1.500000e+00

    p2[ 4137]=1.500000e+00

    p2[ 4138]=1.500000e+00

    p2[ 4139]=1.500000e+00

    p2[ 4140]=1.500000e+00

    p2[ 4141]=1.500000e+00

    p2[ 4142]=1.500000e+00

    p2[ 4143]=1.500000e+00

    p2[ 4144]=1.500000e+00

    p2[ 4145]=1.500000e+00

    p2[ 4146]=1.500000e+00

    p2[ 4147]=1.500000e+00

    p2[ 4148]=1.500000e+00

    p2[ 4149]=1.500000e+00

    p2[ 4150]=1.500000e+00

    p2[ 4151]=1.500000e+00

    p2[ 4152]=1.500000e+00

    p2[ 4153]=1.500000e+00

    p2[ 4154]=1.500000e+00

    p2[ 4155]=1.500000e+00

    p2[ 4156]=1.500000e+00

    p2[ 4157]=1.500000e+00

    p2[ 4158]=1.500000e+00

    p2[ 4159]=1.500000e+00

    p2[ 4160]=1.500000e+00

    p2[ 4161]=1.500000e+00

    p2[ 4162]=1.500000e+00

    p2[ 4163]=1.500000e+00

    p2[ 4164]=1.500000e+00

    p2[ 4165]=1.500000e+00

    p2[ 4166]=1.500000e+00

    p2[ 4167]=1.500000e+00

    p2[ 4168]=1.500000e+00

    p2[ 4169]=1.500000e+00

    p2[ 4170]=1.500000e+00

    p2[ 4171]=1.500000e+00

    p2[ 4172]=1.500000e+00

    p2[ 4173]=1.500000e+00

    p2[ 4174]=1.500000e+00

    p2[ 4175]=1.500000e+00

    p2[ 4176]=1.500000e+00

    p2[ 4177]=1.500000e+00

    p2[ 4178]=1.500000e+00

    p2[ 4179]=1.500000e+00

    p2[ 4180]=1.500000e+00

    p2[ 4181]=1.500000e+00

    p2[ 4182]=1.500000e+00

    p2[ 4183]=1.500000e+00

    p2[ 4184]=1.500000e+00

    p2[ 4185]=1.500000e+00

    p2[ 4186]=1.500000e+00

    p2[ 4187]=1.500000e+00

    p2[ 4188]=1.500000e+00

    p2[ 4189]=1.500000e+00

    p2[ 4190]=1.500000e+00

    p2[ 4191]=1.500000e+00

    p2[ 4192]=1.500000e+00

    p2[ 4193]=1.500000e+00

    p2[ 4194]=1.500000e+00

    p2[ 4195]=1.500000e+00

    p2[ 4196]=1.500000e+00

    p2[ 4197]=1.500000e+00

    p2[ 4198]=1.500000e+00

    p2[ 4199]=1.500000e+00

    p2[ 4200]=1.500000e+00

    p2[ 4201]=1.500000e+00

    p2[ 4202]=1.500000e+00

    p2[ 4203]=1.500000e+00

    p2[ 4204]=1.500000e+00

    p2[ 4205]=1.500000e+00

    p2[ 4206]=1.500000e+00

    p2[ 4207]=1.500000e+00

    p2[ 4208]=1.500000e+00

    p2[ 4209]=1.500000e+00

    p2[ 4210]=1.500000e+00

    p2[ 4211]=1.500000e+00

    p2[ 4212]=1.500000e+00

    p2[ 4213]=1.500000e+00

    p2[ 4214]=1.500000e+00

    p2[ 4215]=1.500000e+00

    p2[ 4216]=1.500000e+00

    p2[ 4217]=1.500000e+00

    p2[ 4218]=1.500000e+00

    p2[ 4219]=1.500000e+00

    p2[ 4220]=1.500000e+00

    p2[ 4221]=1.500000e+00

    p2[ 4222]=1.500000e+00

    p2[ 4223]=1.500000e+00

    p2[ 4224]=1.500000e+00

    p2[ 4225]=1.500000e+00

    p2[ 4226]=1.500000e+00

    p2[ 4227]=1.500000e+00

    p2[ 4228]=1.500000e+00

    p2[ 4229]=1.500000e+00

    p2[ 4230]=1.500000e+00

    p2[ 4231]=1.500000e+00

    p2[ 4232]=1.500000e+00

    p2[ 4233]=1.500000e+00

    p2[ 4234]=1.500000e+00

    p2[ 4235]=1.500000e+00

    p2[ 4236]=1.500000e+00

    p2[ 4237]=1.500000e+00

    p2[ 4238]=1.500000e+00

    p2[ 4239]=1.500000e+00

    p2[ 4240]=1.500000e+00

    p2[ 4241]=1.500001e+00

    p2[ 4242]=1.500000e+00

    p2[ 4243]=1.500000e+00

    p2[ 4244]=1.500000e+00

    p2[ 4245]=1.500000e+00

    p2[ 4246]=1.500000e+00

    p2[ 4247]=1.500000e+00

    p2[ 4248]=1.500000e+00

    p2[ 4249]=1.500000e+00

    p2[ 4250]=1.500000e+00

    p2[ 4251]=1.500000e+00

    p2[ 4252]=1.500000e+00

    p2[ 4253]=1.500000e+00

    p2[ 4254]=1.500000e+00

    p2[ 4255]=1.500000e+00

    p2[ 4256]=1.500000e+00

    p2[ 4257]=1.500000e+00

    p2[ 4258]=1.500000e+00

    p2[ 4259]=1.500000e+00

    p2[ 4260]=1.500000e+00

    p2[ 4261]=1.500000e+00

    p2[ 4262]=1.500000e+00

    p2[ 4263]=1.500000e+00

    p2[ 4264]=1.500000e+00

    p2[ 4265]=1.500000e+00

    p2[ 4266]=1.500000e+00

    p2[ 4267]=1.500000e+00

    p2[ 4268]=1.500000e+00

    p2[ 4269]=1.500000e+00

    p2[ 4270]=1.500000e+00

    p2[ 4271]=1.500000e+00

    p2[ 4272]=1.500001e+00

    p2[ 4273]=1.500000e+00

    p2[ 4274]=1.500000e+00

    p2[ 4275]=1.500000e+00

    p2[ 4276]=1.500000e+00

    p2[ 4277]=1.500000e+00

    p2[ 4278]=1.500000e+00

    p2[ 4279]=1.500000e+00

    p2[ 4280]=1.500000e+00

    p2[ 4281]=1.500000e+00

    p2[ 4282]=1.500000e+00

    p2[ 4283]=1.500000e+00

    p2[ 4284]=1.500000e+00

    p2[ 4285]=1.500000e+00

    p2[ 4286]=1.500000e+00

    p2[ 4287]=1.500000e+00

    p2[ 4288]=1.500000e+00

    p2[ 4289]=1.500000e+00

    p2[ 4290]=1.500000e+00

    p2[ 4291]=1.500000e+00

    p2[ 4292]=1.500000e+00

    p2[ 4293]=1.500000e+00

    p2[ 4294]=1.500000e+00

    p2[ 4295]=1.500000e+00

    p2[ 4296]=1.500000e+00

    p2[ 4297]=1.500000e+00

    p2[ 4298]=1.500000e+00

    p2[ 4299]=1.500000e+00

    p2[ 4300]=1.500000e+00

    p2[ 4301]=1.500000e+00

    p2[ 4302]=1.500000e+00

    p2[ 4303]=1.500000e+00

    p2[ 4304]=1.500000e+00

    p2[ 4305]=1.500000e+00

    p2[ 4306]=1.500000e+00

    p2[ 4307]=1.500000e+00

    p2[ 4308]=1.500000e+00

    p2[ 4309]=1.500000e+00

    p2[ 4310]=1.500000e+00

    p2[ 4311]=1.500000e+00

    p2[ 4312]=1.500000e+00

    p2[ 4313]=1.500000e+00

    p2[ 4314]=1.500000e+00

    p2[ 4315]=1.500000e+00

    p2[ 4316]=1.500000e+00

    p2[ 4317]=1.500000e+00

    p2[ 4318]=1.500000e+00

    p2[ 4319]=1.500000e+00

    p2[ 4320]=1.500000e+00

    p2[ 4321]=1.500000e+00

    p2[ 4322]=1.500000e+00

    p2[ 4323]=1.500000e+00

    p2[ 4324]=1.500000e+00

    p2[ 4325]=1.500000e+00

    p2[ 4326]=1.500000e+00

    p2[ 4327]=1.500000e+00

    p2[ 4328]=1.500000e+00

    p2[ 4329]=1.500000e+00

    p2[ 4330]=1.500000e+00

    p2[ 4331]=1.500000e+00

    p2[ 4332]=1.500000e+00

    p2[ 4333]=1.500000e+00

    p2[ 4334]=1.500000e+00

    p2[ 4335]=1.500000e+00

    p2[ 4336]=1.500000e+00

    p2[ 4337]=1.500000e+00

    p2[ 4338]=1.500000e+00

    p2[ 4339]=1.500000e+00

    p2[ 4340]=1.500000e+00

    p2[ 4341]=1.500000e+00

    p2[ 4342]=1.500000e+00

    p2[ 4343]=1.500000e+00

    p2[ 4344]=1.500000e+00

    p2[ 4345]=1.500000e+00

    p2[ 4346]=1.500000e+00

    p2[ 4347]=1.500000e+00

    p2[ 4348]=1.500000e+00

    p2[ 4349]=1.500000e+00

    p2[ 4350]=1.499999e+00

    p2[ 4351]=1.500000e+00

    p2[ 4352]=1.500000e+00

    p2[ 4353]=1.500000e+00

    p2[ 4354]=1.500000e+00

    p2[ 4355]=1.500000e+00

    p2[ 4356]=1.500000e+00

    p2[ 4357]=1.500000e+00

    p2[ 4358]=1.500000e+00

    p2[ 4359]=1.500000e+00

    p2[ 4360]=1.500000e+00

    p2[ 4361]=1.500000e+00

    p2[ 4362]=1.500000e+00

    p2[ 4363]=1.500000e+00

    p2[ 4364]=1.500000e+00

    p2[ 4365]=1.500000e+00

    p2[ 4366]=1.500000e+00

    p2[ 4367]=1.500000e+00

    p2[ 4368]=1.500000e+00

    p2[ 4369]=1.500000e+00

    p2[ 4370]=1.500000e+00

    p2[ 4371]=1.500000e+00

    p2[ 4372]=1.500000e+00

    p2[ 4373]=1.500000e+00

    p2[ 4374]=1.500000e+00

    p2[ 4375]=1.500000e+00

    p2[ 4376]=1.500000e+00

    p2[ 4377]=1.500000e+00

    p2[ 4378]=1.500000e+00

    p2[ 4379]=1.500000e+00

    p2[ 4380]=1.500000e+00

    p2[ 4381]=1.500000e+00

    p2[ 4382]=1.500000e+00

    p2[ 4383]=1.500000e+00

    p2[ 4384]=1.500000e+00

    p2[ 4385]=1.500000e+00

    p2[ 4386]=1.500000e+00

    p2[ 4387]=1.500000e+00

    p2[ 4388]=1.500000e+00

    p2[ 4389]=1.500000e+00

    p2[ 4390]=1.500000e+00

    p2[ 4391]=1.500000e+00

    p2[ 4392]=1.500000e+00

    p2[ 4393]=1.500000e+00

    p2[ 4394]=1.500000e+00

    p2[ 4395]=1.500000e+00

    p2[ 4396]=1.500000e+00

    p2[ 4397]=1.500000e+00

    p2[ 4398]=1.500000e+00

    p2[ 4399]=1.500000e+00

    p2[ 4400]=1.500000e+00

    p2[ 4401]=1.500000e+00

    p2[ 4402]=1.500000e+00

    p2[ 4403]=1.500000e+00

    p2[ 4404]=1.500000e+00

    p2[ 4405]=1.500000e+00

    p2[ 4406]=1.500000e+00

    p2[ 4407]=1.500000e+00

    p2[ 4408]=1.500000e+00

    p2[ 4409]=1.500000e+00

    p2[ 4410]=1.500000e+00

    p2[ 4411]=1.500000e+00

    p2[ 4412]=1.500000e+00

    p2[ 4413]=1.500000e+00

    p2[ 4414]=1.500000e+00

    p2[ 4415]=1.500000e+00

    p2[ 4416]=1.500000e+00

    p2[ 4417]=1.500000e+00

    p2[ 4418]=1.500000e+00

    p2[ 4419]=1.500000e+00

    p2[ 4420]=1.500000e+00

    p2[ 4421]=1.500000e+00

    p2[ 4422]=1.500000e+00

    p2[ 4423]=1.500000e+00

    p2[ 4424]=1.500000e+00

    p2[ 4425]=1.500000e+00

    p2[ 4426]=1.500000e+00

    p2[ 4427]=1.500000e+00

    p2[ 4428]=1.500000e+00

    p2[ 4429]=1.500000e+00

    p2[ 4430]=1.500000e+00

    p2[ 4431]=1.500000e+00

    p2[ 4432]=1.500000e+00

    p2[ 4433]=1.500000e+00

    p2[ 4434]=1.500000e+00

    p2[ 4435]=1.500000e+00

    p2[ 4436]=1.500000e+00

    p2[ 4437]=1.500000e+00

    p2[ 4438]=1.500000e+00

    p2[ 4439]=1.500000e+00

    p2[ 4440]=1.500000e+00

    p2[ 4441]=1.500000e+00

    p2[ 4442]=1.500000e+00

    p2[ 4443]=1.500000e+00

    p2[ 4444]=1.500000e+00

    p2[ 4445]=1.500000e+00

    p2[ 4446]=1.500000e+00

    p2[ 4447]=1.500000e+00

    p2[ 4448]=1.500000e+00

    p2[ 4449]=1.500000e+00

    p2[ 4450]=1.500000e+00

    p2[ 4451]=1.500000e+00

    p2[ 4452]=1.500000e+00

    p2[ 4453]=1.500000e+00

    p2[ 4454]=1.500000e+00

    p2[ 4455]=1.500000e+00

    p2[ 4456]=1.500000e+00

    p2[ 4457]=1.500000e+00

    p2[ 4458]=1.500000e+00

    p2[ 4459]=1.500000e+00

    p2[ 4460]=1.500000e+00

    p2[ 4461]=1.500000e+00

    p2[ 4462]=1.500000e+00

    p2[ 4463]=1.500000e+00

    p2[ 4464]=1.500000e+00

    p2[ 4465]=1.500000e+00

    p2[ 4466]=1.500000e+00

    p2[ 4467]=1.500000e+00

    p2[ 4468]=1.500000e+00

    p2[ 4469]=1.500000e+00

    p2[ 4470]=1.500000e+00

    p2[ 4471]=1.500000e+00

    p2[ 4472]=1.500000e+00

    p2[ 4473]=1.500000e+00

    p2[ 4474]=1.500000e+00

    p2[ 4475]=1.500000e+00

    p2[ 4476]=1.500000e+00

    p2[ 4477]=1.500000e+00

    p2[ 4478]=1.500000e+00

    p2[ 4479]=1.500000e+00

    p2[ 4480]=1.500000e+00

    p2[ 4481]=1.500000e+00

    p2[ 4482]=1.500000e+00

    p2[ 4483]=1.500000e+00

    p2[ 4484]=1.500000e+00

    p2[ 4485]=1.500000e+00

    p2[ 4486]=1.500000e+00

    p2[ 4487]=1.500000e+00

    p2[ 4488]=1.500000e+00

    p2[ 4489]=1.500000e+00

    p2[ 4490]=1.500000e+00

    p2[ 4491]=1.500000e+00

    p2[ 4492]=1.500000e+00

    p2[ 4493]=1.500000e+00

    p2[ 4494]=1.500000e+00

    p2[ 4495]=1.500000e+00

    p2[ 4496]=1.500000e+00

    p2[ 4497]=1.500000e+00

    p2[ 4498]=1.500000e+00

    p2[ 4499]=1.500000e+00

    p2[ 4500]=1.500000e+00

    p2[ 4501]=1.500000e+00

    p2[ 4502]=1.500000e+00

    p2[ 4503]=1.500000e+00

    p2[ 4504]=1.500000e+00

    p2[ 4505]=1.500000e+00

    p2[ 4506]=1.500000e+00

    p2[ 4507]=1.500000e+00

    p2[ 4508]=1.500000e+00

    p2[ 4509]=1.500000e+00

    p2[ 4510]=1.500000e+00

    p2[ 4511]=1.500000e+00

    p2[ 4512]=1.500000e+00

    p2[ 4513]=1.500000e+00

    p2[ 4514]=1.500000e+00

    p2[ 4515]=1.500000e+00

    p2[ 4516]=1.500000e+00

    p2[ 4517]=1.500000e+00

    p2[ 4518]=1.500000e+00

    p2[ 4519]=1.500000e+00

    p2[ 4520]=1.500000e+00

    p2[ 4521]=1.500000e+00

    p2[ 4522]=1.500000e+00

    p2[ 4523]=1.500000e+00

    p2[ 4524]=1.500000e+00

    p2[ 4525]=1.500000e+00

    p2[ 4526]=1.500000e+00

    p2[ 4527]=1.500000e+00

    p2[ 4528]=1.500000e+00

    p2[ 4529]=1.500000e+00

    p2[ 4530]=1.500000e+00

    p2[ 4531]=1.500000e+00

    p2[ 4532]=1.500000e+00

    p2[ 4533]=1.500000e+00

    p2[ 4534]=1.500000e+00

    p2[ 4535]=1.500000e+00

    p2[ 4536]=1.500000e+00

    p2[ 4537]=1.500000e+00

    p2[ 4538]=1.500000e+00

    p2[ 4539]=1.500000e+00

    p2[ 4540]=1.500000e+00

    p2[ 4541]=1.500000e+00

    p2[ 4542]=1.500000e+00

    p2[ 4543]=1.500000e+00

    p2[ 4544]=1.500000e+00

    p2[ 4545]=1.500000e+00

    p2[ 4546]=1.500000e+00

    p2[ 4547]=1.500000e+00

    p2[ 4548]=1.500000e+00

    p2[ 4549]=1.500000e+00

    p2[ 4550]=1.500000e+00

    p2[ 4551]=1.500000e+00

    p2[ 4552]=1.500000e+00

    p2[ 4553]=1.500000e+00

    p2[ 4554]=1.500001e+00

    p2[ 4555]=1.500000e+00

    p2[ 4556]=1.500000e+00

    p2[ 4557]=1.499999e+00

    p2[ 4558]=1.500000e+00

    p2[ 4559]=1.500000e+00

    p2[ 4560]=1.500000e+00

    p2[ 4561]=1.499999e+00

    p2[ 4562]=1.500000e+00

    p2[ 4563]=1.500000e+00

    p2[ 4564]=1.500000e+00

    p2[ 4565]=1.500000e+00

    p2[ 4566]=1.500000e+00

    p2[ 4567]=1.500000e+00

    p2[ 4568]=1.500000e+00

    p2[ 4569]=1.500000e+00

    p2[ 4570]=1.500000e+00

    p2[ 4571]=1.500000e+00

    p2[ 4572]=1.500000e+00

    p2[ 4573]=1.500000e+00

    p2[ 4574]=1.499999e+00

    p2[ 4575]=1.499999e+00

    p2[ 4576]=1.500000e+00

    p2[ 4577]=1.500000e+00

    p2[ 4578]=1.500000e+00

    p2[ 4579]=1.500000e+00

    p2[ 4580]=1.500000e+00

    p2[ 4581]=1.500000e+00

    p2[ 4582]=1.500000e+00

    p2[ 4583]=1.500000e+00

    p2[ 4584]=1.500000e+00

    p2[ 4585]=1.500000e+00

    p2[ 4586]=1.500000e+00

    p2[ 4587]=1.500000e+00

    p2[ 4588]=1.500000e+00

    p2[ 4589]=1.500000e+00

    p2[ 4590]=1.500000e+00

    p2[ 4591]=1.500000e+00

    p2[ 4592]=1.500000e+00

    p2[ 4593]=1.500000e+00

    p2[ 4594]=1.500000e+00

    p2[ 4595]=1.500000e+00

    p2[ 4596]=1.500000e+00

    p2[ 4597]=1.500000e+00

    p2[ 4598]=1.500000e+00

    p2[ 4599]=1.500000e+00

    p2[ 4600]=1.500000e+00

    p2[ 4601]=1.500000e+00

    p2[ 4602]=1.500000e+00

    p2[ 4603]=1.500000e+00

    p2[ 4604]=1.500000e+00

    p2[ 4605]=1.500000e+00

    p2[ 4606]=1.500000e+00

    p2[ 4607]=1.500000e+00

    p2[ 4608]=1.500000e+00

    p2[ 4609]=1.500000e+00

    p2[ 4610]=1.500000e+00

    p2[ 4611]=1.500000e+00

    p2[ 4612]=1.500000e+00

    p2[ 4613]=1.500000e+00

    p2[ 4614]=1.500000e+00

    p2[ 4615]=1.500000e+00

    p2[ 4616]=1.500000e+00

    p2[ 4617]=1.500000e+00

    p2[ 4618]=1.500000e+00

    p2[ 4619]=1.500000e+00

    p2[ 4620]=1.500000e+00

    p2[ 4621]=1.500000e+00

    p2[ 4622]=1.500000e+00

    p2[ 4623]=1.500000e+00

    p2[ 4624]=1.500000e+00

    p2[ 4625]=1.500000e+00

    p2[ 4626]=1.500000e+00

    p2[ 4627]=1.500000e+00

    p2[ 4628]=1.500000e+00

    p2[ 4629]=1.500000e+00

    p2[ 4630]=1.500000e+00

    p2[ 4631]=1.500000e+00

    p2[ 4632]=1.500000e+00

    p2[ 4633]=1.500000e+00

    p2[ 4634]=1.500000e+00

    p2[ 4635]=1.500000e+00

    p2[ 4636]=1.500000e+00

    p2[ 4637]=1.500000e+00

    p2[ 4638]=1.500000e+00

    p2[ 4639]=1.500000e+00

    p2[ 4640]=1.500000e+00

    p2[ 4641]=1.500000e+00

    p2[ 4642]=1.500000e+00

    p2[ 4643]=1.500000e+00

    p2[ 4644]=1.500000e+00

    p2[ 4645]=1.500000e+00

    p2[ 4646]=1.500000e+00

    p2[ 4647]=1.500000e+00

    p2[ 4648]=1.500000e+00

    p2[ 4649]=1.500000e+00

    p2[ 4650]=1.500000e+00

    p2[ 4651]=1.500000e+00

    p2[ 4652]=1.500000e+00

    p2[ 4653]=1.500000e+00

    p2[ 4654]=1.500000e+00

    p2[ 4655]=1.500000e+00

    p2[ 4656]=1.500000e+00

    p2[ 4657]=1.500000e+00

    p2[ 4658]=1.500000e+00

    p2[ 4659]=1.500000e+00

    p2[ 4660]=1.500000e+00

    p2[ 4661]=1.500000e+00

    p2[ 4662]=1.500000e+00

    p2[ 4663]=1.500000e+00

    p2[ 4664]=1.500000e+00

    p2[ 4665]=1.500000e+00

    p2[ 4666]=1.500000e+00

    p2[ 4667]=1.500000e+00

    p2[ 4668]=1.500000e+00

    p2[ 4669]=1.500000e+00

    p2[ 4670]=1.500000e+00

    p2[ 4671]=1.500000e+00

    p2[ 4672]=1.500000e+00

    p2[ 4673]=1.500000e+00

    p2[ 4674]=1.500000e+00

    p2[ 4675]=1.500000e+00

    p2[ 4676]=1.500000e+00

    p2[ 4677]=1.500000e+00

    p2[ 4678]=1.500000e+00

    p2[ 4679]=1.500000e+00

    p2[ 4680]=1.500000e+00

    p2[ 4681]=1.500000e+00

    p2[ 4682]=1.500000e+00

    p2[ 4683]=1.500000e+00

    p2[ 4684]=1.500000e+00

    p2[ 4685]=1.500000e+00

    p2[ 4686]=1.500000e+00

    p2[ 4687]=1.500000e+00

    p2[ 4688]=1.500000e+00

    p2[ 4689]=1.500000e+00

    p2[ 4690]=1.500000e+00

    p2[ 4691]=1.500000e+00

    p2[ 4692]=1.500000e+00

    p2[ 4693]=1.500000e+00

    p2[ 4694]=1.500000e+00

    p2[ 4695]=1.500000e+00

    p2[ 4696]=1.500000e+00

    p2[ 4697]=1.500000e+00

    p2[ 4698]=1.500000e+00

    p2[ 4699]=1.500000e+00

    p2[ 4700]=1.500000e+00

    p2[ 4701]=1.500000e+00

    p2[ 4702]=1.500000e+00

    p2[ 4703]=1.500000e+00

    p2[ 4704]=1.500000e+00

    p2[ 4705]=1.500000e+00

    p2[ 4706]=1.500000e+00

    p2[ 4707]=1.500000e+00

    p2[ 4708]=1.500000e+00

    p2[ 4709]=1.500000e+00

    p2[ 4710]=1.500000e+00

    p2[ 4711]=1.500000e+00

    p2[ 4712]=1.500000e+00

    p2[ 4713]=1.500000e+00

    p2[ 4714]=1.500000e+00

    p2[ 4715]=1.500000e+00

    p2[ 4716]=1.500000e+00

    p2[ 4717]=1.500000e+00

    p2[ 4718]=1.500000e+00

    p2[ 4719]=1.500000e+00

    p2[ 4720]=1.500000e+00

    p2[ 4721]=1.499999e+00

    p2[ 4722]=1.500000e+00

    p2[ 4723]=1.500000e+00

    p2[ 4724]=1.500000e+00

    p2[ 4725]=1.500000e+00

    p2[ 4726]=1.500000e+00

    p2[ 4727]=1.500000e+00

    p2[ 4728]=1.500000e+00

    p2[ 4729]=1.500000e+00

    p2[ 4730]=1.500000e+00

    p2[ 4731]=1.500000e+00

    p2[ 4732]=1.500000e+00

    p2[ 4733]=1.500000e+00

    p2[ 4734]=1.500000e+00

    p2[ 4735]=1.500000e+00

    p2[ 4736]=1.500000e+00

    p2[ 4737]=1.500000e+00

    p2[ 4738]=1.500000e+00

    p2[ 4739]=1.500000e+00

    p2[ 4740]=1.500000e+00

    p2[ 4741]=1.500000e+00

    p2[ 4742]=1.500000e+00

    p2[ 4743]=1.500000e+00

    p2[ 4744]=1.500001e+00

    p2[ 4745]=1.500000e+00

    p2[ 4746]=1.500000e+00

    p2[ 4747]=1.500000e+00

    p2[ 4748]=1.500000e+00

    p2[ 4749]=1.500000e+00

    p2[ 4750]=1.500000e+00

    p2[ 4751]=1.500000e+00

    p2[ 4752]=1.500000e+00

    p2[ 4753]=1.500000e+00

    p2[ 4754]=1.500000e+00

    p2[ 4755]=1.500000e+00

    p2[ 4756]=1.500000e+00

    p2[ 4757]=1.500000e+00

    p2[ 4758]=1.500000e+00

    p2[ 4759]=1.500000e+00

    p2[ 4760]=1.500000e+00

    p2[ 4761]=1.500000e+00

    p2[ 4762]=1.500000e+00

    p2[ 4763]=1.500000e+00

    p2[ 4764]=1.500000e+00

    p2[ 4765]=1.500000e+00

    p2[ 4766]=1.500000e+00

    p2[ 4767]=1.500000e+00

    p2[ 4768]=1.500000e+00

    p2[ 4769]=1.500000e+00

    p2[ 4770]=1.500000e+00

    p2[ 4771]=1.500000e+00

    p2[ 4772]=1.500000e+00

    p2[ 4773]=1.500000e+00

    p2[ 4774]=1.500000e+00

    p2[ 4775]=1.500000e+00

    p2[ 4776]=1.500000e+00

    p2[ 4777]=1.500000e+00

    p2[ 4778]=1.500000e+00

    p2[ 4779]=1.500000e+00

    p2[ 4780]=1.500000e+00

    p2[ 4781]=1.500000e+00

    p2[ 4782]=1.500000e+00

    p2[ 4783]=1.500000e+00

    p2[ 4784]=1.500000e+00

    p2[ 4785]=1.500000e+00

    p2[ 4786]=1.500000e+00

    p2[ 4787]=1.500000e+00

    p2[ 4788]=1.500000e+00

    p2[ 4789]=1.500000e+00

    p2[ 4790]=1.500000e+00

    p2[ 4791]=1.500001e+00

    p2[ 4792]=1.500000e+00

    p2[ 4793]=1.500000e+00

    p2[ 4794]=1.500000e+00

    p2[ 4795]=1.500000e+00

    p2[ 4796]=1.500000e+00

    p2[ 4797]=1.500000e+00

    p2[ 4798]=1.500000e+00

    p2[ 4799]=1.500000e+00

    p2[ 4800]=1.500000e+00

    p2[ 4801]=1.500000e+00

    p2[ 4802]=1.500000e+00

    p2[ 4803]=1.500000e+00

    p2[ 4804]=1.500000e+00

    p2[ 4805]=1.500000e+00

    p2[ 4806]=1.500000e+00

    p2[ 4807]=1.500000e+00

    p2[ 4808]=1.500000e+00

    p2[ 4809]=1.500000e+00

    p2[ 4810]=1.500000e+00

    p2[ 4811]=1.499999e+00

    p2[ 4812]=1.500000e+00

    p2[ 4813]=1.500000e+00

    p2[ 4814]=1.500000e+00

    p2[ 4815]=1.500000e+00

    p2[ 4816]=1.500000e+00

    p2[ 4817]=1.500000e+00

    p2[ 4818]=1.500000e+00

    p2[ 4819]=1.500000e+00

    p2[ 4820]=1.500000e+00

    p2[ 4821]=1.500000e+00

    p2[ 4822]=1.500000e+00

    p2[ 4823]=1.500000e+00

    p2[ 4824]=1.500000e+00

    p2[ 4825]=1.500000e+00

    p2[ 4826]=1.500000e+00

    p2[ 4827]=1.499999e+00

    p2[ 4828]=1.499999e+00

    p2[ 4829]=1.500000e+00

    p2[ 4830]=1.500000e+00

    p2[ 4831]=1.500000e+00

    p2[ 4832]=1.500000e+00

    p2[ 4833]=1.500000e+00

    p2[ 4834]=1.500000e+00

    p2[ 4835]=1.500000e+00

    p2[ 4836]=1.500000e+00

    p2[ 4837]=1.500000e+00

    p2[ 4838]=1.500000e+00

    p2[ 4839]=1.500000e+00

    p2[ 4840]=1.500000e+00

    p2[ 4841]=1.500000e+00

    p2[ 4842]=1.500000e+00

    p2[ 4843]=1.500000e+00

    p2[ 4844]=1.500000e+00

    p2[ 4845]=1.500000e+00

    p2[ 4846]=1.500000e+00

    p2[ 4847]=1.500000e+00

    p2[ 4848]=1.500000e+00

    p2[ 4849]=1.500000e+00

    p2[ 4850]=1.500000e+00

    p2[ 4851]=1.500000e+00

    p2[ 4852]=1.500000e+00

    p2[ 4853]=1.499999e+00

    p2[ 4854]=1.500000e+00

    p2[ 4855]=1.500000e+00

    p2[ 4856]=1.500000e+00

    p2[ 4857]=1.500000e+00

    p2[ 4858]=1.500000e+00

    p2[ 4859]=1.500000e+00

    p2[ 4860]=1.500000e+00

    p2[ 4861]=1.500000e+00

    p2[ 4862]=1.500000e+00

    p2[ 4863]=1.500001e+00

    p2[ 4864]=1.500000e+00

    p2[ 4865]=1.500000e+00

    p2[ 4866]=1.500000e+00

    p2[ 4867]=1.500000e+00

    p2[ 4868]=1.500000e+00

    p2[ 4869]=1.500000e+00

    p2[ 4870]=1.500000e+00

    p2[ 4871]=1.500000e+00

    p2[ 4872]=1.500000e+00

    p2[ 4873]=1.500000e+00

    p2[ 4874]=1.500000e+00

    p2[ 4875]=1.500000e+00

    p2[ 4876]=1.500000e+00

    p2[ 4877]=1.500001e+00

    p2[ 4878]=1.500000e+00

    p2[ 4879]=1.500000e+00

    p2[ 4880]=1.500000e+00

    p2[ 4881]=1.500000e+00

    p2[ 4882]=1.500000e+00

    p2[ 4883]=1.500000e+00

    p2[ 4884]=1.500000e+00

    p2[ 4885]=1.500000e+00

    p2[ 4886]=1.500000e+00

    p2[ 4887]=1.500000e+00

    p2[ 4888]=1.500000e+00

    p2[ 4889]=1.500000e+00

    p2[ 4890]=1.500000e+00

    p2[ 4891]=1.500000e+00

    p2[ 4892]=1.500000e+00

    p2[ 4893]=1.500000e+00

    p2[ 4894]=1.500000e+00

    p2[ 4895]=1.500000e+00

    p2[ 4896]=1.500000e+00

    p2[ 4897]=1.500000e+00

    p2[ 4898]=1.500000e+00

    p2[ 4899]=1.500000e+00

    p2[ 4900]=1.500000e+00

    p2[ 4901]=1.500000e+00

    p2[ 4902]=1.500000e+00

    p2[ 4903]=1.500000e+00

    p2[ 4904]=1.500000e+00

    p2[ 4905]=1.500000e+00

    p2[ 4906]=1.500000e+00

    p2[ 4907]=1.500000e+00

    p2[ 4908]=1.500000e+00

    p2[ 4909]=1.500000e+00

    p2[ 4910]=1.500000e+00

    p2[ 4911]=1.500000e+00

    p2[ 4912]=1.500000e+00

    p2[ 4913]=1.500000e+00

    p2[ 4914]=1.500000e+00

    p2[ 4915]=1.500000e+00

    p2[ 4916]=1.500000e+00

    p2[ 4917]=1.500000e+00

    p2[ 4918]=1.500000e+00

    p2[ 4919]=1.500000e+00

    p2[ 4920]=1.500000e+00

    p2[ 4921]=1.500000e+00

    p2[ 4922]=1.500000e+00

    p2[ 4923]=1.500000e+00

    p2[ 4924]=1.500000e+00

    p2[ 4925]=1.500000e+00

    p2[ 4926]=1.500000e+00

    p2[ 4927]=1.500000e+00

    p2[ 4928]=1.500000e+00

    p2[ 4929]=1.500000e+00

    p2[ 4930]=1.500000e+00

    p2[ 4931]=1.500000e+00

    p2[ 4932]=1.500000e+00

    p2[ 4933]=1.500000e+00

    p2[ 4934]=1.500000e+00

    p2[ 4935]=1.500000e+00

    p2[ 4936]=1.500000e+00

    p2[ 4937]=1.500000e+00

    p2[ 4938]=1.500000e+00

    p2[ 4939]=1.500000e+00

    p2[ 4940]=1.500000e+00

    p2[ 4941]=1.500000e+00

    p2[ 4942]=1.500000e+00

    p2[ 4943]=1.500000e+00

    p2[ 4944]=1.500000e+00

    p2[ 4945]=1.500000e+00

    p2[ 4946]=1.500000e+00

    p2[ 4947]=1.500000e+00

    p2[ 4948]=1.500000e+00

    p2[ 4949]=1.500000e+00

    p2[ 4950]=1.500000e+00

    p2[ 4951]=1.500000e+00

    p2[ 4952]=1.500000e+00

    p2[ 4953]=1.500000e+00

    p2[ 4954]=1.500000e+00

    p2[ 4955]=1.500000e+00

    p2[ 4956]=1.500000e+00

    p2[ 4957]=1.500000e+00

    p2[ 4958]=1.500000e+00

    p2[ 4959]=1.499999e+00

    p2[ 4960]=1.499999e+00

    p2[ 4961]=1.500000e+00

    p2[ 4962]=1.500000e+00

    p2[ 4963]=1.500000e+00

    p2[ 4964]=1.500000e+00

    p2[ 4965]=1.500000e+00

    p2[ 4966]=1.500000e+00

    p2[ 4967]=1.500000e+00

    p2[ 4968]=1.500000e+00

    p2[ 4969]=1.500000e+00

    p2[ 4970]=1.500000e+00

    p2[ 4971]=1.500000e+00

    p2[ 4972]=1.500000e+00

    p2[ 4973]=1.500000e+00

    p2[ 4974]=1.499999e+00

    p2[ 4975]=1.500000e+00

    p2[ 4976]=1.500000e+00

    p2[ 4977]=1.500000e+00

    p2[ 4978]=1.500000e+00

    p2[ 4979]=1.500000e+00

    p2[ 4980]=1.500000e+00

    p2[ 4981]=1.500000e+00

    p2[ 4982]=1.500000e+00

    p2[ 4983]=1.500000e+00

    p2[ 4984]=1.500000e+00

    p2[ 4985]=1.500000e+00

    p2[ 4986]=1.500000e+00

    p2[ 4987]=1.500000e+00

    p2[ 4988]=1.500000e+00

    p2[ 4989]=1.500000e+00

    p2[ 4990]=1.500000e+00

    p2[ 4991]=1.500000e+00

    p2[ 4992]=1.500000e+00

    p2[ 4993]=1.500000e+00

    p2[ 4994]=1.500000e+00

    p2[ 4995]=1.500000e+00

    p2[ 4996]=1.500000e+00

    p2[ 4997]=1.500000e+00

    p2[ 4998]=1.500000e+00

    p2[ 4999]=1.500000e+00

    p2[ 5000]=1.500000e+00

    p2[ 5001]=1.500000e+00

    p2[ 5002]=1.500000e+00

    p2[ 5003]=1.500000e+00

    p2[ 5004]=1.500000e+00

    p2[ 5005]=1.500000e+00

    p2[ 5006]=1.500000e+00

    p2[ 5007]=1.500000e+00

    p2[ 5008]=1.500000e+00

    p2[ 5009]=1.500000e+00

    p2[ 5010]=1.500000e+00

    p2[ 5011]=1.500000e+00

    p2[ 5012]=1.500000e+00

    p2[ 5013]=1.500000e+00

    p2[ 5014]=1.500000e+00

    p2[ 5015]=1.500000e+00

    p2[ 5016]=1.500000e+00

    p2[ 5017]=1.500001e+00

    p2[ 5018]=1.500000e+00

    p2[ 5019]=1.500000e+00

    p2[ 5020]=1.500000e+00

    p2[ 5021]=1.500000e+00

    p2[ 5022]=1.500000e+00

    p2[ 5023]=1.500000e+00

    p2[ 5024]=1.500000e+00

    p2[ 5025]=1.500000e+00

    p2[ 5026]=1.500000e+00

    p2[ 5027]=1.500000e+00

    p2[ 5028]=1.500000e+00

    p2[ 5029]=1.500000e+00

    p2[ 5030]=1.500000e+00

    p2[ 5031]=1.500000e+00

    p2[ 5032]=1.500000e+00

    p2[ 5033]=1.500000e+00

    p2[ 5034]=1.500000e+00

    p2[ 5035]=1.500000e+00

    p2[ 5036]=1.500000e+00

    p2[ 5037]=1.500000e+00

    p2[ 5038]=1.500000e+00

    p2[ 5039]=1.499999e+00

    p2[ 5040]=1.500000e+00

    p2[ 5041]=1.500000e+00

    p2[ 5042]=1.500000e+00

    p2[ 5043]=1.500000e+00

    p2[ 5044]=1.500000e+00

    p2[ 5045]=1.500000e+00

    p2[ 5046]=1.500000e+00

    p2[ 5047]=1.500000e+00

    p2[ 5048]=1.500000e+00

    p2[ 5049]=1.500000e+00

    p2[ 5050]=1.500000e+00

    p2[ 5051]=1.500000e+00

    p2[ 5052]=1.500000e+00

    p2[ 5053]=1.500000e+00

    p2[ 5054]=1.500000e+00

    p2[ 5055]=1.500000e+00

    p2[ 5056]=1.500000e+00

    p2[ 5057]=1.500000e+00

    p2[ 5058]=1.500000e+00

    p2[ 5059]=1.500000e+00

    p2[ 5060]=1.500000e+00

    p2[ 5061]=1.500000e+00

    p2[ 5062]=1.500000e+00

    p2[ 5063]=1.500000e+00

    p2[ 5064]=1.500000e+00

    p2[ 5065]=1.500000e+00

    p2[ 5066]=1.500000e+00

    p2[ 5067]=1.500000e+00

    p2[ 5068]=1.500000e+00

    p2[ 5069]=1.500000e+00

    p2[ 5070]=1.500000e+00

    p2[ 5071]=1.500000e+00

    p2[ 5072]=1.500000e+00

    p2[ 5073]=1.500001e+00

    p2[ 5074]=1.500000e+00

    p2[ 5075]=1.499999e+00

    p2[ 5076]=1.500000e+00

    p2[ 5077]=1.500000e+00

    p2[ 5078]=1.499999e+00

    p2[ 5079]=1.500000e+00

    p2[ 5080]=1.499999e+00

    p2[ 5081]=1.500000e+00

    p2[ 5082]=1.500001e+00

    p2[ 5083]=1.499999e+00

    p2[ 5084]=1.500001e+00

    p2[ 5085]=1.500000e+00

    p2[ 5086]=1.499999e+00

    p2[ 5087]=1.500000e+00

    p2[ 5088]=1.500000e+00

    p2[ 5089]=1.500000e+00

    p2[ 5090]=1.500000e+00

    p2[ 5091]=1.500000e+00

    p2[ 5092]=1.499999e+00

    p2[ 5093]=1.499999e+00

    p2[ 5094]=1.500000e+00

    p2[ 5095]=1.499999e+00

    p2[ 5096]=1.500000e+00

    p2[ 5097]=1.500000e+00

    p2[ 5098]=1.500000e+00

    p2[ 5099]=1.500000e+00

    p2[ 5100]=1.499999e+00

    p2[ 5101]=1.500000e+00

    p2[ 5102]=1.500000e+00

    p2[ 5103]=1.500000e+00

    p2[ 5104]=1.500000e+00

    p2[ 5105]=1.500000e+00

    p2[ 5106]=1.499999e+00

    p2[ 5107]=1.499999e+00

    p2[ 5108]=1.500000e+00

    p2[ 5109]=1.500000e+00

    p2[ 5110]=1.500000e+00

    p2[ 5111]=1.500000e+00

    p2[ 5112]=1.499999e+00

    p2[ 5113]=1.500000e+00

    p2[ 5114]=1.500000e+00

    p2[ 5115]=1.500000e+00

    p2[ 5116]=1.500000e+00

    p2[ 5117]=1.500000e+00

    p2[ 5118]=1.500000e+00

    p2[ 5119]=1.500000e+00

    p2[ 5120]=1.499999e+00

    p2[ 5121]=1.500000e+00

    p2[ 5122]=1.500000e+00

    p2[ 5123]=1.500000e+00

    p2[ 5124]=1.499998e+00

    p2[ 5125]=1.500001e+00

    p2[ 5126]=1.499999e+00

    p2[ 5127]=1.499999e+00

    p2[ 5128]=1.500000e+00

    p2[ 5129]=2.999999e+00

    p2[ 5130]=-5.999999e+00

    distance = 1.511781e-06

    mi = 5128

    max poleval error .Re=4.852975e-06, .Im=-2.293203e-08 for root.Re=-4.17252850455072155089197849520132875e-1, .Im= 9.0866416639910185804041020674048920e-1

    Sum of absolute values of the polynomial evaluation for each root = 2.223500e-02

    Ending at time 0s. Fri Sep 6 15:40:30 2013

    Terminating simulation. Fri Sep 6 15:40:30 2013
    There is no user error or warning.
    Closing key file 'finsim.key'.
     
    Last edited: Sep 7, 2013
  20. youreyes amorphous ocean Valued Senior Member

    Messages:
    2,830
    why not just give us the matlab file instead of this innuendo?
     
  21. Tach Banned Banned

    Messages:
    5,265
    You obviously missed the fact that I am not running Matlab but a competing tool called Finsim Math, so I posted the results of the FinsimMath run. Try paying attention.
     
    Last edited: Sep 7, 2013
  22. przyk squishy Valued Senior Member

    Messages:
    3,203
    I wouldn't necessarily have expected Matlab to give good results for this problem anyway. Even the Matlab documentation makes a note of this:

    So they give no guarantee on the accuracy of the results for this particular problem.

    [By the way, did you really need to dump all 5000+ roots and reconstructed polynomial coefficients in your post? Consider summarising the results ("the roots ranged from X to Y in absolute value, which is very different from what you got with Matlab") in your post and uploading the full list as an attached file next time.]


    And are they representative examples of what Matlab is generally used for?

    I don't imagine it would be very difficult to feed Matlab problems that would bork it. But that's slanted advertising and not a balanced comparison or benchmark. I note you've had nothing to say about the fact that Matlab obviously outperforms Finsim Math on their own sparse matrix inversion problem, for instance.


    I don't get the impression that Finsim Math is intended as a direct competitor to Matlab. Matlab is a general purpose number cruncher. Finsim Math seems to be targeted for highly specialised and niche applications.
     
  23. Tach Banned Banned

    Messages:
    5,265
    As a mathematician you seemed very concerned with correctness, now, that Matlab failed miserably (granted, on this example), you suddenly are no longer interested in correctness? Granted, it is just an example , but I can give you other examples , of totally different problems, where Matlab fails just as miserable whereas Finsim Math succeeds. This is why I chose Finsim Math over Matlab.


    But Matlab missed all the 5000+ roots (by about 6 to 7 orders of magnitude). All of them.



    So, why not use a package that does guarantee the results?


    I preferred to let any person do the comparison between the answers given by the two packages, giving the raw data leaves no room for (mis)interpretation, challenges, etc.


    Sure they are , it is a a common problem: you get a polynomial, find its roots and make sure that the solution is valid. Matlab failed on both accounts.

    You are trying to move the goalposts. Be it as it may, FinSim obtains the valid result in 23 seconds on a cpu running at 800MHz and the report on the MatLab incorrect solution quoted 115 seconds on a cpu running at 2.7GHz.
    On the matrix inversion problem we were comparing different cpu's as well. More than that,included in the Finsim Math run is the time to put out an arbitrary row and column of the resulting matrix. This is not included in the Matlab run.


    This is incorrect, Finsim Math does everything that Matlab does (including symbolic computations). When you are ready, I will show you a completely different example, where Matlab craps out whereas Finsim Math gives the right answer. There is a very good reason why this behavior is systematic, I can explain that as well.
     
    Last edited: Sep 7, 2013

Share This Page