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

 Cosh

 http://functions.wolfram.com/01.20.21.3862.01

 Input Form

 Integrate[E^(p z) Tan[b z] Cosh[c z]^v, z] == (Binomial[v, v/2] (-((E^((2 I b + p) z) Hypergeometric2F1[ (2 b - I p)/(2 b), 1, (4 b - I p)/(2 b), -E^(2 I b z)])/ (2 b - I p)) + (I E^(p z) Hypergeometric2F1[-((I p)/(2 b)), 1, 1 - (I p)/(2 b), -E^(2 I b z)])/p) (1 - Mod[v, 2]))/2^v + Sum[Binomial[v, s] ((1/(p - c (-2 s + v))) (I E^((p - c (-2 s + v)) z) Hypergeometric2F1[-((I (p - c (-2 s + v)))/(2 b)), 1, 1 - (I (p - c (-2 s + v)))/(2 b), -E^(2 I b z)]) - (E^((2 I b + p - c (-2 s + v)) z) Hypergeometric2F1[ (2 b - I p + I c (-2 s + v))/(2 b), 1, (4 b - I p + I c (-2 s + v))/ (2 b), -E^(2 I b z)])/(2 b - I p + I c (-2 s + v)) + (1/(p + c (-2 s + v))) (I E^((p + c (-2 s + v)) z) Hypergeometric2F1[-((I (p + c (-2 s + v)))/(2 b)), 1, 1 - (I (p + c (-2 s + v)))/(2 b), -E^(2 I b z)]) - (E^((2 I b + p + c (-2 s + v)) z) Hypergeometric2F1[ (2 b - I (p + c (-2 s + v)))/(2 b), 1, (4 b - I (p + c (-2 s + v)))/ (2 b), -E^(2 I b z)])/(2 b - I (p + c (-2 s + v)))), {s, 0, Floor[(1/2) (-1 + v)]}]/2^v /; Element[v, Integers] && v > 0

 Standard Form

 Cell[BoxData[RowBox[List[RowBox[List[RowBox[List["\[Integral]", RowBox[List[SuperscriptBox["\[ExponentialE]", RowBox[List["p", " ", "z"]]], " ", RowBox[List["Tan", "[", RowBox[List["b", " ", "z"]], "]"]], SuperscriptBox[RowBox[List["Cosh", "[", RowBox[List["c", " ", "z"]], "]"]], "v"], RowBox[List["\[DifferentialD]", "z"]]]]]], "\[Equal]", RowBox[List[RowBox[List[SuperscriptBox["2", RowBox[List["-", "v"]]], " ", RowBox[List["Binomial", "[", RowBox[List["v", ",", FractionBox["v", "2"]]], "]"]], " ", RowBox[List["(", RowBox[List[RowBox[List["-", FractionBox[RowBox[List[SuperscriptBox["\[ExponentialE]", RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["2", " ", "\[ImaginaryI]", " ", "b"]], "+", "p"]], ")"]], " ", "z"]]], " ", RowBox[List["Hypergeometric2F1", "[", RowBox[List[FractionBox[RowBox[List[RowBox[List["2", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", "p"]]]], RowBox[List["2", " ", "b"]]], ",", "1", ",", FractionBox[RowBox[List[RowBox[List["4", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", "p"]]]], RowBox[List["2", " ", "b"]]], ",", RowBox[List["-", SuperscriptBox["\[ExponentialE]", RowBox[List["2", " ", "\[ImaginaryI]", " ", "b", " ", "z"]]]]]]], "]"]]]], RowBox[List[RowBox[List["2", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", "p"]]]]]]], "+", FractionBox[RowBox[List["\[ImaginaryI]", " ", SuperscriptBox["\[ExponentialE]", RowBox[List["p", " ", "z"]]], " ", RowBox[List["Hypergeometric2F1", "[", RowBox[List[RowBox[List["-", FractionBox[RowBox[List["\[ImaginaryI]", " ", "p"]], RowBox[List["2", " ", "b"]]]]], ",", "1", ",", RowBox[List["1", "-", FractionBox[RowBox[List["\[ImaginaryI]", " ", "p"]], RowBox[List["2", " ", "b"]]]]], ",", RowBox[List["-", SuperscriptBox["\[ExponentialE]", RowBox[List["2", " ", "\[ImaginaryI]", " ", "b", " ", "z"]]]]]]], "]"]]]], "p"]]], ")"]], " ", RowBox[List["(", RowBox[List["1", "-", RowBox[List["Mod", "[", RowBox[List["v", ",", "2"]], "]"]]]], ")"]]]], "+", RowBox[List[SuperscriptBox["2", RowBox[List["-", "v"]]], " ", RowBox[List["Sum", "[", " ", RowBox[List[RowBox[List[RowBox[List["Binomial", "[", RowBox[List["v", ",", "s"]], "]"]], " ", RowBox[List["(", RowBox[List[RowBox[List[FractionBox["1", RowBox[List["p", "-", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]]], RowBox[List["(", RowBox[List["\[ImaginaryI]", " ", SuperscriptBox["\[ExponentialE]", RowBox[List[RowBox[List["(", RowBox[List["p", "-", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]], " ", "z"]]], " ", RowBox[List["Hypergeometric2F1", "[", RowBox[List[RowBox[List["-", FractionBox[RowBox[List["\[ImaginaryI]", " ", RowBox[List["(", RowBox[List["p", "-", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]]]], RowBox[List["2", " ", "b"]]]]], ",", "1", ",", RowBox[List["1", "-", FractionBox[RowBox[List["\[ImaginaryI]", " ", RowBox[List["(", RowBox[List["p", "-", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]]]], RowBox[List["2", " ", "b"]]]]], ",", RowBox[List["-", SuperscriptBox["\[ExponentialE]", RowBox[List["2", " ", "\[ImaginaryI]", " ", "b", " ", "z"]]]]]]], "]"]]]], ")"]]]], "-", RowBox[List[RowBox[List["(", RowBox[List[SuperscriptBox["\[ExponentialE]", RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["2", " ", "\[ImaginaryI]", " ", "b"]], "+", "p", "-", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]], " ", "z"]]], " ", RowBox[List["Hypergeometric2F1", "[", RowBox[List[FractionBox[RowBox[List[RowBox[List["2", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", "p"]], "+", RowBox[List["\[ImaginaryI]", " ", "c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], RowBox[List["2", " ", "b"]]], ",", "1", ",", FractionBox[RowBox[List[RowBox[List["4", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", "p"]], "+", RowBox[List["\[ImaginaryI]", " ", "c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], RowBox[List["2", " ", "b"]]], ",", RowBox[List["-", SuperscriptBox["\[ExponentialE]", RowBox[List["2", " ", "\[ImaginaryI]", " ", "b", " ", "z"]]]]]]], "]"]]]], ")"]], "/", RowBox[List["(", RowBox[List[RowBox[List["2", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", "p"]], "+", RowBox[List["\[ImaginaryI]", " ", "c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]]]], "+", RowBox[List[FractionBox["1", RowBox[List["p", "+", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]]], RowBox[List["(", RowBox[List["\[ImaginaryI]", " ", SuperscriptBox["\[ExponentialE]", RowBox[List[RowBox[List["(", RowBox[List["p", "+", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]], " ", "z"]]], " ", RowBox[List["Hypergeometric2F1", "[", RowBox[List[RowBox[List["-", FractionBox[RowBox[List["\[ImaginaryI]", " ", RowBox[List["(", RowBox[List["p", "+", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]]]], RowBox[List["2", " ", "b"]]]]], ",", "1", ",", RowBox[List["1", "-", FractionBox[RowBox[List["\[ImaginaryI]", " ", RowBox[List["(", RowBox[List["p", "+", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]]]], RowBox[List["2", " ", "b"]]]]], ",", RowBox[List["-", SuperscriptBox["\[ExponentialE]", RowBox[List["2", " ", "\[ImaginaryI]", " ", "b", " ", "z"]]]]]]], "]"]]]], ")"]]]], "-", RowBox[List[RowBox[List["(", RowBox[List[SuperscriptBox["\[ExponentialE]", RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["2", " ", "\[ImaginaryI]", " ", "b"]], "+", "p", "+", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]], " ", "z"]]], " ", RowBox[List["Hypergeometric2F1", "[", RowBox[List[FractionBox[RowBox[List[RowBox[List["2", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", RowBox[List["(", RowBox[List["p", "+", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]]]]]], RowBox[List["2", " ", "b"]]], ",", "1", ",", FractionBox[RowBox[List[RowBox[List["4", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", RowBox[List["(", RowBox[List["p", "+", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]]]]]], RowBox[List["2", " ", "b"]]], ",", RowBox[List["-", SuperscriptBox["\[ExponentialE]", RowBox[List["2", " ", "\[ImaginaryI]", " ", "b", " ", "z"]]]]]]], "]"]]]], ")"]], "/", RowBox[List["(", RowBox[List[RowBox[List["2", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", RowBox[List["(", RowBox[List["p", "+", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]]]]]], ")"]]]]]], ")"]]]], ",", RowBox[List["{", RowBox[List["s", ",", "0", ",", RowBox[List["Floor", "[", RowBox[List[FractionBox["1", "2"], " ", RowBox[List["(", RowBox[List[RowBox[List["-", "1"]], "+", "v"]], ")"]]]], "]"]]]], "}"]]]], "]"]]]]]]]], "/;", RowBox[List[RowBox[List["v", "\[Element]", "Integers"]], "\[And]", RowBox[List["v", ">", "0"]]]]]]]]

 MathML Form

 Rule Form

 Cell[BoxData[RowBox[List[RowBox[List["HoldPattern", "[", RowBox[List["\[Integral]", RowBox[List[RowBox[List[SuperscriptBox["\[ExponentialE]", RowBox[List["p_", " ", "z_"]]], " ", RowBox[List["Tan", "[", RowBox[List["b_", " ", "z_"]], "]"]], " ", SuperscriptBox[RowBox[List["Cosh", "[", RowBox[List["c_", " ", "z_"]], "]"]], "v_"]]], RowBox[List["\[DifferentialD]", "z_"]]]]]], "]"]], "\[RuleDelayed]", RowBox[List[RowBox[List[RowBox[List[SuperscriptBox["2", RowBox[List["-", "v"]]], " ", RowBox[List["Binomial", "[", RowBox[List["v", ",", FractionBox["v", "2"]]], "]"]], " ", RowBox[List["(", RowBox[List[RowBox[List["-", FractionBox[RowBox[List[SuperscriptBox["\[ExponentialE]", RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["2", " ", "\[ImaginaryI]", " ", "b"]], "+", "p"]], ")"]], " ", "z"]]], " ", RowBox[List["Hypergeometric2F1", "[", RowBox[List[FractionBox[RowBox[List[RowBox[List["2", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", "p"]]]], RowBox[List["2", " ", "b"]]], ",", "1", ",", FractionBox[RowBox[List[RowBox[List["4", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", "p"]]]], RowBox[List["2", " ", "b"]]], ",", RowBox[List["-", SuperscriptBox["\[ExponentialE]", RowBox[List["2", " ", "\[ImaginaryI]", " ", "b", " ", "z"]]]]]]], "]"]]]], RowBox[List[RowBox[List["2", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", "p"]]]]]]], "+", FractionBox[RowBox[List["\[ImaginaryI]", " ", SuperscriptBox["\[ExponentialE]", RowBox[List["p", " ", "z"]]], " ", RowBox[List["Hypergeometric2F1", "[", RowBox[List[RowBox[List["-", FractionBox[RowBox[List["\[ImaginaryI]", " ", "p"]], RowBox[List["2", " ", "b"]]]]], ",", "1", ",", RowBox[List["1", "-", FractionBox[RowBox[List["\[ImaginaryI]", " ", "p"]], RowBox[List["2", " ", "b"]]]]], ",", RowBox[List["-", SuperscriptBox["\[ExponentialE]", RowBox[List["2", " ", "\[ImaginaryI]", " ", "b", " ", "z"]]]]]]], "]"]]]], "p"]]], ")"]], " ", RowBox[List["(", RowBox[List["1", "-", RowBox[List["Mod", "[", RowBox[List["v", ",", "2"]], "]"]]]], ")"]]]], "+", RowBox[List[SuperscriptBox["2", RowBox[List["-", "v"]]], " ", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["s", "=", "0"]], RowBox[List["Floor", "[", RowBox[List[FractionBox["1", "2"], " ", RowBox[List["(", RowBox[List[RowBox[List["-", "1"]], "+", "v"]], ")"]]]], "]"]]], RowBox[List[RowBox[List["Binomial", "[", RowBox[List["v", ",", "s"]], "]"]], " ", RowBox[List["(", RowBox[List[FractionBox[RowBox[List["\[ImaginaryI]", " ", SuperscriptBox["\[ExponentialE]", RowBox[List[RowBox[List["(", RowBox[List["p", "-", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]], " ", "z"]]], " ", RowBox[List["Hypergeometric2F1", "[", RowBox[List[RowBox[List["-", FractionBox[RowBox[List["\[ImaginaryI]", " ", RowBox[List["(", RowBox[List["p", "-", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]]]], RowBox[List["2", " ", "b"]]]]], ",", "1", ",", RowBox[List["1", "-", FractionBox[RowBox[List["\[ImaginaryI]", " ", RowBox[List["(", RowBox[List["p", "-", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]]]], RowBox[List["2", " ", "b"]]]]], ",", RowBox[List["-", SuperscriptBox["\[ExponentialE]", RowBox[List["2", " ", "\[ImaginaryI]", " ", "b", " ", "z"]]]]]]], "]"]]]], RowBox[List["p", "-", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]]], "-", FractionBox[RowBox[List[SuperscriptBox["\[ExponentialE]", RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["2", " ", "\[ImaginaryI]", " ", "b"]], "+", "p", "-", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]], " ", "z"]]], " ", RowBox[List["Hypergeometric2F1", "[", RowBox[List[FractionBox[RowBox[List[RowBox[List["2", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", "p"]], "+", RowBox[List["\[ImaginaryI]", " ", "c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], RowBox[List["2", " ", "b"]]], ",", "1", ",", FractionBox[RowBox[List[RowBox[List["4", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", "p"]], "+", RowBox[List["\[ImaginaryI]", " ", "c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], RowBox[List["2", " ", "b"]]], ",", RowBox[List["-", SuperscriptBox["\[ExponentialE]", RowBox[List["2", " ", "\[ImaginaryI]", " ", "b", " ", "z"]]]]]]], "]"]]]], RowBox[List[RowBox[List["2", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", "p"]], "+", RowBox[List["\[ImaginaryI]", " ", "c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]]], "+", FractionBox[RowBox[List["\[ImaginaryI]", " ", SuperscriptBox["\[ExponentialE]", RowBox[List[RowBox[List["(", RowBox[List["p", "+", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]], " ", "z"]]], " ", RowBox[List["Hypergeometric2F1", "[", RowBox[List[RowBox[List["-", FractionBox[RowBox[List["\[ImaginaryI]", " ", RowBox[List["(", RowBox[List["p", "+", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]]]], RowBox[List["2", " ", "b"]]]]], ",", "1", ",", RowBox[List["1", "-", FractionBox[RowBox[List["\[ImaginaryI]", " ", RowBox[List["(", RowBox[List["p", "+", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]]]], RowBox[List["2", " ", "b"]]]]], ",", RowBox[List["-", SuperscriptBox["\[ExponentialE]", RowBox[List["2", " ", "\[ImaginaryI]", " ", "b", " ", "z"]]]]]]], "]"]]]], RowBox[List["p", "+", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]]], "-", FractionBox[RowBox[List[SuperscriptBox["\[ExponentialE]", RowBox[List[RowBox[List["(", RowBox[List[RowBox[List["2", " ", "\[ImaginaryI]", " ", "b"]], "+", "p", "+", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]], " ", "z"]]], " ", RowBox[List["Hypergeometric2F1", "[", RowBox[List[FractionBox[RowBox[List[RowBox[List["2", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", RowBox[List["(", RowBox[List["p", "+", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]]]]]], RowBox[List["2", " ", "b"]]], ",", "1", ",", FractionBox[RowBox[List[RowBox[List["4", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", RowBox[List["(", RowBox[List["p", "+", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]]]]]], RowBox[List["2", " ", "b"]]], ",", RowBox[List["-", SuperscriptBox["\[ExponentialE]", RowBox[List["2", " ", "\[ImaginaryI]", " ", "b", " ", "z"]]]]]]], "]"]]]], RowBox[List[RowBox[List["2", " ", "b"]], "-", RowBox[List["\[ImaginaryI]", " ", RowBox[List["(", RowBox[List["p", "+", RowBox[List["c", " ", RowBox[List["(", RowBox[List[RowBox[List[RowBox[List["-", "2"]], " ", "s"]], "+", "v"]], ")"]]]]]], ")"]]]]]]]]], ")"]]]]]]]]]], "/;", RowBox[List[RowBox[List["v", "\[Element]", "Integers"]], "&&", RowBox[List["v", ">", "0"]]]]]]]]]]

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

 2002-12-18