Skip to content

Instantly share code, notes, and snippets.

@VladimirReshetnikov

VladimirReshetnikov/Root.m

Created September 13, 2019 02:25
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save VladimirReshetnikov/4ca3166dbf1a53467d55f6200c32537e to your computer and use it in GitHub Desktop.
Save VladimirReshetnikov/4ca3166dbf1a53467d55f6200c32537e to your computer and use it in GitHub Desktop.
Download ZIP
Raw
Root.m
With[{α = (22189898221551580587295103 + 256420157581401 √273)^(1/3), β = (22189898221551580587295103 - 256420157581401 √273)^(1/3)}, With[{γ = -12223877158208436551615433323264320348453289856220356097136204891255075243888 (6744188161 + Sqrt[3 (45484073947739961136 + (94097496888629183883488747614349094257225845008058652212858 - 24342677786663189744703053762296981866 √273)^(1/3) + (94097496888629183883488747614349094257225845008058652212858 + 24342677786663189744703053762296981866 √273)^(1/3))]) + 384 (-331593827486776791333233292004824066023789497199318313273300934638776183 + 5772180093919156765759073482572660102392843383718979840 √273) α - 296120273092910610 (-5310924670648957920594074293108375559243602253 + 76714420184434614579207282363991227 √273) α^2 + 884736 (-331593452855283305829953212873689032921358721450252255011637111056573047 + 1443045023037339674869983416797000691436640645427143680 √273 - 5147838861998103421526432471595757896264127200 α^2) β - 3143859191221552337387520 (331932791396515866137119897410924753180583220 + 3835721006116922493954972391577511 √273 + 3337782486758414038207488291840 α) β^2}, (((1212247 γ (22904796080691265322006779616588093769127424 + (11707151053645028715449583843432135403540992 γ)/763992322388027284475964582704020021778330616013772256071012805703442202743 + (γ^2 (188647718052699497292324449373369595709261088905100143254704303406287457858825305613983752231292151537803581783182727629394192272546582606995468423846082154238339233000049221645334028138017728 + γ (13338638921855561881863328999193926504092652714583659333976036915061728450861357099500506310639720375078330217968393 + 26966315450760400128634518756 γ)))/340687325490324554537672770155148920501881066213676384567507513707999983100105401353454672650172453403616729094294061854107032495567175453908253707215168407125918539177148861872014150401379089410489817824493484653627121785533230627158632173156754784321811879399655489497089933284810226219436014954401))/763992322388027284475964582704020021778330616013772256071012805703442202743 + 272 (51380200044169413827182373486895794706069013504 + √48082823123482537261139306909374518 Sqrt[76035891800399205054348694634841788669012613793521334517760 + (151067658237753094335560967186116985854334598471333723783168 γ)/763992322388027284475964582704020021778330616013772256071012805703442202743 + (77214042381874054347145570133643682712118419887859671492096 γ^2)/583684268667851416282858642957401735186045567077249373027837498560146875061280905862301267031787044198208750252607110144635829855149180829923916724049 + (γ^3 (33627524656638507288815344827570391674223130219451420269229614843179455973253462490377210990918352556319509781815078779429272279180643620469140048787627484654341353805642898633391009043698130457085179127424 + γ (2377687967234342524273896215589776479129478329442706231907607541302684316123874455795901361085470570319299818846347101437293086102 + 4806898525670491809441526711748023560989851 γ)))/7034662189446454668114647622495095531628198453550637889362997054405180801781595099144784778763155726777203189981931521701725206377381581990893728985680250448005843625332153906377580260271535859677132092410211006425247407838826519338777866483051669509794501424221653405665387230566335203789670531685805231479048289185899396838506366712411060252766350084382857931749409246539]))/59787556066684572045850932477027972096)^(1/8)]]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment