Cell[BoxData[RowBox[List[RowBox[List["\[Integral]", RowBox[List[SuperscriptBox["z", RowBox[List["\[Alpha]", "-", "1"]]], RowBox[List[UnderoverscriptBox["\[Product]", RowBox[List["k", "=", "1"]], "n"], RowBox[List[RowBox[List["Sin", "[", RowBox[List[SubscriptBox["a", "k"], " ", "z"]], "]"]], RowBox[List["\[DifferentialD]", "z"]]]]]]]]]], "\[Equal]", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["-", "2"]], ")"]], RowBox[List[RowBox[List["-", "n"]], "-", "1"]]], SuperscriptBox["z", "\[Alpha]"], " ", RowBox[List[UnderoverscriptBox["\[Sum]", UnderscriptBox[RowBox[List[SubscriptBox["k", "1"], "=", RowBox[List["-", "1"]]]], RowBox[List[RowBox[List["\[CapitalDelta]", " ", SubscriptBox["k", "1"]]], "=", "2"]]], "1"], RowBox[List[UnderoverscriptBox["\[Sum]", UnderscriptBox[RowBox[List[SubscriptBox["k", "2"], "=", RowBox[List["-", "1"]]]], RowBox[List[RowBox[List["\[CapitalDelta]", " ", SubscriptBox["k", "2"]]], "=", "2"]]], "1"], RowBox[List["\[Ellipsis]", RowBox[List[UnderoverscriptBox["\[Sum]", UnderscriptBox[RowBox[List[SubscriptBox["k", "n"], "=", RowBox[List["-", "1"]]]], RowBox[List[RowBox[List["\[CapitalDelta]", " ", SubscriptBox["k", "n"]]], "=", "2"]]], "1"], " ", RowBox[List["(", RowBox[List["(", RowBox[List[RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List["\[ImaginaryI]", " ", "z", " ", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["j", "=", "1"]], "n"], RowBox[List[SubscriptBox["k", "j"], SubscriptBox["a", "j"]]]]]]], ")"]], RowBox[List["-", "\[Alpha]"]]], " ", RowBox[List["Exp", "[", RowBox[List[RowBox[List["-", FractionBox[RowBox[List["\[Pi]", " ", "\[ImaginaryI]"]], "2"]]], RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["j", "=", "1"]], "n"], SubscriptBox["k", "j"]]]]], "]"]], RowBox[List["Gamma", "[", RowBox[List["\[Alpha]", ",", RowBox[List["\[ImaginaryI]", " ", "z", " ", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["j", "=", "1"]], "n"], RowBox[List[SubscriptBox["k", "j"], SubscriptBox["a", "j"]]]]]]]]], "]"]]]], " ", "+", RowBox[List[SuperscriptBox[RowBox[List["(", RowBox[List[RowBox[List["-", "\[ImaginaryI]"]], " ", "a", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["j", "=", "1"]], "n"], RowBox[List[SubscriptBox["k", "j"], SubscriptBox["a", "j"]]]]]]], ")"]], RowBox[List["-", "\[Alpha]"]]], RowBox[List["Exp", "[", RowBox[List[FractionBox[RowBox[List["\[Pi]", " ", "\[ImaginaryI]"]], "2"], RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["j", "=", "1"]], "n"], SubscriptBox["k", "j"]]]]], "]"]], RowBox[List["Gamma", "[", RowBox[List["\[Alpha]", ",", RowBox[List[RowBox[List["-", "\[ImaginaryI]"]], " ", "z", " ", RowBox[List[UnderoverscriptBox["\[Sum]", RowBox[List["j", "=", "1"]], "n"], RowBox[List[SubscriptBox["k", "j"], SubscriptBox["a", "j"]]]]]]]]], "]"]]]]]], ")"]], ")"]]]]]]]]]]]]]]]]
|