Re: Re: information on Eigensystem

• To: mathgroup at smc.vnet.net
• Subject: [mg33621] Re: [mg33594] Re: information on Eigensystem
• From: Andrzej Kozlowski <andrzej at tuins.ac.jp>
• Date: Wed, 3 Apr 2002 18:08:30 -0500 (EST)
• Sender: owner-wri-mathgroup at wolfram.com

```On Wednesday, April 3, 2002, at 09:30  PM, Bettina Hoser wrote:
>
> We use Version 4.1.0.0 under Linux
> Bettina

This is very strange. Are you use you did the sam thing as I did below?

Andrzej

In[1]:=
M={{65,3+6I,12-6I,4-2I},{3-6I,30,0,30},{12+6I,0,9,3},{4+2I,30,3,46}};

In[2]:=
Eigensystem[M]

Out[2]=
{
{75/2 - (1/2)*Sqrt[
15*(89 + 7521/(652049 + 16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*Sqrt[1018685])^
(1/3) - (652049 + 16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))])],
75/2 - (1/2)*Sqrt[
15*(89 + 7521/(652049 + 16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*Sqrt[1018685])^
(1/3) - (652049 + 16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))])],
75/2 + (1/2)*Sqrt[
15*(89 + 7521/(652049 + 16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*Sqrt[1018685])^
(1/3) - (652049 + 16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))])],
75/2 + (1/2)*Sqrt[
15*(89 + 7521/(652049 + 16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*Sqrt[1018685])^
(1/3) - (652049 + 16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))])]},
{{(-(1/5) + I/10)*(17/2 + (1/2)*
Sqrt[15*(89 + 7521/(652049 + 16*I*Sqrt[1018685])^
(1/3) + (652049 + 16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) -
(652049 + 16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]) +
((3/5 - (3*I)/10)*
((-(-90 + 180*I + (4 + 2*I)*(-(15/2) +
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])])))*
(12 + 6*I - (12 + 6*I)*(17/2 + (1/2)*
Sqrt[15*(89 + 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])) -
(360 + 180*I)*(120 + 60*I - (3 - 6*I)*
(17/2 + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))))/
(6480 - 4860*I - (-36 - 18*I + (4 + 2*I)*
(-(57/2) + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))*
(-90 + 180*I + (4 + 2*I)*(-(15/2) +
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))) +
(6 - 3*I)*((-(1/450) + I/900)*(12 + 6*I -
(12 + 6*I)*(17/2 + (1/2)*Sqrt[15*(89 + 7521/
(652049 + 16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])) +
((1/450 - I/900)*(-36 - 18*I + (4 + 2*I)*
(-(57/2) + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))*
((-(-90 + 180*I + (4 + 2*I)*(-(15/2) + (1/2)*
Sqrt[15*(89 + 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))] + (1/2)*
Sqrt[15*(178 - 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) - (652049 + 16*I*
Sqrt[1018685])^(1/3) - 16/Sqrt[(1/15)*
(89 + 7521/(652049 + 16*I*Sqrt[1018685])^
(1/3) + (652049 + 16*I*Sqrt[1018685])^
(1/3))])])))*(12 + 6*I - (12 + 6*I)*
(17/2 + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])])) -
(360 + 180*I)*(120 + 60*I - (3 - 6*I)*
(17/2 + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])]))))/
(6480 - 4860*I - (-36 - 18*I + (4 + 2*I)*
(-(57/2) + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])]))*
(-90 + 180*I + (4 + 2*I)*(-(15/2) +
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])])))),
(1/450 - I/900)*(12 + 6*I - (12 + 6*I)*
(17/2 + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 + 16*I*
Sqrt[1018685])^(1/3) - 16/Sqrt[(1/15)*
(89 + 7521/(652049 + 16*I*Sqrt[1018685])^
(1/3) + (652049 + 16*I*Sqrt[1018685])^
(1/3))])])) -
((1/450 - I/900)*(-36 - 18*I + (4 + 2*I)*
(-(57/2) + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/Sqrt[
(1/15)*(89 + 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])]))*
((-(-90 + 180*I + (4 + 2*I)*(-(15/2) +
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])])))*
(12 + 6*I - (12 + 6*I)*(17/2 + (1/2)*
Sqrt[15*(89 + 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])) -
(360 + 180*I)*(120 + 60*I - (3 - 6*I)*
(17/2 + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))))/
(6480 - 4860*I - (-36 - 18*I + (4 + 2*I)*
(-(57/2) + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))*
(-90 + 180*I + (4 + 2*I)*(-(15/2) +
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))),
-(((-(-90 + 180*I + (4 + 2*I)*(-(15/2) +
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])))*
(12 + 6*I - (12 + 6*I)*(17/2 +
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])) -
(360 + 180*I)*(120 + 60*I - (3 - 6*I)*
(17/2 + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])))/
(6480 - 4860*I - (-36 - 18*I + (4 + 2*I)*
(-(57/2) + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))*
(-90 + 180*I + (4 + 2*I)*(-(15/2) +
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])))), 1},
{(-(1/5) + I/10)*(17/2 + (1/2)*
Sqrt[15*(89 + 7521/(652049 + 16*I*Sqrt[1018685])^
(1/3) + (652049 + 16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) -
(652049 + 16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]) +
((3/5 - (3*I)/10)*
((-(-90 + 180*I + (4 + 2*I)*(-(15/2) +
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])])))*
(12 + 6*I - (12 + 6*I)*(17/2 + (1/2)*
Sqrt[15*(89 + 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])) -
(360 + 180*I)*(120 + 60*I - (3 - 6*I)*
(17/2 + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))))/
(6480 - 4860*I - (-36 - 18*I + (4 + 2*I)*
(-(57/2) + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))*
(-90 + 180*I + (4 + 2*I)*(-(15/2) +
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))) +
(6 - 3*I)*((-(1/450) + I/900)*(12 + 6*I -
(12 + 6*I)*(17/2 + (1/2)*Sqrt[15*(89 + 7521/
(652049 + 16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])) +
((1/450 - I/900)*(-36 - 18*I + (4 + 2*I)*
(-(57/2) + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))*
((-(-90 + 180*I + (4 + 2*I)*(-(15/2) + (1/2)*
Sqrt[15*(89 + 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))] - (1/2)*
Sqrt[15*(178 - 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) - (652049 + 16*I*
Sqrt[1018685])^(1/3) - 16/Sqrt[(1/15)*
(89 + 7521/(652049 + 16*I*Sqrt[1018685])^
(1/3) + (652049 + 16*I*Sqrt[1018685])^
(1/3))])])))*(12 + 6*I - (12 + 6*I)*
(17/2 + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])])) -
(360 + 180*I)*(120 + 60*I - (3 - 6*I)*
(17/2 + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])]))))/
(6480 - 4860*I - (-36 - 18*I + (4 + 2*I)*
(-(57/2) + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])]))*
(-90 + 180*I + (4 + 2*I)*(-(15/2) +
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])])))),
(1/450 - I/900)*(12 + 6*I - (12 + 6*I)*
(17/2 + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 + 16*I*
Sqrt[1018685])^(1/3) - 16/Sqrt[(1/15)*
(89 + 7521/(652049 + 16*I*Sqrt[1018685])^
(1/3) + (652049 + 16*I*Sqrt[1018685])^
(1/3))])])) -
((1/450 - I/900)*(-36 - 18*I + (4 + 2*I)*
(-(57/2) + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/Sqrt[
(1/15)*(89 + 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])]))*
((-(-90 + 180*I + (4 + 2*I)*(-(15/2) +
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])])))*
(12 + 6*I - (12 + 6*I)*(17/2 + (1/2)*
Sqrt[15*(89 + 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])) -
(360 + 180*I)*(120 + 60*I - (3 - 6*I)*
(17/2 + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))))/
(6480 - 4860*I - (-36 - 18*I + (4 + 2*I)*
(-(57/2) + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))*
(-90 + 180*I + (4 + 2*I)*(-(15/2) +
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))),
-(((-(-90 + 180*I + (4 + 2*I)*(-(15/2) +
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) -
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])))*
(12 + 6*I - (12 + 6*I)*(17/2 +
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])) -
(360 + 180*I)*(120 + 60*I - (3 - 6*I)*
(17/2 + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])))/
(6480 - 4860*I - (-36 - 18*I + (4 + 2*I)*
(-(57/2) + (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))*
(-90 + 180*I + (4 + 2*I)*(-(15/2) +
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) - 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])))), 1},
{(-(1/5) + I/10)*(17/2 - (1/2)*
Sqrt[15*(89 + 7521/(652049 + 16*I*Sqrt[1018685])^
(1/3) + (652049 + 16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) -
(652049 + 16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]) +
((3/5 - (3*I)/10)*
((-(-90 + 180*I + (4 + 2*I)*(-(15/2) -
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])])))*
(12 + 6*I - (12 + 6*I)*(17/2 - (1/2)*
Sqrt[15*(89 + 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])) -
(360 + 180*I)*(120 + 60*I - (3 - 6*I)*
(17/2 - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))))/
(6480 - 4860*I - (-36 - 18*I + (4 + 2*I)*
(-(57/2) - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))*
(-90 + 180*I + (4 + 2*I)*(-(15/2) -
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))) +
(6 - 3*I)*((-(1/450) + I/900)*(12 + 6*I -
(12 + 6*I)*(17/2 - (1/2)*Sqrt[15*(89 + 7521/
(652049 + 16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])) +
((1/450 - I/900)*(-36 - 18*I + (4 + 2*I)*
(-(57/2) - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))*
((-(-90 + 180*I + (4 + 2*I)*(-(15/2) - (1/2)*
Sqrt[15*(89 + 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))] + (1/2)*
Sqrt[15*(178 - 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) - (652049 + 16*I*
Sqrt[1018685])^(1/3) + 16/Sqrt[(1/15)*
(89 + 7521/(652049 + 16*I*Sqrt[1018685])^
(1/3) + (652049 + 16*I*Sqrt[1018685])^
(1/3))])])))*(12 + 6*I - (12 + 6*I)*
(17/2 - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])])) -
(360 + 180*I)*(120 + 60*I - (3 - 6*I)*
(17/2 - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])]))))/
(6480 - 4860*I - (-36 - 18*I + (4 + 2*I)*
(-(57/2) - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])]))*
(-90 + 180*I + (4 + 2*I)*(-(15/2) -
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])])))),
(1/450 - I/900)*(12 + 6*I - (12 + 6*I)*
(17/2 - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 + 16*I*
Sqrt[1018685])^(1/3) + 16/Sqrt[(1/15)*
(89 + 7521/(652049 + 16*I*Sqrt[1018685])^
(1/3) + (652049 + 16*I*Sqrt[1018685])^
(1/3))])])) -
((1/450 - I/900)*(-36 - 18*I + (4 + 2*I)*
(-(57/2) - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/Sqrt[
(1/15)*(89 + 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])]))*
((-(-90 + 180*I + (4 + 2*I)*(-(15/2) -
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])])))*
(12 + 6*I - (12 + 6*I)*(17/2 - (1/2)*
Sqrt[15*(89 + 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])) -
(360 + 180*I)*(120 + 60*I - (3 - 6*I)*
(17/2 - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))))/
(6480 - 4860*I - (-36 - 18*I + (4 + 2*I)*
(-(57/2) - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))*
(-90 + 180*I + (4 + 2*I)*(-(15/2) -
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))),
-(((-(-90 + 180*I + (4 + 2*I)*(-(15/2) -
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])))*
(12 + 6*I - (12 + 6*I)*(17/2 -
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])) -
(360 + 180*I)*(120 + 60*I - (3 - 6*I)*
(17/2 - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])))/
(6480 - 4860*I - (-36 - 18*I + (4 + 2*I)*
(-(57/2) - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))*
(-90 + 180*I + (4 + 2*I)*(-(15/2) -
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] +
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])))), 1},
{(-(1/5) + I/10)*(17/2 - (1/2)*
Sqrt[15*(89 + 7521/(652049 + 16*I*Sqrt[1018685])^
(1/3) + (652049 + 16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) -
(652049 + 16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]) +
((3/5 - (3*I)/10)*
((-(-90 + 180*I + (4 + 2*I)*(-(15/2) -
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])])))*
(12 + 6*I - (12 + 6*I)*(17/2 - (1/2)*
Sqrt[15*(89 + 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])) -
(360 + 180*I)*(120 + 60*I - (3 - 6*I)*
(17/2 - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))))/
(6480 - 4860*I - (-36 - 18*I + (4 + 2*I)*
(-(57/2) - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))*
(-90 + 180*I + (4 + 2*I)*(-(15/2) -
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))) +
(6 - 3*I)*((-(1/450) + I/900)*(12 + 6*I -
(12 + 6*I)*(17/2 - (1/2)*Sqrt[15*(89 + 7521/
(652049 + 16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])) +
((1/450 - I/900)*(-36 - 18*I + (4 + 2*I)*
(-(57/2) - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))*
((-(-90 + 180*I + (4 + 2*I)*(-(15/2) - (1/2)*
Sqrt[15*(89 + 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))] - (1/2)*
Sqrt[15*(178 - 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) - (652049 + 16*I*
Sqrt[1018685])^(1/3) + 16/Sqrt[(1/15)*
(89 + 7521/(652049 + 16*I*Sqrt[1018685])^
(1/3) + (652049 + 16*I*Sqrt[1018685])^
(1/3))])])))*(12 + 6*I - (12 + 6*I)*
(17/2 - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])])) -
(360 + 180*I)*(120 + 60*I - (3 - 6*I)*
(17/2 - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])]))))/
(6480 - 4860*I - (-36 - 18*I + (4 + 2*I)*
(-(57/2) - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])]))*
(-90 + 180*I + (4 + 2*I)*(-(15/2) -
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])])))),
(1/450 - I/900)*(12 + 6*I - (12 + 6*I)*
(17/2 - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 + 16*I*
Sqrt[1018685])^(1/3) + 16/Sqrt[(1/15)*
(89 + 7521/(652049 + 16*I*Sqrt[1018685])^
(1/3) + (652049 + 16*I*Sqrt[1018685])^
(1/3))])])) -
((1/450 - I/900)*(-36 - 18*I + (4 + 2*I)*
(-(57/2) - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/Sqrt[
(1/15)*(89 + 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])]))*
((-(-90 + 180*I + (4 + 2*I)*(-(15/2) -
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))])])))*
(12 + 6*I - (12 + 6*I)*(17/2 - (1/2)*
Sqrt[15*(89 + 7521/(652049 + 16*I*Sqrt[
1018685])^(1/3) + (652049 + 16*I*
Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])) -
(360 + 180*I)*(120 + 60*I - (3 - 6*I)*
(17/2 - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) +
(652049 + 16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))))/
(6480 - 4860*I - (-36 - 18*I + (4 + 2*I)*
(-(57/2) - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))*
(-90 + 180*I + (4 + 2*I)*(-(15/2) -
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))),
-(((-(-90 + 180*I + (4 + 2*I)*(-(15/2) -
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) +
16/Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])))*
(12 + 6*I - (12 + 6*I)*(17/2 -
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])) -
(360 + 180*I)*(120 + 60*I - (3 - 6*I)*
(17/2 - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])))/
(6480 - 4860*I - (-36 - 18*I + (4 + 2*I)*
(-(57/2) - (1/2)*Sqrt[15*(89 + 7521/(652049 +
16*I*Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])]))*
(-90 + 180*I + (4 + 2*I)*(-(15/2) -
(1/2)*Sqrt[15*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))] -
(1/2)*Sqrt[15*(178 - 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) - (652049 +
16*I*Sqrt[1018685])^(1/3) + 16/
Sqrt[(1/15)*(89 + 7521/(652049 + 16*I*
Sqrt[1018685])^(1/3) + (652049 +
16*I*Sqrt[1018685])^(1/3))])])))), 1}}}

```

• Prev by Date: Re: Re: information on Eigensystem
• Next by Date: bar chart with error bars
• Previous by thread: Re: Re: information on Eigensystem
• Next by thread: Re: How to find and plot real roots?