Guest User

Untitled

a guest
Jan 30th, 2020
851
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.73 KB | None | 0 0
  1. (* Content-type: application/vnd.wolfram.mathematica *)
  2.  
  3. (*** Wolfram Notebook File ***)
  4. (* http://www.wolfram.com/nb *)
  5.  
  6. (* CreatedBy='Mathematica 12.0' *)
  7.  
  8. (*CacheID: 234*)
  9. (* Internal cache information:
  10. NotebookFileLineBreakTest
  11. NotebookFileLineBreakTest
  12. NotebookDataPosition[ 158, 7]
  13. NotebookDataLength[ 2502, 87]
  14. NotebookOptionsPosition[ 1872, 67]
  15. NotebookOutlinePosition[ 2208, 82]
  16. CellTagsIndexPosition[ 2165, 79]
  17. WindowFrame->Normal*)
  18.  
  19. (* Beginning of Notebook Content *)
  20. Notebook[{
  21.  
  22. Cell[CellGroupData[{
  23. Cell[BoxData[
  24. RowBox[{"Integrate", "[",
  25. RowBox[{
  26. RowBox[{"1", "/",
  27. RowBox[{"(",
  28. RowBox[{"1", "-", "x"}], ")"}]}], ",",
  29. RowBox[{"{",
  30. RowBox[{"x", ",", "0", ",", "z"}], "}"}]}], "]"}]], "Input",
  31. CellLabel->"In[1]:=",ExpressionUUID->"22d0bebc-4a23-4127-8300-dfa5aa5721e7"],
  32.  
  33. Cell[BoxData[
  34. FormBox[
  35. RowBox[{"ConditionalExpression", "[",
  36. RowBox[{
  37. RowBox[{"-",
  38. RowBox[{"log", "(",
  39. RowBox[{"1", "-", "z"}], ")"}]}], ",",
  40. RowBox[{
  41. RowBox[{
  42. RowBox[{"Re", "(", "z", ")"}], "\[LessEqual]", "1"}], "\[Or]",
  43. RowBox[{"z", "\[NotElement]",
  44. TemplateBox[{},
  45. "Reals"]}]}]}], "]"}], TraditionalForm]], "Output",
  46. CellLabel->"Out[1]=",ExpressionUUID->"6b270a1e-c5c9-44dc-ae19-1b59c3fdd341"]
  47. }, Open ]],
  48.  
  49. Cell[CellGroupData[{
  50.  
  51. Cell[BoxData[
  52. RowBox[{"D", "[",
  53. RowBox[{
  54. RowBox[{"PolyLog", "[",
  55. RowBox[{"3", ",",
  56. RowBox[{"1", "+", "z"}]}], "]"}], ",", "z"}], "]"}]], "Input",
  57. CellLabel->"In[2]:=",ExpressionUUID->"dab41cb6-ac81-4eed-a71e-6f7eb1abbfcf"],
  58.  
  59. Cell[BoxData[
  60. FormBox[
  61. FractionBox[
  62. TemplateBox[{"2",RowBox[{"z", "+", "1"}]},
  63. "PolyLog"],
  64. RowBox[{"z", "+", "1"}]], TraditionalForm]], "Output",
  65. CellLabel->"Out[2]=",ExpressionUUID->"a71a1c34-b5da-4cea-ad5d-6cebba932c6c"]
  66. }, Open ]]
  67. },
  68. WindowSize->{808, 911},
  69. WindowMargins->{{876, Automatic}, {201, Automatic}},
  70. FrontEndVersion->"12.0 for Linux x86 (64-bit) (April 8, 2019)",
  71. StyleDefinitions->"Default.nb"
  72. ]
  73. (* End of Notebook Content *)
  74.  
  75. (* Internal cache information *)
  76. (*CellTagsOutline
  77. CellTagsIndex->{}
  78. *)
  79. (*CellTagsIndex
  80. CellTagsIndex->{}
  81. *)
  82. (*NotebookFileOutline
  83. Notebook[{
  84. Cell[CellGroupData[{
  85. Cell[580, 22, 297, 8, 31, "Input",ExpressionUUID->"22d0bebc-4a23-4127-8300-dfa5aa5721e7"],
  86. Cell[880, 32, 458, 13, 34, "Output",ExpressionUUID->"6b270a1e-c5c9-44dc-ae19-1b59c3fdd341"]
  87. }, Open ]],
  88. Cell[CellGroupData[{
  89. Cell[1375, 50, 241, 6, 31, "Input",ExpressionUUID->"dab41cb6-ac81-4eed-a71e-6f7eb1abbfcf"],
  90. Cell[1619, 58, 237, 6, 55, "Output",ExpressionUUID->"a71a1c34-b5da-4cea-ad5d-6cebba932c6c"]
  91. }, Open ]]
  92. }
  93. ]
  94. *)
  95.  
  96. (* End of internal cache information *)
Advertisement
Add Comment
Please, Sign In to add comment