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

 FresnelC

 http://functions.wolfram.com/06.33.21.0124.01

 Input Form

 Integrate[z^(\[Alpha] - 1) Erfc[b z] FresnelC[a z], z] == (z^\[Alpha]/\[Alpha]) FresnelC[a z] (Erfc[b z] + (b z Gamma[(1 + \[Alpha])/2, 0, b^2 z^2])/((b^2 z^2)^((\[Alpha] + 1)/2) Sqrt[Pi])) + (((2^((1/2) (-3 + \[Alpha])) a z^(1 + \[Alpha]))/ (Pi^((\[Alpha] + 1)/2) \[Alpha])) ((I a^2 z^2)^((1 + \[Alpha])/2) Gamma[(1 + \[Alpha])/2, (-(1/2)) I a^2 Pi z^2] + ((-I) a^2 z^2)^((1 + \[Alpha])/2) Gamma[(1 + \[Alpha])/2, (1/2) I a^2 Pi z^2]))/(a^4 z^4)^((\[Alpha] + 1)/2) + 2 a Sum[(((-1)^k 2^(-1 + k + \[Alpha]/2) b^(1 + 2 k) Pi^(-k - (\[Alpha] + 3)/2) z^(2 + 2 k + \[Alpha]))/ ((1 + 2 k) (1 + 2 k + \[Alpha]) k!)) ((I a^2 z^2)^(-1 + k + \[Alpha]/2) (a^4 z^4)^(-k - \[Alpha]/2) Gamma[\[Alpha]/2 + k + 1, (-(1/2)) I a^2 Pi z^2] + ((-I) a^2 z^2)^(-1 + k + \[Alpha]/2) (a^4 z^4)^(-k - \[Alpha]/2) Gamma[\[Alpha]/2 + k + 1, (1/2) I a^2 Pi z^2]), {k, 0, Infinity}]

 Standard Form

 Cell[BoxData[RowBox[List[RowBox[List["\[Integral]", RowBox[List[SuperscriptBox["z", RowBox[List["\[Alpha]", "-", "1"]]], " ", RowBox[List["Erfc", "[", RowBox[List["b", " ", "z"]], "]"]], RowBox[List["FresnelC", "[", RowBox[List["a", " ", "z"]], "]"]], RowBox[List["\[DifferentialD]", "z"]]]]]], "\[Equal]", RowBox[List[RowBox[List[FractionBox[SuperscriptBox["z", "\[Alpha]"], "\[Alpha]"], RowBox[List["FresnelC", "[", RowBox[List["a", " ", "z"]], "]"]], " ", RowBox[List["(", RowBox[List[RowBox[List["Erfc", "[", RowBox[List["b", " ", "z"]], "]"]], "+", FractionBox[RowBox[List["b", " ", "z", " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox["b", "2"], " ", SuperscriptBox["z", "2"]]], ")"]], RowBox[List["-", FractionBox[RowBox[List["\[Alpha]", "+", "1"]], "2"]]]], " ", RowBox[List["Gamma", "[", RowBox[List[FractionBox[RowBox[List["1", "+", "\[Alpha]"]], "2"], ",", "0", ",", RowBox[List[SuperscriptBox["b", "2"], " ", SuperscriptBox["z", "2"]]]]], "]"]]]], SqrtBox["\[Pi]"]]]], ")"]]]], "+", RowBox[List[FractionBox[RowBox[List[SuperscriptBox["2", RowBox[List[FractionBox["1", "2"], " ", RowBox[List["(", RowBox[List[RowBox[List["-", "3"]], "+", "\[Alpha]"]], ")"]]]]], " ", SuperscriptBox["\[Pi]", RowBox[List["-", FractionBox[RowBox[List["\[Alpha]", "+", "1"]], "2"]]]], " ", "a", " ", SuperscriptBox["z", RowBox[List["1", "+", "\[Alpha]"]]], " "]], "\[Alpha]"], SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox["a", "4"], " ", SuperscriptBox["z", "4"]]], ")"]], RowBox[List["-", FractionBox[RowBox[List["\[Alpha]", "+", "1"]], "2"]]]], " ", RowBox[List["(", RowBox[List[RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["\[ImaginaryI]", " ", SuperscriptBox["a", "2"], " ", SuperscriptBox["z", "2"]]], ")"]], FractionBox[RowBox[List["1", "+", "\[Alpha]"]], "2"]], " ", RowBox[List["Gamma", "[", RowBox[List[FractionBox[RowBox[List["1", "+", "\[Alpha]"]], "2"], ",", RowBox[List[RowBox[List["-", FractionBox["1", "2"]]], " ", "\[ImaginaryI]", " ", SuperscriptBox["a", "2"], " ", "\[Pi]", " ", SuperscriptBox["z", "2"]]]]], "]"]]]], "+", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["-", "\[ImaginaryI]"]], " ", SuperscriptBox["a", "2"], " ", SuperscriptBox["z", "2"]]], ")"]], FractionBox[RowBox[List["1", "+", "\[Alpha]"]], "2"]], " ", RowBox[List["Gamma", "[", RowBox[List[FractionBox[RowBox[List["1", "+", "\[Alpha]"]], "2"], ",", RowBox[List[FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", SuperscriptBox["a", "2"], " ", "\[Pi]", " ", SuperscriptBox["z", "2"]]]]], "]"]]]]]], ")"]]]], "+", RowBox[List["2", "a", " ", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["k", "=", "0"]], "\[Infinity]"], RowBox[List[FractionBox[RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], "k"], " ", SuperscriptBox["2", RowBox[List[RowBox[List["-", "1"]], "+", "k", "+", FractionBox["\[Alpha]", "2"]]]], " ", SuperscriptBox["b", RowBox[List["1", "+", RowBox[List["2", " ", "k"]]]]], " ", SuperscriptBox["\[Pi]", RowBox[List[RowBox[List["-", "k"]], "-", FractionBox[RowBox[List["\[Alpha]", "+", "3"]], "2"]]]], " ", SuperscriptBox["z", RowBox[List["2", "+", RowBox[List["2", " ", "k"]], "+", "\[Alpha]"]]]]], RowBox[List[RowBox[List["(", RowBox[List["1", "+", RowBox[List["2", " ", "k"]]]], ")"]], " ", RowBox[List["(", RowBox[List["1", "+", RowBox[List["2", " ", "k"]], "+", "\[Alpha]"]], ")"]], " ", RowBox[List["k", "!"]]]]], RowBox[List["(", RowBox[List[RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["\[ImaginaryI]", " ", SuperscriptBox["a", "2"], " ", SuperscriptBox["z", "2"]]], ")"]], RowBox[List[RowBox[List["-", "1"]], "+", "k", "+", FractionBox["\[Alpha]", "2"]]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox["a", "4"], " ", SuperscriptBox["z", "4"]]], ")"]], RowBox[List[RowBox[List["-", "k"]], "-", FractionBox["\[Alpha]", "2"]]]], " ", RowBox[List["Gamma", "[", RowBox[List[RowBox[List[FractionBox["\[Alpha]", "2"], "+", "k", "+", "1"]], ",", RowBox[List[RowBox[List["-", FractionBox["1", "2"]]], " ", "\[ImaginaryI]", " ", SuperscriptBox["a", "2"], " ", "\[Pi]", " ", SuperscriptBox["z", "2"]]]]], "]"]]]], "+", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["-", "\[ImaginaryI]"]], " ", SuperscriptBox["a", "2"], " ", SuperscriptBox["z", "2"]]], ")"]], RowBox[List[RowBox[List["-", "1"]], "+", "k", "+", FractionBox["\[Alpha]", "2"]]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox["a", "4"], " ", SuperscriptBox["z", "4"]]], ")"]], RowBox[List[RowBox[List["-", "k"]], "-", FractionBox["\[Alpha]", "2"]]]], " ", RowBox[List["Gamma", "[", RowBox[List[RowBox[List[FractionBox["\[Alpha]", "2"], "+", "k", "+", "1"]], ",", RowBox[List[FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", SuperscriptBox["a", "2"], " ", "\[Pi]", " ", SuperscriptBox["z", "2"]]]]], "]"]]]]]], ")"]]]]]]]]]]]]]]

 MathML Form

 z α - 1 erfc ( b z ) C TagBox["C", FresnelC] ( a z ) z 2 α - 3 2 π - 1 2 ( α + 1 ) a z α + 1 α ( a 4 z 4 ) - 1 2 ( α + 1 ) ( ( - a 2 z 2 ) α + 1 2 Γ ( α + 1 2 , 1 2 a 2 π z 2 ) + ( a 2 z 2 ) α + 1 2 Γ ( α + 1 2 , - 1 2 a 2 π z 2 ) ) + z α C TagBox["C", FresnelC] ( a z ) α ( b z ( b 2 z 2 ) - α + 1 2 π Γ ( α + 1 2 , 0 , b 2 z 2 ) + erfc ( b z ) ) + 2 a k = 0 ( - 1 ) k 2 k + α 2 - 1 b 2 k + 1 π - 1 2 ( α + 3 ) - k z 2 k + α + 2 ( 2 k + 1 ) ( 2 k + α + 1 ) k ! ( ( - a 2 z 2 ) k + α 2 - 1 ( a 4 z 4 ) - k - α 2 Γ ( k + α 2 + 1 , 1 2 a 2 π z 2 ) + ( a 2 z 2 ) k + α 2 - 1 ( a 4 z 4 ) - k - α 2 Γ ( k + α 2 + 1 , - 1 2 a 2 π z 2 ) ) z z α -1 Erfc b z FresnelC a z 2 α -3 2 -1 -1 1 2 α 1 a z α 1 α -1 a 4 z 4 -1 1 2 α 1 -1 a 2 z 2 α 1 2 -1 Gamma α 1 2 -1 1 2 a 2 z 2 a 2 z 2 α 1 2 -1 Gamma α 1 2 -1 -1 1 2 a 2 z 2 z α FresnelC a z α -1 b z b 2 z 2 -1 α 1 2 -1 1 2 -1 Gamma α 1 2 -1 0 b 2 z 2 Erfc b z 2 a k 0 -1 k 2 k α 2 -1 -1 b 2 k 1 -1 1 2 α 3 -1 k z 2 k α 2 2 k 1 2 k α 1 k -1 -1 a 2 z 2 k α 2 -1 -1 a 4 z 4 -1 k -1 α 2 -1 Gamma k α 2 -1 1 1 2 a 2 z 2 a 2 z 2 k α 2 -1 -1 a 4 z 4 -1 k -1 α 2 -1 Gamma k α 2 -1 1 -1 1 2 a 2 z 2 [/itex]

 Rule Form

 Cell[BoxData[RowBox[List[RowBox[List["HoldPattern", "[", RowBox[List["\[Integral]", RowBox[List[RowBox[List[SuperscriptBox["z_", RowBox[List["\[Alpha]_", "-", "1"]]], " ", RowBox[List["Erfc", "[", RowBox[List["b_", " ", "z_"]], "]"]], " ", RowBox[List["FresnelC", "[", RowBox[List["a_", " ", "z_"]], "]"]]]], RowBox[List["\[DifferentialD]", "z_"]]]]]], "]"]], "\[RuleDelayed]", RowBox[List[FractionBox[RowBox[List[SuperscriptBox["z", "\[Alpha]"], " ", RowBox[List["FresnelC", "[", RowBox[List["a", " ", "z"]], "]"]], " ", RowBox[List["(", RowBox[List[RowBox[List["Erfc", "[", RowBox[List["b", " ", "z"]], "]"]], "+", FractionBox[RowBox[List["b", " ", "z", " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox["b", "2"], " ", SuperscriptBox["z", "2"]]], ")"]], RowBox[List[RowBox[List["-", FractionBox["1", "2"]]], " ", RowBox[List["(", RowBox[List["\[Alpha]", "+", "1"]], ")"]]]]], " ", RowBox[List["Gamma", "[", RowBox[List[FractionBox[RowBox[List["1", "+", "\[Alpha]"]], "2"], ",", "0", ",", RowBox[List[SuperscriptBox["b", "2"], " ", SuperscriptBox["z", "2"]]]]], "]"]]]], SqrtBox["\[Pi]"]]]], ")"]]]], "\[Alpha]"], "+", FractionBox[RowBox[List[RowBox[List["(", RowBox[List[SuperscriptBox["2", RowBox[List[FractionBox["1", "2"], " ", RowBox[List["(", RowBox[List[RowBox[List["-", "3"]], "+", "\[Alpha]"]], ")"]]]]], " ", SuperscriptBox["\[Pi]", RowBox[List[RowBox[List["-", FractionBox["1", "2"]]], " ", RowBox[List["(", RowBox[List["\[Alpha]", "+", "1"]], ")"]]]]], " ", "a", " ", SuperscriptBox["z", RowBox[List["1", "+", "\[Alpha]"]]]]], ")"]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox["a", "4"], " ", SuperscriptBox["z", "4"]]], ")"]], RowBox[List[RowBox[List["-", FractionBox["1", "2"]]], " ", RowBox[List["(", RowBox[List["\[Alpha]", "+", "1"]], ")"]]]]], " ", RowBox[List["(", RowBox[List[RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["\[ImaginaryI]", " ", SuperscriptBox["a", "2"], " ", SuperscriptBox["z", "2"]]], ")"]], FractionBox[RowBox[List["1", "+", "\[Alpha]"]], "2"]], " ", RowBox[List["Gamma", "[", RowBox[List[FractionBox[RowBox[List["1", "+", "\[Alpha]"]], "2"], ",", RowBox[List[RowBox[List["-", FractionBox["1", "2"]]], " ", "\[ImaginaryI]", " ", SuperscriptBox["a", "2"], " ", "\[Pi]", " ", SuperscriptBox["z", "2"]]]]], "]"]]]], "+", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["-", "\[ImaginaryI]"]], " ", SuperscriptBox["a", "2"], " ", SuperscriptBox["z", "2"]]], ")"]], FractionBox[RowBox[List["1", "+", "\[Alpha]"]], "2"]], " ", RowBox[List["Gamma", "[", RowBox[List[FractionBox[RowBox[List["1", "+", "\[Alpha]"]], "2"], ",", RowBox[List[FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", SuperscriptBox["a", "2"], " ", "\[Pi]", " ", SuperscriptBox["z", "2"]]]]], "]"]]]]]], ")"]]]], "\[Alpha]"], "+", RowBox[List["2", " ", "a", " ", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["k", "=", "0"]], "\[Infinity]"], FractionBox[RowBox[List[RowBox[List["(", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "1"]], ")"]], "k"], " ", SuperscriptBox["2", RowBox[List[RowBox[List["-", "1"]], "+", "k", "+", FractionBox["\[Alpha]", "2"]]]], " ", SuperscriptBox["b", RowBox[List["1", "+", RowBox[List["2", " ", "k"]]]]], " ", SuperscriptBox["\[Pi]", RowBox[List[RowBox[List["-", "k"]], "-", FractionBox[RowBox[List["\[Alpha]", "+", "3"]], "2"]]]], " ", SuperscriptBox["z", RowBox[List["2", "+", RowBox[List["2", " ", "k"]], "+", "\[Alpha]"]]]]], ")"]], " ", RowBox[List["(", RowBox[List[RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["\[ImaginaryI]", " ", SuperscriptBox["a", "2"], " ", SuperscriptBox["z", "2"]]], ")"]], RowBox[List[RowBox[List["-", "1"]], "+", "k", "+", FractionBox["\[Alpha]", "2"]]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox["a", "4"], " ", SuperscriptBox["z", "4"]]], ")"]], RowBox[List[RowBox[List["-", "k"]], "-", FractionBox["\[Alpha]", "2"]]]], " ", RowBox[List["Gamma", "[", RowBox[List[RowBox[List[FractionBox["\[Alpha]", "2"], "+", "k", "+", "1"]], ",", RowBox[List[RowBox[List["-", FractionBox["1", "2"]]], " ", "\[ImaginaryI]", " ", SuperscriptBox["a", "2"], " ", "\[Pi]", " ", SuperscriptBox["z", "2"]]]]], "]"]]]], "+", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["-", "\[ImaginaryI]"]], " ", SuperscriptBox["a", "2"], " ", SuperscriptBox["z", "2"]]], ")"]], RowBox[List[RowBox[List["-", "1"]], "+", "k", "+", FractionBox["\[Alpha]", "2"]]]], " ", SuperscriptBox[RowBox[List["(", RowBox[List[SuperscriptBox["a", "4"], " ", SuperscriptBox["z", "4"]]], ")"]], RowBox[List[RowBox[List["-", "k"]], "-", FractionBox["\[Alpha]", "2"]]]], " ", RowBox[List["Gamma", "[", RowBox[List[RowBox[List[FractionBox["\[Alpha]", "2"], "+", "k", "+", "1"]], ",", RowBox[List[FractionBox["1", "2"], " ", "\[ImaginaryI]", " ", SuperscriptBox["a", "2"], " ", "\[Pi]", " ", SuperscriptBox["z", "2"]]]]], "]"]]]]]], ")"]]]], RowBox[List[RowBox[List["(", RowBox[List["1", "+", RowBox[List["2", " ", "k"]]]], ")"]], " ", RowBox[List["(", RowBox[List["1", "+", RowBox[List["2", " ", "k"]], "+", "\[Alpha]"]], ")"]], " ", RowBox[List["k", "!"]]]]]]]]]]]]]]]

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

 2001-10-29

© 1998-2013 Wolfram Research, Inc.