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.22.03.9859.01

 Input Form

 HypergeometricPFQ[{-(17/4)}, {-(5/2), 17/4}, -z] == -(((2 Sqrt[z] (406586755575 + 597112916400 z - 99672249600 z^2 - 208224276480 z^3 + 74438737920 z^4 - 12825133056 z^5 + 6593445888 z^6 + 268435456 z^7) BesselJ[1/4, Sqrt[z]]^2 - 3 (677644592625 + 1477068793200 z + 361686124800 z^2 - 316201881600 z^3 + 93637509120 z^4 - 18198036480 z^5 + 6358564864 z^6 + 268435456 z^7) BesselJ[1/4, Sqrt[z]] BesselJ[5/4, Sqrt[z]] + 2 Sqrt[z] (2032933777875 + 94280986800 z + 223060780800 z^2 - 290080051200 z^3 + 89738772480 z^4 - 17505976320 z^5 + 6392119296 z^6 + 268435456 z^7) BesselJ[5/4, Sqrt[z]]^2) Gamma[5/4]^2)/(326998425600 Sqrt[2] z^(11/4)))

 Standard Form

 Cell[BoxData[RowBox[List[RowBox[List["HypergeometricPFQ", "[", RowBox[List[RowBox[List["{", RowBox[List["-", FractionBox["17", "4"]]], "}"]], ",", RowBox[List["{", RowBox[List[RowBox[List["-", FractionBox["5", "2"]]], ",", FractionBox["17", "4"]]], "}"]], ",", RowBox[List["-", "z"]]]], "]"]], "\[Equal]", RowBox[List["-", RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["2", " ", SqrtBox["z"], " ", RowBox[List["(", RowBox[List["406586755575", "+", RowBox[List["597112916400", " ", "z"]], "-", RowBox[List["99672249600", " ", SuperscriptBox["z", "2"]]], "-", RowBox[List["208224276480", " ", SuperscriptBox["z", "3"]]], "+", RowBox[List["74438737920", " ", SuperscriptBox["z", "4"]]], "-", RowBox[List["12825133056", " ", SuperscriptBox["z", "5"]]], "+", RowBox[List["6593445888", " ", SuperscriptBox["z", "6"]]], "+", RowBox[List["268435456", " ", SuperscriptBox["z", "7"]]]]], ")"]], " ", SuperscriptBox[RowBox[List["BesselJ", "[", RowBox[List[FractionBox["1", "4"], ",", SqrtBox["z"]]], "]"]], "2"]]], "-", RowBox[List["3", " ", RowBox[List["(", RowBox[List["677644592625", "+", RowBox[List["1477068793200", " ", "z"]], "+", RowBox[List["361686124800", " ", SuperscriptBox["z", "2"]]], "-", RowBox[List["316201881600", " ", SuperscriptBox["z", "3"]]], "+", RowBox[List["93637509120", " ", SuperscriptBox["z", "4"]]], "-", RowBox[List["18198036480", " ", SuperscriptBox["z", "5"]]], "+", RowBox[List["6358564864", " ", SuperscriptBox["z", "6"]]], "+", RowBox[List["268435456", " ", SuperscriptBox["z", "7"]]]]], ")"]], " ", RowBox[List["BesselJ", "[", RowBox[List[FractionBox["1", "4"], ",", SqrtBox["z"]]], "]"]], " ", RowBox[List["BesselJ", "[", RowBox[List[FractionBox["5", "4"], ",", SqrtBox["z"]]], "]"]]]], "+", RowBox[List["2", " ", SqrtBox["z"], " ", RowBox[List["(", RowBox[List["2032933777875", "+", RowBox[List["94280986800", " ", "z"]], "+", RowBox[List["223060780800", " ", SuperscriptBox["z", "2"]]], "-", RowBox[List["290080051200", " ", SuperscriptBox["z", "3"]]], "+", RowBox[List["89738772480", " ", SuperscriptBox["z", "4"]]], "-", RowBox[List["17505976320", " ", SuperscriptBox["z", "5"]]], "+", RowBox[List["6392119296", " ", SuperscriptBox["z", "6"]]], "+", RowBox[List["268435456", " ", SuperscriptBox["z", "7"]]]]], ")"]], " ", SuperscriptBox[RowBox[List["BesselJ", "[", RowBox[List[FractionBox["5", "4"], ",", SqrtBox["z"]]], "]"]], "2"]]]]], ")"]], " ", SuperscriptBox[RowBox[List["Gamma", "[", FractionBox["5", "4"], "]"]], "2"]]], ")"]], "/", RowBox[List["(", RowBox[List["326998425600", " ", SqrtBox["2"], " ", SuperscriptBox["z", RowBox[List["11", "/", "4"]]]]], ")"]]]]]]]]]]

 MathML Form

 1 F 2 ( - 17 4 ; - 5 2 , 17 4 ; - z ) TagBox[TagBox[RowBox[List[RowBox[List[SubscriptBox["\[InvisiblePrefixScriptBase]", "1"], SubscriptBox["F", "2"]]], "\[InvisibleApplication]", RowBox[List["(", RowBox[List[TagBox[TagBox[TagBox[RowBox[List["-", FractionBox["17", "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["5", "2"]]], HypergeometricPFQ, Rule[Editable, True], Rule[Selectable, True]], ",", TagBox[FractionBox["17", "4"], HypergeometricPFQ, Rule[Editable, True], Rule[Selectable, True]]]], InterpretTemplate[Function[List[SlotSequence[1]]]]], HypergeometricPFQ, Rule[Editable, False], Rule[Selectable, False]], ";", TagBox[RowBox[List["-", "z"]], HypergeometricPFQ, Rule[Editable, True], Rule[Selectable, True]]]], ")"]]]], InterpretTemplate[Function[HypergeometricPFQ[Slot[1], Slot[2], Slot[3]]]], Rule[Editable, False], Rule[Selectable, False]], HypergeometricPFQ] - ( ( 2 z ( 268435456 z 7 + 6593445888 z 6 - 12825133056 z 5 + 74438737920 z 4 - 208224276480 z 3 - 99672249600 z 2 + 597112916400 z + 406586755575 ) J 1 4 ( z ) 2 - 3 ( 268435456 z 7 + 6358564864 z 6 - 18198036480 z 5 + 93637509120 z 4 - 316201881600 z 3 + 361686124800 z 2 + 1477068793200 z + 677644592625 ) J 5 4 ( z ) J 1 4 ( z ) + 2 z ( 268435456 z 7 + 6392119296 z 6 - 17505976320 z 5 + 89738772480 z 4 - 290080051200 z 3 + 223060780800 z 2 + 94280986800 z + 2032933777875 ) J 5 4 ( z ) 2 ) Γ ( 5 4 ) 2 ) / ( 326998425600 2 z 11 / 4 ) HypergeometricPFQ -1 17 4 -1 5 2 17 4 -1 z -1 2 z 1 2 268435456 z 7 6593445888 z 6 -1 12825133056 z 5 74438737920 z 4 -1 208224276480 z 3 -1 99672249600 z 2 597112916400 z 406586755575 BesselJ 1 4 z 1 2 2 -1 3 268435456 z 7 6358564864 z 6 -1 18198036480 z 5 93637509120 z 4 -1 316201881600 z 3 361686124800 z 2 1477068793200 z 677644592625 BesselJ 5 4 z 1 2 BesselJ 1 4 z 1 2 2 z 1 2 268435456 z 7 6392119296 z 6 -1 17505976320 z 5 89738772480 z 4 -1 290080051200 z 3 223060780800 z 2 94280986800 z 2032933777875 BesselJ 5 4 z 1 2 2 Gamma 5 4 2 326998425600 2 1 2 z 11 4 -1 [/itex]

 Rule Form

 Cell[BoxData[RowBox[List[RowBox[List["HoldPattern", "[", RowBox[List["HypergeometricPFQ", "[", RowBox[List[RowBox[List["{", RowBox[List["-", FractionBox["17", "4"]]], "}"]], ",", RowBox[List["{", RowBox[List[RowBox[List["-", FractionBox["5", "2"]]], ",", FractionBox["17", "4"]]], "}"]], ",", RowBox[List["-", "z_"]]]], "]"]], "]"]], "\[RuleDelayed]", RowBox[List["-", FractionBox[RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["2", " ", SqrtBox["z"], " ", RowBox[List["(", RowBox[List["406586755575", "+", RowBox[List["597112916400", " ", "z"]], "-", RowBox[List["99672249600", " ", SuperscriptBox["z", "2"]]], "-", RowBox[List["208224276480", " ", SuperscriptBox["z", "3"]]], "+", RowBox[List["74438737920", " ", SuperscriptBox["z", "4"]]], "-", RowBox[List["12825133056", " ", SuperscriptBox["z", "5"]]], "+", RowBox[List["6593445888", " ", SuperscriptBox["z", "6"]]], "+", RowBox[List["268435456", " ", SuperscriptBox["z", "7"]]]]], ")"]], " ", SuperscriptBox[RowBox[List["BesselJ", "[", RowBox[List[FractionBox["1", "4"], ",", SqrtBox["z"]]], "]"]], "2"]]], "-", RowBox[List["3", " ", RowBox[List["(", RowBox[List["677644592625", "+", RowBox[List["1477068793200", " ", "z"]], "+", RowBox[List["361686124800", " ", SuperscriptBox["z", "2"]]], "-", RowBox[List["316201881600", " ", SuperscriptBox["z", "3"]]], "+", RowBox[List["93637509120", " ", SuperscriptBox["z", "4"]]], "-", RowBox[List["18198036480", " ", SuperscriptBox["z", "5"]]], "+", RowBox[List["6358564864", " ", SuperscriptBox["z", "6"]]], "+", RowBox[List["268435456", " ", SuperscriptBox["z", "7"]]]]], ")"]], " ", RowBox[List["BesselJ", "[", RowBox[List[FractionBox["1", "4"], ",", SqrtBox["z"]]], "]"]], " ", RowBox[List["BesselJ", "[", RowBox[List[FractionBox["5", "4"], ",", SqrtBox["z"]]], "]"]]]], "+", RowBox[List["2", " ", SqrtBox["z"], " ", RowBox[List["(", RowBox[List["2032933777875", "+", RowBox[List["94280986800", " ", "z"]], "+", RowBox[List["223060780800", " ", SuperscriptBox["z", "2"]]], "-", RowBox[List["290080051200", " ", SuperscriptBox["z", "3"]]], "+", RowBox[List["89738772480", " ", SuperscriptBox["z", "4"]]], "-", RowBox[List["17505976320", " ", SuperscriptBox["z", "5"]]], "+", RowBox[List["6392119296", " ", SuperscriptBox["z", "6"]]], "+", RowBox[List["268435456", " ", SuperscriptBox["z", "7"]]]]], ")"]], " ", SuperscriptBox[RowBox[List["BesselJ", "[", RowBox[List[FractionBox["5", "4"], ",", SqrtBox["z"]]], "]"]], "2"]]]]], ")"]], " ", SuperscriptBox[RowBox[List["Gamma", "[", FractionBox["5", "4"], "]"]], "2"]]], RowBox[List["326998425600", " ", SqrtBox["2"], " ", SuperscriptBox["z", RowBox[List["11", "/", "4"]]]]]]]]]]]]

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

 2007-05-02