html, body, form { margin: 0; padding: 0; width: 100%; } #calculate { position: relative; width: 177px; height: 110px; background: transparent url(/images/alphabox/embed_functions_inside.gif) no-repeat scroll 0 0; } #i { position: relative; left: 18px; top: 44px; width: 133px; border: 0 none; outline: 0; font-size: 11px; } #eq { width: 9px; height: 10px; background: transparent; position: absolute; top: 47px; right: 18px; cursor: pointer; }

 KelvinKer

 http://functions.wolfram.com/03.20.03.0036.01

 Input Form

 KelvinKer[14/3, z] == -(I Pi (-24 (-2)^(1/3) 3^(5/6) z^(28/3) ((1 + I) z)^(2/3) (110 I + 9 z^2) (-2 (-3 I + Sqrt[3]) z^(2/3) + 2^(2/3) (3 - I Sqrt[3]) ((1 + I) z)^(2/3)) AiryAi[(-(1/2)) 3^(2/3) ((1 + I) z)^(2/3)] - 48 (-1)^(1/6) 2^(1/3) 3^(5/6) z^(28/3) ((1 + I) z)^(2/3) ((110 + 110 I) (-1)^(1/12) Sqrt[6] z^(2/3) + 9 I (3 I + Sqrt[3]) z^(8/3) + 110 (-1)^(1/6) 2^(2/3) Sqrt[3] ((1 + I) z)^(2/3) + 9 (-2)^(2/3) Sqrt[3] z^2 ((1 + I) z)^(2/3)) AiryAi[(1/2) 3^(2/3) ((1 + I) z)^(2/3)] - (1/((-1)^(1/4) z)^(2/3)) (6 z^(28/3) (14080 I z^(2/3) + 4320 z^(8/3) - 81 I z^(14/3) - 14080 (-1)^(2/3) ((-1)^(1/4) z)^(2/3) + 81 (-1)^(2/3) z^4 ((-1)^(1/4) z)^(2/3) + 4320 (-1)^(2/3) ((-1)^(1/4) z)^(8/3)) AiryAiPrime[(-(1/2)) 3^(2/3) ((1 + I) z)^(2/3)]) + (25920 (-1)^(3/4) z^11 ((-1)^(1/12) z^(1/3) + ((-1)^(1/4) z)^(1/3)) + 84480 ((-1)^(1/3) z^(28/3) + ((-1)^(1/4) z)^(28/3)) - 486 z^4 ((-1)^(1/3) z^(28/3) + ((-1)^(1/4) z)^(28/3))) AiryAiPrime[(1/2) 3^(2/3) ((1 + I) z)^(2/3)] - 48 (-1)^(1/6) 2^(1/3) 3^(5/6) z^(28/3) ((1 + I) z)^(2/3) (220 (-1)^(1/3) z^(2/3) - 18 (-1)^(5/6) z^(8/3) + 110 I 2^(2/3) ((1 + I) z)^(2/3) + 9 2^(2/3) z^2 ((1 + I) z)^(2/3)) AiryBi[(-(1/2)) 3^(2/3) ((1 + I) z)^(2/3)] - 48 (-1)^(1/4) 2^(1/3) 3^(5/6) z^(28/3) ((1 + I) z)^(2/3) ((-110 - 110 I) Sqrt[2] z^(2/3) + 9 (-1)^(1/12) (1 - I Sqrt[3]) z^(8/3) + 110 (-1)^(1/12) 2^(2/3) ((1 + I) z)^(2/3) + 9 (-1)^(7/12) 2^(2/3) z^2 ((1 + I) z)^(2/3)) AiryBi[(1/2) 3^(2/3) ((1 + I) z)^(2/3)] - (1/((-1)^(1/4) z)^(2/3)) (2 Sqrt[3] z^(28/3) (-14080 I z^(2/3) - 4320 z^(8/3) + 81 I z^(14/3) - 14080 (-1)^(2/3) ((-1)^(1/4) z)^(2/3) + 81 (-1)^(2/3) z^4 ((-1)^(1/4) z)^(2/3) + 4320 (-1)^(2/3) ((-1)^(1/4) z)^(8/3)) AiryBiPrime[(-(1/2)) 3^(2/3) ((1 + I) z)^(2/3)]) + (1/((-1)^(1/4) z)^(2/3)) (2 Sqrt[3] z^(28/3) (-14080 I z^(2/3) + 4320 z^(8/3) + 81 I z^(14/3) + 14080 (-1)^(1/3) ((-1)^(1/4) z)^(2/3) - 81 (-1)^(1/3) z^4 ((-1)^(1/4) z)^(2/3) + 4320 (-1)^(1/3) ((-1)^(1/4) z)^(8/3)) AiryBiPrime[ (1/2) 3^(2/3) ((1 + I) z)^(2/3)])))/(972 2^(1/3) 3^(1/6) z^(14/3) ((-1)^(1/4) z)^(28/3))

 Standard Form

 Cell[BoxData[RowBox[List[RowBox[List["KelvinKer", "[", RowBox[List[FractionBox["14", "3"], ",", "z"]], "]"]], "\[Equal]", RowBox[List[RowBox[List["-", RowBox[List["(", RowBox[List["\[ImaginaryI]", " ", "\[Pi]", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "24"]], " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "2"]], ")"]], RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["3", RowBox[List["5", "/", "6"]]], " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]], " ", RowBox[List["(", RowBox[List[RowBox[List["110", " ", "\[ImaginaryI]"]], "+", RowBox[List["9", " ", SuperscriptBox["z", "2"]]]]], ")"]], " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "3"]], " ", "\[ImaginaryI]"]], "+", SqrtBox["3"]]], ")"]], " ", SuperscriptBox["z", RowBox[List["2", "/", "3"]]]]], "+", RowBox[List[SuperscriptBox["2", RowBox[List["2", "/", "3"]]], " ", RowBox[List["(", RowBox[List["3", "-", RowBox[List["\[ImaginaryI]", " ", SqrtBox["3"]]]]], ")"]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]]]], ")"]], " ", RowBox[List["AiryAi", "[", RowBox[List[RowBox[List["-", FractionBox["1", "2"]]], " ", SuperscriptBox["3", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "]"]]]], "-", RowBox[List["48", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "6"]]], " ", SuperscriptBox["2", RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["3", RowBox[List["5", "/", "6"]]], " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]], " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["(", RowBox[List["110", "+", RowBox[List["110", " ", "\[ImaginaryI]"]]]], ")"]], " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "12"]]], " ", SqrtBox["6"], " ", SuperscriptBox["z", RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["9", " ", "\[ImaginaryI]", " ", RowBox[List["(", RowBox[List[RowBox[List["3", " ", "\[ImaginaryI]"]], "+", SqrtBox["3"]]], ")"]], " ", SuperscriptBox["z", RowBox[List["8", "/", "3"]]]]], "+", RowBox[List["110", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "6"]]], " ", SuperscriptBox["2", RowBox[List["2", "/", "3"]]], " ", SqrtBox["3"], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["9", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "2"]], ")"]], RowBox[List["2", "/", "3"]]], " ", SqrtBox["3"], " ", SuperscriptBox["z", "2"], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]]]], ")"]], " ", RowBox[List["AiryAi", "[", RowBox[List[FractionBox["1", "2"], " ", SuperscriptBox["3", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "]"]]]], "-", RowBox[List[FractionBox["1", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]], RowBox[List["(", RowBox[List["6", " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]], " ", RowBox[List["(", RowBox[List[RowBox[List["14080", " ", "\[ImaginaryI]", " ", SuperscriptBox["z", RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["4320", " ", SuperscriptBox["z", RowBox[List["8", "/", "3"]]]]], "-", RowBox[List["81", " ", "\[ImaginaryI]", " ", SuperscriptBox["z", RowBox[List["14", "/", "3"]]]]], "-", RowBox[List["14080", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["81", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["2", "/", "3"]]], " ", SuperscriptBox["z", "4"], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["4320", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["8", "/", "3"]]]]]]], ")"]], " ", RowBox[List["AiryAiPrime", "[", RowBox[List[RowBox[List["-", FractionBox["1", "2"]]], " ", SuperscriptBox["3", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "]"]]]], ")"]]]], "+", RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["25920", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["3", "/", "4"]]], " ", SuperscriptBox["z", "11"], " ", RowBox[List["(", RowBox[List[RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "12"]]], " ", SuperscriptBox["z", RowBox[List["1", "/", "3"]]]]], "+", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["1", "/", "3"]]]]], ")"]]]], "+", RowBox[List["84480", " ", RowBox[List["(", RowBox[List[RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]]]], "+", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["28", "/", "3"]]]]], ")"]]]], "-", RowBox[List["486", " ", SuperscriptBox["z", "4"], " ", RowBox[List["(", RowBox[List[RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]]]], "+", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["28", "/", "3"]]]]], ")"]]]]]], ")"]], " ", RowBox[List["AiryAiPrime", "[", RowBox[List[FractionBox["1", "2"], " ", SuperscriptBox["3", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "]"]]]], "-", RowBox[List["48", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "6"]]], " ", SuperscriptBox["2", RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["3", RowBox[List["5", "/", "6"]]], " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]], " ", RowBox[List["(", RowBox[List[RowBox[List["220", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["z", RowBox[List["2", "/", "3"]]]]], "-", RowBox[List["18", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["5", "/", "6"]]], " ", SuperscriptBox["z", RowBox[List["8", "/", "3"]]]]], "+", RowBox[List["110", " ", "\[ImaginaryI]", " ", SuperscriptBox["2", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["9", " ", SuperscriptBox["2", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox["z", "2"], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]]]], ")"]], " ", RowBox[List["AiryBi", "[", RowBox[List[RowBox[List["-", FractionBox["1", "2"]]], " ", SuperscriptBox["3", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "]"]]]], "-", RowBox[List["48", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", SuperscriptBox["2", RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["3", RowBox[List["5", "/", "6"]]], " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]], " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["-", "110"]], "-", RowBox[List["110", " ", "\[ImaginaryI]"]]]], ")"]], " ", SqrtBox["2"], " ", SuperscriptBox["z", RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["9", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "12"]]], " ", RowBox[List["(", RowBox[List["1", "-", RowBox[List["\[ImaginaryI]", " ", SqrtBox["3"]]]]], ")"]], " ", SuperscriptBox["z", RowBox[List["8", "/", "3"]]]]], "+", RowBox[List["110", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "12"]]], " ", SuperscriptBox["2", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["9", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["7", "/", "12"]]], " ", SuperscriptBox["2", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox["z", "2"], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]]]], ")"]], " ", RowBox[List["AiryBi", "[", RowBox[List[FractionBox["1", "2"], " ", SuperscriptBox["3", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "]"]]]], "-", RowBox[List[FractionBox["1", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]], RowBox[List["(", RowBox[List["2", " ", SqrtBox["3"], " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]], " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "14080"]], " ", "\[ImaginaryI]", " ", SuperscriptBox["z", RowBox[List["2", "/", "3"]]]]], "-", RowBox[List["4320", " ", SuperscriptBox["z", RowBox[List["8", "/", "3"]]]]], "+", RowBox[List["81", " ", "\[ImaginaryI]", " ", SuperscriptBox["z", RowBox[List["14", "/", "3"]]]]], "-", RowBox[List["14080", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["81", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["2", "/", "3"]]], " ", SuperscriptBox["z", "4"], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["4320", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["8", "/", "3"]]]]]]], ")"]], " ", RowBox[List["AiryBiPrime", "[", RowBox[List[RowBox[List["-", FractionBox["1", "2"]]], " ", SuperscriptBox["3", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "]"]]]], ")"]]]], "+", RowBox[List[FractionBox["1", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]], RowBox[List["(", RowBox[List["2", " ", SqrtBox["3"], " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]], " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "14080"]], " ", "\[ImaginaryI]", " ", SuperscriptBox["z", RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["4320", " ", SuperscriptBox["z", RowBox[List["8", "/", "3"]]]]], "+", RowBox[List["81", " ", "\[ImaginaryI]", " ", SuperscriptBox["z", RowBox[List["14", "/", "3"]]]]], "+", RowBox[List["14080", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "-", RowBox[List["81", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["z", "4"], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["4320", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["8", "/", "3"]]]]]]], ")"]], " ", RowBox[List["AiryBiPrime", "[", RowBox[List[FractionBox["1", "2"], " ", SuperscriptBox["3", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "]"]]]], ")"]]]]]], ")"]]]], ")"]]]], "/", RowBox[List["(", RowBox[List["972", " ", SuperscriptBox["2", RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["3", RowBox[List["1", "/", "6"]]], " ", SuperscriptBox["z", RowBox[List["14", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["28", "/", "3"]]]]], ")"]]]]]]]]

 MathML Form

 ker 14 3 ( z ) - π 972 2 3 3 6 z 14 / 3 ( - 1 4 z ) 28 / 3 ( - 48 - 1 6 2 3 3 5 / 6 z 28 / 3 ( - 1 12 6 ( 110 + 110 ) z 2 / 3 + 9 ( 3 + 3 ) z 8 / 3 + 9 ( - 2 ) 2 / 3 3 ( ( 1 + ) z ) 2 / 3 z 2 + 110 - 1 6 2 2 / 3 3 ( ( 1 + ) z ) 2 / 3 ) Ai ( 1 2 3 2 / 3 ( ( 1 + ) z ) 2 / 3 ) ( ( 1 + ) z ) 2 / 3 - 24 - 2 3 3 5 / 6 z 28 / 3 ( 9 z 2 + 110 ) ( 2 2 / 3 ( 3 - 3 ) ( ( 1 + ) z ) 2 / 3 - 2 ( - 3 + 3 ) z 2 / 3 ) Ai ( - 1 2 3 2 / 3 ( ( 1 + ) z ) 2 / 3 ) ( ( 1 + ) z ) 2 / 3 - 48 - 1 4 2 3 3 5 / 6 z 28 / 3 ( 2 ( - 110 - 110 ) z 2 / 3 + 9 - 1 12 ( 1 - 3 ) z 8 / 3 + 9 ( - 1 ) 7 / 12 2 2 / 3 ( ( 1 + ) z ) 2 / 3 z 2 + 110 - 1 12 2 2 / 3 ( ( 1 + ) z ) 2 / 3 ) Bi ( 1 2 3 2 / 3 ( ( 1 + ) z ) 2 / 3 ) ( ( 1 + ) z ) 2 / 3 - 48 - 1 6 2 3 3 5 / 6 z 28 / 3 ( 220 - 1 3 z 2 / 3 - 18 ( - 1 ) 5 / 6 z 8 / 3 + 9 2 2 / 3 ( ( 1 + ) z ) 2 / 3 z 2 + 110 2 2 / 3 ( ( 1 + ) z ) 2 / 3 ) Bi ( - 1 2 3 2 / 3 ( ( 1 + ) z ) 2 / 3 ) ( ( 1 + ) z ) 2 / 3 + ( 25920 ( - 1 ) 3 / 4 ( - 1 12 z 3 + - 1 4 z 3 ) z 11 - 486 ( - 1 3 z 28 / 3 + ( - 1 4 z ) 28 / 3 ) z 4 + 84480 ( - 1 3 z 28 / 3 + ( - 1 4 z ) 28 / 3 ) ) Ai ( 1 2 3 2 / 3 ( ( 1 + ) z ) 2 / 3 ) - 1 ( - 1 4 z ) 2 / 3 ( 6 z 28 / 3 ( 14080 z 2 / 3 + 4320 z 8 / 3 - 81 z 14 / 3 + 81 ( - 1 ) 2 / 3 ( - 1 4 z ) 2 / 3 z 4 - 14080 ( - 1 ) 2 / 3 ( - 1 4 z ) 2 / 3 + 4320 ( - 1 ) 2 / 3 ( - 1 4 z ) 8 / 3 ) Ai ( - 1 2 3 2 / 3 ( ( 1 + ) z ) 2 / 3 ) ) + 1 ( - 1 4 z ) 2 / 3 ( 2 3 z 28 / 3 ( - 14080 z 2 / 3 + 4320 z 8 / 3 + 81 z 14 / 3 - 81 - 1 3 ( - 1 4 z ) 2 / 3 z 4 + 14080 - 1 3 ( - 1 4 z ) 2 / 3 + 4320 - 1 3 ( - 1 4 z ) 8 / 3 ) Bi ( 1 2 3 2 / 3 ( ( 1 + ) z ) 2 / 3 ) ) - 1 ( - 1 4 z ) 2 / 3 ( 2 3 z 28 / 3 ( - 14080 z 2 / 3 - 4320 z 8 / 3 + 81 z 14 / 3 + 81 ( - 1 ) 2 / 3 ( - 1 4 z ) 2 / 3 z 4 - 14080 ( - 1 ) 2 / 3 ( - 1 4 z ) 2 / 3 + 4320 ( - 1 ) 2 / 3 ( - 1 4 z ) 8 / 3 ) Bi ( - 1 2 3 2 / 3 ( ( 1 + ) z ) 2 / 3 ) ) ) KelvinKer 14 3 z -1 972 2 1 3 3 1 6 z 14 3 -1 1 4 z 28 3 -1 -48 -1 1 6 2 1 3 3 5 6 z 28 3 -1 1 12 6 1 2 110 110 z 2 3 9 3 3 1 2 z 8 3 9 -2 2 3 3 1 2 1 z 2 3 z 2 110 -1 1 6 2 2 3 3 1 2 1 z 2 3 AiryAi 1 2 3 2 3 1 z 2 3 1 z 2 3 -1 24 -2 1 3 3 5 6 z 28 3 9 z 2 110 2 2 3 3 -1 3 1 2 1 z 2 3 -1 2 -3 3 1 2 z 2 3 AiryAi -1 1 2 3 2 3 1 z 2 3 1 z 2 3 -1 48 -1 1 4 2 1 3 3 5 6 z 28 3 2 1 2 -110 -110 z 2 3 9 -1 1 12 1 -1 3 1 2 z 8 3 9 -1 7 12 2 2 3 1 z 2 3 z 2 110 -1 1 12 2 2 3 1 z 2 3 AiryBi 1 2 3 2 3 1 z 2 3 1 z 2 3 -1 48 -1 1 6 2 1 3 3 5 6 z 28 3 220 -1 1 3 z 2 3 -1 18 -1 5 6 z 8 3 9 2 2 3 1 z 2 3 z 2 110 2 2 3 1 z 2 3 AiryBi -1 1 2 3 2 3 1 z 2 3 1 z 2 3 25920 -1 3 4 -1 1 12 z 1 3 -1 1 4 z 1 3 z 11 -1 486 -1 1 3 z 28 3 -1 1 4 z 28 3 z 4 84480 -1 1 3 z 28 3 -1 1 4 z 28 3 AiryAiPrime 1 2 3 2 3 1 z 2 3 -1 1 -1 1 4 z 2 3 -1 6 z 28 3 14080 z 2 3 4320 z 8 3 -1 81 z 14 3 81 -1 2 3 -1 1 4 z 2 3 z 4 -1 14080 -1 2 3 -1 1 4 z 2 3 4320 -1 2 3 -1 1 4 z 8 3 AiryAiPrime -1 1 2 3 2 3 1 z 2 3 1 -1 1 4 z 2 3 -1 2 3 1 2 z 28 3 -14080 z 2 3 4320 z 8 3 81 z 14 3 -1 81 -1 1 3 -1 1 4 z 2 3 z 4 14080 -1 1 3 -1 1 4 z 2 3 4320 -1 1 3 -1 1 4 z 8 3 AiryBiPrime 1 2 3 2 3 1 z 2 3 -1 1 -1 1 4 z 2 3 -1 2 3 1 2 z 28 3 -14080 z 2 3 -1 4320 z 8 3 81 z 14 3 81 -1 2 3 -1 1 4 z 2 3 z 4 -1 14080 -1 2 3 -1 1 4 z 2 3 4320 -1 2 3 -1 1 4 z 8 3 AiryBiPrime -1 1 2 3 2 3 1 z 2 3 [/itex]

 Rule Form

 Cell[BoxData[RowBox[List[RowBox[List["HoldPattern", "[", RowBox[List["KelvinKer", "[", RowBox[List[FractionBox["14", "3"], ",", "z_"]], "]"]], "]"]], "\[RuleDelayed]", RowBox[List["-", FractionBox[RowBox[List["\[ImaginaryI]", " ", "\[Pi]", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "24"]], " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "2"]], ")"]], RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["3", RowBox[List["5", "/", "6"]]], " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]], " ", RowBox[List["(", RowBox[List[RowBox[List["110", " ", "\[ImaginaryI]"]], "+", RowBox[List["9", " ", SuperscriptBox["z", "2"]]]]], ")"]], " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "3"]], " ", "\[ImaginaryI]"]], "+", SqrtBox["3"]]], ")"]], " ", SuperscriptBox["z", RowBox[List["2", "/", "3"]]]]], "+", RowBox[List[SuperscriptBox["2", RowBox[List["2", "/", "3"]]], " ", RowBox[List["(", RowBox[List["3", "-", RowBox[List["\[ImaginaryI]", " ", SqrtBox["3"]]]]], ")"]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]]]], ")"]], " ", RowBox[List["AiryAi", "[", RowBox[List[RowBox[List["-", FractionBox["1", "2"]]], " ", SuperscriptBox["3", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "]"]]]], "-", RowBox[List["48", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "6"]]], " ", SuperscriptBox["2", RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["3", RowBox[List["5", "/", "6"]]], " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]], " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["(", RowBox[List["110", "+", RowBox[List["110", " ", "\[ImaginaryI]"]]]], ")"]], " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "12"]]], " ", SqrtBox["6"], " ", SuperscriptBox["z", RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["9", " ", "\[ImaginaryI]", " ", RowBox[List["(", RowBox[List[RowBox[List["3", " ", "\[ImaginaryI]"]], "+", SqrtBox["3"]]], ")"]], " ", SuperscriptBox["z", RowBox[List["8", "/", "3"]]]]], "+", RowBox[List["110", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "6"]]], " ", SuperscriptBox["2", RowBox[List["2", "/", "3"]]], " ", SqrtBox["3"], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["9", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "2"]], ")"]], RowBox[List["2", "/", "3"]]], " ", SqrtBox["3"], " ", SuperscriptBox["z", "2"], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]]]], ")"]], " ", RowBox[List["AiryAi", "[", RowBox[List[FractionBox["1", "2"], " ", SuperscriptBox["3", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "]"]]]], "-", FractionBox[RowBox[List["6", " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]], " ", RowBox[List["(", RowBox[List[RowBox[List["14080", " ", "\[ImaginaryI]", " ", SuperscriptBox["z", RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["4320", " ", SuperscriptBox["z", RowBox[List["8", "/", "3"]]]]], "-", RowBox[List["81", " ", "\[ImaginaryI]", " ", SuperscriptBox["z", RowBox[List["14", "/", "3"]]]]], "-", RowBox[List["14080", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["81", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["2", "/", "3"]]], " ", SuperscriptBox["z", "4"], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["4320", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["8", "/", "3"]]]]]]], ")"]], " ", RowBox[List["AiryAiPrime", "[", RowBox[List[RowBox[List["-", FractionBox["1", "2"]]], " ", SuperscriptBox["3", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "]"]]]], SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]], "+", RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["25920", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["3", "/", "4"]]], " ", SuperscriptBox["z", "11"], " ", RowBox[List["(", RowBox[List[RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "12"]]], " ", SuperscriptBox["z", RowBox[List["1", "/", "3"]]]]], "+", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["1", "/", "3"]]]]], ")"]]]], "+", RowBox[List["84480", " ", RowBox[List["(", RowBox[List[RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]]]], "+", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["28", "/", "3"]]]]], ")"]]]], "-", RowBox[List["486", " ", SuperscriptBox["z", "4"], " ", RowBox[List["(", RowBox[List[RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]]]], "+", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["28", "/", "3"]]]]], ")"]]]]]], ")"]], " ", RowBox[List["AiryAiPrime", "[", RowBox[List[FractionBox["1", "2"], " ", SuperscriptBox["3", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "]"]]]], "-", RowBox[List["48", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "6"]]], " ", SuperscriptBox["2", RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["3", RowBox[List["5", "/", "6"]]], " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]], " ", RowBox[List["(", RowBox[List[RowBox[List["220", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["z", RowBox[List["2", "/", "3"]]]]], "-", RowBox[List["18", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["5", "/", "6"]]], " ", SuperscriptBox["z", RowBox[List["8", "/", "3"]]]]], "+", RowBox[List["110", " ", "\[ImaginaryI]", " ", SuperscriptBox["2", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["9", " ", SuperscriptBox["2", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox["z", "2"], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]]]], ")"]], " ", RowBox[List["AiryBi", "[", RowBox[List[RowBox[List["-", FractionBox["1", "2"]]], " ", SuperscriptBox["3", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "]"]]]], "-", RowBox[List["48", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", SuperscriptBox["2", RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["3", RowBox[List["5", "/", "6"]]], " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]], " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["-", "110"]], "-", RowBox[List["110", " ", "\[ImaginaryI]"]]]], ")"]], " ", SqrtBox["2"], " ", SuperscriptBox["z", RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["9", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "12"]]], " ", RowBox[List["(", RowBox[List["1", "-", RowBox[List["\[ImaginaryI]", " ", SqrtBox["3"]]]]], ")"]], " ", SuperscriptBox["z", RowBox[List["8", "/", "3"]]]]], "+", RowBox[List["110", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "12"]]], " ", SuperscriptBox["2", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["9", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["7", "/", "12"]]], " ", SuperscriptBox["2", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox["z", "2"], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]]]], ")"]], " ", RowBox[List["AiryBi", "[", RowBox[List[FractionBox["1", "2"], " ", SuperscriptBox["3", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "]"]]]], "-", FractionBox[RowBox[List["2", " ", SqrtBox["3"], " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]], " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "14080"]], " ", "\[ImaginaryI]", " ", SuperscriptBox["z", RowBox[List["2", "/", "3"]]]]], "-", RowBox[List["4320", " ", SuperscriptBox["z", RowBox[List["8", "/", "3"]]]]], "+", RowBox[List["81", " ", "\[ImaginaryI]", " ", SuperscriptBox["z", RowBox[List["14", "/", "3"]]]]], "-", RowBox[List["14080", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["81", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["2", "/", "3"]]], " ", SuperscriptBox["z", "4"], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["4320", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["8", "/", "3"]]]]]]], ")"]], " ", RowBox[List["AiryBiPrime", "[", RowBox[List[RowBox[List["-", FractionBox["1", "2"]]], " ", SuperscriptBox["3", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "]"]]]], SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]], "+", FractionBox[RowBox[List["2", " ", SqrtBox["3"], " ", SuperscriptBox["z", RowBox[List["28", "/", "3"]]], " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "14080"]], " ", "\[ImaginaryI]", " ", SuperscriptBox["z", RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["4320", " ", SuperscriptBox["z", RowBox[List["8", "/", "3"]]]]], "+", RowBox[List["81", " ", "\[ImaginaryI]", " ", SuperscriptBox["z", RowBox[List["14", "/", "3"]]]]], "+", RowBox[List["14080", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "-", RowBox[List["81", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["z", "4"], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "+", RowBox[List["4320", " ", SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["8", "/", "3"]]]]]]], ")"]], " ", RowBox[List["AiryBiPrime", "[", RowBox[List[FractionBox["1", "2"], " ", SuperscriptBox["3", RowBox[List["2", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List["1", "+", "\[ImaginaryI]"]], ")"]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]], "]"]]]], SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["2", "/", "3"]]]]]], ")"]]]], RowBox[List["972", " ", SuperscriptBox["2", RowBox[List["1", "/", "3"]]], " ", SuperscriptBox["3", RowBox[List["1", "/", "6"]]], " ", SuperscriptBox["z", RowBox[List["14", "/", "3"]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], RowBox[List["1", "/", "4"]]], " ", "z"]], ")"]], RowBox[List["28", "/", "3"]]]]]]]]]]]]

 Date Added to functions.wolfram.com (modification date)

 2007-05-02