Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (* Content-type: application/vnd.wolfram.mathematica *)
- (*** Wolfram Notebook File ***)
- (* http://www.wolfram.com/nb *)
- (* CreatedBy='Mathematica 12.0' *)
- (*CacheID: 234*)
- (* Internal cache information:
- NotebookFileLineBreakTest
- NotebookFileLineBreakTest
- NotebookDataPosition[ 158, 7]
- NotebookDataLength[ 2502, 87]
- NotebookOptionsPosition[ 1872, 67]
- NotebookOutlinePosition[ 2208, 82]
- CellTagsIndexPosition[ 2165, 79]
- WindowFrame->Normal*)
- (* Beginning of Notebook Content *)
- Notebook[{
- Cell[CellGroupData[{
- Cell[BoxData[
- RowBox[{"Integrate", "[",
- RowBox[{
- RowBox[{"1", "/",
- RowBox[{"(",
- RowBox[{"1", "-", "x"}], ")"}]}], ",",
- RowBox[{"{",
- RowBox[{"x", ",", "0", ",", "z"}], "}"}]}], "]"}]], "Input",
- CellLabel->"In[1]:=",ExpressionUUID->"22d0bebc-4a23-4127-8300-dfa5aa5721e7"],
- Cell[BoxData[
- FormBox[
- RowBox[{"ConditionalExpression", "[",
- RowBox[{
- RowBox[{"-",
- RowBox[{"log", "(",
- RowBox[{"1", "-", "z"}], ")"}]}], ",",
- RowBox[{
- RowBox[{
- RowBox[{"Re", "(", "z", ")"}], "\[LessEqual]", "1"}], "\[Or]",
- RowBox[{"z", "\[NotElement]",
- TemplateBox[{},
- "Reals"]}]}]}], "]"}], TraditionalForm]], "Output",
- CellLabel->"Out[1]=",ExpressionUUID->"6b270a1e-c5c9-44dc-ae19-1b59c3fdd341"]
- }, Open ]],
- Cell[CellGroupData[{
- Cell[BoxData[
- RowBox[{"D", "[",
- RowBox[{
- RowBox[{"PolyLog", "[",
- RowBox[{"3", ",",
- RowBox[{"1", "+", "z"}]}], "]"}], ",", "z"}], "]"}]], "Input",
- CellLabel->"In[2]:=",ExpressionUUID->"dab41cb6-ac81-4eed-a71e-6f7eb1abbfcf"],
- Cell[BoxData[
- FormBox[
- FractionBox[
- TemplateBox[{"2",RowBox[{"z", "+", "1"}]},
- "PolyLog"],
- RowBox[{"z", "+", "1"}]], TraditionalForm]], "Output",
- CellLabel->"Out[2]=",ExpressionUUID->"a71a1c34-b5da-4cea-ad5d-6cebba932c6c"]
- }, Open ]]
- },
- WindowSize->{808, 911},
- WindowMargins->{{876, Automatic}, {201, Automatic}},
- FrontEndVersion->"12.0 for Linux x86 (64-bit) (April 8, 2019)",
- StyleDefinitions->"Default.nb"
- ]
- (* End of Notebook Content *)
- (* Internal cache information *)
- (*CellTagsOutline
- CellTagsIndex->{}
- *)
- (*CellTagsIndex
- CellTagsIndex->{}
- *)
- (*NotebookFileOutline
- Notebook[{
- Cell[CellGroupData[{
- Cell[580, 22, 297, 8, 31, "Input",ExpressionUUID->"22d0bebc-4a23-4127-8300-dfa5aa5721e7"],
- Cell[880, 32, 458, 13, 34, "Output",ExpressionUUID->"6b270a1e-c5c9-44dc-ae19-1b59c3fdd341"]
- }, Open ]],
- Cell[CellGroupData[{
- Cell[1375, 50, 241, 6, 31, "Input",ExpressionUUID->"dab41cb6-ac81-4eed-a71e-6f7eb1abbfcf"],
- Cell[1619, 58, 237, 6, 55, "Output",ExpressionUUID->"a71a1c34-b5da-4cea-ad5d-6cebba932c6c"]
- }, Open ]]
- }
- ]
- *)
- (* End of internal cache information *)
Advertisement
Add Comment
Please, Sign In to add comment