Skip to content
Snippets Groups Projects
Commit a050fb11 authored by Alex Kashuba's avatar Alex Kashuba
Browse files

Plots rebuilt

parent 0938482e
No related branches found
No related tags found
No related merge requests found
Expand all Hide whitespace changes
Inline Side-by-side
Math and checks.nb
+ 262
− 23
View file @ a050fb11
...@@ -10,10 +10,10 @@ ...@@ -10,10 +10,10 @@
NotebookFileLineBreakTest NotebookFileLineBreakTest
NotebookFileLineBreakTest NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7] NotebookDataPosition[ 158, 7]
NotebookDataLength[ 199095, 5076] NotebookDataLength[ 206806, 5315]
NotebookOptionsPosition[ 180535, 4750] NotebookOptionsPosition[ 187426, 4974]
NotebookOutlinePosition[ 180926, 4767] NotebookOutlinePosition[ 187819, 4991]
CellTagsIndexPosition[ 180883, 4764] CellTagsIndexPosition[ 187776, 4988]
WindowFrame->Normal*) WindowFrame->Normal*)
(* Beginning of Notebook Content *) (* Beginning of Notebook Content *)
...@@ -3979,6 +3979,230 @@ Cell[BoxData[ ...@@ -3979,6 +3979,230 @@ Cell[BoxData[
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell["Integration 2", "Section",
CellChangeTimes->{{3.860640841456483*^9, 3.860640847585176*^9}, {
3.860641015285797*^9, 3.860641023265122*^9}, {3.860819303073147*^9,
3.8608193068426447`*^9}, {3.861348960652459*^9, 3.861348962668809*^9}, {
3.893846969455922*^9,
3.893846969938409*^9}},ExpressionUUID->"058264d9-3b56-401b-91ed-\
226487375a28"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubsuperscriptBox["\[Integral]", "0", "q"],
RowBox[{
FractionBox[
RowBox[{"t", "+",
RowBox[{"(",
RowBox[{"x", "-", "y"}], ")"}]}],
RowBox[{
RowBox[{"2", "t"}], "+",
RowBox[{"(",
RowBox[{"x", "+", "y"}], ")"}]}]],
RowBox[{"\[DifferentialD]", "x"}]}]}]], "Input",
CellChangeTimes->{{3.893846981685758*^9, 3.893847028519384*^9}, {
3.89384721959321*^9, 3.8938472299516*^9}},
CellLabel->"In[1]:=",ExpressionUUID->"93985866-9a1f-4622-b66b-236446284b6e"],
Cell[BoxData[
RowBox[{"ConditionalExpression", "[",
RowBox[{
RowBox[{"q", "+",
RowBox[{
RowBox[{"(",
RowBox[{"t", "+",
RowBox[{"2", " ", "y"}]}], ")"}], " ",
RowBox[{"(",
RowBox[{
RowBox[{"Log", "[",
RowBox[{
RowBox[{"2", " ", "t"}], "+", "y"}], "]"}], "-",
RowBox[{"Log", "[",
RowBox[{"q", "+",
RowBox[{"2", " ", "t"}], "+", "y"}], "]"}]}], ")"}]}]}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
FractionBox[
RowBox[{
RowBox[{"Im", "[",
RowBox[{
RowBox[{"2", " ", "t"}], "+", "y"}], "]"}], " ",
RowBox[{"Re", "[", "q", "]"}]}],
RowBox[{"Im", "[", "q", "]"}]], "\[LessEqual]",
RowBox[{"t", "+",
RowBox[{"Conjugate", "[", "t", "]"}], "+",
RowBox[{"Re", "[", "y", "]"}]}]}], "&&",
RowBox[{"q", "\[NotElement]",
TemplateBox[{},
"Reals"]}]}], ")"}], "||",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Im", "[",
RowBox[{
RowBox[{"2", " ", "t"}], "+", "y"}], "]"}], "\[GreaterEqual]",
"0"}], "&&",
RowBox[{
RowBox[{"Im", "[",
RowBox[{"q", "+",
RowBox[{"2", " ", "t"}], "+", "y"}], "]"}], "\[GreaterEqual]",
"0"}]}], ")"}], "||",
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Im", "[",
RowBox[{
RowBox[{"2", " ", "t"}], "+", "y"}], "]"}], "\[LessEqual]", "0"}],
"&&",
RowBox[{
RowBox[{"Im", "[",
RowBox[{"q", "+",
RowBox[{"2", " ", "t"}], "+", "y"}], "]"}], "\[LessEqual]",
"0"}]}], ")"}]}], ")"}], "&&",
RowBox[{"(",
RowBox[{
RowBox[{
FractionBox[
RowBox[{
RowBox[{"2", " ", "t"}], "+", "y"}], "q"], "\[NotElement]",
TemplateBox[{},
"Reals"]}], "||",
RowBox[{
RowBox[{"Re", "[",
FractionBox[
RowBox[{
RowBox[{"2", " ", "t"}], "+", "y"}], "q"], "]"}], ">", "0"}], "||",
RowBox[{
RowBox[{"Re", "[",
FractionBox[
RowBox[{
RowBox[{"2", " ", "t"}], "+", "y"}], "q"], "]"}], "<",
RowBox[{"-", "1"}]}]}], ")"}]}]}], "]"}]], "Output",
CellChangeTimes->{{3.893847217515431*^9, 3.8938472473844023`*^9},
3.8938473277194967`*^9},
CellLabel->"Out[1]=",ExpressionUUID->"4007176b-f787-41b6-bda1-1a0d545408c4"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
SubsuperscriptBox["\[Integral]", "0", "q"],
RowBox[{
SubsuperscriptBox["\[Integral]", "0", "q"],
RowBox[{
FractionBox[
RowBox[{"1", "+",
RowBox[{"(",
RowBox[{"x", "-", "y"}], ")"}]}],
RowBox[{"2", "+",
RowBox[{"(",
RowBox[{"x", "+", "y"}], ")"}]}]],
RowBox[{"\[DifferentialD]", "x"}],
RowBox[{"\[DifferentialD]", "y"}]}]}]}]], "Input",
CellChangeTimes->{{3.893847574540905*^9, 3.893847616670486*^9}},
CellLabel->"In[3]:=",ExpressionUUID->"8a0d53dc-541e-4c85-8b6e-2977e0eb6234"],
Cell[BoxData[
RowBox[{"ConditionalExpression", "[",
RowBox[{
RowBox[{
RowBox[{"q", " ",
RowBox[{"Log", "[", "4", "]"}]}], "+",
RowBox[{"Log", "[", "16", "]"}], "+",
RowBox[{"2", " ",
RowBox[{"(",
RowBox[{"1", "+", "q"}], ")"}], " ",
RowBox[{"Log", "[",
RowBox[{"1", "+", "q"}], "]"}]}], "-",
RowBox[{"2", " ",
RowBox[{"(",
RowBox[{"2", "+", "q"}], ")"}], " ",
RowBox[{"Log", "[",
RowBox[{"2", "+", "q"}], "]"}]}]}], ",",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{
RowBox[{"Re", "[", "q", "]"}], ">",
RowBox[{"-", "2"}]}], "&&",
RowBox[{
RowBox[{"Re", "[",
FractionBox["1", "q"], "]"}], ">",
RowBox[{"-",
FractionBox["1", "2"]}]}]}], ")"}], "||",
RowBox[{
RowBox[{"-", "1"}], "<",
RowBox[{"Re", "[", "q", "]"}], "<", "0"}], "||",
RowBox[{"q", "\[NotElement]",
TemplateBox[{},
"Reals"]}]}]}], "]"}]], "Output",
CellChangeTimes->{{3.893847612637351*^9, 3.893847629745593*^9}},
CellLabel->"Out[3]=",ExpressionUUID->"8e7fa172-11d4-4a60-9f67-c79f2edb9b7e"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Series", "[",
RowBox[{
RowBox[{
RowBox[{"q", " ",
RowBox[{"Log", "[", "4", "]"}]}], "+",
RowBox[{"Log", "[", "16", "]"}], "+",
RowBox[{"2", " ",
RowBox[{"(",
RowBox[{"1", "+", "q"}], ")"}], " ",
RowBox[{"Log", "[",
RowBox[{"1", "+", "q"}], "]"}]}], "-",
RowBox[{"2", " ",
RowBox[{"(",
RowBox[{"2", "+", "q"}], ")"}], " ",
RowBox[{"Log", "[",
RowBox[{"2", "+", "q"}], "]"}]}]}], ",",
RowBox[{"{",
RowBox[{"q", ",", "0", ",", "4"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.893847639261694*^9, 3.8938476441680317`*^9}, {
3.893847715090163*^9, 3.893847748424223*^9}, {3.893847882236768*^9,
3.893847894213674*^9}},
CellLabel->"In[10]:=",ExpressionUUID->"0ee58f7d-0fac-49fe-826f-578c75c92c78"],
Cell[BoxData[
InterpretationBox[
RowBox[{
FractionBox[
SuperscriptBox["q", "2"], "2"], "-",
FractionBox[
SuperscriptBox["q", "3"], "4"], "+",
FractionBox[
RowBox[{"7", " ",
SuperscriptBox["q", "4"]}], "48"], "+",
InterpretationBox[
SuperscriptBox[
RowBox[{"O", "[", "q", "]"}], "5"],
SeriesData[$CellContext`q, 0, {}, 2, 5, 1],
Editable->False]}],
SeriesData[$CellContext`q, 0, {
Rational[1, 2],
Rational[-1, 4],
Rational[7, 48]}, 2, 5, 1],
Editable->False]], "Output",
CellChangeTimes->{
3.893847644809058*^9, {3.893847742992325*^9, 3.8938477494936543`*^9}, {
3.893847891387485*^9, 3.893847894655545*^9}},
CellLabel->"Out[10]=",ExpressionUUID->"924973e7-cc68-48c9-ba7e-d4ce0bd25d5b"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Content of the smalltests.nb file", "Section", Cell["Content of the smalltests.nb file", "Section",
CellChangeTimes->{{3.860640841456483*^9, 3.860640847585176*^9}, { CellChangeTimes->{{3.860640841456483*^9, 3.860640847585176*^9}, {
3.860641015285797*^9, 3.860641023265122*^9}, {3.860819303073147*^9, 3.860641015285797*^9, 3.860641023265122*^9}, {3.860819303073147*^9,
...@@ -4746,10 +4970,10 @@ Cell[BoxData[ ...@@ -4746,10 +4970,10 @@ Cell[BoxData[
3.8750205576617603`*^9, 3.875020584170868*^9}}, 3.8750205576617603`*^9, 3.875020584170868*^9}},
CellLabel->"Out[19]=",ExpressionUUID->"d10d4fc2-ec11-4353-bc25-436fa0dc76be"] CellLabel->"Out[19]=",ExpressionUUID->"d10d4fc2-ec11-4353-bc25-436fa0dc76be"]
}, Open ]] }, Open ]]
}, Closed]] }, Open ]]
}, },
WindowSize->{808, 676}, WindowSize->{808, 676},
WindowMargins->{{122, Automatic}, {Automatic, 0}}, WindowMargins->{{Automatic, 553}, {Automatic, 147}},
PrintingCopies->1, PrintingCopies->1,
PrintingPageRange->{1, Automatic}, PrintingPageRange->{1, Automatic},
FrontEndVersion->"12.0 for Mac OS X x86 (64-bit) (April 8, 2019)", FrontEndVersion->"12.0 for Mac OS X x86 (64-bit) (April 8, 2019)",
...@@ -5047,37 +5271,52 @@ Cell[141536, 3970, 217, 5, 54, "Output",ExpressionUUID->"0f11fcfd-06ae-4fa8-acc8 ...@@ -5047,37 +5271,52 @@ Cell[141536, 3970, 217, 5, 54, "Output",ExpressionUUID->"0f11fcfd-06ae-4fa8-acc8
}, Open ]] }, Open ]]
}, Closed]], }, Closed]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[141802, 3981, 474, 7, 53, "Section",ExpressionUUID->"774b4ef7-6453-4f4c-9ed5-9715396dba9d"], Cell[141802, 3981, 353, 6, 53, "Section",ExpressionUUID->"058264d9-3b56-401b-91ed-226487375a28"],
Cell[CellGroupData[{
Cell[142180, 3991, 527, 15, 48, "Input",ExpressionUUID->"93985866-9a1f-4622-b66b-236446284b6e"],
Cell[142710, 4008, 2564, 81, 160, "Output",ExpressionUUID->"4007176b-f787-41b6-bda1-1a0d545408c4"]
}, Open ]],
Cell[CellGroupData[{
Cell[145311, 4094, 570, 16, 50, "Input",ExpressionUUID->"8a0d53dc-541e-4c85-8b6e-2977e0eb6234"],
Cell[145884, 4112, 1141, 35, 82, "Output",ExpressionUUID->"8e7fa172-11d4-4a60-9f67-c79f2edb9b7e"]
}, Open ]],
Cell[CellGroupData[{
Cell[147062, 4152, 817, 22, 30, "Input",ExpressionUUID->"0ee58f7d-0fac-49fe-826f-578c75c92c78"],
Cell[147882, 4176, 762, 23, 54, "Output",ExpressionUUID->"924973e7-cc68-48c9-ba7e-d4ce0bd25d5b"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[142301, 3992, 780, 17, 49, "Input",ExpressionUUID->"a9f21b13-fa48-4720-b65c-415c443a9457"], Cell[148693, 4205, 474, 7, 67, "Section",ExpressionUUID->"774b4ef7-6453-4f4c-9ed5-9715396dba9d"],
Cell[143084, 4011, 277, 4, 34, "Output",ExpressionUUID->"031290e6-a691-4e52-926f-7b1512cebe31"] Cell[CellGroupData[{
Cell[149192, 4216, 780, 17, 49, "Input",ExpressionUUID->"a9f21b13-fa48-4720-b65c-415c443a9457"],
Cell[149975, 4235, 277, 4, 34, "Output",ExpressionUUID->"031290e6-a691-4e52-926f-7b1512cebe31"]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[143398, 4020, 526, 14, 49, "Input",ExpressionUUID->"b27e2757-618f-4da7-afef-2db71f00a865"], Cell[150289, 4244, 526, 14, 49, "Input",ExpressionUUID->"b27e2757-618f-4da7-afef-2db71f00a865"],
Cell[143927, 4036, 155, 2, 34, "Output",ExpressionUUID->"5f760ba7-83e3-4a77-979f-24befe16553c"] Cell[150818, 4260, 155, 2, 34, "Output",ExpressionUUID->"5f760ba7-83e3-4a77-979f-24befe16553c"]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[144119, 4043, 730, 20, 52, "Input",ExpressionUUID->"0802d0d2-9f3d-4bee-b05a-d166886e3b95"], Cell[151010, 4267, 730, 20, 52, "Input",ExpressionUUID->"0802d0d2-9f3d-4bee-b05a-d166886e3b95"],
Cell[144852, 4065, 31472, 544, 240, "Output",ExpressionUUID->"add35d63-bd7d-44f3-ac21-173a4c56b0cf"] Cell[151743, 4289, 31472, 544, 240, "Output",ExpressionUUID->"add35d63-bd7d-44f3-ac21-173a4c56b0cf"]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[176361, 4614, 462, 12, 54, "Input",ExpressionUUID->"ffc3f2a1-6d53-49b3-8bb7-aa8f88789976"], Cell[183252, 4838, 462, 12, 54, "Input",ExpressionUUID->"ffc3f2a1-6d53-49b3-8bb7-aa8f88789976"],
Cell[176826, 4628, 310, 7, 37, "Output",ExpressionUUID->"20c8f9cf-3f68-454f-8bf8-912e5a4a04bb"] Cell[183717, 4852, 310, 7, 37, "Output",ExpressionUUID->"20c8f9cf-3f68-454f-8bf8-912e5a4a04bb"]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[177173, 4640, 472, 12, 56, "Input",ExpressionUUID->"25274199-bd26-4c65-90d5-7d52752590d6"], Cell[184064, 4864, 472, 12, 56, "Input",ExpressionUUID->"25274199-bd26-4c65-90d5-7d52752590d6"],
Cell[177648, 4654, 388, 10, 59, "Output",ExpressionUUID->"8576d12b-19b4-47e1-a2d3-272b33f38ee8"], Cell[184539, 4878, 388, 10, 59, "Output",ExpressionUUID->"8576d12b-19b4-47e1-a2d3-272b33f38ee8"],
Cell[178039, 4666, 498, 14, 60, "Output",ExpressionUUID->"39488349-ef76-4bba-b506-e1e001956c15"] Cell[184930, 4890, 498, 14, 60, "Output",ExpressionUUID->"39488349-ef76-4bba-b506-e1e001956c15"]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[178574, 4685, 342, 8, 30, "Input",ExpressionUUID->"303628a6-0326-4ebc-8d41-35c3b97aa3df"], Cell[185465, 4909, 342, 8, 30, "Input",ExpressionUUID->"303628a6-0326-4ebc-8d41-35c3b97aa3df"],
Cell[178919, 4695, 726, 23, 54, "Output",ExpressionUUID->"5468acbe-b2a6-4feb-a84f-8f1b15cb1a9c"] Cell[185810, 4919, 726, 23, 54, "Output",ExpressionUUID->"5468acbe-b2a6-4feb-a84f-8f1b15cb1a9c"]
}, Open ]], }, Open ]],
Cell[CellGroupData[{ Cell[CellGroupData[{
Cell[179682, 4723, 516, 15, 58, "Input",ExpressionUUID->"196e1eda-3450-441c-8296-97d3e2f40a65"], Cell[186573, 4947, 516, 15, 58, "Input",ExpressionUUID->"196e1eda-3450-441c-8296-97d3e2f40a65"],
Cell[180201, 4740, 306, 6, 34, "Output",ExpressionUUID->"d10d4fc2-ec11-4353-bc25-436fa0dc76be"] Cell[187092, 4964, 306, 6, 34, "Output",ExpressionUUID->"d10d4fc2-ec11-4353-bc25-436fa0dc76be"]
}, Open ]]
}, Open ]] }, Open ]]
}, Closed]]
} }
] ]
*) *)
......
Toeplitz determinant.nb
+ 878
− 822
View file @ a050fb11
This diff is collapsed.
plotC2K.pdf
+ 0
− 0
View file @ a050fb11
No preview for this file type
plotC2Log.pdf
+ 0
− 0
View file @ a050fb11
No preview for this file type
plotN2C2comp.pdf
+ 0
− 0
View file @ a050fb11
No preview for this file type
plotcutoff.pdf
+ 0
− 0
View file @ a050fb11
No preview for this file type
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment