(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 12.2' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 592291, 13971] NotebookOptionsPosition[ 590816, 13945] NotebookOutlinePosition[ 591347, 13963] CellTagsIndexPosition[ 591304, 13960] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"This", " ", "is", " ", "a", " ", RowBox[{"Mathematica", " ", "--"}], " ", "readable", " ", "file", " ", "for", " ", "the", " ", "computation", " ", "of", " ", "the"}], " ", "*)"}], "\n", RowBox[{"(*", " ", RowBox[{ RowBox[{"coefficients", " ", "T_", "1"}], ",", " ", RowBox[{"T_", "2"}], ",", " ", RowBox[{"T_", "3"}], ",", " ", RowBox[{ "T_", "4", " ", "for", " ", "the", " ", "two", " ", "quadratic", " ", "factors"}]}], " ", "*)"}], "\n", RowBox[{"(*", " ", RowBox[{ RowBox[{ "of", " ", "the", " ", "quartic", " ", "whose", " ", "roots", " ", "are", " ", "l1"}], ",", " ", "l2", ",", " ", "l3", ",", " ", RowBox[{"l4", " ", ":"}]}], " ", "*)"}], "\n", RowBox[{ "(*", " \ ", "*)"}], "\n", RowBox[{"(*", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"x", "^", "2"}], " ", "+", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"T_", "1"}], " ", "+", " ", RowBox[{"T_", "2", " ", "delta"}]}], ")"}], " ", "x"}], " ", "+", " ", RowBox[{"(", RowBox[{ RowBox[{"T_", "3"}], " ", "+", " ", RowBox[{"T_", "4", " ", "delta"}]}], ")"}]}], " ", ")"}], " ", "times", " ", "conjugate"}], " ", "*)"}], "\n", RowBox[{ "(*", " ", "factor", " ", "*)"}], "\n", RowBox[{ "(*", " \ ", "*)"}], "\n", RowBox[{"(*", " ", RowBox[{ RowBox[{ "factors", " ", "are", " ", "given", " ", "in", " ", "terms", " ", "of", " ", "p"}], ",", "q", ",", "r", ",", "s"}], " ", "*)"}], "\n", RowBox[{ "(*", " \ ", "*)"}], "\n", RowBox[{"(*", " ", RowBox[{ RowBox[{"computes", " ", "d"}], ":=", " ", RowBox[{"discriminant", " ", "of", " ", "the", " ", "quintic"}]}], " ", "*)"}], "\n", RowBox[{ "(*", " \ ", "*)"}], "\n", RowBox[{"(*", " ", RowBox[{"Also", " ", "computes", " ", "l0"}], " ", "*)"}], "\n", RowBox[{ "(*", " \ ", "*)"}], "\n", RowBox[{"(*", " ", RowBox[{"order", " ", ":=", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"l_", "1"}], " ", "-", " ", RowBox[{"l_", "4"}]}], ")"}], RowBox[{"(", RowBox[{ RowBox[{"l_", "2"}], " ", "-", " ", RowBox[{"l_", "3"}]}], ")"}]}]}], " ", "*)"}], "\n", RowBox[{ "(*", " ", "and", " ", "*)"}], "\n", RowBox[{"(*", " ", RowBox[{"u", " ", "+", " ", RowBox[{"v", " ", "Delta", " ", "Sqrt", RowBox[{"(", "5", ")"}]}]}], " ", "*)"}], "\n", RowBox[{"(*", " ", RowBox[{"u", " ", "-", " ", RowBox[{"v", " ", "Delta", " ", "Sqrt", RowBox[{"(", "5", ")"}]}]}], " ", "*)"}], "\n", "\n", "\n", "\n", RowBox[{ RowBox[{ RowBox[{"F", " ", ":=", "\n", RowBox[{ RowBox[{"4", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}]}], " ", "+", " ", RowBox[{"59", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}]}], " ", "+", " ", RowBox[{"216", " ", RowBox[{"q", "^", "10"}]}], " ", "-", " ", RowBox[{"36", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", "r"}], " ", "-", " ", RowBox[{"623", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", "r"}], " ", "-", " ", "\n", " ", RowBox[{"2610", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", "r"}], " ", "+", " ", RowBox[{"81", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"2015", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"10825", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1800", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"17500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"625", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"10000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"108", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"1584", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"5700", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", "s"}], " ", "-", " ", RowBox[{"486", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"9720", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"45050", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"9000", " ", RowBox[{"q", "^", "7"}], " ", "r", " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"10800", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"92500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"32500", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"60000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"50000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"729", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"12150", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"60000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"93750", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"18225", " ", RowBox[{"p", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"175500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"478125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"135000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"850000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"15625", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"250000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"225000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"175000", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"1012500", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"1187500", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"1250000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"928125", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"1875000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"2812500", " ", RowBox[{"p", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", "\n", " ", RowBox[{"390625", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"9765625", " ", RowBox[{"s", "^", "6"}]}]}]}], " ", ";"}], "\n", "\n", RowBox[{"(*", " ", RowBox[{"the", " ", "discriminant", " ", "of", " ", "the", " ", RowBox[{"quintic", ":"}]}], " ", "*)"}], "\n", "\n", "\n", RowBox[{ RowBox[{"d", " ", ":=", " ", RowBox[{ RowBox[{ RowBox[{"-", "4"}], " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"27", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"16", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"144", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"128", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"256", " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"16", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"108", " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"72", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"630", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "+", "\n", " ", RowBox[{"560", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"1600", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"108", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"825", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"900", " ", RowBox[{"p", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"2250", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"2000", " ", "p", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"3750", " ", "p", " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"3125", " ", RowBox[{"s", "^", "4"}]}]}]}], " ", ";"}], "\n", " ", "\n", "\n", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"1", ",", "0"}], "]"}], " ", ":=", "\n", RowBox[{ RowBox[{"100", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "7"}]}], " ", "+", " ", RowBox[{"2175", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "9"}]}], " ", "+", " ", RowBox[{"10500", " ", "p", " ", RowBox[{"q", "^", "11"}]}], " ", "-", " ", RowBox[{"1100", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "5"}], " ", "r"}], " ", "-", " ", "\n", " ", RowBox[{"27975", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "7"}], " ", "r"}], " ", "-", " ", RowBox[{"152950", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "9"}], " ", "r"}], " ", "+", " ", RowBox[{"4125", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"128875", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"830525", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"59450", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"5400", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"243800", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"2082650", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"333925", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"139200", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"2406000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"122600", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"1254400", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"3776000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"1832000", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"4736000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"6720000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"6400000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", "\n", " ", RowBox[{"900", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"37400", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"281625", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", "s"}], " ", "+", " ", RowBox[{"435000", " ", RowBox[{"q", "^", "10"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"6750", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"322300", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"2718575", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"4214250", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"16200", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"859275", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", "\n", " ", RowBox[{"8925475", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"14427875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"453600", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"10038400", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"17397500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"11333125", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"4451200", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"15850000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"34000000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"17984000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"10000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"25600000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"8000000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"6075", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"83250", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"1282500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"2862500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"724275", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"9807250", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"28374375", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"22212500", " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", "\n", " ", RowBox[{"8982000", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"39600000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"61746875", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1010000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", "\n", " ", RowBox[{"1000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"78000000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"30000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"80000000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"759375", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{"9787500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"39062500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"52343750", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"12301875", " ", RowBox[{"p", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"98175000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"225078125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{"54900000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"310000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"7890625", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"51250000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"420000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"110000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"200000000", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"2109375", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"21093750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"89843750", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"182343750", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"733203125", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"196875000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"1125000000", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"158203125", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"566406250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"101562500", " ", RowBox[{"p", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"1669921875", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"1250000000", " ", "p", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"1220703125", " ", "p", " ", "q", " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"6103515625", " ", RowBox[{"s", "^", "7"}]}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"1", ",", "1"}], "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{ RowBox[{"-", "1000"}], " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "7"}]}], " ", "-", " ", RowBox[{"7250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "9"}]}], " ", "+", " ", RowBox[{"10800", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", "r"}], " ", "+", " ", RowBox[{"96900", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", "r"}], " ", "+", "\n", " ", RowBox[{"52500", " ", RowBox[{"q", "^", "9"}], " ", "r"}], " ", "-", " ", RowBox[{"37400", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"470850", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"640600", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"39600", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"983600", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"2848100", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"814400", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"6076000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"2308000", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"5024000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"9680000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"9600000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"13800", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"94650", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"26500", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", "s"}], " ", "+", " ", RowBox[{"86400", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"816500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"257500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"91800", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"1853700", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"630000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"8971250", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", "\n", " ", RowBox[{"2071200", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"7240000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"29375000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"14416000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"5200000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"30400000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", "\n", " ", RowBox[{"12000000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"64800", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"567000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1655000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"6987500", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"337500", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", "\n", " ", RowBox[{"8462500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"5812500", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"24930000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"69125000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"103500000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", "\n", " ", RowBox[{"30000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"90000000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"708750", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"5400000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"8906250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"18562500", " ", RowBox[{"p", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"625000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"29687500", " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"75000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"416250000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"60000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"300000000", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"71718750", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"189062500", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"210937500", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"1187500000", " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"187500000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"800781250", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"390625000", " ", "p", " ", "r", " ", RowBox[{"s", "^", "5"}]}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"1", ",", "2"}], "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}]}], " ", "+", " ", RowBox[{"6350", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}]}], " ", "+", " ", RowBox[{"19800", " ", RowBox[{"q", "^", "9"}]}], " ", "-", " ", RowBox[{"3750", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", "r"}], " ", "-", " ", RowBox[{"65100", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", "r"}], " ", "-", "\n", " ", RowBox[{"264950", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", "r"}], " ", "+", " ", RowBox[{"6750", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"209050", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"1217250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"219000", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"2510000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"1098500", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"2068000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"5060000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"5200000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"6750", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"96350", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"346000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"20250", " ", RowBox[{"p", "^", "9"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"459900", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"1828750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"2930000", " ", RowBox[{"q", "^", "6"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"594000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"4301250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"10906250", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"5252000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", "\n", " ", RowBox[{"1450000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"12800000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"6500000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"74250", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"1418750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"5956250", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", "\n", " ", RowBox[{"4297500", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"29906250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"31500000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"12500000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"35000000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"1350000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", "\n", " ", RowBox[{"6093750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"17500000", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"7031250", " ", RowBox[{"p", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{"127812500", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"18750000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"162500000", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", "\n", " ", RowBox[{"107812500", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"460937500", " ", "q", " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"214843750", " ", "p", " ", RowBox[{"s", "^", "5"}]}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"1", ",", "3"}], "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{ RowBox[{"-", "1950"}], " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}]}], " ", "-", " ", RowBox[{"14100", " ", "p", " ", RowBox[{"q", "^", "7"}]}], " ", "+", " ", RowBox[{"14350", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", "r"}], " ", "+", " ", RowBox[{"125600", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", "r"}], " ", "-", " ", "\n", " ", RowBox[{"27900", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"402250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"288250", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"436000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"1345000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"1400000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"9450", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"1250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"465000", " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"49950", " ", RowBox[{"p", "^", "7"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"302500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"1718750", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"834000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"437500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"3100000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"1750000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"292500", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1937500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"3343750", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"1875000", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"8125000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", "\n", " ", RowBox[{"1406250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"12343750", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"5312500", " ", RowBox[{"p", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"43750000", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"74218750", " ", "q", " ", RowBox[{"s", "^", "4"}]}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"1", ",", "4"}], "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"300", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}]}], " ", "+", " ", RowBox[{"2150", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}]}], " ", "-", " ", RowBox[{"1350", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", "r"}], " ", "-", " ", RowBox[{"21500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", "r"}], " ", "-", " ", RowBox[{"61500", " ", RowBox[{"q", "^", "5"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"42000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"290000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"300000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"4050", " ", RowBox[{"p", "^", "7"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"45000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"125000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"108000", " ", RowBox[{"p", "^", "5"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"643750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"700000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"375000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"93750", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"312500", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"1875000", " ", "p", " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", "\n", " ", RowBox[{"1406250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"9375000", " ", "r", " ", RowBox[{"s", "^", "3"}]}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"1", ",", "5"}], "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{ RowBox[{"-", "1250"}], " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}]}], " ", "-", " ", RowBox[{"9000", " ", RowBox[{"q", "^", "5"}]}], " ", "+", " ", RowBox[{"4500", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", "r"}], " ", "+", " ", RowBox[{"46250", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", "r"}], " ", "-", " ", RowBox[{"50000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "2"}]}], " ", "-", "\n", " ", RowBox[{"6750", " ", RowBox[{"p", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"43750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"75000", " ", RowBox[{"p", "^", "3"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"62500", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"156250", " ", "p", " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1562500", " ", RowBox[{"s", "^", "3"}]}]}]}], " ", ";"}], "\n", "\n", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"2", ",", "0"}], "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"200", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "11"}]}], " ", "-", " ", RowBox[{"250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "13"}]}], " ", "-", " ", RowBox[{"10800", " ", RowBox[{"q", "^", "15"}]}], " ", "-", " ", RowBox[{"3900", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "9"}], " ", "r"}], " ", "-", " ", RowBox[{"3325", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "11"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"181800", " ", "p", " ", RowBox[{"q", "^", "13"}], " ", "r"}], " ", "+", " ", RowBox[{"26950", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"69625", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1214450", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "11"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"78725", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"368675", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"4166325", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"1131100", " ", RowBox[{"q", "^", "11"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"73400", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"661950", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"9151950", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"16633075", " ", "p", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", "\n", " ", RowBox[{"36000", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"135600", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"17321400", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"85338300", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"832000", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"21379200", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"176044000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"1410000", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"6528000", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", "\n", " ", RowBox[{"129664000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", RowBox[{"47344000", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "7"}]}], " ", "-", " ", RowBox[{"21504000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "8"}]}], " ", "-", " ", "\n", " ", RowBox[{"115200000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "8"}]}], " ", "+", " ", RowBox[{"25600000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "9"}]}], " ", "+", " ", RowBox[{"64000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "9"}]}], " ", "+", " ", "\n", " ", RowBox[{"15700", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "8"}], " ", "s"}], " ", "+", " ", RowBox[{"120525", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "10"}], " ", "s"}], " ", "+", " ", RowBox[{"113250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "12"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"196900", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"1776925", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "8"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"3062475", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "10"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"4153500", " ", RowBox[{"q", "^", "12"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"857925", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"10562775", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"34866250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"73486750", " ", "p", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"1333800", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"29212625", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"168729675", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"427230750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"108000", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"30384200", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"324535100", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"952666750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"38076875", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"4296000", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"213606400", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"842060000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"95285000", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"61184000", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"567520000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"547000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"390912000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"812800000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "-", " ", RowBox[{"924000000", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"1152000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "8"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"800000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "8"}], " ", "s"}], " ", "-", " ", RowBox[{"1280000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "9"}], " ", "s"}], " ", "+", " ", RowBox[{"141750", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"31500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"11325000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"31687500", " ", "p", " ", RowBox[{"q", "^", "11"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1293975", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"4803800", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"71398250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"227625000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "9"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"3256200", " ", RowBox[{"p", "^", "12"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"43870125", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"64581500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"56090625", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", "\n", " ", RowBox[{"260218750", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"74610000", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"662186500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"1987747500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"811928125", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"471286000", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"2106040000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"792687500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"135120000", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"2479000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"5242250000", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"6400000000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"8620000000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"13280000000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"1600000000", " ", "q", " ", RowBox[{"r", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"273375", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"13612500", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"177250000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"511015625", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"320937500", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"2770200", " ", RowBox[{"p", "^", "13"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"12595500", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"543950000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"1612281250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"968125000", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"77031000", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"373218750", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"1839765625", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"1818515625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"776745000", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"6861075000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"20014531250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"13747812500", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"3768000000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"35365000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"34441875000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"9628000000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"63230000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"13600000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"15000000000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"10400000000", " ", "p", " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"45562500", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"525937500", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"1364218750", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"1382812500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"572062500", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"2473515625", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"13192187500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"12703125000", " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"451406250", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", "\n", " ", RowBox[{"18153906250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"36908203125", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"9069375000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"79957812500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"5512500000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"50656250000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"74750000000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"56953125", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"1381640625", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"781250000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"878906250", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"2655703125", " ", RowBox[{"p", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"3223046875", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"35117187500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"26573437500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"14785156250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"52050781250", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"103062500000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"281796875000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"146875000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"37500000000", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"8789062500", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"3906250000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"1464843750", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"102929687500", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"297119140625", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"217773437500", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"167968750000", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"10986328125", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"s", "^", "7"}]}], " ", "+", " ", RowBox[{"98876953125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", "\n", " ", RowBox[{"188964843750", " ", RowBox[{"p", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", RowBox[{"278320312500", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "7"}]}], " ", "+", " ", "\n", " ", RowBox[{"517578125000", " ", "p", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", RowBox[{"610351562500", " ", "p", " ", "q", " ", RowBox[{"s", "^", "8"}]}], " ", "+", " ", RowBox[{"762939453125", " ", RowBox[{"s", "^", "9"}]}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"2", ",", "1"}], "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{ RowBox[{"-", "200"}], " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "9"}]}], " ", "+", " ", RowBox[{"1850", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "11"}]}], " ", "+", " ", RowBox[{"21600", " ", "p", " ", RowBox[{"q", "^", "13"}]}], " ", "+", " ", RowBox[{"3200", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "7"}], " ", "r"}], " ", "-", " ", "\n", " ", RowBox[{"19200", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "9"}], " ", "r"}], " ", "-", " ", RowBox[{"316350", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "11"}], " ", "r"}], " ", "-", " ", RowBox[{"19050", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"37400", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"1759250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"440100", " ", RowBox[{"q", "^", "11"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"48750", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"190200", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"4604200", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"6072800", " ", "p", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"43200", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"834500", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"4916000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"27926850", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"969600", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"r", "^", "5"}]}], " ", "+", "\n", " ", RowBox[{"2467200", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"45393200", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"5399500", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"7283200", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"10536000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"41656000", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"22784000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "7"}]}], " ", "-", " ", RowBox[{"35200000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "7"}]}], " ", "-", " ", RowBox[{"25600000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "8"}]}], " ", "+", " ", "\n", " ", RowBox[{"96000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "8"}]}], " ", "-", " ", RowBox[{"3000", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"40400", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "8"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"136550", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "10"}], " ", "s"}], " ", "-", " ", RowBox[{"1647000", " ", RowBox[{"q", "^", "12"}], " ", "s"}], " ", "+", " ", RowBox[{"40500", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"173600", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"126500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "8"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"23969250", " ", "p", " ", RowBox[{"q", "^", "10"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"153900", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"486150", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"4115800", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"112653250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"129600", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"2683350", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"10906650", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"187289500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"44098750", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"4384800", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"35660800", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"175420000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"426538750", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"60857600", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"349436000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"900600000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"429568000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"1511200000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"1286000000", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"1472000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"1440000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "-", " ", RowBox[{"1920000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "8"}], " ", "s"}], " ", "-", " ", RowBox[{"36450", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"188100", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"5504750", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"37968750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"255150", " ", RowBox[{"p", "^", "12"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"2754000", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"49196500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"323587500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"83250000", " ", RowBox[{"q", "^", "9"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"465750", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"31881500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"415585000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"1054775000", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"96823500", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"701490000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"2953531250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"1454560000", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"7670500000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"5661062500", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"7785000000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"9450000000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"14000000000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", "\n", " ", RowBox[{"2400000000", " ", "q", " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"437400", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"10145250", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"121912500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"576531250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"528593750", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"12939750", " ", RowBox[{"p", "^", "11"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"313368750", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"2171812500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"2381718750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"124638750", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"3001575000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"12259375000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"9985312500", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"384000000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"13997500000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"20749531250", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"553500000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"41835000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"5420000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"16300000000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"17600000000", " ", "p", " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"7593750", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"289218750", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"3591406250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"5992187500", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"658125000", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"269531250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"15882812500", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"4785000000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"54375781250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"5668750000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"35867187500", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"113875000000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"544218750", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"5407031250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"14277343750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"5421093750", " ", RowBox[{"p", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"24941406250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"25488281250", " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"11500000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"231894531250", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"6250000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"43750000000", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"35449218750", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"137695312500", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"34667968750", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"202148437500", " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"33691406250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", "\n", " ", RowBox[{"214843750000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", RowBox[{"31738281250", " ", "p", " ", "r", " ", RowBox[{"s", "^", "7"}]}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"2", ",", "2"}], "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{ RowBox[{"-", "800"}], " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "9"}]}], " ", "-", " ", RowBox[{"5400", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "11"}]}], " ", "+", " ", RowBox[{"5800", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "7"}], " ", "r"}], " ", "+", " ", RowBox[{"48750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "9"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"16200", " ", RowBox[{"q", "^", "11"}], " ", "r"}], " ", "-", " ", RowBox[{"3000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"108350", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"263250", " ", "p", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"60700", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"386250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"253100", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"127800", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"2326700", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"6565550", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"705750", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"2903200", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"21218000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"1057000", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"20368000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"33000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"43200000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", RowBox[{"52000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", RowBox[{"6200", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"188250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "8"}], " ", "s"}], " ", "+", " ", RowBox[{"931500", " ", "p", " ", RowBox[{"q", "^", "10"}], " ", "s"}], " ", "-", " ", RowBox[{"73800", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"1466850", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"6894000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "8"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"315900", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"4547000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"20362500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"15018750", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"653400", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"13897550", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"76757500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"124207500", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"18567600", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"175911000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"253787500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"183816000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"706900000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"665750000", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"740000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"890000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"1040000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "-", " ", RowBox[{"763000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"12375000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"40500000", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"364500", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"15537000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"154392500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"372206250", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"25481250", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"386300000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"996343750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"459872500", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"2943937500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"2437781250", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"2883750000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"4343750000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"5495000000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", "\n", " ", RowBox[{"1300000000", " ", "q", " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"364500", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"13668750", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"113406250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"159062500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"13972500", " ", RowBox[{"p", "^", "9"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"61537500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"1622656250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"2720625000", " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"201656250", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"1949687500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"4979687500", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"497125000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"11150625000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"2982500000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"6612500000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"10450000000", " ", "p", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"126562500", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"1443750000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"281250000", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"1648125000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"11271093750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"4785156250", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"8808593750", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"52390625000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"611718750", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"13027343750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"1464843750", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"6492187500", " ", RowBox[{"p", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"65351562500", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"13476562500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"24218750000", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"41992187500", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"69824218750", " ", "q", " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"34179687500", " ", "p", " ", RowBox[{"s", "^", "7"}]}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"2", ",", "3"}], "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{ RowBox[{"-", "1000"}], " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "7"}]}], " ", "-", " ", RowBox[{"5150", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "9"}]}], " ", "+", " ", RowBox[{"10800", " ", RowBox[{"q", "^", "11"}]}], " ", "+", " ", RowBox[{"11000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "5"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"66450", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "7"}], " ", "r"}], " ", "-", " ", RowBox[{"127800", " ", "p", " ", RowBox[{"q", "^", "9"}], " ", "r"}], " ", "-", " ", RowBox[{"41250", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"368400", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"204200", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"54000", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"1040950", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"2096500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"200000", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"1140000", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"7691000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"2281000", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"7296000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"13300000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"14400000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"14000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", "\n", " ", RowBox[{"9000", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"52100", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"710250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "8"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"67500", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"256100", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"5753000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"292500", " ", RowBox[{"q", "^", "8"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"162000", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"1432350", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"5410000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"7408750", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"4401000", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"24185000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"20781250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"43012000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"146300000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"165875000", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"182000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"250000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"280000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"60750", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"2414250", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"15770000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"15825000", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"6021000", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"62252500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"74718750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"90888750", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"471312500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"525875000", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"539375000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1030000000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1142500000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"350000000", " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"303750", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"35943750", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"331875000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"505937500", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"8437500", " ", RowBox[{"p", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"530781250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"1150312500", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"154500000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"2059062500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"1150000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"1343750000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"2900000000", " ", "p", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"30937500", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"1166406250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"1496875000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"1296875000", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"10640625000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"281250000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"9746093750", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"1269531250", " ", RowBox[{"p", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"7421875000", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"15625000000", " ", "q", " ", RowBox[{"s", "^", "6"}]}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"2", ",", "4"}], "]"}], " ", ":=", "\n", RowBox[{ RowBox[{ RowBox[{"-", "1600"}], " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "7"}]}], " ", "-", " ", RowBox[{"10800", " ", "p", " ", RowBox[{"q", "^", "9"}]}], " ", "+", " ", RowBox[{"9800", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", "r"}], " ", "+", " ", RowBox[{"80550", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", "r"}], " ", "-", "\n", " ", RowBox[{"4600", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"112700", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"40500", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"34200", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "3"}]}], " ", "-", "\n", " ", RowBox[{"279500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"665750", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"632000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "+", "\n", " ", RowBox[{"3200000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"2800000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"3000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", "\n", " ", RowBox[{"18600", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"51750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"405000", " ", RowBox[{"q", "^", "8"}], " ", "s"}], " ", "+", " ", RowBox[{"21600", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "-", "\n", " ", RowBox[{"122500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"2891250", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"156600", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", "\n", " ", RowBox[{"1569750", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"6943750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"3774000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", "\n", " ", RowBox[{"27100000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"30187500", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"28000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", "\n", " ", RowBox[{"52500000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"60000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"81000", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "-", "\n", " ", RowBox[{"240000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"937500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"3273750", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", "\n", " ", RowBox[{"30406250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"55687500", " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"42187500", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", "\n", " ", RowBox[{"112812500", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"152500000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"75000000", " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", "\n", " ", RowBox[{"4218750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"15156250", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"5906250", " ", RowBox[{"p", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", "\n", " ", RowBox[{"206562500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"107500000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", "\n", " ", RowBox[{"159375000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"612500000", " ", "p", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"135937500", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"s", "^", "4"}]}], " ", "+", "\n", " ", RowBox[{"46875000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"1175781250", " ", "p", " ", "q", " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"292968750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", "\n", " ", RowBox[{"1367187500", " ", "r", " ", RowBox[{"s", "^", "5"}]}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"2", ",", "5"}], "]"}], " ", ":=", "\n", RowBox[{ RowBox[{ RowBox[{"-", "800"}], " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}]}], " ", "-", " ", RowBox[{"5400", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}]}], " ", "+", " ", RowBox[{"6000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", "r"}], " ", "+", " ", RowBox[{"51700", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", "r"}], " ", "+", "\n", " ", RowBox[{"27000", " ", RowBox[{"q", "^", "7"}], " ", "r"}], " ", "-", " ", RowBox[{"10800", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"163250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"285750", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", "\n", " ", RowBox[{"192000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"1000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"800000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "+", "\n", " ", RowBox[{"500000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"10800", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"57500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"67500", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "+", "\n", " ", RowBox[{"32400", " ", RowBox[{"p", "^", "8"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"279000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"131250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "-", "\n", " ", RowBox[{"729000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"4100000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"5343750", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", "\n", " ", RowBox[{"5000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"10000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"10000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", "\n", " ", RowBox[{"641250", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"5812500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"10125000", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", "\n", " ", RowBox[{"7031250", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"20625000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"17500000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", "\n", " ", RowBox[{"12500000", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"843750", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"19375000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{"30000000", " ", RowBox[{"p", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"20312500", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"112500000", " ", "p", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{"183593750", " ", "p", " ", "q", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"292968750", " ", RowBox[{"s", "^", "5"}]}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"3", ",", "0"}], "]"}], " ", ":=", "\n", RowBox[{ RowBox[{"500", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "6"}]}], " ", "+", " ", RowBox[{"9875", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "8"}]}], " ", "+", " ", RowBox[{"42625", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "10"}]}], " ", "-", " ", RowBox[{"35000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "12"}]}], " ", "-", "\n", " ", RowBox[{"4500", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "4"}], " ", "r"}], " ", "-", " ", RowBox[{"108375", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "6"}], " ", "r"}], " ", "-", " ", RowBox[{"516750", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "8"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"1110500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "10"}], " ", "r"}], " ", "+", " ", RowBox[{"2730000", " ", RowBox[{"q", "^", "12"}], " ", "r"}], " ", "+", " ", RowBox[{"10125", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"358250", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"1908625", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"11744250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"43383250", " ", "p", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"313875", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"2074875", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"52094750", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"264567500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"796125", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"92486250", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"757957500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"29354375", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"60970000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"1112462500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"571094375", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"685290000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"2037800000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"2279600000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", "\n", " ", RowBox[{"849000000", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "7"}]}], " ", "-", " ", RowBox[{"1480000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "8"}]}], " ", "+", " ", RowBox[{"13500", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"363000", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"2861250", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"8493750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "9"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"17031250", " ", "p", " ", RowBox[{"q", "^", "11"}], " ", "s"}], " ", "-", " ", RowBox[{"60750", " ", RowBox[{"p", "^", "14"}], " ", "q", " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"2319750", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"22674250", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"74368750", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"170578125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "9"}], " ", "r", " ", "s"}], " ", "+", "\n", " ", RowBox[{"2760750", " ", RowBox[{"p", "^", "12"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"46719000", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"163356375", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"360295625", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"195990625", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"37341750", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"194739375", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"105463125", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"415825000", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"90180000", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"990552500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"3519212500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"1112220000", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"4508750000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"8159500000", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"4356000000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"14615000000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"2160000000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"91125", " ", RowBox[{"p", "^", "15"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"3290625", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"35100000", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"175406250", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"629062500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"910937500", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"5710500", " ", RowBox[{"p", "^", "13"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", "\n", " ", RowBox[{"100423125", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"604743750", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", "\n", " ", RowBox[{"2954843750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"4587578125", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"116194500", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1280716250", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"7401190625", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"11619937500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"952173125", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"6519712500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"10238593750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"29984609375", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"2558300000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"16225000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"64994140625", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"4202250000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"46925000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"28950000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1000000000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"37000000000", " ", "p", " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"48093750", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"673359375", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"2170312500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"2466796875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"647578125", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"597031250", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"7542578125", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", "\n", " ", RowBox[{"41125000000", " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"2175828125", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"7101562500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"100596875000", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"8984687500", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"120070312500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"57343750000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"9500000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"342875000000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"400781250", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"8531250000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"34033203125", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"42724609375", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"6289453125", " ", RowBox[{"p", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"24037109375", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"62626953125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"17299218750", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"108357421875", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"55380859375", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"105648437500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"1204228515625", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"365000000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", "\n", " ", RowBox[{"184375000000", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"32080078125", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"98144531250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", "\n", " ", RowBox[{"93994140625", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"178955078125", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", "\n", " ", RowBox[{"1299804687500", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"332421875000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", "\n", " ", RowBox[{"1195312500000", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"72021484375", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"323486328125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"682373046875", " ", RowBox[{"p", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"2447509765625", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"3011474609375", " ", "p", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"3051757812500", " ", "p", " ", "q", " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", RowBox[{"7629394531250", " ", RowBox[{"s", "^", "8"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"3", ",", "1"}], "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"1500", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "6"}]}], " ", "+", " ", RowBox[{"69625", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "8"}]}], " ", "+", " ", RowBox[{"590375", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "10"}]}], " ", "+", " ", RowBox[{"1035000", " ", RowBox[{"q", "^", "12"}]}], " ", "-", " ", "\n", " ", RowBox[{"13500", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "4"}], " ", "r"}], " ", "-", " ", RowBox[{"760625", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "6"}], " ", "r"}], " ", "-", " ", RowBox[{"7904500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "8"}], " ", "r"}], " ", "-", " ", "\n", " ", RowBox[{"18169250", " ", "p", " ", RowBox[{"q", "^", "10"}], " ", "r"}], " ", "+", " ", RowBox[{"30375", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"2628625", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"37879000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"121367500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"2699250", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", "\n", " ", RowBox[{"76776875", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"403583125", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"78865625", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"60907500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"735291250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"781142500", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"558270000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"2150725000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"2015400000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", "\n", " ", RowBox[{"1181000000", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"2220000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", RowBox[{"40500", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"1376500", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"9953125", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"9765625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "9"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"182250", " ", RowBox[{"p", "^", "12"}], " ", "q", " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"8859000", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"82854500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"71511250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"273631250", " ", RowBox[{"q", "^", "9"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"10233000", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"179627500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"25164375", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"2927290625", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"171305000", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"544768750", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"7583437500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", "\n", " ", RowBox[{"1139860000", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"6489375000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"9625375000", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"1838000000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", "\n", " ", RowBox[{"19835000000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"3240000000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"273375", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", "\n", " ", RowBox[{"9753750", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"82575000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"202265625", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"556093750", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"11552625", " ", RowBox[{"p", "^", "11"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"115813125", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"630590625", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1347015625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"157578750", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"689206250", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"4299609375", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"23896171875", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1022437500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"6648125000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", "\n", " ", RowBox[{"52895312500", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"4401750000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"26500000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"22125000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1500000000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"55500000000", " ", "p", " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"137109375", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"1955937500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"6790234375", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"16996093750", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{"2146218750", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"6570312500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"39918750000", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"7673281250", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"52000000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"50796875000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"18750000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"399875000000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"780468750", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"14455078125", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"10048828125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"15113671875", " ", RowBox[{"p", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"39298828125", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"52138671875", " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"45964843750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"914414062500", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"1953125000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"334375000000", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"149169921875", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"459716796875", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"325585937500", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"1462890625000", " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", "\n", " ", RowBox[{"296630859375", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"1324462890625", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"307617187500", " ", "p", " ", "r", " ", RowBox[{"s", "^", "6"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"3", ",", "2"}], "]"}], " ", ":=", "\n", RowBox[{ RowBox[{ RowBox[{"-", "20750"}], " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "6"}]}], " ", "-", " ", RowBox[{"290125", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "8"}]}], " ", "-", " ", RowBox[{"993000", " ", "p", " ", RowBox[{"q", "^", "10"}]}], " ", "+", " ", RowBox[{"146125", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "4"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"2721500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "6"}], " ", "r"}], " ", "+", " ", RowBox[{"11833750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "8"}], " ", "r"}], " ", "-", " ", RowBox[{"237375", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"8167500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"54605625", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"23802500", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"8927500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"131184375", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"254695000", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"121561250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"728003125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"702550000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"597312500", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"1202500000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"194625", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"1568875", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"9685625", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"74662500", " ", RowBox[{"q", "^", "9"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"327375", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"1280000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"123703750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"850121875", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"7436250", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"164820000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"2336659375", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"32202500", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", "\n", " ", RowBox[{"2429765625", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"4318609375", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", "\n", " ", RowBox[{"148000000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"9902812500", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"1755000000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"1154250", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"36821250", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"372825000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1170921875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"38913750", " ", RowBox[{"p", "^", "9"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"797071875", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"2848984375", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"7651406250", " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"415068750", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"3151328125", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"17696875000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"725968750", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"5295312500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"8581250000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"812500000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"30062500000", " ", "p", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"110109375", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"1976562500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"6329296875", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{"2256328125", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"8554687500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"12947265625", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"7984375000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"167039062500", " ", "p", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"1181250000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", "\n", " ", RowBox[{"17873046875", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"20449218750", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"16265625000", " ", RowBox[{"p", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"260869140625", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"21025390625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"207617187500", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"207177734375", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"615478515625", " ", "q", " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"301513671875", " ", "p", " ", RowBox[{"s", "^", "6"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"3", ",", "3"}], "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"53125", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "6"}]}], " ", "+", " ", RowBox[{"425000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "8"}]}], " ", "-", " ", RowBox[{"394375", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", "r"}], " ", "-", " ", RowBox[{"4301875", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", "r"}], " ", "-", " ", "\n", " ", RowBox[{"3225000", " ", RowBox[{"q", "^", "8"}], " ", "r"}], " ", "+", " ", RowBox[{"851250", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"16910625", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"44210000", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"20474375", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"147190625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"163975000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"156812500", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"323750000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"99375", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"6395000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"49243750", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", "s"}], " ", "-", "\n", " ", RowBox[{"1164375", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"4465625", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"205546875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "+", "\n", " ", RowBox[{"12163750", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"315546875", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"946453125", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", "\n", " ", RowBox[{"23500000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"2313437500", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"472500000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", "\n", " ", RowBox[{"1316250", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"22715625", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"206953125", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", "\n", " ", RowBox[{"1220000000", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"20953125", " ", RowBox[{"p", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"277656250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", "\n", " ", RowBox[{"3317187500", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"293734375", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", "\n", " ", RowBox[{"1351562500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"2278125000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", "\n", " ", RowBox[{"218750000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"8093750000", " ", "p", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"9609375", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{"240234375", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"2310546875", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"1171875000", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", "\n", " ", RowBox[{"33460937500", " ", "p", " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"2185546875", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"32578125000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", "\n", " ", RowBox[{"8544921875", " ", RowBox[{"p", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"58398437500", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"114013671875", " ", "q", " ", RowBox[{"s", "^", "5"}]}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"3", ",", "4"}], "]"}], " ", ":=", "\n", RowBox[{ RowBox[{ RowBox[{"-", "16250"}], " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}]}], " ", "-", " ", RowBox[{"191875", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}]}], " ", "-", " ", RowBox[{"495000", " ", RowBox[{"q", "^", "8"}]}], " ", "+", " ", RowBox[{"73125", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", "r"}], " ", "+", "\n", " ", RowBox[{"1437500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", "r"}], " ", "+", " ", RowBox[{"5866250", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", "r"}], " ", "-", " ", RowBox[{"2043125", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", "\n", " ", RowBox[{"17218750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"19106250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"34015625", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", "\n", " ", RowBox[{"69375000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"219375", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", "s"}], " ", "-", " ", RowBox[{"2846250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", "s"}], " ", "-", "\n", " ", RowBox[{"8021875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"3420000", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"1640625", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"152468750", " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"3062500", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"381171875", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"101250000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"2784375", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"43515625", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"115625000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"48140625", " ", RowBox[{"p", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"307421875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"25781250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"46875000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1734375000", " ", "p", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"128906250", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"339843750", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"4583984375", " ", "p", " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"2236328125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"12255859375", " ", "r", " ", RowBox[{"s", "^", "4"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"3", ",", "5"}], "]"}], " ", ":=", "\n", RowBox[{ RowBox[{"31875", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}]}], " ", "+", " ", RowBox[{"255000", " ", "p", " ", RowBox[{"q", "^", "6"}]}], " ", "-", " ", RowBox[{"82500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", "r"}], " ", "-", " ", RowBox[{"1106250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", "r"}], " ", "+", "\n", " ", RowBox[{"1653125", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"5187500", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"11562500", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", "\n", " ", RowBox[{"118125", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", "s"}], " ", "-", " ", RowBox[{"3593750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"23812500", " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "+", "\n", " ", RowBox[{"4656250", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"67109375", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"16875000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", "\n", " ", RowBox[{"984375", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"19531250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"37890625", " ", RowBox[{"p", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", "\n", " ", RowBox[{"7812500", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"289062500", " ", "p", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"529296875", " ", "p", " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{"2343750000", " ", RowBox[{"s", "^", "4"}]}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"4", ",", "0"}], "]"}], " ", ":=", "\n", RowBox[{ RowBox[{"600", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "10"}]}], " ", "+", " ", RowBox[{"13850", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "12"}]}], " ", "+", " ", RowBox[{"106150", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "14"}]}], " ", "+", " ", RowBox[{"270000", " ", "p", " ", RowBox[{"q", "^", "16"}]}], " ", "-", "\n", " ", RowBox[{"9300", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "8"}], " ", "r"}], " ", "-", " ", RowBox[{"234075", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "10"}], " ", "r"}], " ", "-", " ", RowBox[{"1942825", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "12"}], " ", "r"}], " ", "-", "\n", " ", RowBox[{"5319900", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "14"}], " ", "r"}], " ", "+", " ", RowBox[{"52050", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"1481025", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", "\n", " ", RowBox[{"13594450", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"40062750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "12"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"3569400", " ", RowBox[{"q", "^", "14"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", "\n", " ", RowBox[{"122175", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"4260350", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"45052375", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", "\n", " ", RowBox[{"142634900", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"54186350", " ", "p", " ", RowBox[{"q", "^", "12"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"97200", " ", RowBox[{"p", "^", "14"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", "\n", " ", RowBox[{"5284225", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"70389525", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"232732850", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", "\n", " ", RowBox[{"318849400", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"2046000", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"43874125", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", "\n", " ", RowBox[{"107411850", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"948310700", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"34763575", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", "\n", " ", RowBox[{"5915600", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"115887800", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"1649542400", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", "\n", " ", RowBox[{"224468875", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"120252800", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", RowBox[{"1779902000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "7"}]}], " ", "-", "\n", " ", RowBox[{"288250000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "7"}]}], " ", "-", " ", RowBox[{"915200000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "8"}]}], " ", "-", " ", RowBox[{"1164000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "8"}]}], " ", "-", "\n", " ", RowBox[{"444200000", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "8"}]}], " ", "+", " ", RowBox[{"2502400000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "9"}]}], " ", "+", " ", RowBox[{"1984000000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "9"}]}], " ", "-", "\n", " ", RowBox[{"2880000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "10"}]}], " ", "+", " ", RowBox[{"20700", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"551475", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "9"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"5194875", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "11"}], " ", "s"}], " ", "+", " ", RowBox[{"18985000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "13"}], " ", "s"}], " ", "+", " ", RowBox[{"16875000", " ", RowBox[{"q", "^", "15"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"218700", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"6606475", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"69770850", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "9"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"285325500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "11"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"292005000", " ", "p", " ", RowBox[{"q", "^", "13"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"694575", " ", RowBox[{"p", "^", "14"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"26187750", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"328992825", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"1573292400", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"1930043875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "11"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"583200", " ", RowBox[{"p", "^", "15"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"37263225", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"638579425", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"3920212225", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"6327336875", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"440969375", " ", RowBox[{"q", "^", "11"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"13446000", " ", RowBox[{"p", "^", "13"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"462330325", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"4509088275", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"11709795625", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"3579565625", " ", "p", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"85033600", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"2136801600", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"12221575800", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"9431044375", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"10643200", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"4565594000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"1778590000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"4842175000", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"712320000", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"16182000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "-", " ", RowBox[{"21918000000", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"742400000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "8"}], " ", "s"}], " ", "+", " ", RowBox[{"31040000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "8"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"1280000000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "9"}], " ", "s"}], " ", "+", " ", RowBox[{"4800000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "9"}], " ", "s"}], " ", "+", " ", RowBox[{"230850", " ", RowBox[{"p", "^", "14"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"7373250", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"85045625", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"399140625", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"565031250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "12"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"1257525", " ", RowBox[{"p", "^", "15"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"52728975", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"743466375", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", "\n", " ", RowBox[{"4144915000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"7102690625", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "10"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1389937500", " ", RowBox[{"q", "^", "12"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"874800", " ", RowBox[{"p", "^", "16"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"89851275", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1897236775", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"14144163000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"31942921875", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"13305118750", " ", "p", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"23004000", " ", RowBox[{"p", "^", "14"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1450715475", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"19427105000", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"70634028750", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"47854218750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"204710400", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"10875135000", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"83618806250", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"62744500000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"19806718750", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"757094800", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"37718030000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"22479500000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"91556093750", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"2306320000", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"55539600000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"112851250000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"10720000000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"64720000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"59925000000", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"28000000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"28000000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"24000000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "9"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"820125", " ", RowBox[{"p", "^", "16"}], " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"36804375", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"552225000", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"3357593750", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"7146562500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"3851562500", " ", "p", " ", RowBox[{"q", "^", "11"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"92400750", " ", RowBox[{"p", "^", "14"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"2350175625", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"19470640625", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"52820593750", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"45447734375", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "9"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"1824363000", " ", RowBox[{"p", "^", "12"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"31435234375", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"141717537500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"228370781250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{"34610078125", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"17591825625", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"188927187500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"502088984375", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"187849296875", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"75577750000", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"342800000000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"295384296875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"107681250000", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"53330000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"271586875000", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"26410000000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"188200000000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"92000000000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"120000000000", " ", "q", " ", RowBox[{"r", "^", "8"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"47840625", " ", RowBox[{"p", "^", "15"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"1150453125", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"9229453125", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"24954687500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"22978515625", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"1367187500", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"1193737500", " ", RowBox[{"p", "^", "13"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"20817843750", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"98640000000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"225767187500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"74707031250", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"13431318750", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"188709843750", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"875157656250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"593812890625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"69869296875", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"854811093750", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"1730658203125", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"570867187500", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"162075625000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"1536375000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"765156250000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"165988750000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"728968750000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"121500000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"1039375000000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"100000000000", " ", "p", " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"379687500", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"11607421875", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"20830078125", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"33691406250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"41491406250", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"419054687500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", "\n", " ", RowBox[{"129511718750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"311767578125", " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"620116015625", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"1154687500000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"36455078125", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"2265953125000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"1509521484375", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"2530468750000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"3259765625000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"93750000000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"23730468750", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"243603515625", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"341552734375", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"12207031250", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"357099609375", " ", RowBox[{"p", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"298193359375", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"406738281250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"1615683593750", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"558593750000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"2811035156250", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"2960937500000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"3802246093750", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"2347656250000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"671875000000", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"651855468750", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", RowBox[{"1458740234375", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", "\n", " ", RowBox[{"152587890625", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "7"}]}], " ", "+", " ", RowBox[{"1628417968750", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "7"}]}], " ", "+", " ", "\n", " ", RowBox[{"3948974609375", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", RowBox[{"916748046875", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "7"}]}], " ", "+", " ", "\n", " ", RowBox[{"1611328125000", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "7"}]}], " ", "+", " ", RowBox[{"640869140625", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"s", "^", "8"}]}], " ", "+", " ", "\n", " ", RowBox[{"1068115234375", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "8"}]}], " ", "-", " ", RowBox[{"2044677734375", " ", RowBox[{"p", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "8"}]}], " ", "-", " ", "\n", " ", RowBox[{"3204345703125", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "8"}]}], " ", "+", " ", RowBox[{"1739501953125", " ", "p", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "8"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"4", ",", "1"}], "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{ RowBox[{"-", "600"}], " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "8"}]}], " ", "-", " ", RowBox[{"14050", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "10"}]}], " ", "-", " ", RowBox[{"109100", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "12"}]}], " ", "-", " ", RowBox[{"280800", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "14"}]}], " ", "+", " ", "\n", " ", RowBox[{"7200", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "6"}], " ", "r"}], " ", "+", " ", RowBox[{"188700", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "8"}], " ", "r"}], " ", "+", " ", RowBox[{"1621725", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "10"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"4577075", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "12"}], " ", "r"}], " ", "+", " ", RowBox[{"5400", " ", RowBox[{"q", "^", "14"}], " ", "r"}], " ", "-", " ", RowBox[{"28350", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", "\n", " ", RowBox[{"910600", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"9237975", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"30718900", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"5575950", " ", "p", " ", RowBox[{"q", "^", "12"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"36450", " ", RowBox[{"p", "^", "14"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"1848125", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"25137775", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"109591450", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"70627650", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"1317150", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"32857100", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"219125575", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"327565875", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"13011875", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"16484150", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"222242250", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"642173750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"101263750", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"79345000", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"433180000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"93731250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"74300000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}]}], " ", "-", " ", RowBox[{"1057900000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "7"}]}], " ", "-", " ", RowBox[{"591175000", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", "\n", " ", RowBox[{"1891600000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "8"}]}], " ", "+", " ", RowBox[{"2796000000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "8"}]}], " ", "-", " ", RowBox[{"4320000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "9"}]}], " ", "-", " ", "\n", " ", RowBox[{"16200", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"359500", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "7"}], " ", "s"}], " ", "-", " ", RowBox[{"2603825", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "9"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"4590375", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "11"}], " ", "s"}], " ", "+", " ", RowBox[{"12352500", " ", "p", " ", RowBox[{"q", "^", "13"}], " ", "s"}], " ", "+", " ", RowBox[{"121500", " ", RowBox[{"p", "^", "14"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"3227400", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"27301725", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"59480975", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "9"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"137308875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "11"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"218700", " ", RowBox[{"p", "^", "15"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"8903925", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"100918225", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"325291300", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"365705000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"94342500", " ", RowBox[{"q", "^", "11"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"7632900", " ", RowBox[{"p", "^", "13"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"162995400", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"974558975", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"930991250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"495368750", " ", "p", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"97344900", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"1406739250", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"5572526250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"1903987500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"678550000", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"8176215000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"18082050000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"5435843750", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"2979800000", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"29163500000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"27417500000", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"6282400000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "+", "\n", " ", RowBox[{"48690000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "-", " ", RowBox[{"2880000000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "8"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"7200000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "8"}], " ", "s"}], " ", "-", " ", RowBox[{"109350", " ", RowBox[{"p", "^", "15"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"2405700", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"16125250", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"4930000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"201150000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"243000000", " ", RowBox[{"q", "^", "12"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"328050", " ", RowBox[{"p", "^", "16"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"10552275", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"88019100", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"4208625", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1920390625", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1759537500", " ", "p", " ", RowBox[{"q", "^", "10"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"11955600", " ", RowBox[{"p", "^", "14"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"196375050", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"555196250", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"4213270000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"157468750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"162656100", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"1880870000", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"753684375", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"25423062500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"14142031250", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1251948750", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"12524475000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"18067656250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"60531875000", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"6827725000", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"57157000000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"75844531250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"24452500000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"144950000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"82109375000", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"46950000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"60000000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"36000000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1549125", " ", RowBox[{"p", "^", "14"}], " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"51873750", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"599781250", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"2421156250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"1693515625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"104884875", " ", RowBox[{"p", "^", "12"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"1937437500", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"11461053125", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"10299375000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"10551250000", " ", RowBox[{"q", "^", "9"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"1336263750", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"23737250000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{"57136718750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"8288906250", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"10907218750", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"160615000000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"111134687500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"46743125000", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"570509375000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"274839843750", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"73312500000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"145437500000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"8750000000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"180000000000", " ", "q", " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"15946875", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"1265625", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"3282343750", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"38241406250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"40136718750", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"113146875", " ", RowBox[{"p", "^", "11"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"2302734375", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"68450156250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"177376562500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"3164062500", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"14392890625", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"543781250000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"319769531250", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"21048281250", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"240687500000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"228164062500", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"23062500000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"300410156250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"93437500000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"1141015625000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"187500000000", " ", "p", " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"1761328125", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"3177734375", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"60019531250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"108398437500", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"24106640625", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"429589843750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"410371093750", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"23582031250", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"202441406250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"383203125000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"2232910156250", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"1500000000000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"13710937500", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"202832031250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"531738281250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"73330078125", " ", RowBox[{"p", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "-", "\n", " ", RowBox[{"3906250000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"1275878906250", " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"121093750000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"3308593750000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"18066406250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"244140625000", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"327148437500", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"s", "^", "7"}]}], " ", "+", " ", RowBox[{"1672363281250", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "7"}]}], " ", "+", " ", "\n", " ", RowBox[{"446777343750", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "7"}]}], " ", "+", " ", RowBox[{"1232910156250", " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", "\n", " ", RowBox[{"274658203125", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"s", "^", "8"}]}], " ", "-", " ", RowBox[{"1068115234375", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "8"}]}], " ", "-", " ", RowBox[{"61035156250", " ", "p", " ", "r", " ", RowBox[{"s", "^", "8"}]}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"4", ",", "2"}], "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"200", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "8"}]}], " ", "+", " ", RowBox[{"7550", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "10"}]}], " ", "+", " ", RowBox[{"78650", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "12"}]}], " ", "+", " ", RowBox[{"248400", " ", RowBox[{"q", "^", "14"}]}], " ", "-", " ", "\n", " ", RowBox[{"4800", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "6"}], " ", "r"}], " ", "-", " ", RowBox[{"164300", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "8"}], " ", "r"}], " ", "-", " ", RowBox[{"1709575", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "10"}], " ", "r"}], " ", "-", " ", "\n", " ", RowBox[{"5566500", " ", "p", " ", RowBox[{"q", "^", "12"}], " ", "r"}], " ", "+", " ", RowBox[{"31050", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"1116175", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"12674650", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"45333850", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"60750", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"2872725", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"40403050", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"173564375", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"11242250", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"2174100", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"54010000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"331074875", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"114173750", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"24858500", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"300875000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"319430625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"69810000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"23900000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"294662500", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"524200000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", "\n", " ", RowBox[{"1432000000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "7"}]}], " ", "-", " ", RowBox[{"2340000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "8"}]}], " ", "+", " ", RowBox[{"5400", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"310400", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"3591725", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "9"}], " ", "s"}], " ", "+", " ", RowBox[{"11556750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "11"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"105300", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"4234650", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"49928875", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"174078125", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "9"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"18000000", " ", RowBox[{"q", "^", "11"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"364500", " ", RowBox[{"p", "^", "13"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"15763050", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"220187400", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"929609375", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"43653125", " ", "p", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"13427100", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", "\n", " ", RowBox[{"346066250", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"2287673375", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"1403903125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"184586000", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"2983460000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"8725818750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"2527734375", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"1284480000", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"13138250000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"14001625000", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"4224800000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"27460000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"3760000000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"3900000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"36450", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"2765475", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"34027625", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"97375000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"88275000", " ", "p", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"546750", " ", RowBox[{"p", "^", "14"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"21961125", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"273059375", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"761562500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"1869656250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"20545650", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"473934375", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1758053125", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"8743359375", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"4154375000", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"296559000", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"4065056250", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"186328125", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"19419453125", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"2326262500", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"21189375000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"26301953125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"10513250000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"69937500000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"42257812500", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"23375000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"40750000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"19500000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"4009500", " ", RowBox[{"p", "^", "12"}], " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"36140625", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"335459375", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"2695312500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"1486250000", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"102515625", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"4006812500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"27589609375", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"20195312500", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", "\n", " ", RowBox[{"2792812500", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"44115156250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"72609453125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"18752500000", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"218140625000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"109940234375", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"21893750000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"65187500000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"31000000000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"97500000000", " ", "q", " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"86568750", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"1955390625", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"8960781250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"1357812500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"1657968750", " ", RowBox[{"p", "^", "9"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"10467187500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"55292968750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"60683593750", " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"11473593750", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"123281250000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"164912109375", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"13150000000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"190751953125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"61875000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"467773437500", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"118750000000", " ", "p", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"7583203125", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"54638671875", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"39423828125", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"32392578125", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"278515625000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"298339843750", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"560791015625", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"720703125000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"19687500000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"159667968750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"72265625000", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"116699218750", " ", RowBox[{"p", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"924072265625", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"156005859375", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"112304687500", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"349121093750", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"s", "^", "7"}]}], " ", "+", " ", RowBox[{"396728515625", " ", "q", " ", "r", " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", RowBox[{"213623046875", " ", "p", " ", RowBox[{"s", "^", "8"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"4", ",", "3"}], "]"}], " ", ":=", "\n", RowBox[{ RowBox[{ RowBox[{"-", "600"}], " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "6"}]}], " ", "-", " ", RowBox[{"18450", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "8"}]}], " ", "-", " ", RowBox[{"174000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "10"}]}], " ", "-", " ", RowBox[{"518400", " ", "p", " ", RowBox[{"q", "^", "12"}]}], " ", "+", " ", "\n", " ", RowBox[{"5400", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "4"}], " ", "r"}], " ", "+", " ", RowBox[{"197550", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "6"}], " ", "r"}], " ", "+", " ", RowBox[{"2147775", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "8"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"7219800", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "10"}], " ", "r"}], " ", "-", " ", RowBox[{"12150", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"662200", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"9274775", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"38330625", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"5508000", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"656550", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"16233750", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"97335875", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"58271250", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"9845500", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"119464375", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"194431875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"49465000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"166000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"80793750", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"54400000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"377750000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"630000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}]}], " ", "-", " ", RowBox[{"16200", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"459300", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"4207225", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "7"}], " ", "s"}], " ", "-", " ", RowBox[{"10827500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "9"}], " ", "s"}], " ", "+", " ", RowBox[{"13635000", " ", RowBox[{"q", "^", "11"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"72900", " ", RowBox[{"p", "^", "13"}], " ", "q", " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"2877300", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"33239700", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"107080625", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"114975000", " ", "p", " ", RowBox[{"q", "^", "9"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"3601800", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"75214375", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"387073250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"55540625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"53793000", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"687176875", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"1670018750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"665234375", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"391570000", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"3420125000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"3609625000", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"1365600000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"7236250000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"1220000000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"1050000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"109350", " ", RowBox[{"p", "^", "14"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"3065850", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"26908125", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"44606875", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"269812500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"5200200", " ", RowBox[{"p", "^", "12"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"81826875", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"155378125", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1936203125", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"998437500", " ", RowBox[{"q", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"77145750", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"745528125", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"683437500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", "\n", " ", RowBox[{"4083359375", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"593287500", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"4799375000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"4167578125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"2731125000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"18668750000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"10480468750", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"6200000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"11750000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"5250000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"26527500", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"526031250", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"3160703125", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"2650312500", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"448031250", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"6682968750", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"11642812500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"2553203125", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"37234375000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"21871484375", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"2803125000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"10796875000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"16656250000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"26250000000", " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"75937500", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"704062500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"8363281250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"10398437500", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"197578125", " ", RowBox[{"p", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"16441406250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"24277343750", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"5716015625", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"31728515625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"27031250000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"92285156250", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"33593750000", " ", "p", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"10394531250", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"38037109375", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"48144531250", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"74462890625", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"121093750000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"2197265625", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"92529296875", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"15380859375", " ", RowBox[{"p", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"31738281250", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"54931640625", " ", "q", " ", RowBox[{"s", "^", "7"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"4", ",", "4"}], "]"}], " ", ":=", "\n", RowBox[{ RowBox[{"200", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "6"}]}], " ", "+", " ", RowBox[{"2950", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "8"}]}], " ", "+", " ", RowBox[{"10800", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "10"}]}], " ", "-", " ", RowBox[{"1800", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", "r"}], " ", "-", " ", "\n", " ", RowBox[{"49650", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", "r"}], " ", "-", " ", RowBox[{"403375", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", "r"}], " ", "-", " ", RowBox[{"999000", " ", RowBox[{"q", "^", "10"}], " ", "r"}], " ", "+", " ", RowBox[{"4050", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"236625", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"3109500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"11463750", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"331500", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"7818125", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"41411250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"4782500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"47475000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"16728125", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"8700000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"81750000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"135000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"5400", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"144200", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"939375", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "7"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"1012500", " ", "p", " ", RowBox[{"q", "^", "9"}], " ", "s"}], " ", "-", " ", RowBox[{"24300", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"1169250", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"14027250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"44446875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"2011500", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"49330625", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"272009375", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"104062500", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"34660000", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"455062500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"625906250", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"210200000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"1298750000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"240000000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"225000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"36450", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"1231875", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"10712500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"21718750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"16875000", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"2814750", " ", RowBox[{"p", "^", "10"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"67612500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"345156250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"283125000", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"51300000", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"734531250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1267187500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"384312500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"3912500000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1822265625", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1112500000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"2437500000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"1125000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"72578125", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"189296875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"127265625", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"1415625000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"1229687500", " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"1448437500", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"2218750000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", "\n", " ", RowBox[{"4031250000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"5625000000", " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"132890625", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"529296875", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"175781250", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"401953125", " ", RowBox[{"p", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"4482421875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"4140625000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"10498046875", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"7031250000", " ", "p", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"1220703125", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"1953125000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"14160156250", " ", "p", " ", "q", " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"1708984375", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"3662109375", " ", "r", " ", RowBox[{"s", "^", "6"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"b", "[", RowBox[{"4", ",", "5"}], "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{ RowBox[{"-", "4600"}], " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}]}], " ", "-", " ", RowBox[{"67850", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}]}], " ", "-", " ", RowBox[{"248400", " ", RowBox[{"q", "^", "10"}]}], " ", "+", " ", RowBox[{"38900", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"679575", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", "r"}], " ", "+", " ", RowBox[{"2866500", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", "r"}], " ", "-", " ", RowBox[{"81900", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"2009750", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"10783750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"1478750", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"14165625", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"2743750", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"5450000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"12687500", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"22500000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"101700", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"1700975", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"7061250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"423900", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", "r", " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"9292375", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"50438750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"20475000", " ", RowBox[{"q", "^", "7"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"7852500", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"87765625", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"121609375", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"47700000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"264687500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"65000000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"37500000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"534600", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"10344375", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"54859375", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"40312500", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"10158750", " ", RowBox[{"p", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"117778125", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"192421875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"70593750", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"685312500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"334375000", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"193750000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"500000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"187500000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"8437500", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"159218750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"220625000", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"353828125", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"412500000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"1023437500", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"937500000", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"206015625", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"701171875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"998046875", " ", RowBox[{"p", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"1308593750", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"1367187500", " ", "p", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"1708984375", " ", "p", " ", "q", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"976562500", " ", RowBox[{"s", "^", "6"}]}]}]}], " ", ";"}], "\n", "\n", "\n", RowBox[{ RowBox[{ RowBox[{"T", "[", "1", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"-", RowBox[{"(", RowBox[{ RowBox[{"b", "[", RowBox[{"1", ",", "0"}], "]"}], " ", "+", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"1", ",", "1"}], "]"}], " ", "theta"}], " ", "+", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"1", ",", "2"}], "]"}], " ", RowBox[{"theta", "^", "2"}]}], " ", "+", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"1", ",", "3"}], "]"}], " ", RowBox[{"theta", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"1", ",", "4"}], "]"}], " ", RowBox[{"theta", "^", "4"}]}], " ", "+", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"1", ",", "5"}], "]"}], " ", RowBox[{"theta", "^", "5"}]}]}], " ", ")"}]}], "/", RowBox[{"(", RowBox[{"2", " ", "F"}], ")"}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{ RowBox[{"T", "[", "2", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"b", "[", RowBox[{"2", ",", "0"}], "]"}], " ", "+", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"2", ",", "1"}], "]"}], " ", "theta"}], " ", "+", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"2", ",", "2"}], "]"}], " ", RowBox[{"theta", "^", "2"}]}], " ", "+", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"2", ",", "3"}], "]"}], " ", RowBox[{"theta", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"2", ",", "4"}], "]"}], " ", RowBox[{"theta", "^", "4"}]}], " ", "+", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"2", ",", "5"}], "]"}], " ", RowBox[{"theta", "^", "5"}]}]}], ")"}], "/", RowBox[{"(", RowBox[{"2", " ", "d", " ", "F"}], ")"}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{ RowBox[{"T", "[", "3", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"b", "[", RowBox[{"3", ",", "0"}], "]"}], " ", "+", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"3", ",", "1"}], "]"}], " ", "theta"}], " ", "+", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"3", ",", "2"}], "]"}], " ", RowBox[{"theta", "^", "2"}]}], " ", "+", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"3", ",", "3"}], "]"}], " ", RowBox[{"theta", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"3", ",", "4"}], "]"}], " ", RowBox[{"theta", "^", "4"}]}], " ", "+", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"3", ",", "5"}], "]"}], " ", RowBox[{"theta", "^", "5"}]}]}], ")"}], "/", RowBox[{"(", RowBox[{"2", " ", "F"}], ")"}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{ RowBox[{"T", "[", "4", "]"}], " ", ":=", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"b", "[", RowBox[{"4", ",", "0"}], "]"}], " ", "+", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"4", ",", "1"}], "]"}], " ", "theta"}], " ", "+", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"4", ",", "2"}], "]"}], " ", RowBox[{"theta", "^", "2"}]}], " ", "+", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"4", ",", "3"}], "]"}], " ", RowBox[{"theta", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"4", ",", "4"}], "]"}], " ", RowBox[{"theta", "^", "4"}]}], " ", "+", " ", RowBox[{ RowBox[{"b", "[", RowBox[{"4", ",", "5"}], "]"}], " ", RowBox[{"theta", "^", "5"}]}]}], ")"}], "/", RowBox[{"(", RowBox[{"2", " ", "d", " ", "F"}], ")"}]}]}], " ", ";"}], "\n", "\n", "\n", "\n", RowBox[{ RowBox[{ RowBox[{"a", "[", "0", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{ RowBox[{"-", "100"}], " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "7"}]}], " ", "-", " ", RowBox[{"2175", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "9"}]}], " ", "-", " ", RowBox[{"10500", " ", "p", " ", RowBox[{"q", "^", "11"}]}], " ", "+", " ", RowBox[{"1100", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "5"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"27975", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "7"}], " ", "r"}], " ", "+", " ", RowBox[{"152950", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "9"}], " ", "r"}], " ", "-", " ", RowBox[{"4125", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"128875", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"830525", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"59450", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"5400", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"243800", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"2082650", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"333925", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"139200", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"2406000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"122600", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"1254400", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"3776000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"1832000", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"4736000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"6720000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"6400000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "7"}]}], " ", "-", " ", "\n", " ", RowBox[{"900", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"37400", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"281625", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", "s"}], " ", "-", " ", RowBox[{"435000", " ", RowBox[{"q", "^", "10"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"6750", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"322300", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"2718575", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"4214250", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"16200", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"859275", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"8925475", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"14427875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"453600", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"10038400", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"17397500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"11333125", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"4451200", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"15850000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"34000000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"17984000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"10000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"25600000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"8000000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"6075", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"83250", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1282500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"2862500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"724275", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"9807250", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"28374375", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"22212500", " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"8982000", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"39600000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"61746875", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"1010000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"78000000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"30000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"80000000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"759375", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"9787500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"39062500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"52343750", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"12301875", " ", RowBox[{"p", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"98175000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"225078125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"54900000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"310000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"7890625", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"51250000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"420000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"110000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"200000000", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"2109375", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"21093750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"89843750", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"182343750", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"733203125", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"196875000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"1125000000", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"158203125", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"566406250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"101562500", " ", RowBox[{"p", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"1669921875", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"1250000000", " ", "p", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"1220703125", " ", "p", " ", "q", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"6103515625", " ", RowBox[{"s", "^", "7"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"a", "[", "1", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"1000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "7"}]}], " ", "+", " ", RowBox[{"7250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "9"}]}], " ", "-", " ", RowBox[{"10800", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", "r"}], " ", "-", " ", RowBox[{"96900", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", "r"}], " ", "-", " ", "\n", " ", RowBox[{"52500", " ", RowBox[{"q", "^", "9"}], " ", "r"}], " ", "+", " ", RowBox[{"37400", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"470850", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"640600", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"39600", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"983600", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"2848100", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"814400", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"6076000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"2308000", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"5024000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"9680000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"9600000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"13800", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"94650", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"26500", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", "s"}], " ", "-", " ", RowBox[{"86400", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"816500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"257500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"91800", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"1853700", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"630000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"8971250", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"2071200", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"7240000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"29375000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"14416000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"5200000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"30400000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"12000000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"64800", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"567000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"1655000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"6987500", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"337500", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"8462500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"5812500", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"24930000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"69125000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"103500000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"30000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"90000000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"708750", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"5400000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"8906250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"18562500", " ", RowBox[{"p", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"625000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"29687500", " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"75000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"416250000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"60000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"300000000", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"71718750", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"189062500", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"210937500", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"1187500000", " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"187500000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"800781250", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"390625000", " ", "p", " ", "r", " ", RowBox[{"s", "^", "5"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"a", "[", "2", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{ RowBox[{"-", "500"}], " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}]}], " ", "-", " ", RowBox[{"6350", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}]}], " ", "-", " ", RowBox[{"19800", " ", RowBox[{"q", "^", "9"}]}], " ", "+", " ", RowBox[{"3750", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", "r"}], " ", "+", " ", RowBox[{"65100", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"264950", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", "r"}], " ", "-", " ", RowBox[{"6750", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"209050", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1217250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"219000", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"2510000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"1098500", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"2068000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"5060000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"5200000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"6750", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"96350", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"346000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"20250", " ", RowBox[{"p", "^", "9"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"459900", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"1828750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"2930000", " ", RowBox[{"q", "^", "6"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"594000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"4301250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"10906250", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"5252000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"1450000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"12800000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"6500000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"74250", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1418750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"5956250", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"4297500", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"29906250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"31500000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"12500000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"35000000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1350000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"6093750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"17500000", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"7031250", " ", RowBox[{"p", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"127812500", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"18750000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"162500000", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"107812500", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"460937500", " ", "q", " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"214843750", " ", "p", " ", RowBox[{"s", "^", "5"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"a", "[", "3", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"1950", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}]}], " ", "+", " ", RowBox[{"14100", " ", "p", " ", RowBox[{"q", "^", "7"}]}], " ", "-", " ", RowBox[{"14350", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", "r"}], " ", "-", " ", RowBox[{"125600", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"27900", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"402250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"288250", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"436000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"1345000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"1400000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"9450", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"1250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"465000", " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"49950", " ", RowBox[{"p", "^", "7"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"302500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"1718750", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"834000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"437500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"3100000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"1750000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"292500", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"1937500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"3343750", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1875000", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"8125000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1406250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"12343750", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"5312500", " ", RowBox[{"p", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"43750000", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"74218750", " ", "q", " ", RowBox[{"s", "^", "4"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"a", "[", "4", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{ RowBox[{"-", "300"}], " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}]}], " ", "-", " ", RowBox[{"2150", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}]}], " ", "+", " ", RowBox[{"1350", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", "r"}], " ", "+", " ", RowBox[{"21500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", "r"}], " ", "+", " ", RowBox[{"61500", " ", RowBox[{"q", "^", "5"}], " ", "r"}], " ", "-", " ", "\n", " ", RowBox[{"42000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"290000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"300000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"4050", " ", RowBox[{"p", "^", "7"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"45000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"125000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"108000", " ", RowBox[{"p", "^", "5"}], " ", "r", " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"643750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"700000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"375000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"93750", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"312500", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1875000", " ", "p", " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1406250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"9375000", " ", "r", " ", RowBox[{"s", "^", "3"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"a", "[", "5", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"1250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}]}], " ", "+", " ", RowBox[{"9000", " ", RowBox[{"q", "^", "5"}]}], " ", "-", " ", RowBox[{"4500", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", "r"}], " ", "-", " ", RowBox[{"46250", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", "r"}], " ", "+", " ", RowBox[{"50000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"6750", " ", RowBox[{"p", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"43750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"75000", " ", RowBox[{"p", "^", "3"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"62500", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"156250", " ", "p", " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"1562500", " ", RowBox[{"s", "^", "3"}]}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{"l0", " ", ":=", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"a", "[", "0", "]"}], " ", "+", " ", RowBox[{ RowBox[{"a", "[", "1", "]"}], " ", "theta"}], " ", "+", " ", RowBox[{ RowBox[{"a", "[", "2", "]"}], " ", RowBox[{"theta", "^", "2"}]}], " ", "+", " ", RowBox[{ RowBox[{"a", "[", "3", "]"}], " ", RowBox[{"theta", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{ RowBox[{"a", "[", "4", "]"}], " ", RowBox[{"theta", "^", "4"}]}], " ", "+", " ", RowBox[{ RowBox[{"a", "[", "5", "]"}], " ", RowBox[{"theta", "^", "5"}]}]}], ")"}], "/", " ", "F"}]}], " ", ";"}], "\n", "\n", "\n", "\n", RowBox[{ RowBox[{ RowBox[{"c", "[", "0", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{ RowBox[{"-", "40"}], " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "11"}]}], " ", "-", " ", RowBox[{"270", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "13"}]}], " ", "+", " ", RowBox[{"700", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "9"}], " ", "r"}], " ", "+", " ", RowBox[{"5165", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "11"}], " ", "r"}], " ", "+", " ", RowBox[{"540", " ", RowBox[{"q", "^", "13"}], " ", "r"}], " ", "-", " ", "\n", " ", RowBox[{"4230", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"31845", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"20880", " ", "p", " ", RowBox[{"q", "^", "11"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"9645", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"57615", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"358255", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"1880", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"114020", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"2012190", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"26855", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"14400", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"470400", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"5088640", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"920", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"332800", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"5797120", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"1608000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"2611200", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "7"}]}], " ", "-", " ", "\n", " ", RowBox[{"7424000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "7"}]}], " ", "-", " ", RowBox[{"2323200", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", RowBox[{"8601600", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "8"}]}], " ", "+", " ", "\n", " ", RowBox[{"9472000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "8"}]}], " ", "-", " ", RowBox[{"10240000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "9"}]}], " ", "-", " ", RowBox[{"3060", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "8"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"39085", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "10"}], " ", "s"}], " ", "-", " ", RowBox[{"132300", " ", "p", " ", RowBox[{"q", "^", "12"}], " ", "s"}], " ", "+", " ", RowBox[{"36580", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"520185", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "8"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"1969860", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "10"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"144045", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"2438425", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"10809475", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"518850", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"182520", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"4533930", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"26196770", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"4542325", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"21600", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"2208080", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"24787960", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"10813900", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"499200", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"3827840", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"9596000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"22662000", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"3916800", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"29952000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"90800000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"12902400", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"87040000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"15360000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "8"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"12800000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "8"}], " ", "s"}], " ", "-", " ", RowBox[{"38070", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"566700", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"2574375", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"1822500", " ", RowBox[{"q", "^", "11"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"292815", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"5170280", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"27918125", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"21997500", " ", "p", " ", RowBox[{"q", "^", "9"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"573480", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"14566350", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"104851575", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"96448750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"11001240", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"147798600", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"158632750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"78222500", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"62819200", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"136160000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"317555000", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"160224000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"267600000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"153600000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"120000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"32000000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"127575", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"2148750", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"13652500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"19531250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"495720", " ", RowBox[{"p", "^", "12"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"11856375", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"107807500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"222334375", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"105062500", " ", RowBox[{"q", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"11566800", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"216787500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"633437500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"504484375", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"90918000", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"567080000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"692937500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"326640000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"339000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"369250000", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"560000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"508000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"480000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"320000000", " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"455625", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"27562500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"120593750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"60312500", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"110615625", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"662984375", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"528515625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"541687500", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"1262343750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"466406250", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"633000000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"1264375000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"1085000000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"2700000000", " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"68343750", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"478828125", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"355468750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"11718750", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"718031250", " ", RowBox[{"p", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"1658593750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"2212890625", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"2855625000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"4273437500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"4537500000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"8031250000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"1750000000", " ", "p", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"1353515625", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"1562500000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"3964843750", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"7226562500", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"1953125000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"1757812500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", RowBox[{"3173828125", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "7"}]}], " ", "+", " ", "\n", " ", RowBox[{"6445312500", " ", RowBox[{"p", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", RowBox[{"3906250000", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "7"}]}], " ", "+", " ", RowBox[{"6103515625", " ", "q", " ", RowBox[{"s", "^", "8"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"c", "[", "1", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"40", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "9"}]}], " ", "+", " ", RowBox[{"110", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "11"}]}], " ", "-", " ", RowBox[{"1080", " ", RowBox[{"q", "^", "13"}]}], " ", "-", " ", RowBox[{"560", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "7"}], " ", "r"}], " ", "-", " ", RowBox[{"1780", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "9"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"17370", " ", "p", " ", RowBox[{"q", "^", "11"}], " ", "r"}], " ", "+", " ", RowBox[{"2850", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"10520", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"115910", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"6090", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"25330", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"448740", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"128230", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"4320", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"16960", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"1143600", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"1410310", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"3840", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"1744480", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"5619520", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"1198080", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"10579200", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"2940800", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"8294400", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", "\n", " ", RowBox[{"13568000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "7"}]}], " ", "-", " ", RowBox[{"15360000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "8"}]}], " ", "+", " ", RowBox[{"840", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"7580", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "8"}], " ", "s"}], " ", "+", " ", RowBox[{"24420", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "10"}], " ", "s"}], " ", "-", " ", RowBox[{"8100", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"94100", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"473000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"473400", " ", RowBox[{"q", "^", "10"}], " ", "r", " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"22680", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"374370", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"2888020", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"5561050", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"12960", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"485820", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"6723440", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"23561400", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"190080", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"5894880", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"50882000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"22411500", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"258560", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"46248000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"103800000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"3737600", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"119680000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"10240000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"19200000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"7290", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"117360", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"691250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"198750", " ", "p", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"36450", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"854550", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"7340700", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"2028750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"995490", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"18896600", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"5026500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"52272500", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"16636800", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"43200000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"223426250", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"112068000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"177000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"244000000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"156000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"43740", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"1032750", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"8602500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"15606250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"39625000", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"1603800", " ", RowBox[{"p", "^", "10"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"26932500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"19562500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"152000000", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"25555500", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"16230000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"42187500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"165660000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"373500000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"332937500", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"465000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"586000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"592000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"480000000", " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"1518750", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"62531250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"7656250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"184781250", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"15781250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"135156250", " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"1148250000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"2121406250", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"1990000000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"3150000000", " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"2531250", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"660937500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"1339843750", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"33750000", " ", RowBox[{"p", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"679687500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"6250000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"6195312500", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"1125000000", " ", "p", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"996093750", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"3125000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"3222656250", " ", "p", " ", "q", " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"1171875000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"s", "^", "7"}]}], " ", "+", " ", RowBox[{"976562500", " ", "r", " ", RowBox[{"s", "^", "7"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"c", "[", "2", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"80", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "9"}]}], " ", "+", " ", RowBox[{"540", " ", "p", " ", RowBox[{"q", "^", "11"}]}], " ", "-", " ", RowBox[{"600", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "7"}], " ", "r"}], " ", "-", " ", RowBox[{"4770", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "9"}], " ", "r"}], " ", "+", " ", RowBox[{"1230", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"20900", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"47250", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"710", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"84950", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"526310", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"720", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"216280", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"2068020", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"198080", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"3703200", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"1423600", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"2860800", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"7056000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"8320000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "7"}]}], " ", "-", " ", RowBox[{"2720", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"46350", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", "s"}], " ", "-", " ", RowBox[{"178200", " ", RowBox[{"q", "^", "10"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"25740", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"489490", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"2152350", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"61560", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"1568150", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"9060500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"24840", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"1692380", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"18098250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"9387750", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"382560", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"16818000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"49325000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"1212800", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"64840000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"320000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"10400000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"36450", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"588350", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"2156250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"123930", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"2879700", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"12548000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"14445000", " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"3233250", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"28485000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"72231250", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"32093000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"61275000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"107500000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"78500000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"22000000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"72900", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"1215000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"2937500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"9156250", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"2612250", " ", RowBox[{"p", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"16560000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"75468750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"32737500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"169062500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"121718750", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"160250000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"219750000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"317000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"260000000", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"2531250", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"22500000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"39843750", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"266343750", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"776406250", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"789062500", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"1368750000", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"67500000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"441406250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"311718750", " ", RowBox[{"p", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"1785156250", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"546875000", " ", "p", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"1269531250", " ", "p", " ", "q", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"488281250", " ", RowBox[{"s", "^", "7"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"c", "[", "3", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"120", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "7"}]}], " ", "+", " ", RowBox[{"810", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "9"}]}], " ", "-", " ", RowBox[{"1280", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", "r"}], " ", "-", " ", RowBox[{"9160", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", "r"}], " ", "+", " ", RowBox[{"3780", " ", RowBox[{"q", "^", "9"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"4530", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"36640", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"45270", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"5400", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"60920", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"200050", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"31200", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"476000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"378200", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"521600", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"1872000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"2240000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"1440", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"15310", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"59400", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", "s"}], " ", "-", " ", RowBox[{"9180", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"115240", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"589650", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"16200", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"316710", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"2547750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"2178000", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"259200", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"4123000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"11700000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"937600", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"16340000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"640000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"2800000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"2430", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"54450", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"285500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"2767500", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"43200", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"916250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"14482500", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"4806000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"13212500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"25400000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"18750000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"8000000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"121500", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"2058750", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"6656250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"6716250", " ", RowBox[{"p", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"24125000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"23875000", " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"43125000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"45750000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"87500000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"70000000", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"44437500", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"107968750", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"159531250", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"284375000", " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"7031250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"265625000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"31250000", " ", "p", " ", "r", " ", RowBox[{"s", "^", "5"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"c", "[", "4", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"160", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}]}], " ", "+", " ", RowBox[{"1080", " ", RowBox[{"q", "^", "9"}]}], " ", "-", " ", RowBox[{"1080", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", "r"}], " ", "-", " ", RowBox[{"8730", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", "r"}], " ", "+", " ", RowBox[{"1510", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"20420", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"720", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"23200", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"79900", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"35200", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"404000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"480000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"960", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"2850", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"540", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"63500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"319500", " ", RowBox[{"q", "^", "6"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"7560", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"253500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"1806250", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"91200", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"2600000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"80000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"600000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"4050", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"120000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"273750", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"425250", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"2325000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"5400000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"2875000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1500000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"303750", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"843750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"812500", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"5062500", " ", RowBox[{"p", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"13312500", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"14500000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"15000000", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"3750000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"35937500", " ", "q", " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"11718750", " ", "p", " ", RowBox[{"s", "^", "5"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"c", "[", "5", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"80", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}]}], " ", "+", " ", RowBox[{"540", " ", "p", " ", RowBox[{"q", "^", "7"}]}], " ", "-", " ", RowBox[{"600", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", "r"}], " ", "-", " ", RowBox[{"4770", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", "r"}], " ", "+", " ", RowBox[{"1080", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"11200", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"12150", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"4800", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"64000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"80000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"1080", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"13250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"54000", " ", RowBox[{"q", "^", "6"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"3240", " ", RowBox[{"p", "^", "7"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"56250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"337500", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"43200", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"560000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"80000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"100000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"6750", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"225000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"900000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"562500", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"500000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"843750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"1937500", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"3000000", " ", RowBox[{"p", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"2500000", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"5468750", " ", "q", " ", RowBox[{"s", "^", "4"}]}]}]}], " ", ";"}], "\n", " ", "\n", "\n", RowBox[{ RowBox[{ RowBox[{"o", "[", "0", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{ RowBox[{"-", "1600"}], " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "10"}]}], " ", "-", " ", RowBox[{"23600", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "12"}]}], " ", "-", " ", RowBox[{"86400", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "14"}]}], " ", "+", " ", RowBox[{"24800", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "8"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"419200", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "10"}], " ", "r"}], " ", "+", " ", RowBox[{"1850450", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "12"}], " ", "r"}], " ", "+", " ", RowBox[{"896400", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "14"}], " ", "r"}], " ", "-", " ", "\n", " ", RowBox[{"138800", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"2921900", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"17295200", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"27127750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "12"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"26076600", " ", RowBox[{"q", "^", "14"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"325800", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"9993850", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"88010500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"274047650", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"410171400", " ", "p", " ", RowBox[{"q", "^", "12"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"259200", " ", RowBox[{"p", "^", "14"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"17147100", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"254289150", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"1318548225", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"2633598475", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"12636000", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"388911000", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"3269704725", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"8791192300", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"93560575", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"228361600", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"3951199200", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"16276981100", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"1597227000", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"1947899200", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", RowBox[{"17037648000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", RowBox[{"8919740000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "7"}]}], " ", "-", " ", "\n", " ", RowBox[{"7672160000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "8"}]}], " ", "-", " ", RowBox[{"15496000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "8"}]}], " ", "+", " ", RowBox[{"4224000000", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "8"}]}], " ", "+", " ", "\n", " ", RowBox[{"9968000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "9"}]}], " ", "-", " ", RowBox[{"8640000000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "9"}]}], " ", "+", " ", RowBox[{"4800000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "10"}]}], " ", "-", " ", "\n", " ", RowBox[{"55200", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "7"}], " ", "s"}], " ", "-", " ", RowBox[{"685600", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "9"}], " ", "s"}], " ", "+", " ", RowBox[{"1028250", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "11"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"37650000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "13"}], " ", "s"}], " ", "+", " ", RowBox[{"111375000", " ", RowBox[{"q", "^", "15"}], " ", "s"}], " ", "+", " ", RowBox[{"583200", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"9075600", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"883150", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "9"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"506830750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "11"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"1793137500", " ", "p", " ", RowBox[{"q", "^", "13"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"1852200", " ", RowBox[{"p", "^", "14"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"41435250", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"80566700", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"2485673600", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"11442286125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "11"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"1555200", " ", RowBox[{"p", "^", "15"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"80846100", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"564906800", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"4493012400", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"35492391250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"789931875", " ", RowBox[{"q", "^", "11"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"71766000", " ", RowBox[{"p", "^", "13"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"1551149200", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"1773437900", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"51957593125", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"14964765625", " ", "p", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"1231569600", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"12042977600", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"27151011200", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"88080610000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"9912995200", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"29448104000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"144954840000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"44601300000", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"35453760000", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"63264000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"60544000000", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"30048000000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "8"}], " ", "s"}], " ", "+", " ", RowBox[{"37040000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "8"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"60800000000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "9"}], " ", "s"}], " ", "-", " ", RowBox[{"48000000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "9"}], " ", "s"}], " ", "-", " ", RowBox[{"615600", " ", RowBox[{"p", "^", "14"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"10524500", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"33831250", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"222806250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"1099687500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "12"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"3353400", " ", RowBox[{"p", "^", "15"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"74269350", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"276445750", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"2618600000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"14473243750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "10"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"1383750000", " ", RowBox[{"q", "^", "12"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"2332800", " ", RowBox[{"p", "^", "16"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"132750900", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"900775150", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"8249244500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"59525796875", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"40292868750", " ", "p", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"128304000", " ", RowBox[{"p", "^", "14"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"3160232100", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"8329580000", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"45558458750", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"297252890625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"2769854400", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"37065970000", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"90812546875", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"627902000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"181347421875", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"30946932800", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"249954680000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"802954812500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"80900000000", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"192137320000", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"932641600000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"943242500000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"658412000000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1930720000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"593800000000", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"1162800000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"280000000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"840000000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "9"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"2187000", " ", RowBox[{"p", "^", "16"}], " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"47418750", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"180618750", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"2231250000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"17857734375", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"29882812500", " ", "p", " ", RowBox[{"q", "^", "11"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"24664500", " ", RowBox[{"p", "^", "14"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"853368750", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"25939693750", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"177541562500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"297978828125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "9"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"153468000", " ", RowBox[{"p", "^", "12"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"30188125000", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"344049821875", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"534026875000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"340726484375", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"9056190000", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"322314687500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"769632109375", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"83276875000", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"164061000000", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"1381358750000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"3088020000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"1267655000000", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"7642630000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"2759877500000", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"4597760000000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"1846200000000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"7006000000000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"1200000000000", " ", "q", " ", RowBox[{"r", "^", "8"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"18225000", " ", RowBox[{"p", "^", "15"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"1328906250", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"24729140625", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"169467187500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"413281250000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"223828125000", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"710775000", " ", RowBox[{"p", "^", "13"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"18611015625", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"314344375000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"828439843750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"460937500000", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"25674975000", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"52223515625", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"387160000000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"4733680078125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"343911875000", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"3328658359375", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"16532406250000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"5980613281250", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"2295497500000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"14809820312500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"6491406250000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"7768470000000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"34192562500000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"11859000000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"10530000000000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"6000000000000", " ", "p", " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"11453906250", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"149765625000", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"545537109375", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"527343750000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"371313281250", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"3461455078125", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"7920878906250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"4747314453125", " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"2417815625000", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"5465576171875", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"5937128906250", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"10661156250000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"63574218750000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"24059375000000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"33023437500000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"43125000000000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"94394531250", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"1097167968750", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"2829833984375", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"1525878906250", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"2724609375", " ", RowBox[{"p", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"13998535156250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"57094482421875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"8512509765625", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"37941406250000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"33191894531250", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"50534179687500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"156656250000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"85023437500000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"10125000000000", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"2717285156250", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", "\n", " ", RowBox[{"11352539062500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", RowBox[{"2593994140625", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", "\n", " ", RowBox[{"47154541015625", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", RowBox[{"160644531250000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "7"}]}], " ", "+", " ", "\n", " ", RowBox[{"142500000000000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", RowBox[{"26757812500000", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", "\n", " ", RowBox[{"4364013671875", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"s", "^", "8"}]}], " ", "-", " ", RowBox[{"94604492187500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "8"}]}], " ", "+", " ", "\n", " ", RowBox[{"114379882812500", " ", RowBox[{"p", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "8"}]}], " ", "+", " ", RowBox[{"51116943359375", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "8"}]}], " ", "-", " ", "\n", " ", RowBox[{"346435546875000", " ", "p", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "8"}]}], " ", "+", " ", RowBox[{"476837158203125", " ", "p", " ", "q", " ", RowBox[{"s", "^", "9"}]}], " ", "-", " ", "\n", " ", RowBox[{"476837158203125", " ", RowBox[{"s", "^", "10"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"o", "[", "1", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"1600", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "8"}]}], " ", "+", " ", RowBox[{"20800", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "10"}]}], " ", "+", " ", RowBox[{"45100", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "12"}]}], " ", "-", " ", RowBox[{"151200", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "14"}]}], " ", "-", " ", "\n", " ", RowBox[{"19200", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "6"}], " ", "r"}], " ", "-", " ", RowBox[{"293200", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "8"}], " ", "r"}], " ", "-", " ", RowBox[{"794600", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "10"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"2634675", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "12"}], " ", "r"}], " ", "+", " ", RowBox[{"2640600", " ", RowBox[{"q", "^", "14"}], " ", "r"}], " ", "+", " ", RowBox[{"75600", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"1529100", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"6233350", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"12013350", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"29069550", " ", "p", " ", RowBox[{"q", "^", "12"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"97200", " ", RowBox[{"p", "^", "14"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"3562500", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"26984900", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"15900325", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"76267100", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"3272400", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"59486850", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"221270075", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"74065250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"300564375", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"45569400", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"438666000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"444821250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"2448256250", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"290640000", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"855850000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"5741875000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"644000000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", RowBox[{"5574000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", RowBox[{"4643000000", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "7"}]}], " ", "-", " ", "\n", " ", RowBox[{"1696000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "8"}]}], " ", "-", " ", RowBox[{"12660000000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "8"}]}], " ", "+", " ", RowBox[{"7200000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "9"}]}], " ", "+", " ", "\n", " ", RowBox[{"43200", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"572000", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "7"}], " ", "s"}], " ", "-", " ", RowBox[{"59800", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "9"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"24174625", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "11"}], " ", "s"}], " ", "-", " ", RowBox[{"74587500", " ", "p", " ", RowBox[{"q", "^", "13"}], " ", "s"}], " ", "-", " ", RowBox[{"324000", " ", RowBox[{"p", "^", "14"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"5531400", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"3712100", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"293009275", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "9"}], " ", "r", " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"1115548875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "11"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"583200", " ", RowBox[{"p", "^", "15"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"18343800", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"77911100", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"957488825", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"5449661250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"960120000", " ", RowBox[{"q", "^", "11"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"23684400", " ", RowBox[{"p", "^", "13"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"373761900", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"27944975", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"10375740625", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"4649093750", " ", "p", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"395816400", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"2910968000", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"9126162500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"11696118750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"3028640000", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"3251550000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"47914250000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"30255625000", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"9304000000", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"42970000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"31475000000", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"2176000000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"62100000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "-", " ", RowBox[{"43200000000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "8"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"72000000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "8"}], " ", "s"}], " ", "+", " ", RowBox[{"291600", " ", RowBox[{"p", "^", "15"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"2702700", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"38692250", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"538903125", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"1613112500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"320625000", " ", RowBox[{"q", "^", "12"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"874800", " ", RowBox[{"p", "^", "16"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"14166900", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"193284900", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"3688520500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"11613390625", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"15609881250", " ", "p", " ", RowBox[{"q", "^", "10"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"44031600", " ", RowBox[{"p", "^", "14"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"482345550", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"2020881875", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"7407026250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"136175750000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"1000884600", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"8888950000", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"30101703125", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"319761000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"51519218750", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"12622395000", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"97032450000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"469929218750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"291342187500", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"96382000000", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"598070000000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1165021875000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"446500000000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"1651500000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"789375000000", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1152000000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"600000000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"1260000000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"24786000", " ", RowBox[{"p", "^", "14"}], " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"660487500", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"5886356250", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"18137187500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"5120546875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"827658000", " ", RowBox[{"p", "^", "12"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"13343062500", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"39782068750", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"111288437500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"15438750000", " ", RowBox[{"q", "^", "9"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"14540782500", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"135889750000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"176892578125", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"934462656250", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"171669250000", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"1164538125000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"3192346406250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"1295476250000", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"6540712500000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"2957828125000", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"5366750000000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"3165000000000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"8862500000000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"1800000000000", " ", "q", " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"236925000", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"8895234375", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"106180781250", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"474221875000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"616210937500", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"6995868750", " ", RowBox[{"p", "^", "11"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"184190625000", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"1299254453125", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"2475458593750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"63049218750", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"1646791484375", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"9086886718750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"4673421875000", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"215665000000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"7864589843750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"5987890625000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"594843750000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"27791171875000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"3881250000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"12203125000000", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"10312500000000", " ", "p", " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"34720312500", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"545126953125", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"2176425781250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"2792968750000", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"1395703125", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"1957568359375", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"5122636718750", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"858210937500", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"42050097656250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"7088281250000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"25974609375000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"69296875000000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"384697265625", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"6403320312500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"16742675781250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"3467080078125", " ", RowBox[{"p", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"11009765625000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"16451660156250", " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"6979003906250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"145403320312500", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"4076171875000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"22265625000000", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"21915283203125", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", "\n", " ", RowBox[{"86608886718750", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", RowBox[{"22785644531250", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", "\n", " ", RowBox[{"103466796875000", " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "7"}]}], " ", "+", " ", RowBox[{"18798828125000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"s", "^", "8"}]}], " ", "+", " ", "\n", " ", RowBox[{"106048583984375", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "8"}]}], " ", "+", " ", RowBox[{"17761230468750", " ", "p", " ", "r", " ", RowBox[{"s", "^", "8"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"o", "[", "2", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"2800", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "8"}]}], " ", "+", " ", RowBox[{"55700", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "10"}]}], " ", "+", " ", RowBox[{"363600", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "12"}]}], " ", "+", " ", RowBox[{"777600", " ", RowBox[{"q", "^", "14"}]}], " ", "-", " ", "\n", " ", RowBox[{"27200", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "6"}], " ", "r"}], " ", "-", " ", RowBox[{"700200", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "8"}], " ", "r"}], " ", "-", " ", RowBox[{"5726550", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "10"}], " ", "r"}], " ", "-", " ", "\n", " ", RowBox[{"15066000", " ", "p", " ", RowBox[{"q", "^", "12"}], " ", "r"}], " ", "+", " ", RowBox[{"74700", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"2859575", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"31175725", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"103147650", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"40500", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"4274400", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"76065825", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"365623750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"132264000", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"2192400", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"92562500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"799193875", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"1188193125", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"41231500", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"914210000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"3318853125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"398850000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"3944000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"2211312500", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"1817000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}]}], " ", "-", " ", "\n", " ", RowBox[{"6720000000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", RowBox[{"3900000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "8"}]}], " ", "+", " ", RowBox[{"75600", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"1823100", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"14534150", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "9"}], " ", "s"}], " ", "+", " ", RowBox[{"38265750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "11"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"394200", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"11453850", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"101213000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"223565625", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "9"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"415125000", " ", RowBox[{"q", "^", "11"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"243000", " ", RowBox[{"p", "^", "13"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"13654575", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"163811725", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"173461250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"3008671875", " ", "p", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"2016900", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"86576250", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"324146625", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"3378506250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"89211000", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"55207500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"1493950000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"12573609375", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"1140100000", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"42500000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"21511250000", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"4058000000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"6725000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"1400000000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"39000000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"510300", " ", RowBox[{"p", "^", "13"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"4814775", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"70265125", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"1016484375", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"3221100000", " ", "p", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"364500", " ", RowBox[{"p", "^", "14"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"30314250", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1106765625", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"10984203125", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"33905812500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"37980900", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"2142905625", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"26896125000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"95551328125", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"11320312500", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1743781500", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"35432262500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"177855859375", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"121260546875", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"25943162500", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"249165500000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"461739453125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"177823750000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"726225000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"404195312500", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"565875000000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"407500000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"682500000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"59140125", " ", RowBox[{"p", "^", "12"}], " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"1290515625", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"8785071875", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"15588281250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"17505000000", " ", RowBox[{"q", "^", "9"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"896062500", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"2589750000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"82700156250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"347683593750", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"17022656250", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"320923593750", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"1042116875000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"353262812500", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"2212664062500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"1252408984375", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"1967362500000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"1583343750000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"3560625000000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"975000000000", " ", "q", " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"462459375", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"14210859375", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"99521718750", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"114955468750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"17720859375", " ", RowBox[{"p", "^", "9"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"100320703125", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"1021943359375", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"1193203125000", " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"171371250000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"1113390625000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"1211474609375", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"274056250000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"8285166015625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"2079375000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"5137304687500", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"6187500000000", " ", "p", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"135675000000", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"1275244140625", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"28388671875", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"1015166015625", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"10584423828125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"3559570312500", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"6929931640625", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"32304687500000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"430576171875", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"9397949218750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"575195312500", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"4086425781250", " ", RowBox[{"p", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"42183837890625", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"8156494140625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"12612304687500", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"25513916015625", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"s", "^", "7"}]}], " ", "-", " ", "\n", " ", RowBox[{"37017822265625", " ", "q", " ", "r", " ", RowBox[{"s", "^", "7"}]}], " ", "+", " ", RowBox[{"18981933593750", " ", "p", " ", RowBox[{"s", "^", "8"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"o", "[", "3", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"1600", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "6"}]}], " ", "+", " ", RowBox[{"9200", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "8"}]}], " ", "-", " ", RowBox[{"126000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "10"}]}], " ", "-", " ", RowBox[{"777600", " ", "p", " ", RowBox[{"q", "^", "12"}]}], " ", "-", " ", "\n", " ", RowBox[{"14400", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "4"}], " ", "r"}], " ", "-", " ", RowBox[{"119300", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "6"}], " ", "r"}], " ", "+", " ", RowBox[{"1203225", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "8"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"9412200", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "10"}], " ", "r"}], " ", "+", " ", RowBox[{"32400", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"417950", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"4543725", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"49008125", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"24192000", " ", RowBox[{"q", "^", "10"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"292050", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"8760000", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"137506625", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"225438750", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"4213250", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"173595625", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"653003125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"82575000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"838125000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"578562500", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"421500000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"1796250000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", "\n", " ", RowBox[{"1050000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "7"}]}], " ", "+", " ", RowBox[{"43200", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"q", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"807300", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"5328225", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"16946250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "9"}], " ", "s"}], " ", "+", " ", RowBox[{"29565000", " ", RowBox[{"q", "^", "11"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"194400", " ", RowBox[{"p", "^", "13"}], " ", "q", " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"5505300", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"49886700", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"178821875", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"222750000", " ", "p", " ", RowBox[{"q", "^", "9"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"6814800", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"120525625", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"526694500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"84065625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"123670500", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"1106731875", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"669556250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"2869265625", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"1004350000", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"3384375000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"5665625000", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"3411000000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"418750000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"1700000000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "-", " ", RowBox[{"10500000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "6"}], " ", "s"}], " ", "+", " ", RowBox[{"291600", " ", RowBox[{"p", "^", "14"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"9829350", " ", RowBox[{"p", "^", "11"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"114151875", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"522169375", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"716906250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"18625950", " ", RowBox[{"p", "^", "12"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"387703125", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"2056109375", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"760203125", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"3071250000", " ", RowBox[{"q", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"512419500", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"5859053125", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"12154062500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"15931640625", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"6598393750", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"43549625000", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"82011328125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"43538125000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"160831250000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"99070312500", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"141812500000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"117500000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"183750000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"154608750", " ", RowBox[{"p", "^", "10"}], " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"3309468750", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"20834140625", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"34731562500", " ", "p", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"5970375000", " ", RowBox[{"p", "^", "8"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"68533281250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"142698281250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"74509140625", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"389148437500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"270937890625", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"366696875000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"400031250000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"735156250000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"262500000000", " ", "q", " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"371250000", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"21315000000", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"179515625000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"238406250000", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"9071015625", " ", RowBox[{"p", "^", "7"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"268945312500", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"379785156250", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"140262890625", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"1486259765625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"806484375000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"1066210937500", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"1722656250000", " ", "p", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"125648437500", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"1236279296875", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"1267871093750", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"1044677734375", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"6630859375000", " ", "p", " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"160888671875", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"6352294921875", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", "\n", " ", RowBox[{"708740234375", " ", RowBox[{"p", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"3901367187500", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "-", " ", RowBox[{"8050537109375", " ", "q", " ", RowBox[{"s", "^", "7"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"o", "[", "4", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{"2800", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "6"}]}], " ", "+", " ", RowBox[{"41300", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "8"}]}], " ", "+", " ", RowBox[{"151200", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "10"}]}], " ", "-", " ", RowBox[{"25200", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "4"}], " ", "r"}], " ", "-", " ", "\n", " ", RowBox[{"542600", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}], " ", "r"}], " ", "-", " ", RowBox[{"3397875", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}], " ", "r"}], " ", "-", " ", RowBox[{"5751000", " ", RowBox[{"q", "^", "10"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"56700", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"1972125", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"18624250", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"50253750", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"1701000", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"32630625", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"139868750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"18162500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"177125000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"121734375", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"100500000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"386250000", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"225000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "6"}]}], " ", "+", " ", RowBox[{"75600", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"q", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"1708800", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"12836875", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "7"}], " ", "s"}], " ", "+", " ", RowBox[{"32062500", " ", "p", " ", RowBox[{"q", "^", "9"}], " ", "s"}], " ", "-", " ", RowBox[{"340200", " ", RowBox[{"p", "^", "11"}], " ", "q", " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"10185750", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"97502750", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"301640625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", "r", " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"7168500", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"135960625", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"587471875", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"384750000", " ", RowBox[{"q", "^", "7"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"29325000", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"320625000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"523437500", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"42000000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"343750000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"150000000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"2250000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "5"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"510300", " ", RowBox[{"p", "^", "12"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"12808125", " ", RowBox[{"p", "^", "9"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"107062500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"270312500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"168750000", " ", RowBox[{"q", "^", "8"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"2551500", " ", RowBox[{"p", "^", "10"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"5062500", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"712343750", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"4788281250", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"256837500", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"3574812500", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"14967968750", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"4040937500", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"26400000000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"17083984375", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"21812500000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"24375000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"39375000000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"127265625", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"680234375", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"2048203125", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"18794531250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"25050000000", " ", RowBox[{"q", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"26621875000", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"37007812500", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"105468750000", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"56250000000", " ", "q", " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"1124296875", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"9251953125", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"8007812500", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"4004296875", " ", RowBox[{"p", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"179931640625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"75703125000", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"133447265625", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"363281250000", " ", "p", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"91552734375", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", RowBox[{"19531250000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "5"}]}], " ", "-", " ", "\n", " ", RowBox[{"751953125000", " ", "p", " ", "q", " ", "r", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", RowBox[{"157958984375", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"s", "^", "6"}]}], " ", "+", " ", RowBox[{"748291015625", " ", "r", " ", RowBox[{"s", "^", "6"}]}]}]}], " ", ";"}], "\n", " ", "\n", RowBox[{ RowBox[{ RowBox[{"o", "[", "5", "]"}], " ", ":=", " ", "\n", RowBox[{ RowBox[{ RowBox[{"-", "14400"}], " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "6"}]}], " ", "-", " ", RowBox[{"212400", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "8"}]}], " ", "-", " ", RowBox[{"777600", " ", RowBox[{"q", "^", "10"}]}], " ", "+", " ", RowBox[{"92100", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "4"}], " ", "r"}], " ", "+", " ", "\n", " ", RowBox[{"1689675", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "6"}], " ", "r"}], " ", "+", " ", RowBox[{"7371000", " ", "p", " ", RowBox[{"q", "^", "8"}], " ", "r"}], " ", "-", " ", RowBox[{"122850", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"3735250", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"22432500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"2298750", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"29390625", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"18000000", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"17750000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"62812500", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "4"}]}], " ", "+", " ", RowBox[{"37500000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "5"}]}], " ", "-", " ", RowBox[{"51300", " ", RowBox[{"p", "^", "8"}], " ", RowBox[{"q", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"768025", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"2801250", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "7"}], " ", "s"}], " ", "-", " ", RowBox[{"275400", " ", RowBox[{"p", "^", "9"}], " ", "q", " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"5479875", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"35538750", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"68850000", " ", RowBox[{"q", "^", "7"}], " ", "r", " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"12757500", " ", RowBox[{"p", "^", "7"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"133640625", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"222609375", " ", "p", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"108500000", " ", RowBox[{"p", "^", "5"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"290312500", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"275000000", " ", RowBox[{"p", "^", "3"}], " ", "q", " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"375000000", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "+", " ", RowBox[{"1931850", " ", RowBox[{"p", "^", "10"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"40213125", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"253921875", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"464062500", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"71077500", " ", RowBox[{"p", "^", "8"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"818746875", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"1882265625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"826031250", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"4369687500", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"3107812500", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"3943750000", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"5000000000", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"6562500000", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"295312500", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"2938906250", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"4848750000", " ", RowBox[{"q", "^", "5"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"3791484375", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"7556250000", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"11960937500", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "3"}]}], " ", "-", " ", RowBox[{"9375000000", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"1668515625", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"20447265625", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"21955078125", " ", RowBox[{"p", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", "\n", " ", RowBox[{"18984375000", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "+", " ", RowBox[{"67382812500", " ", "p", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{"120849609375", " ", "p", " ", "q", " ", RowBox[{"s", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"157226562500", " ", RowBox[{"s", "^", "6"}]}]}]}], " ", ";"}], "\n", " ", "\n", "\n", RowBox[{ RowBox[{"u", " ", ":=", " ", RowBox[{ RowBox[{"-", "25"}], " ", RowBox[{"q", "/", "2"}]}]}], " ", ";"}], "\n", "\n", RowBox[{ RowBox[{"v", " ", ":=", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"c", "[", "0", "]"}], " ", "+", " ", RowBox[{ RowBox[{"c", "[", "1", "]"}], " ", "theta"}], " ", "+", " ", RowBox[{ RowBox[{"c", "[", "2", "]"}], " ", RowBox[{"theta", "^", "2"}]}], " ", "+", " ", RowBox[{ RowBox[{"c", "[", "3", "]"}], " ", RowBox[{"theta", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{ RowBox[{"c", "[", "4", "]"}], " ", RowBox[{"theta", "^", "4"}]}], " ", "+", " ", RowBox[{ RowBox[{"c", "[", "5", "]"}], " ", RowBox[{"theta", "^", "5"}]}]}], ")"}], "/", RowBox[{"(", RowBox[{"2", " ", "d", " ", "F"}], ")"}]}]}], " ", ";"}], "\n", "\n", "\n", RowBox[{ RowBox[{"order", " ", ":=", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"o", "[", "0", "]"}], " ", "+", " ", RowBox[{ RowBox[{"o", "[", "1", "]"}], " ", "theta"}], " ", "+", " ", RowBox[{ RowBox[{"o", "[", "2", "]"}], " ", RowBox[{"theta", "^", "2"}]}], " ", "+", " ", RowBox[{ RowBox[{"o", "[", "3", "]"}], " ", RowBox[{"theta", "^", "3"}]}], " ", "+", "\n", " ", RowBox[{ RowBox[{"o", "[", "4", "]"}], " ", RowBox[{"theta", "^", "4"}]}], " ", "+", " ", RowBox[{ RowBox[{"o", "[", "5", "]"}], " ", RowBox[{"theta", "^", "5"}]}]}], ")"}], "/", RowBox[{"(", RowBox[{"d", " ", "F"}], ")"}]}]}], " ", ";"}], "\n", " ", "\n", "\n"}]}]], "Input",ExpressionUUID->"e417fba6-7660-4b69-9cae-684f0ca9082f"], Cell[BoxData[ RowBox[{"\n", RowBox[{"(*", " ", RowBox[{ RowBox[{"This", " ", "is", " ", "a", " ", "Mathematica"}], "-", RowBox[{ "executable", " ", "file", " ", "for", " ", "computing", " ", "whether", " ", "a", " ", "given"}]}], " ", "*)"}], "\n", RowBox[{"(*", " ", RowBox[{"quintic", " ", "polynomial"}], " ", "*)"}], "\n", RowBox[{"(*", " ", RowBox[{ RowBox[{"x", "^", "5"}], " ", "+", " ", RowBox[{"p", " ", RowBox[{"x", "^", "3"}]}], " ", "+", " ", RowBox[{"q", " ", RowBox[{"x", "^", "2"}]}], " ", "+", " ", RowBox[{"r", " ", "x"}], " ", "+", " ", "s"}], " ", "*)"}], "\n", RowBox[{ "(*", " \ ", "*)"}], "\n", RowBox[{"(*", " ", RowBox[{ RowBox[{"is", " ", "solvable", " ", "by", " ", "radicals"}], ",", " ", RowBox[{"and", " ", "if", " ", "it", " ", "is"}], ",", " ", RowBox[{"to", " ", "determine", " ", "the", " ", "solutions"}]}], " ", "*)"}], "\n", RowBox[{"(*", " ", RowBox[{ RowBox[{"as", " ", "a", " ", "byproduct"}], ",", " ", RowBox[{ "the", " ", "precise", " ", "Galois", " ", "group", " ", "is", " ", "determined"}]}], " ", "*)"}], "\n", "\n", RowBox[{"(*", " ", RowBox[{ "f20", " ", "below", " ", "is", " ", "the", " ", "resolvent", " ", "sextic", " ", "determining", " ", "whether", " ", "the", " ", "quintic", " ", "is"}], " ", "*)"}], "\n", RowBox[{"(*", " ", RowBox[{"solvable", " ", ":", " ", RowBox[{ "solvable", " ", "if", " ", "and", " ", "only", " ", "if", " ", "f20", " ", "has", " ", "a", " ", "rational", " ", "root"}]}], " ", "*)"}], "\n", "\n", RowBox[{ "Print", "[", "\"\\"", "]"}]}]], "Input",ExpressionUUID->"717c36b3-c232-4fcf-803d-6547a7ca5c5b"], Cell[BoxData[ RowBox[{ RowBox[{"{", RowBox[{"p", ",", "q", ",", "r", ",", "s"}], "}"}], " ", "=", " ", RowBox[{ "Input", "[", "\"\\"", "]"}]}]], "Input",ExpressionUUID->"16f8d6b3-4c1e-4fc9-9acd-218e508f084d"], Cell[BoxData[ RowBox[{"f", " ", ":=", " ", RowBox[{ RowBox[{"x", "^", "5"}], " ", "+", " ", RowBox[{"p", " ", RowBox[{"x", "^", "3"}]}], " ", "+", " ", RowBox[{"q", " ", RowBox[{"x", "^", "2"}]}], " ", "+", " ", RowBox[{"r", " ", "x"}], " ", "+", " ", "s", " "}]}]], "Input",ExpressionUU\ ID->"d57fed4f-00a7-44f9-9748-597b3b6f6979"], Cell[BoxData[ RowBox[{ RowBox[{"f20", " ", ":=", " ", "\n", RowBox[{ RowBox[{"q", "^", "8"}], " ", "-", " ", RowBox[{"13", " ", "p", " ", RowBox[{"q", "^", "6"}], " ", "r"}], " ", "+", " ", RowBox[{ RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"65", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"4", " ", RowBox[{"p", "^", "6"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", "\n", " ", RowBox[{"128", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"17", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"48", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"16", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"192", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", "\n", " ", RowBox[{"256", " ", RowBox[{"r", "^", "6"}]}], " ", "-", " ", RowBox[{"4", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"q", "^", "3"}], " ", "s"}], " ", "-", " ", RowBox[{"12", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "+", " ", RowBox[{"18", " ", RowBox[{"p", "^", "6"}], " ", "q", " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"12", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"124", " ", RowBox[{"q", "^", "5"}], " ", "r", " ", "s"}], " ", "+", " ", RowBox[{"196", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"590", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "-", " ", RowBox[{"160", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "-", " ", "\n", " ", RowBox[{"1600", " ", "q", " ", RowBox[{"r", "^", "4"}], " ", "s"}], " ", "-", " ", RowBox[{"27", " ", RowBox[{"p", "^", "7"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"150", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"125", " ", "p", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"99", " ", RowBox[{"p", "^", "5"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"725", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"1200", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"3250", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"2000", " ", "p", " ", RowBox[{"r", "^", "3"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"1250", " ", "p", " ", "q", " ", "r", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"3125", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", "\n", " ", RowBox[{"9375", " ", "r", " ", RowBox[{"s", "^", "4"}]}], " ", "-", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"2", " ", "p", " ", RowBox[{"q", "^", "6"}]}], " ", "-", " ", RowBox[{"19", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}], " ", "r"}], " ", "+", " ", RowBox[{"51", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"3", " ", RowBox[{"q", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"32", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "3"}]}], " ", "-", " ", RowBox[{"76", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", RowBox[{"256", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"512", " ", RowBox[{"r", "^", "5"}]}], " ", "+", " ", RowBox[{"31", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "3"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"58", " ", RowBox[{"q", "^", "5"}], " ", "s"}], " ", "-", " ", RowBox[{"117", " ", RowBox[{"p", "^", "4"}], " ", "q", " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"105", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"260", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", "\n", " ", RowBox[{"2400", " ", "q", " ", RowBox[{"r", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"108", " ", RowBox[{"p", "^", "5"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"325", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"525", " ", RowBox[{"p", "^", "3"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", "\n", " ", RowBox[{"2750", " ", RowBox[{"q", "^", "2"}], " ", "r", " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", RowBox[{"500", " ", "p", " ", RowBox[{"r", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "-", " ", RowBox[{"625", " ", "p", " ", "q", " ", RowBox[{"s", "^", "3"}]}], " ", "+", " ", RowBox[{"3125", " ", RowBox[{"s", "^", "4"}]}]}], ")"}], " ", "x"}], " ", "+", " ", "\n", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"p", "^", "2"}], " ", RowBox[{"q", "^", "4"}]}], " ", "-", " ", RowBox[{"6", " ", RowBox[{"p", "^", "3"}], " ", RowBox[{"q", "^", "2"}], " ", "r"}], " ", "-", " ", RowBox[{"8", " ", RowBox[{"q", "^", "4"}], " ", "r"}], " ", "+", " ", RowBox[{"9", " ", RowBox[{"p", "^", "4"}], " ", RowBox[{"r", "^", "2"}]}], " ", "+", " ", RowBox[{"76", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"136", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"400", " ", RowBox[{"r", "^", "4"}]}], " ", "-", " ", RowBox[{"50", " ", "p", " ", RowBox[{"q", "^", "3"}], " ", "s"}], " ", "+", " ", RowBox[{"90", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"1400", " ", "q", " ", RowBox[{"r", "^", "2"}], " ", "s"}], " ", "+", " ", RowBox[{"625", " ", RowBox[{"q", "^", "2"}], " ", RowBox[{"s", "^", "2"}]}], " ", "+", " ", "\n", " ", RowBox[{"500", " ", "p", " ", "r", " ", RowBox[{"s", "^", "2"}]}]}], ")"}], " ", RowBox[{"x", "^", "2"}]}], " ", "-", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"q", "^", "4"}]}], " ", "-", " ", RowBox[{"21", " ", "p", " ", RowBox[{"q", "^", "2"}], " ", "r"}], " ", "+", " ", RowBox[{"40", " ", RowBox[{"p", "^", "2"}], " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"160", " ", RowBox[{"r", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{"15", " ", RowBox[{"p", "^", "2"}], " ", "q", " ", "s"}], " ", "+", " ", RowBox[{"400", " ", "q", " ", "r", " ", "s"}], " ", "-", " ", RowBox[{"125", " ", "p", " ", RowBox[{"s", "^", "2"}]}]}], ")"}], " ", RowBox[{"x", "^", "3"}]}], " ", "+", " ", "\n", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"2", " ", "p", " ", RowBox[{"q", "^", "2"}]}], " ", "-", " ", RowBox[{"6", " ", RowBox[{"p", "^", "2"}], " ", "r"}], " ", "+", " ", RowBox[{"40", " ", RowBox[{"r", "^", "2"}]}], " ", "-", " ", RowBox[{"50", " ", "q", " ", "s"}]}], ")"}], " ", RowBox[{"x", "^", "4"}]}], " ", "+", " ", RowBox[{"8", " ", "r", " ", RowBox[{"x", "^", "5"}]}], " ", "+", " ", RowBox[{"x", "^", "6"}]}]}], ";"}]], "Input",ExpressionUUID->"9db1abb8-\ 09e0-4c32-a943-42f9b5dfcf43"], Cell[BoxData[ RowBox[{ RowBox[{"test", " ", ":=", " ", RowBox[{"Factor", "[", "f20", "]"}]}], ";"}]], "Input",ExpressionUUID->\ "956b3cac-f6e4-41d5-a6a2-d12b6545825f"], Cell[BoxData[ RowBox[{ RowBox[{"solvabletest", " ", "=", " ", "0"}], ";"}]], "Input",ExpressionUUID\ ->"83e13fa9-1712-4b7c-b495-4c682d15fdb4"], Cell[BoxData[ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "[", "test", "]"}], "==", "2"}], ",", "\n", " ", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "<", "3"}], ",", RowBox[{"i", "++"}], ",", "\n", " ", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Exponent", "[", RowBox[{ RowBox[{"test", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "x"}], "]"}], " ", "==", " ", "1"}], ",", "\n", " ", RowBox[{ RowBox[{"theta", " ", "=", " ", RowBox[{"-", RowBox[{"Coefficient", "[", RowBox[{ RowBox[{"test", "[", RowBox[{"[", "i", "]"}], "]"}], ",", "x", ",", "0"}], "]"}]}]}], ";", " ", RowBox[{"solvabletest", " ", "=", " ", "1"}]}]}], " ", "\n", " ", "]"}]}], "\n", " ", "]"}]}], "\n", "]"}], ";"}]], "Input",ExpressionUUID->"bafa83fc-cb84-4e48-89dc-5d8b034d045e"], Cell[BoxData[ RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"solvabletest", " ", "==", " ", "0"}], ",", " ", "\n", " ", RowBox[{ RowBox[{ "Print", "[", "\"\\"", "]"}], ";", "\n", " ", RowBox[{"Print", "[", RowBox[{ "\"\\"", ",", "f", ",", "\"\< is not solvable by radicals\>\""}], "]"}], ";", "\n", " ", RowBox[{"Print", "[", "\"\\"", "]"}]}]}], "\n", "]"}], ";"}]], "Input",ExpressionUUID->"6fe1c755-2317-4228-bd52-\ 0e1b344f6812"], Cell[BoxData[ RowBox[{ RowBox[{"precision", " ", "=", " ", "20"}], " ", ";"}]], "Input",ExpressionU\ UID->"bee04a01-a8d0-46f7-ba46-6e3b6580cc69"], Cell[BoxData[ RowBox[{"If", "[", RowBox[{ RowBox[{"solvabletest", " ", "==", " ", "1"}], ",", " ", RowBox[{ RowBox[{"Print", "[", RowBox[{"f", ",", "\"\< is solvable by radicals:\>\""}], "]"}], ";", " ", "\n", " ", RowBox[{"Print", "[", "\"\< \>\"", "]"}], ";", "\n", " ", RowBox[{"Print", "[", RowBox[{ "\"\<(root theta of resolvent sextic = \>\"", ",", "theta", ",", "\"\< )\>\""}], "]"}], ";", "\n", " ", RowBox[{"dd", " ", "=", " ", RowBox[{"Sqrt", "[", "d", "]"}]}], ";", "\n", " ", RowBox[{"Print", "[", "\"\< \>\"", "]"}], ";", "\n", " ", RowBox[{"Print", "[", "\"\\"", "]"}], ";", "\n", " ", RowBox[{"Print", "[", "\"\< \>\"", "]"}], ";", "\n", " ", RowBox[{"delta", " ", "=", " ", RowBox[{"N", "[", RowBox[{"dd", ",", RowBox[{"precision", " ", "+", " ", "10"}]}], "]"}]}], ";", "\n", " ", RowBox[{"Print", "[", "\"\< \>\"", "]"}], ";", " ", RowBox[{"Print", "[", RowBox[{"\"\\"", ",", "d"}], "]"}], ";", "\n", " ", RowBox[{"Print", "[", "\"\< \>\"", "]"}], ";", " ", RowBox[{"Print", "[", RowBox[{"\"\\"", ",", "delta"}], "]"}], ";", "\n", " ", RowBox[{"zeta", " ", "=", " ", RowBox[{"N", "[", RowBox[{ RowBox[{ RowBox[{"Cos", "[", RowBox[{"2", " ", RowBox[{"Pi", "/", "5"}]}], "]"}], " ", "+", " ", RowBox[{"I", "*", RowBox[{"Sin", "[", RowBox[{"2", " ", RowBox[{"Pi", "/", "5"}]}], "]"}]}]}], ",", "precision"}], "]"}]}], ";", "\n", " ", RowBox[{"root5", " ", "=", " ", RowBox[{ RowBox[{"2", RowBox[{"(", RowBox[{"zeta", " ", "+", " ", RowBox[{"zeta", "^", RowBox[{"(", RowBox[{"-", "1"}], ")"}]}]}], ")"}]}], " ", "+", " ", "1"}]}], " ", ";", "\n", " ", RowBox[{"Print", "[", "\"\< \>\"", "]"}], ";", " ", RowBox[{"Print", "[", RowBox[{"\"\\"", ",", "zeta"}], "]"}], ";", "\n", " ", RowBox[{"Print", "[", "\"\< \>\"", "]"}], ";", " ", RowBox[{"Print", "[", RowBox[{ "\"\<(corresponding square root of 5 = \>\"", ",", "root5", ",", "\"\<)\>\""}], "]"}], ";", "\n", " ", RowBox[{"Print", "[", "\"\< \>\"", "]"}], ";", " ", "\n", " ", RowBox[{ "Print", "[", "\"\\"", "]"}], ";", "\n", " ", RowBox[{"Print", "[", "\"\< \>\"", "]"}], ";", "\n", " ", RowBox[{"alpha", " ", "=", " ", RowBox[{ RowBox[{"T", "[", "1", "]"}], " ", "+", " ", RowBox[{ RowBox[{"T", "[", "2", "]"}], " ", "dd"}]}]}], " ", ";", " ", "\n", " ", RowBox[{"beta", " ", "=", " ", RowBox[{ RowBox[{"T", "[", "3", "]"}], " ", "+", " ", RowBox[{ RowBox[{"T", "[", "4", "]"}], " ", "dd"}]}]}], " ", ";", "\n", " ", RowBox[{"disc", " ", "=", " ", RowBox[{ RowBox[{"alpha", "^", "2"}], " ", "-", " ", RowBox[{"4", " ", "beta"}]}]}], ";", "\n", " ", RowBox[{"l1", " ", "=", " ", RowBox[{"N", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", "alpha"}], " ", "+", " ", RowBox[{"Sqrt", "[", "disc", "]"}]}], ")"}], "/", "2"}], ",", "precision"}], "]"}]}], ";", "\n", " ", RowBox[{"l4", " ", "=", " ", RowBox[{"N", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", "alpha"}], " ", "-", " ", RowBox[{"Sqrt", "[", "disc", "]"}]}], ")"}], "/", "2"}], ",", "precision"}], "]"}]}], ";", "\n", " ", RowBox[{"If", "[", RowBox[{ RowBox[{"IntegerQ", "[", "dd", "]"}], ",", "\n", " ", RowBox[{"If", "[", RowBox[{ RowBox[{"IntegerQ", "[", RowBox[{"Sqrt", "[", "disc", "]"}], "]"}], ",", "\n", " ", RowBox[{"Print", "[", "\"\\"", "]"}], ",", " ", RowBox[{"Print", "[", "\"\\"", "]"}]}], "]"}], ",", "\n", " ", RowBox[{"Print", "[", "\"\\"", "]"}]}], "]"}], ";", "\n", " ", RowBox[{"alphabar", " ", "=", " ", RowBox[{ RowBox[{"T", "[", "1", "]"}], " ", "-", " ", RowBox[{ RowBox[{"T", "[", "2", "]"}], " ", "delta"}]}]}], " ", ";", "\n", " ", RowBox[{"betabar", " ", "=", " ", RowBox[{ RowBox[{"T", "[", "3", "]"}], " ", "-", " ", RowBox[{ RowBox[{"T", "[", "4", "]"}], " ", "delta"}]}]}], " ", ";", "\n", " ", RowBox[{"discbar", " ", "=", " ", RowBox[{ RowBox[{"alphabar", "^", "2"}], " ", "-", " ", RowBox[{"4", " ", "betabar"}]}]}], ";", "\n", " ", RowBox[{"l2temp", " ", "=", " ", RowBox[{"N", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", "alphabar"}], " ", "+", " ", RowBox[{"Sqrt", "[", "discbar", "]"}]}], ")"}], "/", "2"}], ",", "precision"}], "]"}]}], ";", "\n", " ", RowBox[{"l3temp", " ", "=", " ", RowBox[{"N", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"-", "alphabar"}], " ", "-", " ", RowBox[{"Sqrt", "[", "discbar", "]"}]}], ")"}], "/", "2"}], ",", "precision"}], "]"}]}], ";", "\n", " ", RowBox[{"Print", "[", "\"\< \>\"", "]"}], ";", "\n", " ", RowBox[{ "Print", "[", "\"\<(checking ordering on roots of quartic)\>\"", "]"}], ";", "\n", " ", RowBox[{"test1", " ", "=", " ", RowBox[{"order", " ", "delta"}]}], " ", ";", "\n", " ", RowBox[{"test2", " ", "=", " ", RowBox[{ RowBox[{"(", RowBox[{"l1", " ", "-", " ", "l4"}], ")"}], RowBox[{"(", RowBox[{"l2temp", " ", "-", " ", "l3temp"}], ")"}]}]}], ";", "\n", " ", RowBox[{"Print", "[", "\"\< \>\"", "]"}], ";", "\n", " ", RowBox[{"If", "[", RowBox[{ RowBox[{"test1", " ", "==", " ", "test2"}], " ", ",", " ", RowBox[{ RowBox[{"l2", " ", "=", " ", "l2temp"}], ";", RowBox[{"l3", " ", "=", " ", "l3temp"}]}], ",", "\n", " ", RowBox[{ RowBox[{"l2", " ", "=", " ", "l3temp"}], ";", RowBox[{"l3", " ", "=", " ", "l2temp"}]}]}], "\n", " ", "]"}], ";", "\n", " ", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Abs", "[", RowBox[{"test1", " ", "-", " ", RowBox[{ RowBox[{"(", RowBox[{"l1", " ", "-", " ", "l4"}], ")"}], RowBox[{"(", RowBox[{"l2", " ", "-", " ", "l3"}], ")"}]}]}], "]"}], " ", ">", " ", ".00001"}], ",", " ", RowBox[{"Print", "[", RowBox[{ "\"\\"", ",", "test1", ",", "\"\< test2 = \>\"", ",", " ", RowBox[{ RowBox[{"(", RowBox[{"l1", "-", "l4"}], ")"}], RowBox[{"(", RowBox[{"l2", "-", "l3"}], ")"}]}]}], "]"}]}], "\n", " ", "]"}], ";", "\n", " ", RowBox[{"Print", "[", "\"\< \>\"", "]"}], ";", "\n", " ", RowBox[{"Print", "[", RowBox[{"\"\\"", ",", "l1"}], "]"}], ";", "\n", " ", RowBox[{"Print", "[", RowBox[{"\"\\"", ",", "l2"}], "]"}], ";", "\n", " ", RowBox[{"Print", "[", RowBox[{"\"\\"", ",", "l3"}], "]"}], ";", "\n", " ", RowBox[{"Print", "[", RowBox[{"\"\\"", ",", "l4"}], "]"}], ";", "\n", " ", RowBox[{"Print", "[", "\"\< \>\"", "]"}], ";", "\n", " ", RowBox[{ "Print", "[", "\"\\"", "]"}], ";", "\n", " ", RowBox[{"Print", "[", "\"\< \>\"", "]"}], ";", "\n", " ", RowBox[{"ll0", " ", "=", " ", "l0"}], ";", "\n", " ", RowBox[{"R1", " ", "=", " ", RowBox[{"ll0", " ", "+", " ", RowBox[{"l1", " ", "zeta"}], " ", "+", " ", RowBox[{"l2", " ", RowBox[{"zeta", "^", "2"}]}], " ", "+", " ", RowBox[{"l3", " ", RowBox[{"zeta", "^", "3"}]}], " ", "+", " ", RowBox[{"l4", " ", RowBox[{"zeta", "^", "4"}]}]}]}], " ", ";", "\n", " ", RowBox[{"R2", " ", "=", " ", RowBox[{"ll0", " ", "+", " ", RowBox[{"l3", " ", "zeta"}], " ", "+", " ", RowBox[{"l1", " ", RowBox[{"zeta", "^", "2"}]}], " ", "+", " ", RowBox[{"l4", " ", RowBox[{"zeta", "^", "3"}]}], " ", "+", " ", RowBox[{"l2", " ", RowBox[{"zeta", "^", "4"}]}]}]}], " ", ";", "\n", " ", RowBox[{"R3", " ", "=", " ", RowBox[{"ll0", " ", "+", " ", RowBox[{"l2", " ", "zeta"}], " ", "+", " ", RowBox[{"l4", " ", RowBox[{"zeta", "^", "2"}]}], " ", "+", " ", RowBox[{"l1", " ", RowBox[{"zeta", "^", "3"}]}], " ", "+", " ", RowBox[{"l3", " ", RowBox[{"zeta", "^", "4"}]}]}]}], " ", ";", "\n", " ", RowBox[{"R4", " ", "=", " ", RowBox[{"ll0", " ", "+", " ", RowBox[{"l4", " ", "zeta"}], " ", "+", " ", RowBox[{"l3", " ", RowBox[{"zeta", "^", "2"}]}], " ", "+", " ", RowBox[{"l2", " ", RowBox[{"zeta", "^", "3"}]}], " ", "+", " ", RowBox[{"l1", " ", RowBox[{"zeta", "^", "4"}]}]}]}], " ", ";", "\n", " ", RowBox[{ RowBox[{"Res", "[", "1", "]"}], " ", "=", " ", RowBox[{"NRoots", "[", RowBox[{ RowBox[{ RowBox[{"x", "^", "5"}], " ", "==", " ", "R1"}], ",", "x", ",", "precision"}], "]"}]}], ";", "\n", " ", RowBox[{ RowBox[{"Res", "[", "2", "]"}], " ", "=", " ", RowBox[{"NRoots", "[", RowBox[{ RowBox[{ RowBox[{"x", "^", "5"}], " ", "==", " ", "R2"}], ",", "x", ",", "precision"}], "]"}]}], ";", "\n", " ", RowBox[{ RowBox[{"Res", "[", "3", "]"}], " ", "=", " ", RowBox[{"NRoots", "[", RowBox[{ RowBox[{ RowBox[{"x", "^", "5"}], " ", "==", " ", "R3"}], ",", "x", ",", "precision"}], "]"}]}], ";", "\n", " ", RowBox[{ RowBox[{"Res", "[", "4", "]"}], " ", "=", " ", RowBox[{"NRoots", "[", RowBox[{ RowBox[{ RowBox[{"x", "^", "5"}], " ", "==", " ", "R4"}], ",", "x", ",", "precision"}], "]"}]}], ";", "\n", " ", RowBox[{"r1", " ", "=", " ", RowBox[{ RowBox[{"Res", "[", "1", "]"}], "[", RowBox[{"[", RowBox[{"1", ",", "2"}], "]"}], "]"}]}], ";", "\n", " ", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "<", "6"}], ",", RowBox[{"i", "++"}], ",", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Im", "[", RowBox[{"r1", " ", RowBox[{ RowBox[{"Res", "[", "4", "]"}], "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}]}], "]"}], " ", "==", " ", "0"}], ",", " ", RowBox[{"r4", " ", "=", " ", RowBox[{ RowBox[{"Res", "[", "4", "]"}], "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}]}]}], "]"}]}], "]"}], ";", "\n", " ", RowBox[{"test3", " ", ":=", " ", RowBox[{"u", " ", "+", " ", RowBox[{"v", " ", "delta", " ", "root5"}]}]}], " ", ";", "\n", " ", RowBox[{"test4", " ", ":=", " ", RowBox[{"u", " ", "-", " ", RowBox[{"v", " ", "delta", " ", "root5"}]}]}], " ", ";", "\n", " ", RowBox[{"For", "[", RowBox[{ RowBox[{"i", "=", "1"}], ",", RowBox[{"i", "<", "6"}], ",", RowBox[{"i", "++"}], ",", "\n", " ", RowBox[{"For", "[", RowBox[{ RowBox[{"j", "=", "1"}], ",", RowBox[{"j", "<", "6"}], ",", RowBox[{"j", "++"}], ",", "\n", " ", RowBox[{ RowBox[{"r2temp", " ", "=", " ", RowBox[{ RowBox[{"Res", "[", "2", "]"}], "[", RowBox[{"[", RowBox[{"i", ",", "2"}], "]"}], "]"}]}], " ", ";", " ", RowBox[{"r3temp", " ", "=", " ", RowBox[{ RowBox[{"Res", "[", "3", "]"}], "[", RowBox[{"[", RowBox[{"j", ",", "2"}], "]"}], "]"}]}], " ", ";", "\n", " ", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{ RowBox[{"r1", " ", RowBox[{"r2temp", "^", "2"}]}], " ", "+", " ", RowBox[{"r4", " ", RowBox[{"r3temp", "^", "2"}]}]}], " ", "==", " ", "test3"}], " ", "&&", " ", "\n", " ", RowBox[{ RowBox[{ RowBox[{"r3temp", " ", RowBox[{"r1", "^", "2"}]}], " ", "+", " ", RowBox[{"r2temp", " ", RowBox[{"r4", "^", "2"}]}]}], " ", "==", " ", "test4"}]}], ",", " ", RowBox[{ RowBox[{"r2", " ", "=", " ", "r2temp"}], " ", ";", " ", RowBox[{"r3", " ", "=", " ", "r3temp"}], " ", ";", "\n", " ", RowBox[{"i", " ", "=", " ", "5"}], " ", ";", " ", RowBox[{"j", " ", "=", " ", "5"}]}]}], "]"}]}]}], " ", "]"}]}], "]"}], ";", "\n", " ", RowBox[{"x1", " ", "=", " ", RowBox[{ RowBox[{"(", RowBox[{ "r1", " ", "+", " ", "r2", " ", "+", " ", "r3", " ", "+", " ", "r4"}], ")"}], "/", "5"}]}], " ", ";", "\n", " ", RowBox[{"x2", " ", "=", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"r1", " ", RowBox[{"zeta", "^", "4"}]}], " ", "+", " ", RowBox[{"r2", " ", RowBox[{"zeta", "^", "3"}]}], " ", "+", " ", RowBox[{"r3", " ", RowBox[{"zeta", "^", "2"}]}], " ", "+", " ", RowBox[{"r4", " ", RowBox[{"zeta", "^", "1"}]}]}], ")"}], "/", "5"}]}], ";", "\n", " ", RowBox[{"x3", " ", "=", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"r1", " ", RowBox[{"zeta", "^", "3"}]}], " ", "+", " ", RowBox[{"r2", " ", RowBox[{"zeta", "^", "1"}]}], " ", "+", " ", RowBox[{"r3", " ", RowBox[{"zeta", "^", "4"}]}], " ", "+", " ", RowBox[{"r4", " ", RowBox[{"zeta", "^", "2"}]}]}], ")"}], "/", "5"}]}], ";", "\n", " ", RowBox[{"x4", " ", "=", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"r1", " ", RowBox[{"zeta", "^", "2"}]}], " ", "+", " ", RowBox[{"r2", " ", RowBox[{"zeta", "^", "4"}]}], " ", "+", " ", RowBox[{"r3", " ", RowBox[{"zeta", "^", "1"}]}], " ", "+", " ", RowBox[{"r4", " ", RowBox[{"zeta", "^", "3"}]}]}], ")"}], "/", "5"}]}], ";", "\n", " ", RowBox[{"x5", " ", "=", " ", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"r1", " ", RowBox[{"zeta", "^", "1"}]}], " ", "+", " ", RowBox[{"r2", " ", RowBox[{"zeta", "^", "2"}]}], " ", "+", " ", RowBox[{"r3", " ", RowBox[{"zeta", "^", "3"}]}], " ", "+", " ", RowBox[{"r4", " ", RowBox[{"zeta", "^", "4"}]}]}], ")"}], "/", "5"}]}], ";", "\n", " ", RowBox[{"Print", "[", "\"\< \>\"", "]"}], ";", "\n", " ", RowBox[{"Print", "[", "\"\\"", "]"}], ";", "\n", " ", RowBox[{"Print", "[", "\"\< \>\"", "]"}], ";", "\n", " ", RowBox[{"Print", "[", "x1", "]"}], ";", " ", RowBox[{"Print", "[", "x2", "]"}], " ", ";", " ", RowBox[{"Print", "[", "x3", "]"}], " ", ";", " ", RowBox[{"Print", "[", "x4", "]"}], " ", ";", " ", RowBox[{"Print", "[", "x5", "]"}]}]}], "\n", "]"}]], "Input",ExpressionUUI\ D->"b8e14ec5-4c4f-446d-bc2c-0753ffe98f35"] }, WindowSize->{769.1999999999999, 485.4}, WindowMargins->{{Automatic, 168.9000000000001}, { 17.700000000000045`, Automatic}}, PrivateNotebookOptions->{"VersionedStylesheet"->{"Default.nb"[8.] -> False}}, FrontEndVersion->"12.2 for Microsoft Windows (64-bit) (December 12, 2020)", StyleDefinitions->"Default.nb", ExpressionUUID->"73da9f73-c6ce-4206-9f63-ce6af76cd350" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[558, 20, 560071, 13143, 29137, "Input",ExpressionUUID->"e417fba6-7660-4b69-9cae-684f0ca9082f"], Cell[560632, 13165, 2058, 49, 239, "Input",ExpressionUUID->"717c36b3-c232-4fcf-803d-6547a7ca5c5b"], Cell[562693, 13216, 271, 6, 28, "Input",ExpressionUUID->"16f8d6b3-4c1e-4fc9-9acd-218e508f084d"], Cell[562967, 13224, 361, 9, 28, "Input",ExpressionUUID->"d57fed4f-00a7-44f9-9748-597b3b6f6979"], Cell[563331, 13235, 9081, 224, 354, "Input",ExpressionUUID->"9db1abb8-09e0-4c32-a943-42f9b5dfcf43"], Cell[572415, 13461, 174, 4, 70, "Input",ExpressionUUID->"956b3cac-f6e4-41d5-a6a2-d12b6545825f"], Cell[572592, 13467, 145, 3, 70, "Input",ExpressionUUID->"83e13fa9-1712-4b7c-b495-4c682d15fdb4"], Cell[572740, 13472, 1064, 29, 70, "Input",ExpressionUUID->"bafa83fc-cb84-4e48-89dc-5d8b034d045e"], Cell[573807, 13503, 599, 16, 70, "Input",ExpressionUUID->"6fe1c755-2317-4228-bd52-0e1b344f6812"], Cell[574409, 13521, 148, 3, 70, "Input",ExpressionUUID->"bee04a01-a8d0-46f7-ba46-6e3b6580cc69"], Cell[574560, 13526, 16252, 417, 70, "Input",ExpressionUUID->"b8e14ec5-4c4f-446d-bc2c-0753ffe98f35"] } ] *) (* End of internal cache information *)