(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 11.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 22657, 789] NotebookOptionsPosition[ 21446, 744] NotebookOutlinePosition[ 21777, 759] CellTagsIndexPosition[ 21734, 756] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"$LoadAddOns", "=", RowBox[{"{", "\"\\"", "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"<<", "FeynCalc`"}]}], "Input"], Cell[CellGroupData[{ Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"FeynCalc \"\>", "Text", StripOnInput->False, FontWeight->Bold], "\[InvisibleSpace]", StyleBox["\<\"9.2.0. For help, use the \"\>", "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox[ TagBox[ ButtonBox[ RowBox[{"documentation", " ", "center"}], BaseStyle->"Link", ButtonData:>"paclet:FeynCalc/", ButtonNote->"paclet:FeynCalc/"], DisplayForm], "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox["\<\", check out the \"\>", "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox[ TagBox[ ButtonBox["wiki", BaseStyle->"Hyperlink", ButtonData:>{ URL["https://github.com/FeynCalc/feyncalc/wiki"], None}, ButtonNote->"https://github.com/FeynCalc/feyncalc/wiki"], DisplayForm], "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox["\<\" or write to the \"\>", "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox[ TagBox[ ButtonBox[ RowBox[{"mailing", " ", RowBox[{"list", "."}]}], BaseStyle->"Hyperlink", ButtonData:>{ URL["http://www.feyncalc.org/forum/"], None}, ButtonNote->"http://www.feyncalc.org/forum/"], DisplayForm], "Text", StripOnInput->False]}], SequenceForm[ Style["FeynCalc ", "Text", Bold], Style["9.2.0. For help, use the ", "Text"], Style[ DisplayForm[ ButtonBox[ "documentation center", BaseStyle -> "Link", ButtonData :> "paclet:FeynCalc/", ButtonNote -> "paclet:FeynCalc/"]], "Text"], Style[", check out the ", "Text"], Style[ DisplayForm[ ButtonBox["wiki", ButtonData :> { URL["https://github.com/FeynCalc/feyncalc/wiki"], None}, BaseStyle -> "Hyperlink", ButtonNote -> "https://github.com/FeynCalc/feyncalc/wiki"]], "Text"], Style[" or write to the ", "Text"], Style[ DisplayForm[ ButtonBox["mailing list.", ButtonData :> { URL["http://www.feyncalc.org/forum/"], None}, BaseStyle -> "Hyperlink", ButtonNote -> "http://www.feyncalc.org/forum/"]], "Text"]], Editable->False], TraditionalForm]], "Print"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"See also the supplied \"\>", "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox[ TagBox[ ButtonBox[ RowBox[{"examples", "."}], BaseStyle->"Hyperlink", ButtonFunction:>SystemOpen[ FileNameJoin[{FeynCalc`$FeynCalcDirectory, "Examples"}]], Evaluator->Automatic, Method->"Preemptive"], DisplayForm], "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox["\<\" If you use FeynCalc in your research, please cite\"\>", "Text", StripOnInput->False]}], SequenceForm[ Style["See also the supplied ", "Text"], Style[ DisplayForm[ ButtonBox[ "examples.", BaseStyle -> "Hyperlink", ButtonFunction :> SystemOpen[ FileNameJoin[{FeynCalc`$FeynCalcDirectory, "Examples"}]], Evaluator -> Automatic, Method -> "Preemptive"]], "Text"], Style[" If you use FeynCalc in your research, please cite", "Text"]], Editable->False], TraditionalForm]], "Print"], Cell[BoxData[ FormBox[ StyleBox["\<\" \[Bullet] V. Shtabovenko, R. Mertig and F. Orellana, Comput. \ Phys. Commun., 207C, 432-444, 2016, arXiv:1601.01167\"\>", "Text", StripOnInput->False], TraditionalForm]], "Print"], Cell[BoxData[ FormBox[ StyleBox["\<\" \[Bullet] R. Mertig, M. B\[ODoubleDot]hm, and A. Denner, \ Comput. Phys. Commun., 64, 345-359, 1991.\"\>", "Text", StripOnInput->False], TraditionalForm]], "Print"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"FeynHelpers \"\>", "Text", StripOnInput->False, FontWeight->Bold], "\[InvisibleSpace]", StyleBox["\<\"1.0.0 loaded.\"\>", "Text", StripOnInput->False]}], SequenceForm[ Style["FeynHelpers ", "Text", Bold], Style["1.0.0 loaded.", "Text"]], Editable->False], TraditionalForm]], "Print"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"Have a look at the supplied \"\>", "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox[ TagBox[ ButtonBox[ RowBox[{"examples", "."}], BaseStyle->"Hyperlink", ButtonFunction:>SystemOpen[ FileNameJoin[{FeynCalc`$FeynHelpersDirectory, "Examples"}]], Evaluator->Automatic, Method->"Preemptive"], DisplayForm], "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox["\<\" If you use FeynHelpers in your research, please cite\"\>", "Text", StripOnInput->False]}], SequenceForm[ Style["Have a look at the supplied ", "Text"], Style[ DisplayForm[ ButtonBox[ "examples.", BaseStyle -> "Hyperlink", ButtonFunction :> SystemOpen[ FileNameJoin[{FeynCalc`$FeynHelpersDirectory, "Examples"}]], Evaluator -> Automatic, Method -> "Preemptive"]], "Text"], Style[" If you use FeynHelpers in your research, please cite", "Text"]], Editable->False], TraditionalForm]], "Print"], Cell[BoxData[ FormBox[ StyleBox["\<\" \[Bullet] V. Shtabovenko, \\\"FeynHelpers: Connecting \ FeynCalc to FIRE and Package-X\\\", TUM-EFT 75/15, arXiv:1611.06793\"\>", "Text", StripOnInput->False], TraditionalForm]], "Print"], Cell[BoxData[ FormBox[ StyleBox["\<\"Furthermore, remember to cite the authors of the tools that \ you are calling from FeynHelpers, which are\"\>", "Text", StripOnInput->False], TraditionalForm]], "Print"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" \[Bullet] \"\>", "\[InvisibleSpace]", StyleBox[ TagBox[ ButtonBox["FIRE", BaseStyle->"Hyperlink", ButtonData:>{ URL["http://science.sander.su/FIRE.htm"], None}, ButtonNote->"http://science.sander.su/FIRE.htm"], DisplayForm], "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox["\<\" by A. Smirnov, if you are using the function \ FIREBurn.\"\>", "Text", StripOnInput->False]}], SequenceForm[ Style[" \[Bullet] "], Style[ DisplayForm[ ButtonBox["FIRE", ButtonData :> { URL["http://science.sander.su/FIRE.htm"], None}, BaseStyle -> "Hyperlink", ButtonNote -> "http://science.sander.su/FIRE.htm"]], "Text"], Style[" by A. Smirnov, if you are using the function FIREBurn.", "Text"]], Editable->False], TraditionalForm]], "Print"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" \[Bullet] \"\>", "\[InvisibleSpace]", StyleBox[ TagBox[ ButtonBox[ RowBox[{"Package", "-", "X"}], BaseStyle->"Hyperlink", ButtonData:>{ URL["https://packagex.hepforge.org"], None}, ButtonNote->"https://packagex.hepforge.org"], DisplayForm], "Text", StripOnInput->False], "\[InvisibleSpace]", StyleBox["\<\" by H. Patel, if you are using the function \ PaXEvaluate.\"\>", "Text", StripOnInput->False]}], SequenceForm[ Style[" \[Bullet] "], Style[ DisplayForm[ ButtonBox["Package-X", ButtonData :> { URL["https://packagex.hepforge.org"], None}, BaseStyle -> "Hyperlink", ButtonNote -> "https://packagex.hepforge.org"]], "Text"], Style[" by H. Patel, if you are using the function PaXEvaluate.", "Text"]], Editable->False], TraditionalForm]], "Print"] }, Open ]] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"SPD", "[", RowBox[{"p", ",", "p"}], "]"}], "=", RowBox[{"m", "^", "2"}]}], ";"}]], "Input"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"res1", "=", RowBox[{"TID", "[", RowBox[{ RowBox[{ RowBox[{"FVD", "[", RowBox[{"k", ",", "\[Alpha]"}], "]"}], " ", RowBox[{"GSD", "[", "k", "]"}], " ", RowBox[{"FAD", "[", RowBox[{ RowBox[{"{", RowBox[{"k", ",", "m"}], "}"}], ",", RowBox[{"p", "-", "k"}]}], "]"}]}], ",", "k", ",", RowBox[{"ToPaVe", "\[Rule]", "True"}]}], "]"}]}]], "Input"], Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"\[ImaginaryI]", " ", SuperscriptBox["\[Pi]", "2"], " ", FormBox[ SuperscriptBox[ FormBox[ FormBox["p", TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm], TraditionalForm]], TraditionalForm], " ", RowBox[{"\[Gamma]", "\[CenterDot]", FormBox[ FormBox["p", TraditionalForm], TraditionalForm]}], " ", FormBox[ TagBox[ FormBox[ RowBox[{ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(", RowBox[{ SuperscriptBox["m", "2"], ",", "0", ",", SuperscriptBox["m", "2"]}], ")"}], TraditionalForm], HoldForm], TraditionalForm]}], "-", FractionBox[ RowBox[{"\[ImaginaryI]", " ", SuperscriptBox["\[Pi]", "2"], " ", FormBox[ TagBox[ FormBox[ RowBox[{ SubscriptBox["\<\"A\"\>", "\<\"0\"\>"], "(", SuperscriptBox["m", "2"], ")"}], TraditionalForm], HoldForm], TraditionalForm], " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "-", "D"}], ")"}], " ", FormBox[ SuperscriptBox[ FormBox[ FormBox["p", TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm], TraditionalForm]], TraditionalForm], " ", RowBox[{"\[Gamma]", "\[CenterDot]", FormBox[ FormBox["p", TraditionalForm], TraditionalForm]}]}], "+", RowBox[{"D", " ", FormBox[ SuperscriptBox[ FormBox[ FormBox["p", TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm], TraditionalForm]], TraditionalForm], " ", RowBox[{"\[Gamma]", "\[CenterDot]", FormBox[ FormBox["p", TraditionalForm], TraditionalForm]}]}], "+", RowBox[{ SuperscriptBox["m", "2"], " ", SuperscriptBox["\[Gamma]", FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm]]}], "-", RowBox[{"2", " ", FormBox[ SuperscriptBox[ FormBox[ FormBox["p", TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm], TraditionalForm]], TraditionalForm], " ", RowBox[{"\[Gamma]", "\[CenterDot]", FormBox[ FormBox["p", TraditionalForm], TraditionalForm]}]}]}], ")"}]}], RowBox[{"2", " ", RowBox[{"(", RowBox[{"1", "-", "D"}], ")"}], " ", SuperscriptBox["m", "2"]}]]}], TraditionalForm]], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PaXEvaluate", "[", "res1", "]"}]], "Input"], Cell[BoxData[ FormBox[ RowBox[{ FractionBox[ RowBox[{"\[ImaginaryI]", " ", SuperscriptBox["\[Pi]", "2"], " ", SuperscriptBox["m", "2"], " ", SuperscriptBox["\[Gamma]", FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm]]}], RowBox[{"6", " ", TagBox["\[CurlyEpsilon]", TraditionalForm]}]], "-", RowBox[{ FractionBox["1", "18"], " ", "\[ImaginaryI]", " ", SuperscriptBox["\[Pi]", "2"], " ", SuperscriptBox["m", "2"], " ", SuperscriptBox["\[Gamma]", FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm]], " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"3", " ", RowBox[{"log", "(", FractionBox[ SuperscriptBox["\[Mu]", "2"], SuperscriptBox["m", "2"]], ")"}]}]}], "+", RowBox[{"3", " ", TagBox["\[DoubledGamma]", Function[{}, EulerGamma]]}], "-", "5", "+", RowBox[{"3", " ", RowBox[{"log", "(", "\[Pi]", ")"}]}]}], ")"}]}], "-", RowBox[{ FractionBox["1", "9"], " ", "\[ImaginaryI]", " ", SuperscriptBox["\[Pi]", "2"], " ", FormBox[ SuperscriptBox[ FormBox[ FormBox["p", TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm], TraditionalForm]], TraditionalForm], " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"3", " ", RowBox[{"log", "(", FractionBox[ SuperscriptBox["\[Mu]", "2"], SuperscriptBox["m", "2"]], ")"}]}]}], "+", RowBox[{"3", " ", TagBox["\[DoubledGamma]", Function[{}, EulerGamma]]}], "-", "11", "+", RowBox[{"3", " ", RowBox[{"log", "(", "\[Pi]", ")"}]}]}], ")"}], " ", RowBox[{"\[Gamma]", "\[CenterDot]", FormBox[ FormBox["p", TraditionalForm], TraditionalForm]}]}], "+", FractionBox[ RowBox[{"\[ImaginaryI]", " ", SuperscriptBox["\[Pi]", "2"], " ", FormBox[ SuperscriptBox[ FormBox[ FormBox["p", TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm], TraditionalForm]], TraditionalForm], " ", RowBox[{"\[Gamma]", "\[CenterDot]", FormBox[ FormBox["p", TraditionalForm], TraditionalForm]}]}], RowBox[{"3", " ", TagBox["\[CurlyEpsilon]", TraditionalForm]}]]}], TraditionalForm]], "Output"] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"(*", RowBox[{"Old", " ", "behavior"}], "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"$LimitTo4", "=", "True"}], ";"}]}]], "Input"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"res2", "=", RowBox[{ RowBox[{"OneLoop", "[", RowBox[{"k", ",", RowBox[{ RowBox[{"FVD", "[", RowBox[{"k", ",", "\[Alpha]"}], "]"}], " ", RowBox[{"GSD", "[", "k", "]"}], " ", RowBox[{"FAD", "[", RowBox[{ RowBox[{"{", RowBox[{"k", ",", "m"}], "}"}], ",", RowBox[{"p", "-", "k"}]}], "]"}]}]}], "]"}], "//", RowBox[{ RowBox[{"ChangeDimension", "[", RowBox[{"#", ",", "D"}], "]"}], "&"}]}]}]], "Input"], Cell[BoxData[ FormBox[ RowBox[{"\[ImaginaryI]", " ", SuperscriptBox["\[Pi]", "2"], " ", RowBox[{"(", RowBox[{ RowBox[{ FractionBox["1", "6"], " ", SuperscriptBox["m", "2"], " ", SuperscriptBox["\[Gamma]", FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm]], " ", FormBox[ TagBox[ FormBox[ RowBox[{ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(", RowBox[{"0", ",", "0", ",", SuperscriptBox["m", "2"]}], ")"}], TraditionalForm], HoldForm], TraditionalForm]}], "-", RowBox[{ FractionBox["2", "3"], " ", FormBox[ SuperscriptBox[ FormBox[ FormBox["p", TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm], TraditionalForm]], TraditionalForm], " ", RowBox[{"\[Gamma]", "\[CenterDot]", FormBox[ FormBox["p", TraditionalForm], TraditionalForm]}], " ", FormBox[ TagBox[ FormBox[ RowBox[{ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(", RowBox[{"0", ",", "0", ",", SuperscriptBox["m", "2"]}], ")"}], TraditionalForm], HoldForm], TraditionalForm]}], "+", RowBox[{ FormBox[ SuperscriptBox[ FormBox[ FormBox["p", TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm], TraditionalForm]], TraditionalForm], " ", RowBox[{"\[Gamma]", "\[CenterDot]", FormBox[ FormBox["p", TraditionalForm], TraditionalForm]}], " ", FormBox[ TagBox[ FormBox[ RowBox[{ SubscriptBox["\<\"B\"\>", "\<\"0\"\>"], "(", RowBox[{ SuperscriptBox["m", "2"], ",", "0", ",", SuperscriptBox["m", "2"]}], ")"}], TraditionalForm], HoldForm], TraditionalForm]}], "+", FractionBox[ RowBox[{ SuperscriptBox["m", "2"], " ", SuperscriptBox["\[Gamma]", FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm]]}], "9"], "-", RowBox[{ FractionBox["1", "9"], " ", FormBox[ SuperscriptBox[ FormBox[ FormBox["p", TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm], TraditionalForm]], TraditionalForm], " ", RowBox[{"\[Gamma]", "\[CenterDot]", FormBox[ FormBox["p", TraditionalForm], TraditionalForm]}]}]}], ")"}]}], TraditionalForm]], "Output"] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"PaXEvaluate", "[", "res2", "]"}]], "Input"], Cell[BoxData[ FormBox[ RowBox[{ FractionBox[ RowBox[{"\[ImaginaryI]", " ", SuperscriptBox["\[Pi]", "2"], " ", SuperscriptBox["m", "2"], " ", SuperscriptBox["\[Gamma]", FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm]]}], RowBox[{"6", " ", TagBox["\[CurlyEpsilon]", TraditionalForm]}]], "-", RowBox[{ FractionBox["1", "18"], " ", "\[ImaginaryI]", " ", SuperscriptBox["\[Pi]", "2"], " ", SuperscriptBox["m", "2"], " ", SuperscriptBox["\[Gamma]", FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm]], " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"3", " ", RowBox[{"log", "(", FractionBox[ SuperscriptBox["\[Mu]", "2"], SuperscriptBox["m", "2"]], ")"}]}]}], "+", RowBox[{"3", " ", TagBox["\[DoubledGamma]", Function[{}, EulerGamma]]}], "-", "5", "+", RowBox[{"3", " ", RowBox[{"log", "(", "\[Pi]", ")"}]}]}], ")"}]}], "-", RowBox[{ FractionBox["1", "9"], " ", "\[ImaginaryI]", " ", SuperscriptBox["\[Pi]", "2"], " ", FormBox[ SuperscriptBox[ FormBox[ FormBox["p", TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm], TraditionalForm]], TraditionalForm], " ", RowBox[{"(", RowBox[{ RowBox[{"-", RowBox[{"3", " ", RowBox[{"log", "(", FractionBox[ SuperscriptBox["\[Mu]", "2"], SuperscriptBox["m", "2"]], ")"}]}]}], "+", RowBox[{"3", " ", TagBox["\[DoubledGamma]", Function[{}, EulerGamma]]}], "-", "11", "+", RowBox[{"3", " ", RowBox[{"log", "(", "\[Pi]", ")"}]}]}], ")"}], " ", RowBox[{"\[Gamma]", "\[CenterDot]", FormBox[ FormBox["p", TraditionalForm], TraditionalForm]}]}], "+", FractionBox[ RowBox[{"\[ImaginaryI]", " ", SuperscriptBox["\[Pi]", "2"], " ", FormBox[ SuperscriptBox[ FormBox[ FormBox["p", TraditionalForm], TraditionalForm], FormBox[ FormBox[ FormBox["\[Alpha]", TraditionalForm], TraditionalForm], TraditionalForm]], TraditionalForm], " ", RowBox[{"\[Gamma]", "\[CenterDot]", FormBox[ FormBox["p", TraditionalForm], TraditionalForm]}]}], RowBox[{"3", " ", TagBox["\[CurlyEpsilon]", TraditionalForm]}]]}], TraditionalForm]], "Output"] }, Open ]] }, WindowSize->{1209, 911}, WindowMargins->{{876, 475}, {207, Automatic}}, FrontEndVersion->"11.0 for Linux x86 (64-bit) (July 28, 2016)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[580, 22, 178, 5, 52, "Input"], Cell[CellGroupData[{ Cell[783, 31, 2282, 63, 26, "Print"], Cell[3068, 96, 1067, 29, 26, "Print"], Cell[4138, 127, 223, 4, 26, "Print"], Cell[4364, 133, 208, 4, 26, "Print"], Cell[4575, 139, 393, 12, 23, "Print"], Cell[4971, 153, 1091, 29, 26, "Print"], Cell[6065, 184, 235, 5, 26, "Print"], Cell[6303, 191, 212, 4, 26, "Print"], Cell[6518, 197, 920, 26, 26, "Print"], Cell[7441, 225, 937, 26, 26, "Print"] }, Open ]] }, Open ]], Cell[8405, 255, 147, 5, 32, "Input"], Cell[CellGroupData[{ Cell[8577, 264, 435, 13, 32, "Input"], Cell[9015, 279, 3170, 117, 67, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[12222, 401, 67, 1, 32, "Input"], Cell[12292, 404, 2661, 94, 64, "Output"] }, Open ]], Cell[14968, 501, 178, 5, 51, "Input"], Cell[CellGroupData[{ Cell[15171, 510, 514, 16, 32, "Input"], Cell[15688, 528, 2974, 111, 65, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[18699, 644, 67, 1, 32, "Input"], Cell[18769, 647, 2661, 94, 64, "Output"] }, Open ]] } ] *)