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; }

 HypergeometricPFQ

 http://functions.wolfram.com/07.27.03.aune.01

 Input Form

 HypergeometricPFQ[{5/2, 4, 4}, {-(7/2), -(7/2)}, z] == (1/(12544 (-1 + z)^17)) (-12544 + 172288 z - 1296384 z^2 + 952320 z^3 - 1778519040 z^4 - 553433266176 z^5 - 15051627967488 z^6 - 112579709698176 z^7 - 315264173579520 z^8 - 370795806516200 z^9 - 187163046258760 z^10 - 38294677232955 z^11 - 2669644957980 z^12 - 39249270060 z^13) - (6435 (732160 z^(9/2) + 54512640 z^(11/2) + 797086080 z^(13/2) + 3939152896 z^(15/2) + 7980509880 z^(17/2) + 7115963400 z^(19/2) + 2786008225 z^(21/2) + 443821950 z^(23/2) + 23567544 z^(25/2) + 240240 z^(27/2)) ArcSin[Sqrt[z]])/ (1792 Sqrt[1 - z] (-1 + 17 z - 136 z^2 + 680 z^3 - 2380 z^4 + 6188 z^5 - 12376 z^6 + 19448 z^7 - 24310 z^8 + 24310 z^9 - 19448 z^10 + 12376 z^11 - 6188 z^12 + 2380 z^13 - 680 z^14 + 136 z^15 - 17 z^16 + z^17))

 Standard Form

 Cell[BoxData[RowBox[List[RowBox[List["HypergeometricPFQ", "[", RowBox[List[RowBox[List["{", RowBox[List[FractionBox["5", "2"], ",", "4", ",", "4"]], "}"]], ",", RowBox[List["{", RowBox[List[RowBox[List["-", FractionBox["7", "2"]]], ",", RowBox[List["-", FractionBox["7", "2"]]]]], "}"]], ",", "z"]], "]"]], "\[Equal]", RowBox[List[RowBox[List[FractionBox["1", RowBox[List["12544", " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["-", "1"]], "+", "z"]], ")"]], "17"]]]], RowBox[List["(", RowBox[List[RowBox[List["-", "12544"]], "+", RowBox[List["172288", " ", "z"]], "-", RowBox[List["1296384", " ", SuperscriptBox["z", "2"]]], "+", RowBox[List["952320", " ", SuperscriptBox["z", "3"]]], "-", RowBox[List["1778519040", " ", SuperscriptBox["z", "4"]]], "-", RowBox[List["553433266176", " ", SuperscriptBox["z", "5"]]], "-", RowBox[List["15051627967488", " ", SuperscriptBox["z", "6"]]], "-", RowBox[List["112579709698176", " ", SuperscriptBox["z", "7"]]], "-", RowBox[List["315264173579520", " ", SuperscriptBox["z", "8"]]], "-", RowBox[List["370795806516200", " ", SuperscriptBox["z", "9"]]], "-", RowBox[List["187163046258760", " ", SuperscriptBox["z", "10"]]], "-", RowBox[List["38294677232955", " ", SuperscriptBox["z", "11"]]], "-", RowBox[List["2669644957980", " ", SuperscriptBox["z", "12"]]], "-", RowBox[List["39249270060", " ", SuperscriptBox["z", "13"]]]]], ")"]]]], "-", RowBox[List[RowBox[List["(", RowBox[List["6435", " ", RowBox[List["(", RowBox[List[RowBox[List["732160", " ", SuperscriptBox["z", RowBox[List["9", "/", "2"]]]]], "+", RowBox[List["54512640", " ", SuperscriptBox["z", RowBox[List["11", "/", "2"]]]]], "+", RowBox[List["797086080", " ", SuperscriptBox["z", RowBox[List["13", "/", "2"]]]]], "+", RowBox[List["3939152896", " ", SuperscriptBox["z", RowBox[List["15", "/", "2"]]]]], "+", RowBox[List["7980509880", " ", SuperscriptBox["z", RowBox[List["17", "/", "2"]]]]], "+", RowBox[List["7115963400", " ", SuperscriptBox["z", RowBox[List["19", "/", "2"]]]]], "+", RowBox[List["2786008225", " ", SuperscriptBox["z", RowBox[List["21", "/", "2"]]]]], "+", RowBox[List["443821950", " ", SuperscriptBox["z", RowBox[List["23", "/", "2"]]]]], "+", RowBox[List["23567544", " ", SuperscriptBox["z", RowBox[List["25", "/", "2"]]]]], "+", RowBox[List["240240", " ", SuperscriptBox["z", RowBox[List["27", "/", "2"]]]]]]], ")"]], " ", RowBox[List["ArcSin", "[", SqrtBox["z"], "]"]]]], ")"]], "/", RowBox[List["(", RowBox[List["1792", " ", SqrtBox[RowBox[List["1", "-", "z"]]], " ", RowBox[List["(", RowBox[List[RowBox[List["-", "1"]], "+", RowBox[List["17", " ", "z"]], "-", RowBox[List["136", " ", SuperscriptBox["z", "2"]]], "+", RowBox[List["680", " ", SuperscriptBox["z", "3"]]], "-", RowBox[List["2380", " ", SuperscriptBox["z", "4"]]], "+", RowBox[List["6188", " ", SuperscriptBox["z", "5"]]], "-", RowBox[List["12376", " ", SuperscriptBox["z", "6"]]], "+", RowBox[List["19448", " ", SuperscriptBox["z", "7"]]], "-", RowBox[List["24310", " ", SuperscriptBox["z", "8"]]], "+", RowBox[List["24310", " ", SuperscriptBox["z", "9"]]], "-", RowBox[List["19448", " ", SuperscriptBox["z", "10"]]], "+", RowBox[List["12376", " ", SuperscriptBox["z", "11"]]], "-", RowBox[List["6188", " ", SuperscriptBox["z", "12"]]], "+", RowBox[List["2380", " ", SuperscriptBox["z", "13"]]], "-", RowBox[List["680", " ", SuperscriptBox["z", "14"]]], "+", RowBox[List["136", " ", SuperscriptBox["z", "15"]]], "-", RowBox[List["17", " ", SuperscriptBox["z", "16"]]], "+", SuperscriptBox["z", "17"]]], ")"]]]], ")"]]]]]]]]]]

 MathML Form

 3 F 2 ( 5 2 , 4 , 4 ; - 7 2 , - 7 2 ; z ) TagBox[TagBox[RowBox[List[RowBox[List[SubscriptBox["\[InvisiblePrefixScriptBase]", "3"], SubscriptBox["F", "2"]]], "\[InvisibleApplication]", RowBox[List["(", RowBox[List[TagBox[TagBox[RowBox[List[TagBox[FractionBox["5", "2"], HypergeometricPFQ, Rule[Editable, True], Rule[Selectable, True]], ",", TagBox["4", HypergeometricPFQ, Rule[Editable, True], Rule[Selectable, True]], ",", TagBox["4", HypergeometricPFQ, Rule[Editable, True], Rule[Selectable, True]]]], InterpretTemplate[Function[List[SlotSequence[1]]]]], HypergeometricPFQ, Rule[Editable, False], Rule[Selectable, False]], ";", TagBox[TagBox[RowBox[List[TagBox[RowBox[List["-", FractionBox["7", "2"]]], HypergeometricPFQ, Rule[Editable, True], Rule[Selectable, True]], ",", TagBox[RowBox[List["-", FractionBox["7", "2"]]], HypergeometricPFQ, Rule[Editable, True], Rule[Selectable, True]]]], InterpretTemplate[Function[List[SlotSequence[1]]]]], HypergeometricPFQ, Rule[Editable, False], Rule[Selectable, False]], ";", TagBox["z", HypergeometricPFQ, Rule[Editable, True], Rule[Selectable, True]]]], ")"]]]], InterpretTemplate[Function[HypergeometricPFQ[Slot[1], Slot[2], Slot[3]]]], Rule[Editable, False], Rule[Selectable, False]], HypergeometricPFQ] 1 12544 ( z - 1 ) 17 ( - 39249270060 z 13 - 2669644957980 z 12 - 38294677232955 z 11 - 187163046258760 z 10 - 370795806516200 z 9 - 315264173579520 z 8 - 112579709698176 z 7 - 15051627967488 z 6 - 553433266176 z 5 - 1778519040 z 4 + 952320 z 3 - 1296384 z 2 + 172288 z - 12544 ) - ( 6435 ( 240240 z 27 / 2 + 23567544 z 25 / 2 + 443821950 z 23 / 2 + 2786008225 z 21 / 2 + 7115963400 z 19 / 2 + 7980509880 z 17 / 2 + 3939152896 z 15 / 2 + 797086080 z 13 / 2 + 54512640 z 11 / 2 + 732160 z 9 / 2 ) sin - 1 ( z ) ) / ( 1792 1 - z ( z 17 - 17 z 16 + 136 z 15 - 680 z 14 + 2380 z 13 - 6188 z 12 + 12376 z 11 - 19448 z 10 + 24310 z 9 - 24310 z 8 + 19448 z 7 - 12376 z 6 + 6188 z 5 - 2380 z 4 + 680 z 3 - 136 z 2 + 17 z - 1 ) ) HypergeometricPFQ 5 2 4 4 -1 7 2 -1 7 2 z 1 12544 z -1 17 -1 -39249270060 z 13 -1 2669644957980 z 12 -1 38294677232955 z 11 -1 187163046258760 z 10 -1 370795806516200 z 9 -1 315264173579520 z 8 -1 112579709698176 z 7 -1 15051627967488 z 6 -1 553433266176 z 5 -1 1778519040 z 4 952320 z 3 -1 1296384 z 2 172288 z -12544 -1 6435 240240 z 27 2 23567544 z 25 2 443821950 z 23 2 2786008225 z 21 2 7115963400 z 19 2 7980509880 z 17 2 3939152896 z 15 2 797086080 z 13 2 54512640 z 11 2 732160 z 9 2 z 1 2 1792 1 -1 z 1 2 z 17 -1 17 z 16 136 z 15 -1 680 z 14 2380 z 13 -1 6188 z 12 12376 z 11 -1 19448 z 10 24310 z 9 -1 24310 z 8 19448 z 7 -1 12376 z 6 6188 z 5 -1 2380 z 4 680 z 3 -1 136 z 2 17 z -1 -1 [/itex]

 Rule Form

 Cell[BoxData[RowBox[List[RowBox[List["HoldPattern", "[", RowBox[List["HypergeometricPFQ", "[", RowBox[List[RowBox[List["{", RowBox[List[FractionBox["5", "2"], ",", "4", ",", "4"]], "}"]], ",", RowBox[List["{", RowBox[List[RowBox[List["-", FractionBox["7", "2"]]], ",", RowBox[List["-", FractionBox["7", "2"]]]]], "}"]], ",", "z_"]], "]"]], "]"]], "\[RuleDelayed]", RowBox[List[FractionBox[RowBox[List[RowBox[List["-", "12544"]], "+", RowBox[List["172288", " ", "z"]], "-", RowBox[List["1296384", " ", SuperscriptBox["z", "2"]]], "+", RowBox[List["952320", " ", SuperscriptBox["z", "3"]]], "-", RowBox[List["1778519040", " ", SuperscriptBox["z", "4"]]], "-", RowBox[List["553433266176", " ", SuperscriptBox["z", "5"]]], "-", RowBox[List["15051627967488", " ", SuperscriptBox["z", "6"]]], "-", RowBox[List["112579709698176", " ", SuperscriptBox["z", "7"]]], "-", RowBox[List["315264173579520", " ", SuperscriptBox["z", "8"]]], "-", RowBox[List["370795806516200", " ", SuperscriptBox["z", "9"]]], "-", RowBox[List["187163046258760", " ", SuperscriptBox["z", "10"]]], "-", RowBox[List["38294677232955", " ", SuperscriptBox["z", "11"]]], "-", RowBox[List["2669644957980", " ", SuperscriptBox["z", "12"]]], "-", RowBox[List["39249270060", " ", SuperscriptBox["z", "13"]]]]], RowBox[List["12544", " ", SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["-", "1"]], "+", "z"]], ")"]], "17"]]]], "-", FractionBox[RowBox[List["6435", " ", RowBox[List["(", RowBox[List[RowBox[List["732160", " ", SuperscriptBox["z", RowBox[List["9", "/", "2"]]]]], "+", RowBox[List["54512640", " ", SuperscriptBox["z", RowBox[List["11", "/", "2"]]]]], "+", RowBox[List["797086080", " ", SuperscriptBox["z", RowBox[List["13", "/", "2"]]]]], "+", RowBox[List["3939152896", " ", SuperscriptBox["z", RowBox[List["15", "/", "2"]]]]], "+", RowBox[List["7980509880", " ", SuperscriptBox["z", RowBox[List["17", "/", "2"]]]]], "+", RowBox[List["7115963400", " ", SuperscriptBox["z", RowBox[List["19", "/", "2"]]]]], "+", RowBox[List["2786008225", " ", SuperscriptBox["z", RowBox[List["21", "/", "2"]]]]], "+", RowBox[List["443821950", " ", SuperscriptBox["z", RowBox[List["23", "/", "2"]]]]], "+", RowBox[List["23567544", " ", SuperscriptBox["z", RowBox[List["25", "/", "2"]]]]], "+", RowBox[List["240240", " ", SuperscriptBox["z", RowBox[List["27", "/", "2"]]]]]]], ")"]], " ", RowBox[List["ArcSin", "[", SqrtBox["z"], "]"]]]], RowBox[List["1792", " ", SqrtBox[RowBox[List["1", "-", "z"]]], " ", RowBox[List["(", RowBox[List[RowBox[List["-", "1"]], "+", RowBox[List["17", " ", "z"]], "-", RowBox[List["136", " ", SuperscriptBox["z", "2"]]], "+", RowBox[List["680", " ", SuperscriptBox["z", "3"]]], "-", RowBox[List["2380", " ", SuperscriptBox["z", "4"]]], "+", RowBox[List["6188", " ", SuperscriptBox["z", "5"]]], "-", RowBox[List["12376", " ", SuperscriptBox["z", "6"]]], "+", RowBox[List["19448", " ", SuperscriptBox["z", "7"]]], "-", RowBox[List["24310", " ", SuperscriptBox["z", "8"]]], "+", RowBox[List["24310", " ", SuperscriptBox["z", "9"]]], "-", RowBox[List["19448", " ", SuperscriptBox["z", "10"]]], "+", RowBox[List["12376", " ", SuperscriptBox["z", "11"]]], "-", RowBox[List["6188", " ", SuperscriptBox["z", "12"]]], "+", RowBox[List["2380", " ", SuperscriptBox["z", "13"]]], "-", RowBox[List["680", " ", SuperscriptBox["z", "14"]]], "+", RowBox[List["136", " ", SuperscriptBox["z", "15"]]], "-", RowBox[List["17", " ", SuperscriptBox["z", "16"]]], "+", SuperscriptBox["z", "17"]]], ")"]]]]]]]]]]]

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

 2007-05-02