diff --git a/Ec.nb b/Ec.nb index dfddcd1..674505e 100644 --- a/Ec.nb +++ b/Ec.nb @@ -10,10 +10,10 @@ NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] -NotebookDataLength[ 9139594, 171633] -NotebookOptionsPosition[ 9103517, 171026] -NotebookOutlinePosition[ 9103910, 171042] -CellTagsIndexPosition[ 9103867, 171039] +NotebookDataLength[ 9139719, 171635] +NotebookOptionsPosition[ 9103641, 171028] +NotebookOutlinePosition[ 9104034, 171044] +CellTagsIndexPosition[ 9103991, 171041] WindowFrame->Normal*) (* Beginning of Notebook Content *) @@ -111,26 +111,28 @@ Cell[BoxData[ SuperscriptBox[ RowBox[{"Binomial", "[", RowBox[{ - RowBox[{"94", "-", "14"}], ",", - RowBox[{"22", "-", "14"}]}], "]"}], "2"]}], "}"}], "//", + RowBox[{"94", "-", "10"}], ",", + RowBox[{"22", "-", "10"}]}], "]"}], "2"]}], "}"}], "//", "N"}]], "Input", CellChangeTimes->{{3.8135958399923983`*^9, 3.813595942082993*^9}, { 3.8135959737199574`*^9, 3.8135959755749493`*^9}, {3.813596026841454*^9, 3.813596054267604*^9}, {3.813596095179385*^9, 3.8135962147994623`*^9}, 3.813596254853956*^9, {3.813596291938993*^9, 3.813596305317832*^9}, { - 3.813596543425727*^9, 3.8135966759210463`*^9}}, - CellLabel->"In[65]:=",ExpressionUUID->"02744148-4f90-45d2-8761-712a36d37618"], + 3.813596543425727*^9, 3.8135966759210463`*^9}, {3.833033605514287*^9, + 3.8330336286649647`*^9}}, + CellLabel->"In[67]:=",ExpressionUUID->"02744148-4f90-45d2-8761-712a36d37618"], Cell[BoxData[ RowBox[{"{", RowBox[{ "1.2178253610497171`*^31", ",", "5.458249722815566`*^29", ",", "5.458249722815566`*^29", ",", "2.700715669388972`*^30", ",", - "8.402773100226301`*^20"}], "}"}]], "Output", + "1.2767393815305616`*^28"}], "}"}]], "Output", CellChangeTimes->{{3.813596139977675*^9, 3.813596203760738*^9}, 3.813596255875952*^9, 3.813596552634261*^9, 3.813596676289742*^9, - 3.8164496888401937`*^9}, - CellLabel->"Out[65]=",ExpressionUUID->"47e93ff9-35c1-4f45-bffe-6a3cd36c46c7"] + 3.8164496888401937`*^9, {3.833033609607085*^9, 3.833033629768797*^9}, + 3.83303376359875*^9}, + CellLabel->"Out[67]=",ExpressionUUID->"1dcb97fb-8083-40b6-af40-a1ab69eb2613"] }, Open ]], Cell[BoxData[ @@ -891,7 +893,7 @@ e6Q++FMrN17K+L9i4icGGELvvwAAkIWIrKm+SZYAPTHu+T80i9BZL0/rvwAA af39d68eb482"] }, Open ]] }, Open ]] -}, Closed]], +}, Open ]], Cell[CellGroupData[{ @@ -79249,7 +79251,7 @@ Cell[BoxData[ 3.81546308873343*^9, 3.815463095048327*^9}, {3.815463252409985*^9, 3.815463252547555*^9}, 3.8154639875543222`*^9, {3.815464051564909*^9, 3.815464052606266*^9}, {3.820337538096493*^9, 3.8203375388310947`*^9}}, - CellLabel->"In[65]:=",ExpressionUUID->"5f273034-8ae0-412b-a617-4d3af97c3373"], + CellLabel->"In[34]:=",ExpressionUUID->"5f273034-8ae0-412b-a617-4d3af97c3373"], Cell[CellGroupData[{ @@ -171056,582 +171058,582 @@ Cell[CellGroupData[{ Cell[2269, 70, 170, 3, 54, "Subsection",ExpressionUUID->"549a0e24-018c-405a-9bed-5a0ee0cc49be"], Cell[2442, 75, 356, 7, 30, "Input",ExpressionUUID->"b22ceb93-9e3c-4def-aa23-2085c91cfe3b"], Cell[CellGroupData[{ -Cell[2823, 86, 1301, 35, 54, "Input",ExpressionUUID->"02744148-4f90-45d2-8761-712a36d37618"], -Cell[4127, 123, 463, 9, 37, "Output",ExpressionUUID->"47e93ff9-35c1-4f45-bffe-6a3cd36c46c7"] +Cell[2823, 86, 1353, 36, 54, "Input",ExpressionUUID->"02744148-4f90-45d2-8761-712a36d37618"], +Cell[4179, 124, 535, 10, 37, "Output",ExpressionUUID->"1dcb97fb-8083-40b6-af40-a1ab69eb2613"] }, Open ]], -Cell[4605, 135, 547, 9, 30, "Input",ExpressionUUID->"53ff04a5-98c9-44e9-bb1d-488885fa134f"], +Cell[4729, 137, 547, 9, 30, "Input",ExpressionUUID->"53ff04a5-98c9-44e9-bb1d-488885fa134f"], Cell[CellGroupData[{ -Cell[5177, 148, 1819, 48, 56, "Input",ExpressionUUID->"0809b33a-275d-404b-99c4-7598d58170c8"], -Cell[6999, 198, 535, 10, 37, "Output",ExpressionUUID->"864a7d2b-ce67-433a-8ac3-2b83c18a994c"] +Cell[5301, 150, 1819, 48, 56, "Input",ExpressionUUID->"0809b33a-275d-404b-99c4-7598d58170c8"], +Cell[7123, 200, 535, 10, 37, "Output",ExpressionUUID->"864a7d2b-ce67-433a-8ac3-2b83c18a994c"] }, Open ]], Cell[CellGroupData[{ -Cell[7571, 213, 2830, 59, 241, "Input",ExpressionUUID->"eddaff88-28eb-4edc-8a9e-f82f0ed0a931"], -Cell[10404, 274, 12129, 244, 246, "Output",ExpressionUUID->"b6c0c5bb-70e9-4caa-ba56-e703f46547ce"], -Cell[22536, 520, 18740, 370, 358, "Output",ExpressionUUID->"f64203ed-fc93-468a-917a-af39d68eb482"] +Cell[7695, 215, 2830, 59, 241, "Input",ExpressionUUID->"eddaff88-28eb-4edc-8a9e-f82f0ed0a931"], +Cell[10528, 276, 12129, 244, 246, "Output",ExpressionUUID->"b6c0c5bb-70e9-4caa-ba56-e703f46547ce"], +Cell[22660, 522, 18740, 370, 358, "Output",ExpressionUUID->"f64203ed-fc93-468a-917a-af39d68eb482"] +}, Open ]] +}, Open ]] +}, Open ]], +Cell[CellGroupData[{ +Cell[41461, 899, 209, 4, 72, "Title",ExpressionUUID->"65349f7e-5bc6-4eab-a848-be2c224ab83e"], +Cell[CellGroupData[{ +Cell[41695, 907, 165, 3, 67, "Section",ExpressionUUID->"16a381ea-1b1c-49bc-af20-8f5dd32b688e"], +Cell[41863, 912, 2036, 57, 110, "Input",ExpressionUUID->"895ab98c-f42b-4d20-8b55-5797a7b91a74", + InitializationCell->True], +Cell[CellGroupData[{ +Cell[43924, 973, 4341, 101, 388, "Input",ExpressionUUID->"c0d253a4-c77a-4d29-8f46-62c8768410a9"], +Cell[48268, 1076, 205460, 3729, 70, "Output",ExpressionUUID->"510f66bf-c840-4cca-9610-4e82d0caf1ea"] +}, Open ]], +Cell[CellGroupData[{ +Cell[253765, 4810, 154, 3, 54, "Subsection",ExpressionUUID->"3bb0d721-e299-4b18-9417-d1e1c05fee25"], +Cell[CellGroupData[{ +Cell[253944, 4817, 1309, 33, 74, "Input",ExpressionUUID->"cdb434ce-1eaf-4f2d-9564-f363019aec44"], +Cell[255256, 4852, 440, 9, 70, "Output",ExpressionUUID->"4cbb7fcc-6ed0-4e1f-a107-5747a85138fd"], +Cell[255699, 4863, 362, 7, 70, "Output",ExpressionUUID->"bdb74f0b-38e6-48a9-a128-d4079e0e37c7"] +}, Open ]], +Cell[CellGroupData[{ +Cell[256098, 4875, 1310, 33, 74, "Input",ExpressionUUID->"0db7e576-b902-4e92-a166-46319a6b0730"], +Cell[257411, 4910, 404, 8, 70, "Output",ExpressionUUID->"01ed7ea6-9cc9-4e3c-9f1a-9ba969cab6f0"], +Cell[257818, 4920, 302, 5, 70, "Output",ExpressionUUID->"d1e745fa-0f7e-4f9f-9d03-acdc1d995f2e"] +}, Open ]], +Cell[CellGroupData[{ +Cell[258157, 4930, 1307, 33, 74, "Input",ExpressionUUID->"e3745875-1382-48d6-9233-a584c3ea6f23"], +Cell[259467, 4965, 429, 9, 70, "Output",ExpressionUUID->"80a3d0b4-2b7d-4627-b5dd-530ed134c20d"], +Cell[259899, 4976, 328, 6, 70, "Output",ExpressionUUID->"ee1db387-7c60-4812-9467-46fca487a44a"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[41337, 897, 209, 4, 72, "Title",ExpressionUUID->"65349f7e-5bc6-4eab-a848-be2c224ab83e"], -Cell[CellGroupData[{ -Cell[41571, 905, 165, 3, 67, "Section",ExpressionUUID->"16a381ea-1b1c-49bc-af20-8f5dd32b688e"], -Cell[41739, 910, 2036, 57, 110, "Input",ExpressionUUID->"895ab98c-f42b-4d20-8b55-5797a7b91a74", +Cell[260288, 4989, 164, 3, 53, "Section",ExpressionUUID->"1bb1c8f3-2f05-4c2c-a98d-e9900e55f10d"], +Cell[260455, 4994, 1126, 18, 46, "Input",ExpressionUUID->"47879dfc-be1b-4442-bf7f-fea843b3bc36", InitializationCell->True], Cell[CellGroupData[{ -Cell[43800, 971, 4341, 101, 388, "Input",ExpressionUUID->"c0d253a4-c77a-4d29-8f46-62c8768410a9"], -Cell[48144, 1074, 205460, 3729, 70, "Output",ExpressionUUID->"510f66bf-c840-4cca-9610-4e82d0caf1ea"] +Cell[261606, 5016, 9921, 223, 656, "Input",ExpressionUUID->"0301a4a9-0ec5-48f0-81af-84298eeb57bd"], +Cell[271530, 5241, 249319, 4702, 70, "Output",ExpressionUUID->"2ff9c4d5-a66b-42d8-a84a-33334e7391e6"] }, Open ]], Cell[CellGroupData[{ -Cell[253641, 4808, 154, 3, 54, "Subsection",ExpressionUUID->"3bb0d721-e299-4b18-9417-d1e1c05fee25"], -Cell[CellGroupData[{ -Cell[253820, 4815, 1309, 33, 74, "Input",ExpressionUUID->"cdb434ce-1eaf-4f2d-9564-f363019aec44"], -Cell[255132, 4850, 440, 9, 70, "Output",ExpressionUUID->"4cbb7fcc-6ed0-4e1f-a107-5747a85138fd"], -Cell[255575, 4861, 362, 7, 70, "Output",ExpressionUUID->"bdb74f0b-38e6-48a9-a128-d4079e0e37c7"] -}, Open ]], -Cell[CellGroupData[{ -Cell[255974, 4873, 1310, 33, 74, "Input",ExpressionUUID->"0db7e576-b902-4e92-a166-46319a6b0730"], -Cell[257287, 4908, 404, 8, 70, "Output",ExpressionUUID->"01ed7ea6-9cc9-4e3c-9f1a-9ba969cab6f0"], -Cell[257694, 4918, 302, 5, 70, "Output",ExpressionUUID->"d1e745fa-0f7e-4f9f-9d03-acdc1d995f2e"] -}, Open ]], -Cell[CellGroupData[{ -Cell[258033, 4928, 1307, 33, 74, "Input",ExpressionUUID->"e3745875-1382-48d6-9233-a584c3ea6f23"], -Cell[259343, 4963, 429, 9, 70, "Output",ExpressionUUID->"80a3d0b4-2b7d-4627-b5dd-530ed134c20d"], -Cell[259775, 4974, 328, 6, 70, "Output",ExpressionUUID->"ee1db387-7c60-4812-9467-46fca487a44a"] -}, Open ]] -}, Open ]] -}, Closed]], -Cell[CellGroupData[{ -Cell[260164, 4987, 164, 3, 53, "Section",ExpressionUUID->"1bb1c8f3-2f05-4c2c-a98d-e9900e55f10d"], -Cell[260331, 4992, 1126, 18, 46, "Input",ExpressionUUID->"47879dfc-be1b-4442-bf7f-fea843b3bc36", - InitializationCell->True], -Cell[CellGroupData[{ -Cell[261482, 5014, 9921, 223, 656, "Input",ExpressionUUID->"0301a4a9-0ec5-48f0-81af-84298eeb57bd"], -Cell[271406, 5239, 249319, 4702, 70, "Output",ExpressionUUID->"2ff9c4d5-a66b-42d8-a84a-33334e7391e6"] -}, Open ]], -Cell[CellGroupData[{ -Cell[520762, 9946, 12637, 278, 837, "Input",ExpressionUUID->"439c8295-37a2-4878-a608-20d4677ac433"], -Cell[533402, 10226, 2483, 36, 70, "Output",ExpressionUUID->"c97e28f6-5125-4e8c-887b-96a35b05b66d"], -Cell[535888, 10264, 2484, 36, 70, "Output",ExpressionUUID->"bb8c5f17-1d05-4ea7-8b01-52e159fca3d8"], -Cell[538375, 10302, 273923, 4995, 70, "Output",ExpressionUUID->"a4dc9595-448e-43d9-9fcf-83a396839cfc"] +Cell[520886, 9948, 12637, 278, 837, "Input",ExpressionUUID->"439c8295-37a2-4878-a608-20d4677ac433"], +Cell[533526, 10228, 2483, 36, 70, "Output",ExpressionUUID->"c97e28f6-5125-4e8c-887b-96a35b05b66d"], +Cell[536012, 10266, 2484, 36, 70, "Output",ExpressionUUID->"bb8c5f17-1d05-4ea7-8b01-52e159fca3d8"], +Cell[538499, 10304, 273923, 4995, 70, "Output",ExpressionUUID->"a4dc9595-448e-43d9-9fcf-83a396839cfc"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[812359, 15304, 150, 3, 72, "Title",ExpressionUUID->"c8ea3a71-bf82-42b1-8ca9-bd2f3ea9c623"], +Cell[812483, 15306, 150, 3, 72, "Title",ExpressionUUID->"c8ea3a71-bf82-42b1-8ca9-bd2f3ea9c623"], Cell[CellGroupData[{ -Cell[812534, 15311, 222, 4, 67, "Section",ExpressionUUID->"62a77cab-6c94-401a-9e10-d47644b41858"], -Cell[812759, 15317, 1570, 42, 73, "Input",ExpressionUUID->"9bfe3627-60ee-4f44-9f46-39a59dd52517"], +Cell[812658, 15313, 222, 4, 67, "Section",ExpressionUUID->"62a77cab-6c94-401a-9e10-d47644b41858"], +Cell[812883, 15319, 1570, 42, 73, "Input",ExpressionUUID->"9bfe3627-60ee-4f44-9f46-39a59dd52517"], Cell[CellGroupData[{ -Cell[814354, 15363, 1607, 41, 74, "Input",ExpressionUUID->"9efe980a-6736-4881-8224-16f44f64c4b6"], -Cell[815964, 15406, 748, 14, 70, "Output",ExpressionUUID->"eb35132b-23f4-4be4-94f9-13eac4dbdf00"], -Cell[816715, 15422, 655, 12, 70, "Output",ExpressionUUID->"6a168b3c-b3a6-4a4f-be79-b2a86d0daf11"] +Cell[814478, 15365, 1607, 41, 74, "Input",ExpressionUUID->"9efe980a-6736-4881-8224-16f44f64c4b6"], +Cell[816088, 15408, 748, 14, 70, "Output",ExpressionUUID->"eb35132b-23f4-4be4-94f9-13eac4dbdf00"], +Cell[816839, 15424, 655, 12, 70, "Output",ExpressionUUID->"6a168b3c-b3a6-4a4f-be79-b2a86d0daf11"] }, Open ]], Cell[CellGroupData[{ -Cell[817407, 15439, 1460, 39, 74, "Input",ExpressionUUID->"10532231-5f0d-4960-867c-7c1eef3b1de6"], -Cell[818870, 15480, 674, 13, 70, "Output",ExpressionUUID->"f1a3d788-5df2-4c47-8cb9-f5156d601952"], -Cell[819547, 15495, 567, 10, 70, "Output",ExpressionUUID->"844efd7c-257b-4606-8aed-4e2b4a13677f"] +Cell[817531, 15441, 1460, 39, 74, "Input",ExpressionUUID->"10532231-5f0d-4960-867c-7c1eef3b1de6"], +Cell[818994, 15482, 674, 13, 70, "Output",ExpressionUUID->"f1a3d788-5df2-4c47-8cb9-f5156d601952"], +Cell[819671, 15497, 567, 10, 70, "Output",ExpressionUUID->"844efd7c-257b-4606-8aed-4e2b4a13677f"] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[820163, 15511, 164, 3, 53, "Section",ExpressionUUID->"1be7f2a1-b197-4382-80c3-24907618c8c4"], -Cell[820330, 15516, 1005, 17, 30, "Input",ExpressionUUID->"ac919899-e429-4fad-8190-0d9af4777610"], +Cell[820287, 15513, 164, 3, 53, "Section",ExpressionUUID->"1be7f2a1-b197-4382-80c3-24907618c8c4"], +Cell[820454, 15518, 1005, 17, 30, "Input",ExpressionUUID->"ac919899-e429-4fad-8190-0d9af4777610"], Cell[CellGroupData[{ -Cell[821360, 15537, 13040, 296, 795, "Input",ExpressionUUID->"47699148-65a1-4802-bd3d-b0180405238a"], -Cell[834403, 15835, 2709, 40, 34, "Output",ExpressionUUID->"a33f2e27-437a-490f-b83a-32299cbc3b85"], -Cell[837115, 15877, 2709, 40, 34, "Output",ExpressionUUID->"201cb4a3-ef10-49d6-9cff-11d535969c43"], -Cell[839827, 15919, 251187, 4614, 598, "Output",ExpressionUUID->"1b745d73-ae92-46ba-8ca6-a5f8a999a79d"] +Cell[821484, 15539, 13040, 296, 795, "Input",ExpressionUUID->"47699148-65a1-4802-bd3d-b0180405238a"], +Cell[834527, 15837, 2709, 40, 34, "Output",ExpressionUUID->"a33f2e27-437a-490f-b83a-32299cbc3b85"], +Cell[837239, 15879, 2709, 40, 34, "Output",ExpressionUUID->"201cb4a3-ef10-49d6-9cff-11d535969c43"], +Cell[839951, 15921, 251187, 4614, 598, "Output",ExpressionUUID->"1b745d73-ae92-46ba-8ca6-a5f8a999a79d"] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[1091063, 20539, 165, 3, 53, "Section",ExpressionUUID->"c53c0e7c-8d76-4b78-ab46-cee8483f7a76"], -Cell[1091231, 20544, 1850, 55, 110, "Input",ExpressionUUID->"45aa8230-f7ee-467a-96ce-1c41bb98be6e", +Cell[1091187, 20541, 165, 3, 53, "Section",ExpressionUUID->"c53c0e7c-8d76-4b78-ab46-cee8483f7a76"], +Cell[1091355, 20546, 1850, 55, 110, "Input",ExpressionUUID->"45aa8230-f7ee-467a-96ce-1c41bb98be6e", InitializationCell->True], Cell[CellGroupData[{ -Cell[1093106, 20603, 4245, 99, 388, "Input",ExpressionUUID->"f571b6dd-0c6d-402e-90da-48632fe03369"], -Cell[1097354, 20704, 182273, 3346, 70, "Output",ExpressionUUID->"7c469188-afd9-4946-8e56-7223a57dad25"] +Cell[1093230, 20605, 4245, 99, 388, "Input",ExpressionUUID->"f571b6dd-0c6d-402e-90da-48632fe03369"], +Cell[1097478, 20706, 182273, 3346, 70, "Output",ExpressionUUID->"7c469188-afd9-4946-8e56-7223a57dad25"] }, Open ]], Cell[CellGroupData[{ -Cell[1279664, 24055, 154, 3, 54, "Subsection",ExpressionUUID->"6ed9e07a-b697-4c5b-9c64-02e7d7193dd9"], +Cell[1279788, 24057, 154, 3, 54, "Subsection",ExpressionUUID->"6ed9e07a-b697-4c5b-9c64-02e7d7193dd9"], Cell[CellGroupData[{ -Cell[1279843, 24062, 1328, 34, 74, "Input",ExpressionUUID->"faeee6a1-27da-4747-bba6-385c63127336"], -Cell[1281174, 24098, 591, 12, 70, "Output",ExpressionUUID->"fe0bdcf0-b0f2-40d6-af71-7a5eeb8cddbc"], -Cell[1281768, 24112, 510, 10, 70, "Output",ExpressionUUID->"c924dca5-0c44-4cf4-9e56-e49e2b0f3c8e"] +Cell[1279967, 24064, 1328, 34, 74, "Input",ExpressionUUID->"faeee6a1-27da-4747-bba6-385c63127336"], +Cell[1281298, 24100, 591, 12, 70, "Output",ExpressionUUID->"fe0bdcf0-b0f2-40d6-af71-7a5eeb8cddbc"], +Cell[1281892, 24114, 510, 10, 70, "Output",ExpressionUUID->"c924dca5-0c44-4cf4-9e56-e49e2b0f3c8e"] }, Open ]], Cell[CellGroupData[{ -Cell[1282315, 24127, 1305, 34, 74, "Input",ExpressionUUID->"a1e6c246-a9cb-4349-925b-42f5dafd15c2"], -Cell[1283623, 24163, 530, 11, 70, "Output",ExpressionUUID->"38eb5c9a-71e5-419f-9d61-83833778bbff"], -Cell[1284156, 24176, 428, 8, 70, "Output",ExpressionUUID->"09a91625-a08a-42c9-84a3-2b8b2af641c4"] +Cell[1282439, 24129, 1305, 34, 74, "Input",ExpressionUUID->"a1e6c246-a9cb-4349-925b-42f5dafd15c2"], +Cell[1283747, 24165, 530, 11, 70, "Output",ExpressionUUID->"38eb5c9a-71e5-419f-9d61-83833778bbff"], +Cell[1284280, 24178, 428, 8, 70, "Output",ExpressionUUID->"09a91625-a08a-42c9-84a3-2b8b2af641c4"] }, Open ]], Cell[CellGroupData[{ -Cell[1284621, 24189, 1302, 34, 74, "Input",ExpressionUUID->"3ea592cd-abcc-42c2-a4cd-02387a54ba6b"], -Cell[1285926, 24225, 575, 12, 70, "Output",ExpressionUUID->"789cdfb3-a7c6-4ba1-86f2-e673b64454e1"], -Cell[1286504, 24239, 473, 9, 70, "Output",ExpressionUUID->"36028a38-94f2-46ba-b553-8b9d3d86381c"] +Cell[1284745, 24191, 1302, 34, 74, "Input",ExpressionUUID->"3ea592cd-abcc-42c2-a4cd-02387a54ba6b"], +Cell[1286050, 24227, 575, 12, 70, "Output",ExpressionUUID->"789cdfb3-a7c6-4ba1-86f2-e673b64454e1"], +Cell[1286628, 24241, 473, 9, 70, "Output",ExpressionUUID->"36028a38-94f2-46ba-b553-8b9d3d86381c"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[1287038, 24255, 164, 3, 53, "Section",ExpressionUUID->"285c7b18-4488-4051-b69c-1c735933f199"], -Cell[1287205, 24260, 1024, 16, 46, "Input",ExpressionUUID->"7605ec57-f8cd-417c-962d-bb28c4fc08fe", +Cell[1287162, 24257, 164, 3, 53, "Section",ExpressionUUID->"285c7b18-4488-4051-b69c-1c735933f199"], +Cell[1287329, 24262, 1024, 16, 46, "Input",ExpressionUUID->"7605ec57-f8cd-417c-962d-bb28c4fc08fe", InitializationCell->True], Cell[CellGroupData[{ -Cell[1288254, 24280, 9715, 223, 656, "Input",ExpressionUUID->"6037f872-c988-458c-aee1-b63f5d1c05be"], -Cell[1297972, 24505, 249530, 4706, 584, "Output",ExpressionUUID->"0dd6a306-dfe0-45b5-9622-664934483ed8"] +Cell[1288378, 24282, 9715, 223, 656, "Input",ExpressionUUID->"6037f872-c988-458c-aee1-b63f5d1c05be"], +Cell[1298096, 24507, 249530, 4706, 584, "Output",ExpressionUUID->"0dd6a306-dfe0-45b5-9622-664934483ed8"] }, Open ]], Cell[CellGroupData[{ -Cell[1547539, 29216, 12509, 279, 791, "Input",ExpressionUUID->"27832f96-4a3c-4379-8d7f-23d423f8dc3f"], -Cell[1560051, 29497, 2557, 38, 34, "Output",ExpressionUUID->"e8b84de9-924f-4dff-ab59-2068a967a45c"], -Cell[1562611, 29537, 2556, 38, 34, "Output",ExpressionUUID->"2eeba9a3-04c4-428c-a18d-dbb43db684c0"], -Cell[1565170, 29577, 259728, 4697, 609, "Output",ExpressionUUID->"3ea7570d-27e9-44fe-a3b4-1c25d748a65a"] +Cell[1547663, 29218, 12509, 279, 791, "Input",ExpressionUUID->"27832f96-4a3c-4379-8d7f-23d423f8dc3f"], +Cell[1560175, 29499, 2557, 38, 34, "Output",ExpressionUUID->"e8b84de9-924f-4dff-ab59-2068a967a45c"], +Cell[1562735, 29539, 2556, 38, 34, "Output",ExpressionUUID->"2eeba9a3-04c4-428c-a18d-dbb43db684c0"], +Cell[1565294, 29579, 259728, 4697, 609, "Output",ExpressionUUID->"3ea7570d-27e9-44fe-a3b4-1c25d748a65a"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[1824959, 34281, 156, 3, 72, "Title",ExpressionUUID->"0860c22a-77ea-459e-9e4f-ab8d06aad316"], +Cell[1825083, 34283, 156, 3, 72, "Title",ExpressionUUID->"0860c22a-77ea-459e-9e4f-ab8d06aad316"], Cell[CellGroupData[{ -Cell[1825140, 34288, 165, 3, 67, "Section",ExpressionUUID->"86c38d97-2176-4491-bd1b-14fcbf3c9de6"], -Cell[1825308, 34293, 1961, 56, 110, "Input",ExpressionUUID->"0f6df49c-36bc-4f29-a06b-1e01f88c8af7", +Cell[1825264, 34290, 165, 3, 67, "Section",ExpressionUUID->"86c38d97-2176-4491-bd1b-14fcbf3c9de6"], +Cell[1825432, 34295, 1961, 56, 110, "Input",ExpressionUUID->"0f6df49c-36bc-4f29-a06b-1e01f88c8af7", InitializationCell->True], Cell[CellGroupData[{ -Cell[1827294, 34353, 4311, 101, 388, "Input",ExpressionUUID->"e0a2c425-59de-45cd-a91c-54bed5e8d0d7"], -Cell[1831608, 34456, 191526, 3489, 70, "Output",ExpressionUUID->"209c9077-47b9-4b95-8f26-4475fab94d92"] +Cell[1827418, 34355, 4311, 101, 388, "Input",ExpressionUUID->"e0a2c425-59de-45cd-a91c-54bed5e8d0d7"], +Cell[1831732, 34458, 191526, 3489, 70, "Output",ExpressionUUID->"209c9077-47b9-4b95-8f26-4475fab94d92"] }, Open ]], Cell[CellGroupData[{ -Cell[2023171, 37950, 154, 3, 54, "Subsection",ExpressionUUID->"09abf152-a5b7-441a-b5b5-f9ac1c555a3e"], +Cell[2023295, 37952, 154, 3, 54, "Subsection",ExpressionUUID->"09abf152-a5b7-441a-b5b5-f9ac1c555a3e"], Cell[CellGroupData[{ -Cell[2023350, 37957, 1358, 35, 74, "Input",ExpressionUUID->"fc3b72f7-0f23-4ab8-b2f7-31cf8d6afb6a"], -Cell[2024711, 37994, 568, 12, 70, "Output",ExpressionUUID->"4e7216cb-65f3-4af2-b21a-4324a2ff0a56"], -Cell[2025282, 38008, 489, 10, 70, "Output",ExpressionUUID->"8c97cead-53e6-4b62-9b4e-38c5a82990ac"] +Cell[2023474, 37959, 1358, 35, 74, "Input",ExpressionUUID->"fc3b72f7-0f23-4ab8-b2f7-31cf8d6afb6a"], +Cell[2024835, 37996, 568, 12, 70, "Output",ExpressionUUID->"4e7216cb-65f3-4af2-b21a-4324a2ff0a56"], +Cell[2025406, 38010, 489, 10, 70, "Output",ExpressionUUID->"8c97cead-53e6-4b62-9b4e-38c5a82990ac"] }, Open ]], Cell[CellGroupData[{ -Cell[2025808, 38023, 1331, 34, 74, "Input",ExpressionUUID->"7a91f090-8b86-423b-a3b3-e111116f8a39"], -Cell[2027142, 38059, 504, 11, 70, "Output",ExpressionUUID->"47abb38a-bd9f-4d46-9faf-d7091519d270"], -Cell[2027649, 38072, 406, 8, 70, "Output",ExpressionUUID->"d25018f6-af24-43e8-9032-42cd5c459103"] +Cell[2025932, 38025, 1331, 34, 74, "Input",ExpressionUUID->"7a91f090-8b86-423b-a3b3-e111116f8a39"], +Cell[2027266, 38061, 504, 11, 70, "Output",ExpressionUUID->"47abb38a-bd9f-4d46-9faf-d7091519d270"], +Cell[2027773, 38074, 406, 8, 70, "Output",ExpressionUUID->"d25018f6-af24-43e8-9032-42cd5c459103"] }, Open ]], Cell[CellGroupData[{ -Cell[2028092, 38085, 1328, 34, 74, "Input",ExpressionUUID->"42c1fc2d-3b30-4c28-8611-511d1f3a6e37"], -Cell[2029423, 38121, 546, 11, 70, "Output",ExpressionUUID->"2d60e8a0-67c6-41af-9e5d-20361a449f4f"], -Cell[2029972, 38134, 445, 8, 70, "Output",ExpressionUUID->"a4cf1711-a400-4bbd-a735-5f2b6f98145d"] +Cell[2028216, 38087, 1328, 34, 74, "Input",ExpressionUUID->"42c1fc2d-3b30-4c28-8611-511d1f3a6e37"], +Cell[2029547, 38123, 546, 11, 70, "Output",ExpressionUUID->"2d60e8a0-67c6-41af-9e5d-20361a449f4f"], +Cell[2030096, 38136, 445, 8, 70, "Output",ExpressionUUID->"a4cf1711-a400-4bbd-a735-5f2b6f98145d"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[2030478, 38149, 164, 3, 53, "Section",ExpressionUUID->"e555d041-c954-4d42-975d-189c29eecbf7"], -Cell[2030645, 38154, 1067, 17, 46, "Input",ExpressionUUID->"9a448cf2-47f9-4448-8096-1d364d1591f5", +Cell[2030602, 38151, 164, 3, 53, "Section",ExpressionUUID->"e555d041-c954-4d42-975d-189c29eecbf7"], +Cell[2030769, 38156, 1067, 17, 46, "Input",ExpressionUUID->"9a448cf2-47f9-4448-8096-1d364d1591f5", InitializationCell->True], Cell[CellGroupData[{ -Cell[2031737, 38175, 9874, 224, 656, "Input",ExpressionUUID->"4e215743-6c82-49dc-a022-65fc6284dc48"], -Cell[2041614, 38401, 249516, 4706, 70, "Output",ExpressionUUID->"1b1af625-ad91-49b6-be17-76bf07bd5fff"] +Cell[2031861, 38177, 9874, 224, 656, "Input",ExpressionUUID->"4e215743-6c82-49dc-a022-65fc6284dc48"], +Cell[2041738, 38403, 249516, 4706, 70, "Output",ExpressionUUID->"1b1af625-ad91-49b6-be17-76bf07bd5fff"] }, Open ]], Cell[CellGroupData[{ -Cell[2291167, 43112, 12495, 278, 791, "Input",ExpressionUUID->"ce3abb20-6d2a-4a6d-b26a-69b8dc968e04"], -Cell[2303665, 43392, 2459, 37, 70, "Output",ExpressionUUID->"203d30e0-425e-4c80-a55e-53dd824a1c53"], -Cell[2306127, 43431, 2461, 37, 70, "Output",ExpressionUUID->"04595bb5-a3c0-49ea-b431-52f575ab574e"], -Cell[2308591, 43470, 259488, 4756, 70, "Output",ExpressionUUID->"592dc005-d67c-4ced-9917-ce4f942e7ffc"] +Cell[2291291, 43114, 12495, 278, 791, "Input",ExpressionUUID->"ce3abb20-6d2a-4a6d-b26a-69b8dc968e04"], +Cell[2303789, 43394, 2459, 37, 70, "Output",ExpressionUUID->"203d30e0-425e-4c80-a55e-53dd824a1c53"], +Cell[2306251, 43433, 2461, 37, 70, "Output",ExpressionUUID->"04595bb5-a3c0-49ea-b431-52f575ab574e"], +Cell[2308715, 43472, 259488, 4756, 70, "Output",ExpressionUUID->"592dc005-d67c-4ced-9917-ce4f942e7ffc"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[2568140, 48233, 150, 3, 72, "Title",ExpressionUUID->"d9294d8a-4355-4e8d-bbd5-410646cba2c4"], +Cell[2568264, 48235, 150, 3, 72, "Title",ExpressionUUID->"d9294d8a-4355-4e8d-bbd5-410646cba2c4"], Cell[CellGroupData[{ -Cell[2568315, 48240, 165, 3, 67, "Section",ExpressionUUID->"ba4a26a0-d628-45e2-bb2e-6d6478a5b973"], -Cell[2568483, 48245, 2050, 57, 110, "Input",ExpressionUUID->"f11bb471-abb4-4b35-b78e-924d82295d82", +Cell[2568439, 48242, 165, 3, 67, "Section",ExpressionUUID->"ba4a26a0-d628-45e2-bb2e-6d6478a5b973"], +Cell[2568607, 48247, 2050, 57, 110, "Input",ExpressionUUID->"f11bb471-abb4-4b35-b78e-924d82295d82", InitializationCell->True], Cell[CellGroupData[{ -Cell[2570558, 48306, 4348, 101, 388, "Input",ExpressionUUID->"94359c49-c493-4513-89e0-5d3df8be5780"], -Cell[2574909, 48409, 185383, 3400, 70, "Output",ExpressionUUID->"75623405-5089-4991-9de3-62eb08924b83"] +Cell[2570682, 48308, 4348, 101, 388, "Input",ExpressionUUID->"94359c49-c493-4513-89e0-5d3df8be5780"], +Cell[2575033, 48411, 185383, 3400, 70, "Output",ExpressionUUID->"75623405-5089-4991-9de3-62eb08924b83"] }, Open ]], Cell[CellGroupData[{ -Cell[2760329, 51814, 154, 3, 54, "Subsection",ExpressionUUID->"e9c42ce3-0b52-4370-bf57-f8c7c204b085"], +Cell[2760453, 51816, 154, 3, 54, "Subsection",ExpressionUUID->"e9c42ce3-0b52-4370-bf57-f8c7c204b085"], Cell[CellGroupData[{ -Cell[2760508, 51821, 1378, 35, 74, "Input",ExpressionUUID->"68b92834-2cb8-4602-8e77-8c84f6a33562"], -Cell[2761889, 51858, 569, 12, 70, "Output",ExpressionUUID->"d1efad77-9e6c-4bc2-9835-b91f1eab355f"], -Cell[2762461, 51872, 487, 10, 70, "Output",ExpressionUUID->"9b1b3a31-b1c3-4556-8f8b-5850064053ed"] +Cell[2760632, 51823, 1378, 35, 74, "Input",ExpressionUUID->"68b92834-2cb8-4602-8e77-8c84f6a33562"], +Cell[2762013, 51860, 569, 12, 70, "Output",ExpressionUUID->"d1efad77-9e6c-4bc2-9835-b91f1eab355f"], +Cell[2762585, 51874, 487, 10, 70, "Output",ExpressionUUID->"9b1b3a31-b1c3-4556-8f8b-5850064053ed"] }, Open ]], Cell[CellGroupData[{ -Cell[2762985, 51887, 1355, 35, 74, "Input",ExpressionUUID->"4ead6903-964a-4732-82a1-349ed005a7a0"], -Cell[2764343, 51924, 505, 11, 70, "Output",ExpressionUUID->"fc1801ea-98fe-4540-9f99-73c03af65eb5"], -Cell[2764851, 51937, 405, 8, 70, "Output",ExpressionUUID->"51c286b2-b6a3-411e-ad5e-a1f42a5737c7"] +Cell[2763109, 51889, 1355, 35, 74, "Input",ExpressionUUID->"4ead6903-964a-4732-82a1-349ed005a7a0"], +Cell[2764467, 51926, 505, 11, 70, "Output",ExpressionUUID->"fc1801ea-98fe-4540-9f99-73c03af65eb5"], +Cell[2764975, 51939, 405, 8, 70, "Output",ExpressionUUID->"51c286b2-b6a3-411e-ad5e-a1f42a5737c7"] }, Open ]], Cell[CellGroupData[{ -Cell[2765293, 51950, 1402, 35, 74, "Input",ExpressionUUID->"b7abe509-152d-4b0a-acfa-9f50e03d419a"], -Cell[2766698, 51987, 546, 11, 70, "Output",ExpressionUUID->"e8c2fcba-77b1-42f8-8d3a-f485c2d46c23"], -Cell[2767247, 52000, 441, 8, 70, "Output",ExpressionUUID->"1f448d2d-b416-4b84-9bd7-9fbc685e7e02"] +Cell[2765417, 51952, 1402, 35, 74, "Input",ExpressionUUID->"b7abe509-152d-4b0a-acfa-9f50e03d419a"], +Cell[2766822, 51989, 546, 11, 70, "Output",ExpressionUUID->"e8c2fcba-77b1-42f8-8d3a-f485c2d46c23"], +Cell[2767371, 52002, 441, 8, 70, "Output",ExpressionUUID->"1f448d2d-b416-4b84-9bd7-9fbc685e7e02"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[2767749, 52015, 164, 3, 53, "Section",ExpressionUUID->"0ce9737a-03fc-4a26-a86f-c789f03e34bc"], -Cell[2767916, 52020, 1061, 17, 46, "Input",ExpressionUUID->"61c14f06-e92a-4f7b-b21e-6037fddcb2e2", +Cell[2767873, 52017, 164, 3, 53, "Section",ExpressionUUID->"0ce9737a-03fc-4a26-a86f-c789f03e34bc"], +Cell[2768040, 52022, 1061, 17, 46, "Input",ExpressionUUID->"61c14f06-e92a-4f7b-b21e-6037fddcb2e2", InitializationCell->True], Cell[CellGroupData[{ -Cell[2769002, 52041, 9894, 225, 656, "Input",ExpressionUUID->"0bd3f4bb-5b39-421a-a47e-48d789f6f3a3"], -Cell[2778899, 52268, 249400, 4705, 70, "Output",ExpressionUUID->"8b56aa16-d3b0-467d-b998-c887b09e68c5"] +Cell[2769126, 52043, 9894, 225, 656, "Input",ExpressionUUID->"0bd3f4bb-5b39-421a-a47e-48d789f6f3a3"], +Cell[2779023, 52270, 249400, 4705, 70, "Output",ExpressionUUID->"8b56aa16-d3b0-467d-b998-c887b09e68c5"] }, Open ]], Cell[CellGroupData[{ -Cell[3028336, 56978, 12515, 279, 791, "Input",ExpressionUUID->"a4c1ef2e-51e2-4f43-adf7-a63283710a92"], -Cell[3040854, 57259, 2458, 37, 70, "Output",ExpressionUUID->"4215c323-dde9-45f0-ab5c-a99f950f31b2"], -Cell[3043315, 57298, 2458, 37, 70, "Output",ExpressionUUID->"cbb16a14-672a-4864-b91f-b759bbf04add"], -Cell[3045776, 57337, 253838, 4661, 70, "Output",ExpressionUUID->"72e696b6-954f-4b4d-969e-588577d48fc5"] +Cell[3028460, 56980, 12515, 279, 791, "Input",ExpressionUUID->"a4c1ef2e-51e2-4f43-adf7-a63283710a92"], +Cell[3040978, 57261, 2458, 37, 70, "Output",ExpressionUUID->"4215c323-dde9-45f0-ab5c-a99f950f31b2"], +Cell[3043439, 57300, 2458, 37, 70, "Output",ExpressionUUID->"cbb16a14-672a-4864-b91f-b759bbf04add"], +Cell[3045900, 57339, 253838, 4661, 70, "Output",ExpressionUUID->"72e696b6-954f-4b4d-969e-588577d48fc5"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[3299675, 62005, 154, 3, 72, "Title",ExpressionUUID->"3504afb6-6eb1-48f6-9495-ed3dc6c532d7"], +Cell[3299799, 62007, 154, 3, 72, "Title",ExpressionUUID->"3504afb6-6eb1-48f6-9495-ed3dc6c532d7"], Cell[CellGroupData[{ -Cell[3299854, 62012, 165, 3, 67, "Section",ExpressionUUID->"a5f2404f-9967-45e0-8a61-25658fb37a23"], -Cell[3300022, 62017, 2108, 58, 110, "Input",ExpressionUUID->"fec12b1f-939b-432a-89a4-71b4992d614a", +Cell[3299978, 62014, 165, 3, 67, "Section",ExpressionUUID->"a5f2404f-9967-45e0-8a61-25658fb37a23"], +Cell[3300146, 62019, 2108, 58, 110, "Input",ExpressionUUID->"fec12b1f-939b-432a-89a4-71b4992d614a", InitializationCell->True], Cell[CellGroupData[{ -Cell[3302155, 62079, 4407, 102, 388, "Input",ExpressionUUID->"d902b043-87cb-4f89-be8e-92455177b217"], -Cell[3306565, 62183, 191068, 3486, 70, "Output",ExpressionUUID->"a76fef51-0e65-4d7a-a848-ffec48be13f4"] +Cell[3302279, 62081, 4407, 102, 388, "Input",ExpressionUUID->"d902b043-87cb-4f89-be8e-92455177b217"], +Cell[3306689, 62185, 191068, 3486, 70, "Output",ExpressionUUID->"a76fef51-0e65-4d7a-a848-ffec48be13f4"] }, Open ]], Cell[CellGroupData[{ -Cell[3497670, 65674, 154, 3, 54, "Subsection",ExpressionUUID->"c46e08d4-b6ba-46f0-9c89-b288880426ce"], +Cell[3497794, 65676, 154, 3, 54, "Subsection",ExpressionUUID->"c46e08d4-b6ba-46f0-9c89-b288880426ce"], Cell[CellGroupData[{ -Cell[3497849, 65681, 1402, 35, 74, "Input",ExpressionUUID->"11d7747b-9e15-426e-81f8-ba79899ac511"], -Cell[3499254, 65718, 618, 13, 70, "Output",ExpressionUUID->"6501f92a-4687-4245-af92-1133a9994560"], -Cell[3499875, 65733, 540, 11, 70, "Output",ExpressionUUID->"178a87c2-6543-479f-b26c-b2da1b8fd242"] +Cell[3497973, 65683, 1402, 35, 74, "Input",ExpressionUUID->"11d7747b-9e15-426e-81f8-ba79899ac511"], +Cell[3499378, 65720, 618, 13, 70, "Output",ExpressionUUID->"6501f92a-4687-4245-af92-1133a9994560"], +Cell[3499999, 65735, 540, 11, 70, "Output",ExpressionUUID->"178a87c2-6543-479f-b26c-b2da1b8fd242"] }, Open ]], Cell[CellGroupData[{ -Cell[3500452, 65749, 1381, 35, 74, "Input",ExpressionUUID->"626d5c14-7754-47d2-bc07-efbaf7f4fd74"], -Cell[3501836, 65786, 547, 11, 70, "Output",ExpressionUUID->"709a2b53-d71e-44aa-9e1d-bab787ed1c40"], -Cell[3502386, 65799, 448, 8, 70, "Output",ExpressionUUID->"8b8c34c0-8f52-4fd8-93a2-ab21f6f4033b"] +Cell[3500576, 65751, 1381, 35, 74, "Input",ExpressionUUID->"626d5c14-7754-47d2-bc07-efbaf7f4fd74"], +Cell[3501960, 65788, 547, 11, 70, "Output",ExpressionUUID->"709a2b53-d71e-44aa-9e1d-bab787ed1c40"], +Cell[3502510, 65801, 448, 8, 70, "Output",ExpressionUUID->"8b8c34c0-8f52-4fd8-93a2-ab21f6f4033b"] }, Open ]], Cell[CellGroupData[{ -Cell[3502871, 65812, 1432, 36, 74, "Input",ExpressionUUID->"7b995c40-5cad-4bf5-9772-3e40edc3fe66"], -Cell[3504306, 65850, 596, 12, 70, "Output",ExpressionUUID->"d5317e13-3324-43fc-a358-7c56499ad6cd"], -Cell[3504905, 65864, 492, 9, 70, "Output",ExpressionUUID->"c05af9ea-9f68-4082-9cd1-33a26ffc09f7"] +Cell[3502995, 65814, 1432, 36, 74, "Input",ExpressionUUID->"7b995c40-5cad-4bf5-9772-3e40edc3fe66"], +Cell[3504430, 65852, 596, 12, 70, "Output",ExpressionUUID->"d5317e13-3324-43fc-a358-7c56499ad6cd"], +Cell[3505029, 65866, 492, 9, 70, "Output",ExpressionUUID->"c05af9ea-9f68-4082-9cd1-33a26ffc09f7"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[3505458, 65880, 164, 3, 53, "Section",ExpressionUUID->"a49527a9-f9ad-46c4-84b7-e9dc0ea5c2fb"], -Cell[3505625, 65885, 1162, 18, 46, "Input",ExpressionUUID->"836ca7a8-ee93-48d3-b3aa-7908848e38a0", +Cell[3505582, 65882, 164, 3, 53, "Section",ExpressionUUID->"a49527a9-f9ad-46c4-84b7-e9dc0ea5c2fb"], +Cell[3505749, 65887, 1162, 18, 46, "Input",ExpressionUUID->"836ca7a8-ee93-48d3-b3aa-7908848e38a0", InitializationCell->True], Cell[CellGroupData[{ -Cell[3506812, 65907, 9875, 224, 656, "Input",ExpressionUUID->"c7c2c020-f87b-4c32-852b-8020e1f92447"], -Cell[3516690, 66133, 248859, 4693, 70, "Output",ExpressionUUID->"a5b43ff8-593d-480c-a457-96201755e289"] +Cell[3506936, 65909, 9875, 224, 656, "Input",ExpressionUUID->"c7c2c020-f87b-4c32-852b-8020e1f92447"], +Cell[3516814, 66135, 248859, 4693, 70, "Output",ExpressionUUID->"a5b43ff8-593d-480c-a457-96201755e289"] }, Open ]], Cell[CellGroupData[{ -Cell[3765586, 70831, 12599, 279, 791, "Input",ExpressionUUID->"73e59dad-dfbd-4c46-b98b-0cc7611b0d04"], -Cell[3778188, 71112, 2532, 38, 70, "Output",ExpressionUUID->"34d0c153-07f4-4543-89bb-6e19da62f3f1"], -Cell[3780723, 71152, 2534, 38, 70, "Output",ExpressionUUID->"aaaa1220-433e-4566-bdac-286fcc5191a0"], -Cell[3783260, 71192, 258772, 4737, 70, "Output",ExpressionUUID->"174c893e-591f-4ffd-aa1d-82e143673656"] +Cell[3765710, 70833, 12599, 279, 791, "Input",ExpressionUUID->"73e59dad-dfbd-4c46-b98b-0cc7611b0d04"], +Cell[3778312, 71114, 2532, 38, 70, "Output",ExpressionUUID->"34d0c153-07f4-4543-89bb-6e19da62f3f1"], +Cell[3780847, 71154, 2534, 38, 70, "Output",ExpressionUUID->"aaaa1220-433e-4566-bdac-286fcc5191a0"], +Cell[3783384, 71194, 258772, 4737, 70, "Output",ExpressionUUID->"174c893e-591f-4ffd-aa1d-82e143673656"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[4042093, 75936, 200, 4, 72, "Title",ExpressionUUID->"0d0d68ed-d033-407d-8b39-64222dce8392"], +Cell[4042217, 75938, 200, 4, 72, "Title",ExpressionUUID->"0d0d68ed-d033-407d-8b39-64222dce8392"], Cell[CellGroupData[{ -Cell[4042318, 75944, 165, 3, 67, "Section",ExpressionUUID->"837a9e8f-f906-41ee-adc6-0d92540acac3"], -Cell[4042486, 75949, 1980, 56, 110, "Input",ExpressionUUID->"00ce6a41-3340-4211-974d-333201273f2b", +Cell[4042442, 75946, 165, 3, 67, "Section",ExpressionUUID->"837a9e8f-f906-41ee-adc6-0d92540acac3"], +Cell[4042610, 75951, 1980, 56, 110, "Input",ExpressionUUID->"00ce6a41-3340-4211-974d-333201273f2b", InitializationCell->True], Cell[CellGroupData[{ -Cell[4044491, 76009, 4036, 94, 367, "Input",ExpressionUUID->"a68a10ee-e1f4-45f6-af20-3013ef2e0e0c"], -Cell[4048530, 76105, 157769, 2923, 70, "Output",ExpressionUUID->"caf9b833-7f4a-44a0-8796-25d9fb42ad3f"] +Cell[4044615, 76011, 4036, 94, 367, "Input",ExpressionUUID->"a68a10ee-e1f4-45f6-af20-3013ef2e0e0c"], +Cell[4048654, 76107, 157769, 2923, 70, "Output",ExpressionUUID->"caf9b833-7f4a-44a0-8796-25d9fb42ad3f"] }, Open ]], Cell[CellGroupData[{ -Cell[4206336, 79033, 154, 3, 54, "Subsection",ExpressionUUID->"ed1ad587-16f2-416d-bd92-ebf8eeda035b"], +Cell[4206460, 79035, 154, 3, 54, "Subsection",ExpressionUUID->"ed1ad587-16f2-416d-bd92-ebf8eeda035b"], Cell[CellGroupData[{ -Cell[4206515, 79040, 1284, 34, 74, "Input",ExpressionUUID->"6d7742c9-df65-4590-b3f1-0fd9e52bb881"], -Cell[4207802, 79076, 542, 12, 70, "Output",ExpressionUUID->"e0103e74-d6a7-4372-aeda-75269708f732"], -Cell[4208347, 79090, 461, 10, 70, "Output",ExpressionUUID->"9b0c491f-dd96-4e6f-931c-8a86749a6799"] +Cell[4206639, 79042, 1284, 34, 74, "Input",ExpressionUUID->"6d7742c9-df65-4590-b3f1-0fd9e52bb881"], +Cell[4207926, 79078, 542, 12, 70, "Output",ExpressionUUID->"e0103e74-d6a7-4372-aeda-75269708f732"], +Cell[4208471, 79092, 461, 10, 70, "Output",ExpressionUUID->"9b0c491f-dd96-4e6f-931c-8a86749a6799"] }, Open ]], Cell[CellGroupData[{ -Cell[4208845, 79105, 1285, 34, 74, "Input",ExpressionUUID->"4c80c160-37f9-438f-9852-a500b1652816"], -Cell[4210133, 79141, 478, 10, 70, "Output",ExpressionUUID->"28ad590f-2115-48a7-8839-de12586b0e2d"], -Cell[4210614, 79153, 378, 7, 70, "Output",ExpressionUUID->"82d67ce2-51b0-4210-a1e3-cd5af28a06d3"] +Cell[4208969, 79107, 1285, 34, 74, "Input",ExpressionUUID->"4c80c160-37f9-438f-9852-a500b1652816"], +Cell[4210257, 79143, 478, 10, 70, "Output",ExpressionUUID->"28ad590f-2115-48a7-8839-de12586b0e2d"], +Cell[4210738, 79155, 378, 7, 70, "Output",ExpressionUUID->"82d67ce2-51b0-4210-a1e3-cd5af28a06d3"] }, Open ]], Cell[CellGroupData[{ -Cell[4211029, 79165, 1282, 34, 74, "Input",ExpressionUUID->"384d7e0c-6f6e-475f-8857-b08cec2b998b"], -Cell[4212314, 79201, 503, 11, 70, "Output",ExpressionUUID->"d39e3aae-78f9-4669-add3-a721aada2dac"], -Cell[4212820, 79214, 402, 8, 70, "Output",ExpressionUUID->"0a7d756d-32d4-4601-afd4-e0ccded8c700"] +Cell[4211153, 79167, 1282, 34, 74, "Input",ExpressionUUID->"384d7e0c-6f6e-475f-8857-b08cec2b998b"], +Cell[4212438, 79203, 503, 11, 70, "Output",ExpressionUUID->"d39e3aae-78f9-4669-add3-a721aada2dac"], +Cell[4212944, 79216, 402, 8, 70, "Output",ExpressionUUID->"0a7d756d-32d4-4601-afd4-e0ccded8c700"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[4213283, 79229, 164, 3, 53, "Section",ExpressionUUID->"5968a8e7-7690-4c56-89df-d2afe069402b"], -Cell[4213450, 79234, 1110, 17, 46, "Input",ExpressionUUID->"5f273034-8ae0-412b-a617-4d3af97c3373", +Cell[4213407, 79231, 164, 3, 53, "Section",ExpressionUUID->"5968a8e7-7690-4c56-89df-d2afe069402b"], +Cell[4213574, 79236, 1110, 17, 46, "Input",ExpressionUUID->"5f273034-8ae0-412b-a617-4d3af97c3373", InitializationCell->True], Cell[CellGroupData[{ -Cell[4214585, 79255, 9841, 223, 656, "Input",ExpressionUUID->"81163e91-a315-4524-a5a7-51968f875244"], -Cell[4224429, 79480, 249574, 4707, 584, "Output",ExpressionUUID->"6f71ff12-e7d5-4b61-92c5-cd524b7ac891"] +Cell[4214709, 79257, 9841, 223, 656, "Input",ExpressionUUID->"81163e91-a315-4524-a5a7-51968f875244"], +Cell[4224553, 79482, 249574, 4707, 584, "Output",ExpressionUUID->"6f71ff12-e7d5-4b61-92c5-cd524b7ac891"] }, Open ]], Cell[CellGroupData[{ -Cell[4474040, 84192, 12607, 279, 791, "Input",ExpressionUUID->"47444490-0cc7-4eef-b521-259bcb9f1997"], -Cell[4486650, 84473, 2653, 38, 34, "Output",ExpressionUUID->"458fc1b6-79eb-4e4f-80c9-a7b1d6d4ae83"], -Cell[4489306, 84513, 2653, 38, 34, "Output",ExpressionUUID->"3205d82a-a14c-4f8c-afcd-e9a89d220ae6"], -Cell[4491962, 84553, 256229, 4698, 609, "Output",ExpressionUUID->"dd44024f-addb-49e9-82cb-e222cb72f8f5"] +Cell[4474164, 84194, 12607, 279, 791, "Input",ExpressionUUID->"47444490-0cc7-4eef-b521-259bcb9f1997"], +Cell[4486774, 84475, 2653, 38, 34, "Output",ExpressionUUID->"458fc1b6-79eb-4e4f-80c9-a7b1d6d4ae83"], +Cell[4489430, 84515, 2653, 38, 34, "Output",ExpressionUUID->"3205d82a-a14c-4f8c-afcd-e9a89d220ae6"], +Cell[4492086, 84555, 256229, 4698, 609, "Output",ExpressionUUID->"dd44024f-addb-49e9-82cb-e222cb72f8f5"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ -Cell[4748252, 89258, 151, 3, 98, "Title",ExpressionUUID->"89ceb3e6-e8ed-48f9-ad54-8f55b765da3d"], +Cell[4748376, 89260, 151, 3, 98, "Title",ExpressionUUID->"89ceb3e6-e8ed-48f9-ad54-8f55b765da3d"], Cell[CellGroupData[{ -Cell[4748428, 89265, 165, 3, 67, "Section",ExpressionUUID->"a672ed73-4892-4c6f-94df-45113bd9185d"], -Cell[4748596, 89270, 2200, 59, 110, "Input",ExpressionUUID->"9d9cd269-5af2-4502-b5cf-01d155493236", +Cell[4748552, 89267, 165, 3, 67, "Section",ExpressionUUID->"a672ed73-4892-4c6f-94df-45113bd9185d"], +Cell[4748720, 89272, 2200, 59, 110, "Input",ExpressionUUID->"9d9cd269-5af2-4502-b5cf-01d155493236", InitializationCell->True], Cell[CellGroupData[{ -Cell[4750821, 89333, 4446, 102, 388, "Input",ExpressionUUID->"7255c134-ca86-4314-bbf8-b83a11e42c5e"], -Cell[4755270, 89437, 189475, 3464, 70, "Output",ExpressionUUID->"68e88d41-263c-4372-8eae-4cec1e8adfbc"] +Cell[4750945, 89335, 4446, 102, 388, "Input",ExpressionUUID->"7255c134-ca86-4314-bbf8-b83a11e42c5e"], +Cell[4755394, 89439, 189475, 3464, 70, "Output",ExpressionUUID->"68e88d41-263c-4372-8eae-4cec1e8adfbc"] }, Open ]], Cell[CellGroupData[{ -Cell[4944782, 92906, 154, 3, 54, "Subsection",ExpressionUUID->"6843b2aa-bfe0-4330-85ec-c12a4533f092"], +Cell[4944906, 92908, 154, 3, 54, "Subsection",ExpressionUUID->"6843b2aa-bfe0-4330-85ec-c12a4533f092"], Cell[CellGroupData[{ -Cell[4944961, 92913, 1427, 36, 74, "Input",ExpressionUUID->"c2fd0978-56ec-4bdb-a941-8830e1cddb0d"], -Cell[4946391, 92951, 642, 13, 70, "Output",ExpressionUUID->"4be88d5a-8897-4ff5-98ea-3ad55fc8801a"], -Cell[4947036, 92966, 563, 11, 70, "Output",ExpressionUUID->"63de95ed-d1d6-41a8-9b1a-84a8fa2e31a9"] +Cell[4945085, 92915, 1427, 36, 74, "Input",ExpressionUUID->"c2fd0978-56ec-4bdb-a941-8830e1cddb0d"], +Cell[4946515, 92953, 642, 13, 70, "Output",ExpressionUUID->"4be88d5a-8897-4ff5-98ea-3ad55fc8801a"], +Cell[4947160, 92968, 563, 11, 70, "Output",ExpressionUUID->"63de95ed-d1d6-41a8-9b1a-84a8fa2e31a9"] }, Open ]], Cell[CellGroupData[{ -Cell[4947636, 92982, 1404, 35, 74, "Input",ExpressionUUID->"35a4401d-efa7-45ac-a9f9-662b80ee42c4"], -Cell[4949043, 93019, 575, 12, 70, "Output",ExpressionUUID->"f355e336-7703-4cf5-8b40-86e169da7205"], -Cell[4949621, 93033, 474, 9, 70, "Output",ExpressionUUID->"da21b9f8-3b3b-479c-92dd-4b978ce9895e"] +Cell[4947760, 92984, 1404, 35, 74, "Input",ExpressionUUID->"35a4401d-efa7-45ac-a9f9-662b80ee42c4"], +Cell[4949167, 93021, 575, 12, 70, "Output",ExpressionUUID->"f355e336-7703-4cf5-8b40-86e169da7205"], +Cell[4949745, 93035, 474, 9, 70, "Output",ExpressionUUID->"da21b9f8-3b3b-479c-92dd-4b978ce9895e"] }, Open ]], Cell[CellGroupData[{ -Cell[4950132, 93047, 1453, 36, 74, "Input",ExpressionUUID->"d9bc890c-a92c-4bf9-b971-2b0ab8a0ebfa"], -Cell[4951588, 93085, 620, 12, 70, "Output",ExpressionUUID->"3bd28787-964f-4e78-a6ec-37266acd0f48"], -Cell[4952211, 93099, 514, 9, 70, "Output",ExpressionUUID->"24a34fc9-1ce8-4a24-816d-973529872b94"] +Cell[4950256, 93049, 1453, 36, 74, "Input",ExpressionUUID->"d9bc890c-a92c-4bf9-b971-2b0ab8a0ebfa"], +Cell[4951712, 93087, 620, 12, 70, "Output",ExpressionUUID->"3bd28787-964f-4e78-a6ec-37266acd0f48"], +Cell[4952335, 93101, 514, 9, 70, "Output",ExpressionUUID->"24a34fc9-1ce8-4a24-816d-973529872b94"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[4952786, 93115, 164, 3, 53, "Section",ExpressionUUID->"9f8745cf-1727-417a-b067-8d71d31bea6e"], -Cell[4952953, 93120, 1110, 17, 46, "Input",ExpressionUUID->"3f27e47d-c4a5-40f2-a113-0869b7ccf3ba", +Cell[4952910, 93117, 164, 3, 53, "Section",ExpressionUUID->"9f8745cf-1727-417a-b067-8d71d31bea6e"], +Cell[4953077, 93122, 1110, 17, 46, "Input",ExpressionUUID->"3f27e47d-c4a5-40f2-a113-0869b7ccf3ba", InitializationCell->True], Cell[CellGroupData[{ -Cell[4954088, 93141, 9913, 225, 656, "Input",ExpressionUUID->"ed2df887-1601-4a73-a89e-2de9d5592a72"], -Cell[4964004, 93368, 248378, 4683, 584, "Output",ExpressionUUID->"65e9d525-5e0e-4915-a408-64c63c3416b2"] +Cell[4954212, 93143, 9913, 225, 656, "Input",ExpressionUUID->"ed2df887-1601-4a73-a89e-2de9d5592a72"], +Cell[4964128, 93370, 248378, 4683, 584, "Output",ExpressionUUID->"65e9d525-5e0e-4915-a408-64c63c3416b2"] }, Open ]], Cell[CellGroupData[{ -Cell[5212419, 98056, 12680, 281, 791, "Input",ExpressionUUID->"9bb25f27-d1d5-4287-a32d-8f47c4195f11"], -Cell[5225102, 98339, 2610, 39, 34, "Output",ExpressionUUID->"29f895ae-d995-473c-9e60-12bdcffe5b9d"], -Cell[5227715, 98380, 2610, 39, 34, "Output",ExpressionUUID->"033de800-0995-46be-b092-a41647032e10"], -Cell[5230328, 98421, 257173, 4715, 599, "Output",ExpressionUUID->"902ea8d6-dabf-4b33-bfb4-ca7b465fdaa6"] +Cell[5212543, 98058, 12680, 281, 791, "Input",ExpressionUUID->"9bb25f27-d1d5-4287-a32d-8f47c4195f11"], +Cell[5225226, 98341, 2610, 39, 34, "Output",ExpressionUUID->"29f895ae-d995-473c-9e60-12bdcffe5b9d"], +Cell[5227839, 98382, 2610, 39, 34, "Output",ExpressionUUID->"033de800-0995-46be-b092-a41647032e10"], +Cell[5230452, 98423, 257173, 4715, 599, "Output",ExpressionUUID->"902ea8d6-dabf-4b33-bfb4-ca7b465fdaa6"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[5487562, 103143, 202, 4, 72, "Title",ExpressionUUID->"0191a663-bf30-4a43-b8c7-edce09d2361b"], +Cell[5487686, 103145, 202, 4, 72, "Title",ExpressionUUID->"0191a663-bf30-4a43-b8c7-edce09d2361b"], Cell[CellGroupData[{ -Cell[5487789, 103151, 165, 3, 67, "Section",ExpressionUUID->"17e4dd54-73a6-4cfc-948f-3b2a0a2d0174"], -Cell[5487957, 103156, 2311, 61, 110, "Input",ExpressionUUID->"3f8c9a69-d755-4607-984f-39042c34f390", +Cell[5487913, 103153, 165, 3, 67, "Section",ExpressionUUID->"17e4dd54-73a6-4cfc-948f-3b2a0a2d0174"], +Cell[5488081, 103158, 2311, 61, 110, "Input",ExpressionUUID->"3f8c9a69-d755-4607-984f-39042c34f390", InitializationCell->True], Cell[CellGroupData[{ -Cell[5490293, 103221, 4461, 103, 388, "Input",ExpressionUUID->"431a5e32-56f2-429f-8483-e92dd0b0e933"], -Cell[5494757, 103326, 195198, 3557, 70, "Output",ExpressionUUID->"74a38473-3715-4e08-abb3-cda80cd4a17c"] +Cell[5490417, 103223, 4461, 103, 388, "Input",ExpressionUUID->"431a5e32-56f2-429f-8483-e92dd0b0e933"], +Cell[5494881, 103328, 195198, 3557, 70, "Output",ExpressionUUID->"74a38473-3715-4e08-abb3-cda80cd4a17c"] }, Open ]], Cell[CellGroupData[{ -Cell[5689992, 106888, 154, 3, 54, "Subsection",ExpressionUUID->"d815ea12-04a1-462c-b37f-a002453aac90"], +Cell[5690116, 106890, 154, 3, 54, "Subsection",ExpressionUUID->"d815ea12-04a1-462c-b37f-a002453aac90"], Cell[CellGroupData[{ -Cell[5690171, 106895, 1475, 36, 74, "Input",ExpressionUUID->"dfd2825c-abed-47ff-b89d-1d580bdf5592"], -Cell[5691649, 106933, 638, 13, 70, "Output",ExpressionUUID->"9edcd7e9-399d-4a83-a7fc-d182b9b74fa6"], -Cell[5692290, 106948, 557, 11, 70, "Output",ExpressionUUID->"5bd5f58f-a0aa-4408-a063-321a21cf78dd"] +Cell[5690295, 106897, 1475, 36, 74, "Input",ExpressionUUID->"dfd2825c-abed-47ff-b89d-1d580bdf5592"], +Cell[5691773, 106935, 638, 13, 70, "Output",ExpressionUUID->"9edcd7e9-399d-4a83-a7fc-d182b9b74fa6"], +Cell[5692414, 106950, 557, 11, 70, "Output",ExpressionUUID->"5bd5f58f-a0aa-4408-a063-321a21cf78dd"] }, Open ]], Cell[CellGroupData[{ -Cell[5692884, 106964, 1455, 36, 74, "Input",ExpressionUUID->"ed9510f5-93cb-4fe6-971b-e392ed5691d9"], -Cell[5694342, 107002, 572, 12, 70, "Output",ExpressionUUID->"94596668-d114-4a6f-a304-e166ccb0df78"], -Cell[5694917, 107016, 475, 9, 70, "Output",ExpressionUUID->"77080df1-7104-4f0a-b26a-9266002359d9"] +Cell[5693008, 106966, 1455, 36, 74, "Input",ExpressionUUID->"ed9510f5-93cb-4fe6-971b-e392ed5691d9"], +Cell[5694466, 107004, 572, 12, 70, "Output",ExpressionUUID->"94596668-d114-4a6f-a304-e166ccb0df78"], +Cell[5695041, 107018, 475, 9, 70, "Output",ExpressionUUID->"77080df1-7104-4f0a-b26a-9266002359d9"] }, Open ]], Cell[CellGroupData[{ -Cell[5695429, 107030, 1509, 37, 74, "Input",ExpressionUUID->"12f033be-f0a6-4fff-8219-81a8819e3850"], -Cell[5696941, 107069, 615, 12, 70, "Output",ExpressionUUID->"cce9005c-a9af-4e51-886d-8230913f7a04"], -Cell[5697559, 107083, 513, 9, 70, "Output",ExpressionUUID->"877e1f2b-d1bd-4cb1-adcd-e5b13bbbeb6f"] +Cell[5695553, 107032, 1509, 37, 74, "Input",ExpressionUUID->"12f033be-f0a6-4fff-8219-81a8819e3850"], +Cell[5697065, 107071, 615, 12, 70, "Output",ExpressionUUID->"cce9005c-a9af-4e51-886d-8230913f7a04"], +Cell[5697683, 107085, 513, 9, 70, "Output",ExpressionUUID->"877e1f2b-d1bd-4cb1-adcd-e5b13bbbeb6f"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[5698133, 107099, 164, 3, 53, "Section",ExpressionUUID->"ad009b44-9684-4d7a-816a-3d7e17470d67"], -Cell[5698300, 107104, 1114, 17, 46, "Input",ExpressionUUID->"d6ea828d-3843-4a77-bae6-291e647c3095", +Cell[5698257, 107101, 164, 3, 53, "Section",ExpressionUUID->"ad009b44-9684-4d7a-816a-3d7e17470d67"], +Cell[5698424, 107106, 1114, 17, 46, "Input",ExpressionUUID->"d6ea828d-3843-4a77-bae6-291e647c3095", InitializationCell->True], Cell[CellGroupData[{ -Cell[5699439, 107125, 9945, 225, 656, "Input",ExpressionUUID->"4ccf548a-8917-462f-b42f-220b1be2489a"], -Cell[5709387, 107352, 248497, 4686, 584, "Output",ExpressionUUID->"3ddea1ac-b90e-4134-bfe4-8330f428af97"] +Cell[5699563, 107127, 9945, 225, 656, "Input",ExpressionUUID->"4ccf548a-8917-462f-b42f-220b1be2489a"], +Cell[5709511, 107354, 248497, 4686, 584, "Output",ExpressionUUID->"3ddea1ac-b90e-4134-bfe4-8330f428af97"] }, Open ]], Cell[CellGroupData[{ -Cell[5957921, 112043, 12710, 281, 791, "Input",ExpressionUUID->"e0b55947-a80b-4aa6-b592-42b72fb096a0"], -Cell[5970634, 112326, 2610, 39, 34, "Output",ExpressionUUID->"fbe5829b-090e-4bf5-98ea-9c0cbf0a1219"], -Cell[5973247, 112367, 2610, 39, 34, "Output",ExpressionUUID->"17944fa9-7e7c-4d38-b35c-8179cd1f8608"], -Cell[5975860, 112408, 263091, 4808, 609, "Output",ExpressionUUID->"88333388-4fe7-4da2-b14e-1224917a1be6"] +Cell[5958045, 112045, 12710, 281, 791, "Input",ExpressionUUID->"e0b55947-a80b-4aa6-b592-42b72fb096a0"], +Cell[5970758, 112328, 2610, 39, 34, "Output",ExpressionUUID->"fbe5829b-090e-4bf5-98ea-9c0cbf0a1219"], +Cell[5973371, 112369, 2610, 39, 34, "Output",ExpressionUUID->"17944fa9-7e7c-4d38-b35c-8179cd1f8608"], +Cell[5975984, 112410, 263091, 4808, 609, "Output",ExpressionUUID->"88333388-4fe7-4da2-b14e-1224917a1be6"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[6239012, 117223, 151, 3, 72, "Title",ExpressionUUID->"b573437c-89db-4f4d-a3b8-3ca447533bd8"], +Cell[6239136, 117225, 151, 3, 72, "Title",ExpressionUUID->"b573437c-89db-4f4d-a3b8-3ca447533bd8"], Cell[CellGroupData[{ -Cell[6239188, 117230, 165, 3, 67, "Section",ExpressionUUID->"4bafd2ed-5d5e-49ff-af2c-b66598cb80d1"], -Cell[6239356, 117235, 2248, 60, 110, "Input",ExpressionUUID->"4e96eaec-94cc-465a-be70-f93c6b2a6381", +Cell[6239312, 117232, 165, 3, 67, "Section",ExpressionUUID->"4bafd2ed-5d5e-49ff-af2c-b66598cb80d1"], +Cell[6239480, 117237, 2248, 60, 110, "Input",ExpressionUUID->"4e96eaec-94cc-465a-be70-f93c6b2a6381", InitializationCell->True], Cell[CellGroupData[{ -Cell[6241629, 117299, 4457, 102, 388, "Input",ExpressionUUID->"ae76e7e8-1d11-4087-9183-aa7fe88d0cf4"], -Cell[6246089, 117403, 85984, 1535, 70, "Output",ExpressionUUID->"3a99289e-6458-489c-a7c6-a1a4a12c7439"] +Cell[6241753, 117301, 4457, 102, 388, "Input",ExpressionUUID->"ae76e7e8-1d11-4087-9183-aa7fe88d0cf4"], +Cell[6246213, 117405, 85984, 1535, 70, "Output",ExpressionUUID->"3a99289e-6458-489c-a7c6-a1a4a12c7439"] }, Open ]], Cell[CellGroupData[{ -Cell[6332110, 118943, 154, 3, 54, "Subsection",ExpressionUUID->"9107415c-fdc8-4f7d-89f9-b49684ad3106"], +Cell[6332234, 118945, 154, 3, 54, "Subsection",ExpressionUUID->"9107415c-fdc8-4f7d-89f9-b49684ad3106"], Cell[CellGroupData[{ -Cell[6332289, 118950, 1427, 36, 74, "Input",ExpressionUUID->"4600701a-7489-4aeb-8a2c-e1011a80c2b3"], -Cell[6333719, 118988, 663, 13, 70, "Output",ExpressionUUID->"ef4b16c5-7768-4478-8068-a614e3412c03"], -Cell[6334385, 119003, 584, 11, 70, "Output",ExpressionUUID->"9d217b2c-2c26-4bdd-883d-d77f0eaebb22"] +Cell[6332413, 118952, 1427, 36, 74, "Input",ExpressionUUID->"4600701a-7489-4aeb-8a2c-e1011a80c2b3"], +Cell[6333843, 118990, 663, 13, 70, "Output",ExpressionUUID->"ef4b16c5-7768-4478-8068-a614e3412c03"], +Cell[6334509, 119005, 584, 11, 70, "Output",ExpressionUUID->"9d217b2c-2c26-4bdd-883d-d77f0eaebb22"] }, Open ]], Cell[CellGroupData[{ -Cell[6335006, 119019, 1402, 35, 74, "Input",ExpressionUUID->"1c3f2e72-9de5-45ee-a0ca-7a44639c025a"], -Cell[6336411, 119056, 596, 12, 70, "Output",ExpressionUUID->"42d4d23d-7f9e-414f-98ea-bd36b91fb3f8"], -Cell[6337010, 119070, 497, 9, 70, "Output",ExpressionUUID->"d53f70f2-120a-43af-8af0-0f984237d352"] +Cell[6335130, 119021, 1402, 35, 74, "Input",ExpressionUUID->"1c3f2e72-9de5-45ee-a0ca-7a44639c025a"], +Cell[6336535, 119058, 596, 12, 70, "Output",ExpressionUUID->"42d4d23d-7f9e-414f-98ea-bd36b91fb3f8"], +Cell[6337134, 119072, 497, 9, 70, "Output",ExpressionUUID->"d53f70f2-120a-43af-8af0-0f984237d352"] }, Open ]], Cell[CellGroupData[{ -Cell[6337544, 119084, 1453, 36, 74, "Input",ExpressionUUID->"0da9c2ab-13b6-49bf-acbb-14c13d6c25b7"], -Cell[6339000, 119122, 640, 13, 70, "Output",ExpressionUUID->"a14845a1-c90b-48d4-91b9-acd682a39561"], -Cell[6339643, 119137, 540, 10, 70, "Output",ExpressionUUID->"ecd2eaeb-7942-4a84-8126-e847f4a7cbb6"] +Cell[6337668, 119086, 1453, 36, 74, "Input",ExpressionUUID->"0da9c2ab-13b6-49bf-acbb-14c13d6c25b7"], +Cell[6339124, 119124, 640, 13, 70, "Output",ExpressionUUID->"a14845a1-c90b-48d4-91b9-acd682a39561"], +Cell[6339767, 119139, 540, 10, 70, "Output",ExpressionUUID->"ecd2eaeb-7942-4a84-8126-e847f4a7cbb6"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[6340244, 119154, 164, 3, 53, "Section",ExpressionUUID->"0e1e9409-cd66-4922-a1ed-71fe5827c12e"], -Cell[6340411, 119159, 1110, 17, 46, "Input",ExpressionUUID->"2376a51c-3109-42c2-b46f-dfa6fd6a8d97", +Cell[6340368, 119156, 164, 3, 53, "Section",ExpressionUUID->"0e1e9409-cd66-4922-a1ed-71fe5827c12e"], +Cell[6340535, 119161, 1110, 17, 46, "Input",ExpressionUUID->"2376a51c-3109-42c2-b46f-dfa6fd6a8d97", InitializationCell->True], Cell[CellGroupData[{ -Cell[6341546, 119180, 9913, 225, 656, "Input",ExpressionUUID->"0a40ec25-1d6c-4626-bb9d-b6786a68b999"], -Cell[6351462, 119407, 249038, 4697, 584, "Output",ExpressionUUID->"c0cdc71d-756b-4531-bdc8-7fea7515574f"] +Cell[6341670, 119182, 9913, 225, 656, "Input",ExpressionUUID->"0a40ec25-1d6c-4626-bb9d-b6786a68b999"], +Cell[6351586, 119409, 249038, 4697, 584, "Output",ExpressionUUID->"c0cdc71d-756b-4531-bdc8-7fea7515574f"] }, Open ]], Cell[CellGroupData[{ -Cell[6600537, 124109, 12682, 281, 791, "Input",ExpressionUUID->"0b9c50d9-10b4-437b-9896-2735205f54f2"], -Cell[6613222, 124392, 2605, 39, 34, "Output",ExpressionUUID->"3bb06af7-8e97-4a76-b02d-9dcc010053e8"], -Cell[6615830, 124433, 2607, 39, 34, "Output",ExpressionUUID->"10c4b1c6-1c22-4579-88ad-dc1176353f5e"], -Cell[6618440, 124474, 257786, 4725, 609, "Output",ExpressionUUID->"b562baf0-9b3b-4a4d-ba0e-7bbc0be3e1b4"] +Cell[6600661, 124111, 12682, 281, 791, "Input",ExpressionUUID->"0b9c50d9-10b4-437b-9896-2735205f54f2"], +Cell[6613346, 124394, 2605, 39, 34, "Output",ExpressionUUID->"3bb06af7-8e97-4a76-b02d-9dcc010053e8"], +Cell[6615954, 124435, 2607, 39, 34, "Output",ExpressionUUID->"10c4b1c6-1c22-4579-88ad-dc1176353f5e"], +Cell[6618564, 124476, 257786, 4725, 609, "Output",ExpressionUUID->"b562baf0-9b3b-4a4d-ba0e-7bbc0be3e1b4"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[6876287, 129206, 153, 3, 72, "Title",ExpressionUUID->"8a4ffb97-273c-457a-86b2-f36b838038c3"], +Cell[6876411, 129208, 153, 3, 72, "Title",ExpressionUUID->"8a4ffb97-273c-457a-86b2-f36b838038c3"], Cell[CellGroupData[{ -Cell[6876465, 129213, 165, 3, 67, "Section",ExpressionUUID->"410ead3f-69f8-455a-b141-b8c6bb31b59e"], -Cell[6876633, 129218, 2313, 61, 110, "Input",ExpressionUUID->"7a81855c-52b6-4da7-96a1-7b16776ec89e", +Cell[6876589, 129215, 165, 3, 67, "Section",ExpressionUUID->"410ead3f-69f8-455a-b141-b8c6bb31b59e"], +Cell[6876757, 129220, 2313, 61, 110, "Input",ExpressionUUID->"7a81855c-52b6-4da7-96a1-7b16776ec89e", InitializationCell->True], Cell[CellGroupData[{ -Cell[6878971, 129283, 4461, 103, 388, "Input",ExpressionUUID->"e513bca1-de00-41f7-9726-aa7ff84e1ab0"], -Cell[6883435, 129388, 194680, 3554, 70, "Output",ExpressionUUID->"5b76b829-9e42-4b23-bab4-b22fa59e1061"] +Cell[6879095, 129285, 4461, 103, 388, "Input",ExpressionUUID->"e513bca1-de00-41f7-9726-aa7ff84e1ab0"], +Cell[6883559, 129390, 194680, 3554, 70, "Output",ExpressionUUID->"5b76b829-9e42-4b23-bab4-b22fa59e1061"] }, Open ]], Cell[CellGroupData[{ -Cell[7078152, 132947, 154, 3, 54, "Subsection",ExpressionUUID->"129935a0-86a7-4051-bdca-a2a54da66afe"], +Cell[7078276, 132949, 154, 3, 54, "Subsection",ExpressionUUID->"129935a0-86a7-4051-bdca-a2a54da66afe"], Cell[CellGroupData[{ -Cell[7078331, 132954, 1428, 36, 74, "Input",ExpressionUUID->"c7e5d329-77b0-4dd0-88db-00aa2b589947"], -Cell[7079762, 132992, 639, 13, 70, "Output",ExpressionUUID->"c1d8c78f-a876-45d1-b94a-306c6623446a"], -Cell[7080404, 133007, 561, 11, 70, "Output",ExpressionUUID->"534dec4d-c8a8-41b4-b1df-829a5bedcb05"] +Cell[7078455, 132956, 1428, 36, 74, "Input",ExpressionUUID->"c7e5d329-77b0-4dd0-88db-00aa2b589947"], +Cell[7079886, 132994, 639, 13, 70, "Output",ExpressionUUID->"c1d8c78f-a876-45d1-b94a-306c6623446a"], +Cell[7080528, 133009, 561, 11, 70, "Output",ExpressionUUID->"534dec4d-c8a8-41b4-b1df-829a5bedcb05"] }, Open ]], Cell[CellGroupData[{ -Cell[7081002, 133023, 1404, 35, 74, "Input",ExpressionUUID->"a70de1ce-8526-4071-a1eb-123213e8a509"], -Cell[7082409, 133060, 572, 12, 70, "Output",ExpressionUUID->"17f5277b-7537-45cc-98ad-0c06c79b498a"], -Cell[7082984, 133074, 474, 9, 70, "Output",ExpressionUUID->"196baea8-6606-49db-8dad-e69cb57a70cd"] +Cell[7081126, 133025, 1404, 35, 74, "Input",ExpressionUUID->"a70de1ce-8526-4071-a1eb-123213e8a509"], +Cell[7082533, 133062, 572, 12, 70, "Output",ExpressionUUID->"17f5277b-7537-45cc-98ad-0c06c79b498a"], +Cell[7083108, 133076, 474, 9, 70, "Output",ExpressionUUID->"196baea8-6606-49db-8dad-e69cb57a70cd"] }, Open ]], Cell[CellGroupData[{ -Cell[7083495, 133088, 1455, 36, 74, "Input",ExpressionUUID->"edc830ee-5ccd-4b26-8a91-1e951afe5bc6"], -Cell[7084953, 133126, 614, 12, 70, "Output",ExpressionUUID->"6803d587-3ecf-4545-95bd-66c4d6c96c51"], -Cell[7085570, 133140, 512, 9, 70, "Output",ExpressionUUID->"e6f4d892-0b71-4ab9-852e-de9fe26d5c8d"] +Cell[7083619, 133090, 1455, 36, 74, "Input",ExpressionUUID->"edc830ee-5ccd-4b26-8a91-1e951afe5bc6"], +Cell[7085077, 133128, 614, 12, 70, "Output",ExpressionUUID->"6803d587-3ecf-4545-95bd-66c4d6c96c51"], +Cell[7085694, 133142, 512, 9, 70, "Output",ExpressionUUID->"e6f4d892-0b71-4ab9-852e-de9fe26d5c8d"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[7086143, 133156, 164, 3, 53, "Section",ExpressionUUID->"74affff8-cb32-47ad-9136-4b7cf83078b4"], -Cell[7086310, 133161, 1114, 17, 46, "Input",ExpressionUUID->"71cf73ff-a368-423e-bc37-040c5631d9b5", +Cell[7086267, 133158, 164, 3, 53, "Section",ExpressionUUID->"74affff8-cb32-47ad-9136-4b7cf83078b4"], +Cell[7086434, 133163, 1114, 17, 46, "Input",ExpressionUUID->"71cf73ff-a368-423e-bc37-040c5631d9b5", InitializationCell->True], Cell[CellGroupData[{ -Cell[7087449, 133182, 9994, 226, 656, "Input",ExpressionUUID->"25eb9e52-3fcd-4e11-b9f1-70bc9bbd637c"], -Cell[7097446, 133410, 248499, 4686, 584, "Output",ExpressionUUID->"78a1ec0b-ce27-4198-bd21-0d8bd27cdf86"] +Cell[7087573, 133184, 9994, 226, 656, "Input",ExpressionUUID->"25eb9e52-3fcd-4e11-b9f1-70bc9bbd637c"], +Cell[7097570, 133412, 248499, 4686, 584, "Output",ExpressionUUID->"78a1ec0b-ce27-4198-bd21-0d8bd27cdf86"] }, Open ]], Cell[CellGroupData[{ -Cell[7345982, 138101, 12758, 281, 791, "Input",ExpressionUUID->"533638be-6594-41e7-8824-a54f785509aa"], -Cell[7358743, 138384, 2609, 39, 34, "Output",ExpressionUUID->"8f507ae3-82a9-42e6-8be8-b6e992a81f33"], -Cell[7361355, 138425, 2608, 39, 34, "Output",ExpressionUUID->"3bb0c585-345a-4161-ab39-6fdac09ed225"], -Cell[7363966, 138466, 262682, 4809, 609, "Output",ExpressionUUID->"e7a6a3fe-3688-459b-9f89-8821ff77e6a0"] +Cell[7346106, 138103, 12758, 281, 791, "Input",ExpressionUUID->"533638be-6594-41e7-8824-a54f785509aa"], +Cell[7358867, 138386, 2609, 39, 34, "Output",ExpressionUUID->"8f507ae3-82a9-42e6-8be8-b6e992a81f33"], +Cell[7361479, 138427, 2608, 39, 34, "Output",ExpressionUUID->"3bb0c585-345a-4161-ab39-6fdac09ed225"], +Cell[7364090, 138468, 262682, 4809, 609, "Output",ExpressionUUID->"e7a6a3fe-3688-459b-9f89-8821ff77e6a0"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[7626709, 143282, 151, 3, 72, "Title",ExpressionUUID->"3aa4c3c7-fc6f-42ef-aa94-929bb1c5aa0a"], +Cell[7626833, 143284, 151, 3, 72, "Title",ExpressionUUID->"3aa4c3c7-fc6f-42ef-aa94-929bb1c5aa0a"], Cell[CellGroupData[{ -Cell[7626885, 143289, 165, 3, 67, "Section",ExpressionUUID->"b03eb6df-71b5-4406-a539-f8a9bb649f41"], -Cell[7627053, 143294, 2251, 60, 110, "Input",ExpressionUUID->"bb79f009-b78a-42cd-a70b-1c427ab4c78f", +Cell[7627009, 143291, 165, 3, 67, "Section",ExpressionUUID->"b03eb6df-71b5-4406-a539-f8a9bb649f41"], +Cell[7627177, 143296, 2251, 60, 110, "Input",ExpressionUUID->"bb79f009-b78a-42cd-a70b-1c427ab4c78f", InitializationCell->True], Cell[CellGroupData[{ -Cell[7629329, 143358, 4457, 103, 388, "Input",ExpressionUUID->"274b1a81-3d1f-4d79-ba2b-e96aee7f03a2"], -Cell[7633789, 143463, 189652, 3471, 70, "Output",ExpressionUUID->"1338e4c3-b30d-4b55-bedf-b6646bd68e89"] +Cell[7629453, 143360, 4457, 103, 388, "Input",ExpressionUUID->"274b1a81-3d1f-4d79-ba2b-e96aee7f03a2"], +Cell[7633913, 143465, 189652, 3471, 70, "Output",ExpressionUUID->"1338e4c3-b30d-4b55-bedf-b6646bd68e89"] }, Open ]], Cell[CellGroupData[{ -Cell[7823478, 146939, 154, 3, 54, "Subsection",ExpressionUUID->"405e8c59-70fc-417a-adb3-16717ec9ddcc"], +Cell[7823602, 146941, 154, 3, 54, "Subsection",ExpressionUUID->"405e8c59-70fc-417a-adb3-16717ec9ddcc"], Cell[CellGroupData[{ -Cell[7823657, 146946, 1430, 36, 74, "Input",ExpressionUUID->"efaa24f1-ad32-4652-afa8-24a855b34924"], -Cell[7825090, 146984, 642, 13, 70, "Output",ExpressionUUID->"87a1d3d7-6c3b-4d92-8d5b-2d951cfff87f"], -Cell[7825735, 146999, 562, 11, 70, "Output",ExpressionUUID->"de8a4633-ede0-4061-b378-e4918c2a6cbb"] +Cell[7823781, 146948, 1430, 36, 74, "Input",ExpressionUUID->"efaa24f1-ad32-4652-afa8-24a855b34924"], +Cell[7825214, 146986, 642, 13, 70, "Output",ExpressionUUID->"87a1d3d7-6c3b-4d92-8d5b-2d951cfff87f"], +Cell[7825859, 147001, 562, 11, 70, "Output",ExpressionUUID->"de8a4633-ede0-4061-b378-e4918c2a6cbb"] }, Open ]], Cell[CellGroupData[{ -Cell[7826334, 147015, 1405, 35, 74, "Input",ExpressionUUID->"bd3953bd-1678-4443-b5d6-53b1ca3214af"], -Cell[7827742, 147052, 576, 12, 70, "Output",ExpressionUUID->"c01fcb6f-acf1-4d41-92b7-333682a3f8ab"], -Cell[7828321, 147066, 476, 9, 70, "Output",ExpressionUUID->"50431e47-4cc6-44ce-9099-2244245cb425"] +Cell[7826458, 147017, 1405, 35, 74, "Input",ExpressionUUID->"bd3953bd-1678-4443-b5d6-53b1ca3214af"], +Cell[7827866, 147054, 576, 12, 70, "Output",ExpressionUUID->"c01fcb6f-acf1-4d41-92b7-333682a3f8ab"], +Cell[7828445, 147068, 476, 9, 70, "Output",ExpressionUUID->"50431e47-4cc6-44ce-9099-2244245cb425"] }, Open ]], Cell[CellGroupData[{ -Cell[7828834, 147080, 1454, 36, 74, "Input",ExpressionUUID->"ec71f8b9-3a2f-4d82-9674-291fd3dcb70b"], -Cell[7830291, 147118, 613, 12, 70, "Output",ExpressionUUID->"ae75c011-44eb-4b20-af37-53a4f93bcad6"], -Cell[7830907, 147132, 512, 9, 70, "Output",ExpressionUUID->"13f1ff22-74ce-454f-a4a6-b684932eff34"] +Cell[7828958, 147082, 1454, 36, 74, "Input",ExpressionUUID->"ec71f8b9-3a2f-4d82-9674-291fd3dcb70b"], +Cell[7830415, 147120, 613, 12, 70, "Output",ExpressionUUID->"ae75c011-44eb-4b20-af37-53a4f93bcad6"], +Cell[7831031, 147134, 512, 9, 70, "Output",ExpressionUUID->"13f1ff22-74ce-454f-a4a6-b684932eff34"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[7831480, 147148, 164, 3, 53, "Section",ExpressionUUID->"310e5587-f9ab-4373-b92e-8e87daed147b"], -Cell[7831647, 147153, 1111, 17, 46, "Input",ExpressionUUID->"c7d26c9d-498c-4229-a0df-c36b4ce018c9", +Cell[7831604, 147150, 164, 3, 53, "Section",ExpressionUUID->"310e5587-f9ab-4373-b92e-8e87daed147b"], +Cell[7831771, 147155, 1111, 17, 46, "Input",ExpressionUUID->"c7d26c9d-498c-4229-a0df-c36b4ce018c9", InitializationCell->True], Cell[CellGroupData[{ -Cell[7832783, 147174, 10024, 226, 656, "Input",ExpressionUUID->"b4685f60-6ed4-4abc-9b52-a764b50908ea"], -Cell[7842810, 147402, 247831, 4676, 584, "Output",ExpressionUUID->"6a65ef70-1dc8-4aee-8959-6ef2594ec0aa"] +Cell[7832907, 147176, 10024, 226, 656, "Input",ExpressionUUID->"b4685f60-6ed4-4abc-9b52-a764b50908ea"], +Cell[7842934, 147404, 247831, 4676, 584, "Output",ExpressionUUID->"6a65ef70-1dc8-4aee-8959-6ef2594ec0aa"] }, Open ]], Cell[CellGroupData[{ -Cell[8090678, 152083, 12793, 282, 791, "Input",ExpressionUUID->"a992e33a-fae2-4289-b022-6650221566c3"], -Cell[8103474, 152367, 2584, 38, 34, "Output",ExpressionUUID->"9ad2a64f-9add-474e-95a9-95c631c69c64"], -Cell[8106061, 152407, 2586, 38, 34, "Output",ExpressionUUID->"1f7f871e-4f8c-48f4-8773-90448988ba5a"], -Cell[8108650, 152447, 258053, 4735, 609, "Output",ExpressionUUID->"55998c3e-baf2-43dd-8ee8-3183d357fb3d"] +Cell[8090802, 152085, 12793, 282, 791, "Input",ExpressionUUID->"a992e33a-fae2-4289-b022-6650221566c3"], +Cell[8103598, 152369, 2584, 38, 34, "Output",ExpressionUUID->"9ad2a64f-9add-474e-95a9-95c631c69c64"], +Cell[8106185, 152409, 2586, 38, 34, "Output",ExpressionUUID->"1f7f871e-4f8c-48f4-8773-90448988ba5a"], +Cell[8108774, 152449, 258053, 4735, 609, "Output",ExpressionUUID->"55998c3e-baf2-43dd-8ee8-3183d357fb3d"] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ -Cell[8366764, 157189, 151, 3, 72, "Title",ExpressionUUID->"3f1c5daa-9204-4fa2-aff4-6501ee71088b"], +Cell[8366888, 157191, 151, 3, 72, "Title",ExpressionUUID->"3f1c5daa-9204-4fa2-aff4-6501ee71088b"], Cell[CellGroupData[{ -Cell[8366940, 157196, 165, 3, 67, "Section",ExpressionUUID->"8f74d292-59d5-45cb-a51d-f25b4743cd6f"], -Cell[8367108, 157201, 2201, 59, 110, "Input",ExpressionUUID->"52f42957-7028-4c6a-87b7-6d3cbef3d400", +Cell[8367064, 157198, 165, 3, 67, "Section",ExpressionUUID->"8f74d292-59d5-45cb-a51d-f25b4743cd6f"], +Cell[8367232, 157203, 2201, 59, 110, "Input",ExpressionUUID->"52f42957-7028-4c6a-87b7-6d3cbef3d400", InitializationCell->True], Cell[CellGroupData[{ -Cell[8369334, 157264, 4445, 102, 388, "Input",ExpressionUUID->"2d2e9e09-7384-4679-a741-81624c7ba94e"], -Cell[8373782, 157368, 188400, 3448, 70, "Output",ExpressionUUID->"e0d35a7a-e60a-4825-97ce-f769d2e8819b"] +Cell[8369458, 157266, 4445, 102, 388, "Input",ExpressionUUID->"2d2e9e09-7384-4679-a741-81624c7ba94e"], +Cell[8373906, 157370, 188400, 3448, 70, "Output",ExpressionUUID->"e0d35a7a-e60a-4825-97ce-f769d2e8819b"] }, Open ]], Cell[CellGroupData[{ -Cell[8562219, 160821, 154, 3, 54, "Subsection",ExpressionUUID->"80951159-85f4-4b2a-b4e4-386ff0b4b2ed"], +Cell[8562343, 160823, 154, 3, 54, "Subsection",ExpressionUUID->"80951159-85f4-4b2a-b4e4-386ff0b4b2ed"], Cell[CellGroupData[{ -Cell[8562398, 160828, 1427, 36, 74, "Input",ExpressionUUID->"e557ec2c-a2fe-4826-972c-21055ce691c0"], -Cell[8563828, 160866, 643, 13, 70, "Output",ExpressionUUID->"a7a842c5-1d78-4608-9a8b-4b1e7b266de8"], -Cell[8564474, 160881, 563, 11, 70, "Output",ExpressionUUID->"3fb2cead-2830-4ed6-bb75-b0b71c8aef75"] +Cell[8562522, 160830, 1427, 36, 74, "Input",ExpressionUUID->"e557ec2c-a2fe-4826-972c-21055ce691c0"], +Cell[8563952, 160868, 643, 13, 70, "Output",ExpressionUUID->"a7a842c5-1d78-4608-9a8b-4b1e7b266de8"], +Cell[8564598, 160883, 563, 11, 70, "Output",ExpressionUUID->"3fb2cead-2830-4ed6-bb75-b0b71c8aef75"] }, Open ]], Cell[CellGroupData[{ -Cell[8565074, 160897, 1404, 35, 74, "Input",ExpressionUUID->"7968e064-d590-43d4-899b-e2830156ec83"], -Cell[8566481, 160934, 578, 12, 70, "Output",ExpressionUUID->"512583a9-9f15-4b99-98cc-16127be0e5b4"], -Cell[8567062, 160948, 478, 9, 70, "Output",ExpressionUUID->"991d6277-e862-4fce-b5d0-67ae11c9a75e"] +Cell[8565198, 160899, 1404, 35, 74, "Input",ExpressionUUID->"7968e064-d590-43d4-899b-e2830156ec83"], +Cell[8566605, 160936, 578, 12, 70, "Output",ExpressionUUID->"512583a9-9f15-4b99-98cc-16127be0e5b4"], +Cell[8567186, 160950, 478, 9, 70, "Output",ExpressionUUID->"991d6277-e862-4fce-b5d0-67ae11c9a75e"] }, Open ]], Cell[CellGroupData[{ -Cell[8567577, 160962, 1455, 36, 74, "Input",ExpressionUUID->"9a668e93-ff40-4858-83e4-377dc9a38be5"], -Cell[8569035, 161000, 616, 12, 70, "Output",ExpressionUUID->"caf6f46c-9ea7-4b5f-bf09-48cd7f10b6ba"], -Cell[8569654, 161014, 513, 9, 70, "Output",ExpressionUUID->"cf3273dd-945b-4788-8907-a20268750a26"] +Cell[8567701, 160964, 1455, 36, 74, "Input",ExpressionUUID->"9a668e93-ff40-4858-83e4-377dc9a38be5"], +Cell[8569159, 161002, 616, 12, 70, "Output",ExpressionUUID->"caf6f46c-9ea7-4b5f-bf09-48cd7f10b6ba"], +Cell[8569778, 161016, 513, 9, 70, "Output",ExpressionUUID->"cf3273dd-945b-4788-8907-a20268750a26"] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ -Cell[8570228, 161030, 164, 3, 53, "Section",ExpressionUUID->"9d03b122-a5b6-4976-ad57-942073f6d9d0"], -Cell[8570395, 161035, 1108, 17, 46, "Input",ExpressionUUID->"da8e8ffa-0b59-462b-b958-66015726754d", +Cell[8570352, 161032, 164, 3, 53, "Section",ExpressionUUID->"9d03b122-a5b6-4976-ad57-942073f6d9d0"], +Cell[8570519, 161037, 1108, 17, 46, "Input",ExpressionUUID->"da8e8ffa-0b59-462b-b958-66015726754d", InitializationCell->True], Cell[CellGroupData[{ -Cell[8571528, 161056, 10008, 226, 656, "Input",ExpressionUUID->"37b486c6-b366-4dd8-850d-2257dc17743f"], -Cell[8581539, 161284, 248567, 4688, 584, "Output",ExpressionUUID->"1412f3e1-8378-4a55-8b10-803cc92c6d6c"] +Cell[8571652, 161058, 10008, 226, 656, "Input",ExpressionUUID->"37b486c6-b366-4dd8-850d-2257dc17743f"], +Cell[8581663, 161286, 248567, 4688, 584, "Output",ExpressionUUID->"1412f3e1-8378-4a55-8b10-803cc92c6d6c"] }, Open ]], Cell[CellGroupData[{ -Cell[8830143, 165977, 12727, 281, 791, "Input",ExpressionUUID->"b2eb0eb1-71cc-4bf9-b757-55c05ed81628"], -Cell[8842873, 166260, 2557, 38, 70, "Output",ExpressionUUID->"994d5951-35bc-43c9-8998-1c5f6da5573e"], -Cell[8845433, 166300, 2558, 38, 70, "Output",ExpressionUUID->"d34e360f-33b4-4b16-a487-90b2a1e9c566"], -Cell[8847994, 166340, 255483, 4681, 70, "Output",ExpressionUUID->"3ac20713-42c9-4b4d-9d2d-78e5a8a5f220"] +Cell[8830267, 165979, 12727, 281, 791, "Input",ExpressionUUID->"b2eb0eb1-71cc-4bf9-b757-55c05ed81628"], +Cell[8842997, 166262, 2557, 38, 70, "Output",ExpressionUUID->"994d5951-35bc-43c9-8998-1c5f6da5573e"], +Cell[8845557, 166302, 2558, 38, 70, "Output",ExpressionUUID->"d34e360f-33b4-4b16-a487-90b2a1e9c566"], +Cell[8848118, 166342, 255483, 4681, 70, "Output",ExpressionUUID->"3ac20713-42c9-4b4d-9d2d-78e5a8a5f220"] }, Open ]] }, Closed]] }, Closed]] diff --git a/Manuscript/Ec.bib b/Manuscript/Ec.bib index 9cbde0e..dc741eb 100644 --- a/Manuscript/Ec.bib +++ b/Manuscript/Ec.bib @@ -1,13 +1,23 @@ %% This BibTeX bibliography file was created using BibDesk. %% http://bibdesk.sourceforge.net/ -%% Created for Pierre-Francois Loos at 2021-06-18 11:30:20 +0200 +%% Created for Pierre-Francois Loos at 2021-06-18 21:40:11 +0200 %% Saved with string encoding Unicode (UTF-8) +@misc{Chilkuri_2021, + archiveprefix = {arXiv}, + author = {Vijay Gopal Chilkuri and Thomas Applencourt and Kevin Gasperich and Pierre-Fran{\c c}ois Loos and Anthony Scemama}, + date-added = {2021-06-18 13:22:26 +0200}, + date-modified = {2021-06-18 13:22:35 +0200}, + eprint = {1812.06902}, + primaryclass = {physics.chem-ph}, + title = {Spin-adapted selected configuration interaction in a determinant basis}, + year = {2021}} + @article{Loos_2021, author = {Loos,Pierre-Fran{\c c}ois and Matthews,Devin A. and Lipparini,Filippo and Jacquemin,Denis}, date-added = {2021-06-18 11:30:08 +0200}, @@ -445,10 +455,10 @@ year = {2004}, Bdsk-Url-1 = {https://doi.org/10.1016/j.cplett.2004.03.051}} -@article{cfour, +@article{Matthews_2020, author = {Matthews,Devin A. and Cheng,Lan and Harding,Michael E. and Lipparini,Filippo and Stopkowicz,Stella and Jagau,Thomas-C. and Szalay,P{\'e}ter G. and Gauss,J{\"u}rgen and Stanton,John F.}, date-added = {2021-05-06 15:31:25 +0200}, - date-modified = {2021-05-06 15:31:25 +0200}, + date-modified = {2021-06-18 13:20:28 +0200}, doi = {10.1063/5.0004837}, journal = {J. Chem. Phys.}, number = {21}, @@ -2246,11 +2256,3 @@ title = {{QMC using very large configuration interaction-type expansions}}, year = {2015}, Bdsk-Url-1 = {https://doi.org/10.13140/RG.2.1.3187.9766}} - -@misc{Applencourt_2018, - archiveprefix = {arXiv}, - author = {Thomas Applencourt and Kevin Gasperich and Anthony Scemama}, - eprint = {1812.06902}, - primaryclass = {physics.chem-ph}, - title = {Spin adaptation with determinant-based selected configuration interaction}, - year = {2018}} diff --git a/Manuscript/Ec.tex b/Manuscript/Ec.tex index 47bf82b..6b33636 100644 --- a/Manuscript/Ec.tex +++ b/Manuscript/Ec.tex @@ -52,9 +52,9 @@ % Abstract \begin{abstract} -We report (frozen-core) full configuration interaction (FCI) energies in finite Hilbert spaces for various five- and six-membered rings. -In the continuity of our recent work on the benzene molecule [\href{https://doi.org/10.1063/5.0027617}{J. Chem. Phys. \textbf{153}, 176101 (2020)}], itself motivated by the blind challenge of Eriksen \textit{et al.} [\href{https://doi.org/10.1021/acs.jpclett.0c02621}{J. Phys. Chem. Lett. \textbf{11}, 8922 (2020)}] on the same system, we report reference frozen-core correlation energies for twelve cyclic molecules (cyclopentadiene, furan, imidazole, pyrrole, thiophene, benzene, pyrazine, pyridazine, pyridine, pyrimidine, tetrazine, and triazine) in the standard correlation-consistent double-$\zeta$ Dunning basis set (cc-pVDZ). -This corresponds to Hilbert spaces with sizes ranging from $10^{20}$ (for thiophene) to $10^{36}$ (for benzene). +%We report (frozen-core) full configuration interaction (FCI) energies in finite Hilbert spaces for various five- and six-membered rings. +In the continuity of our recent work on the benzene molecule [\href{https://doi.org/10.1063/5.0027617}{J. Chem. Phys. \textbf{153}, 176101 (2020)}], itself motivated by the blind challenge of Eriksen \textit{et al.} [\href{https://doi.org/10.1021/acs.jpclett.0c02621}{J. Phys. Chem. Lett. \textbf{11}, 8922 (2020)}] on the same system, we report reference frozen-core correlation energies for twelve five- and six-membered ring molecules (cyclopentadiene, furan, imidazole, pyrrole, thiophene, benzene, pyrazine, pyridazine, pyridine, pyrimidine, tetrazine, and triazine) in the standard correlation-consistent double-$\zeta$ Dunning basis set (cc-pVDZ). +This corresponds to Hilbert spaces with sizes ranging from $10^{28}$ (for thiophene) to $10^{36}$ (for benzene). Our estimates are based on energetically optimized-orbital selected configuration interaction (SCI) calculations performed with the \textit{Configuration Interaction using a Perturbative Selection made Iteratively} (CIPSI) algorithm. The performance and convergence properties of several series of methods are investigated. In particular, we study the convergence properties of i) the M{\o}ller-Plesset perturbation series up to fifth-order (MP2, MP3, MP4, and MP5), ii) the iterative approximate single-reference coupled-cluster series CC2, CC3, and CC4, and ii) the single-reference coupled-cluster series CCSD, CCSDT, and CCSDTQ. @@ -78,7 +78,7 @@ For example, in configuration interaction (CI) methods, the wave function is exp The truncation of $\Hat{T}$ allows to define a hierarchy of non-variational and size-extensive methods with improved accuracy: CC with singles and doubles (CCSD), \cite{Cizek_1966,Purvis_1982} CC with singles, doubles, and triples (CCSDT), \cite{Noga_1987a,Scuseria_1988} CC with singles, doubles, triples, and quadruples (CCSDTQ), \cite{Oliphant_1991,Kucharski_1992} with corresponding computational scalings of $\order*{N^{6}}$, $\order*{N^{8}}$, and $\order*{N^{10}}$, respectively (where $N$ denotes the number of orbitals). -Parallel to the ``complete'' CC series presented above, an alternative series of approximate iterative CC models have been developed by the Aarhus group in the context of CC response theory \cite{Christiansen_1998} where one skips the most expensive terms and avoids the storage of the higher-excitation amplitudes: CC2, \cite{Christiansen_1995a} CC3, \cite{Christiansen_1995b,Koch_1997} and CC4 \cite{Kallay_2005} +Parallel to the ``complete'' CC series presented above, an alternative series of approximate iterative CC models have been developed by the Aarhus group in the context of CC response theory \cite{Christiansen_1998} where one skips the most expensive terms and avoids the storage of the higher-excitation amplitudes: CC2, \cite{Christiansen_1995a} CC3, \cite{Christiansen_1995b,Koch_1997} and CC4 \cite{Kallay_2005,Matthews_2021} These iterative methods scale as $\order*{N^{5}}$, $\order*{N^{7}}$, and $\order*{N^{9}}$, respectively, and can be seen as cheaper approximations of CCSD, CCSDT, and CCSDTQ. Coupled-cluster methods have been particularly successful at computing accurately various properties for small- and medium-sized molecules. \cite{Kallay_2003,Kallay_2004a,Gauss_2006,Kallay_2006,Gauss_2009} @@ -89,24 +89,24 @@ The non-variationality of truncated CC methods being less of an issue than the s However, a different strategy has recently made a come back in the context of CI methods. \cite{Bender_1969,Whitten_1969,Huron_1973} Indeed, selected CI (SCI) methods, \cite{Booth_2009,Giner_2013,Evangelista_2014,Giner_2015,Holmes_2016,Tubman_2016,Liu_2016,Ohtsuka_2017,Zimmerman_2017,Coe_2018,Garniron_2018} where one iteratively selects the energetically relevant determinants from the FCI space (usually) based on a perturbative criterion, has been recently shown to be highly successful in order to produce reference energies for ground and excited states in small- and medium-size molecules \cite{Holmes_2017,Li_2018,Li_2020,Loos_2018a,Chien_2018,Loos_2019,Loos_2020b,Loos_2020c,Loos_2020e,Garniron_2019,Eriksen_2020,Yao_2020,Veril_2021,Loos_2021} thanks to efficient deterministic, stochastic or hybrid algorithms well suited for massive parallelization. We refer the interested reader to Refs.~\onlinecite{Loos_2020a,Eriksen_2021} for recent reviews. -SCI methods are based on a simple and natural observation: amongst the very large number of determinants belonging to the FCI space, only a relative small fraction of them significantly contributes to the energy. -Accordingly to this well-known fact, the SCI+PT2 family of methods performs a sparse exploration of the FCI space by selecting iteratively only the most energetically relevant determinants of the variational space and supplementing it with a second-order perturbative correction (PT2). \cite{Huron_1973,Garniron_2017,Sharma_2017,Garniron_2018,Garniron_2019} +SCI methods are based on a well-known fact: amongst the very large number of determinants belonging to the FCI space, only a relative small fraction of them significantly contributes to the energy. +Accordingly, the SCI+PT2 family of methods performs a sparse exploration of the FCI space by selecting iteratively only the most energetically relevant determinants of the variational space and supplementing it with a second-order perturbative correction (PT2). \cite{Huron_1973,Garniron_2017,Sharma_2017,Garniron_2018,Garniron_2019} Although the formal scaling of such algorithms remain exponential, the prefactor is greatly reduced which explains their current attractiveness in the electronic structure community and much wider applicability than their standard FCI parent. Note that, very recently, several groups \cite{Aroeira_2021,Lee_2021,Magoulas_2021} have coupled CC and SCI methods via the externally-corrected CC methodology, \cite{Paldus_2017} showing promising performances for weakly and strongly correlated systems. A rather different strategy in order to reach the holy grail FCI limit is to resort to M{\o}ller-Plesset (MP) perturbation theory, \cite{Moller_1934} which popularity originates from its black-box nature, size-extensivity, and relatively low computational scaling, making it easily applied to a broad range of molecular systems. Again, at least in theory, one can obtain the exact energy of the system by ramping up the degree of the perturbative series. \cite{Marie_2021} -The second-order M{\o}ller-Plesset (MP2) method \cite{Moller_1934} [which scales as $\order*{N^{5}}$] has been broadly adopted in quantum chemistry for several decades, and is now included in double-hybrid functionals \cite{Grimme_2006} alongside exact Hartree-Fock exchange within density-functional theory. \cite{Hohenberg_1964,Kohn_1965} +The second-order M{\o}ller-Plesset (MP2) method \cite{Moller_1934} [which scales as $\order*{N^{5}}$] has been broadly adopted in quantum chemistry for several decades, and is now included in the increasingly popular double-hybrid functionals \cite{Grimme_2006} alongside exact HF exchange. Its higher-order variants [MP3, \cite{Pople_1976} -MP4, \cite{Krishnan_1980} MP5, \cite{Kucharski_1989} and MP6 \cite{He_1996a,He_1996b} which scales as $\order*{N^{6}}$, $\order*{N^{7}}$, and $\order*{N^{8}}$, respectively] have been investigated much more scarcely. +MP4, \cite{Krishnan_1980} MP5, \cite{Kucharski_1989} and MP6 \cite{He_1996a,He_1996b} which scales as $\order*{N^{6}}$, $\order*{N^{7}}$, $\order*{N^{8}}$, and $\order*{N^{9}}$ respectively] have been investigated much more scarcely. However, it is now widely recognised that the series of MP approximations might show erratic, slow, or divergent behavior that limit its applicability and systematic improvability. \cite{Laidig_1985,Knowles_1985,Handy_1985,Gill_1986,Laidig_1987,Nobes_1987,Gill_1988,Gill_1988a,Lepetit_1988,Malrieu_2003} Again, MP perturbation theory and CC methods can be coupled. -The CCSD(T) method \cite{Raghavachari_1989} known as the gold-standard of quantum chemistry for weakly correlated systems is probably the most iconic example of such coupling. +The CCSD(T) method, \cite{Raghavachari_1989} known as the gold-standard of quantum chemistry for weakly correlated systems, is probably the most iconic example of such coupling. -Motivated by the recent blind test of Eriksen \textit{et al.}\cite{Eriksen_2020}~reporting the performance of a large panel of emerging electronic structure methods [the many-body expansion FCI (MBE-FCI), \cite{Eriksen_2017,Eriksen_2018,Eriksen_2019a,Eriksen_2019b} adaptive sampling CI (ASCI), \cite{Tubman_2016,Tubman_2018,Tubman_2020} iterative CI (iCI), \cite{Liu_2014,Liu_2016,Lei_2017,Zhang_2020} semistochastic heat-bath CI (SHCI), \cite{Holmes_2016,Holmes_2017,Sharma_2017} the full coupled-cluster reduction (FCCR), \cite{Xu_2018,Xu_2020} density-matrix renormalization group (DMRG), \cite{White_1992,White_1993,Chan_2011} adaptive-shift FCI quantum Monte Carlo (AS-FCIQMC), \cite{Booth_2009,Cleland_2010,Ghanem_2019} and cluster-analysis-driven FCIQMC (CAD-FCIQMC) \cite{Deustua_2017,Deustua_2018}] on the non-relativistic frozen-core correlation energy of the benzene molecule in the standard correlation-consistent double-$\zeta$ Dunning basis set (cc-pVDZ), some of us have recently investigated the performance of the \textit{configuration interaction using a perturbative selection made iteratively} (CIPSI) method \cite{Huron_1973,Giner_2013,Giner_2015,Garniron_2018,Garniron_2019} on the very same system [see also Ref.~\onlinecite{Lee_2020} for a study of the performance of phaseless auxiliary-field quantum Monte Carlo (ph-AFQMC) \cite{Motta_2018}]. -In the continuity of this recent work, we report here a significant extension by estimating the (frozen-core) FCI/cc-pVDZ correlation energy of twelve cyclic molecules (cyclopentadiene, furan, imidazole, pyrrole, thiophene, benzene, pyrazine, pyridazine, pyridine, pyrimidine, tetrazine, and triazine) with the help of the CIPSI method employing energetically-optimized orbitals at the same level of theory. \cite{Yao_2020,Yao_2021} -This set of molecular systems corresponds to Hilbert spaces with sizes ranging from $10^{20}$ (for thiophene) to $10^{36}$ (for benzene). +Motivated by the recent blind test of Eriksen \textit{et al.}\cite{Eriksen_2020}~reporting the performance of a large panel of emerging electronic structure methods [the many-body expansion FCI (MBE-FCI), \cite{Eriksen_2017,Eriksen_2018,Eriksen_2019a,Eriksen_2019b} adaptive sampling CI (ASCI), \cite{Tubman_2016,Tubman_2018,Tubman_2020} iterative CI (iCI), \cite{Liu_2014,Liu_2016,Lei_2017,Zhang_2020} semistochastic heat-bath CI (SHCI), \cite{Holmes_2016,Holmes_2017,Sharma_2017} the full coupled-cluster reduction (FCCR), \cite{Xu_2018,Xu_2020} density-matrix renormalization group (DMRG), \cite{White_1992,White_1993,Chan_2011} adaptive-shift FCI quantum Monte Carlo (AS-FCIQMC), \cite{Booth_2009,Cleland_2010,Ghanem_2019} and cluster-analysis-driven FCIQMC (CAD-FCIQMC) \cite{Deustua_2017,Deustua_2018}] on the non-relativistic frozen-core correlation energy of the benzene molecule in the standard correlation-consistent double-$\zeta$ Dunning basis set (cc-pVDZ), some of us have recently investigated the performance of the \textit{Configuration Interaction using a Perturbative Selection made Iteratively} (CIPSI) method \cite{Huron_1973,Giner_2013,Giner_2015,Garniron_2018,Garniron_2019} on the very same system \cite{Loos_2020e} [see also Ref.~\onlinecite{Lee_2020} for a study of the performance of phaseless auxiliary-field quantum Monte Carlo (ph-AFQMC) \cite{Motta_2018}]. +In the continuity of this recent work, we report here a significant extension by estimating the (frozen-core) FCI/cc-pVDZ correlation energy of twelve cyclic molecules (cyclopentadiene, furan, imidazole, pyrrole, thiophene, benzene, pyrazine, pyridazine, pyridine, pyrimidine, tetrazine, and triazine) with the help of CIPSI employing energetically-optimized orbitals at the same level of theory. \cite{Yao_2020,Yao_2021} +This set of molecular systems corresponds to Hilbert spaces with sizes ranging from $10^{28}$ (for thiophene) to $10^{36}$ (for benzene). In addition to CIPSI, the performance and convergence properties of several series of methods are investigated. In particular, we study i) the MP perturbation series up to fifth-order (MP2, MP3, MP4, and MP5), ii) the CC2, CC3, and CC4 approximate series, and ii) the ``complete'' CC series up to quadruples (\ie, CCSD, CCSDT, and CCSDTQ). The performance of the ground-state gold standard CCSD(T) is also investigated. @@ -123,19 +123,30 @@ The performance of the ground-state gold standard CCSD(T) is also investigated. %%%%%%%%%%%%%%%%%%%%%%%%% \section{Computational details} %%%%%%%%%%%%%%%%%%%%%%%%% -The geometries of the twelve systems considered in the present study have been all obtained at the CC3/aug-cc-pVTZ level of geometry and have been extracted from a previous study. \cite{Loos_2020a} -The MP2, MP3, MP4, CC2, CC3, CC4, CCSD, CCSDT, and CCSDTQ calculations have been performed with Cfour, \cite{cfour} while the CCSD(T) and MP5 calculations have been performed in Gaussian 09. \cite{g09} +The geometries of the twelve systems considered in the present study have been all obtained at the CC3/aug-cc-pVTZ level of theory and have been extracted from a previous study. \cite{Loos_2020a} +Note that, for the sake of consistency, the geometry of benzene considered here is different from one of Ref.~\onlinecite{Loos_2020e} which has been computed at a lower level of theory [MP2/6-31G(d)]. \cite{Schreiber_2008} +The MP2, MP3, MP4, CC2, CC3, CC4, CCSD, CCSDT, and CCSDTQ calculations have been performed with CFOUR, \cite{Matthews_2020} while the CCSD(T) and MP5 calculations have been computed with Gaussian 09. \cite{g09} +The CIPSI calculations have been performed with {\QP}. \cite{Garniron_2019} +The particularity of the current implementation is that the selection step and the PT2 correction are computed \textit{simultaneously} via a hybrid semistochastic algorithm \cite{Garniron_2017,Garniron_2019} (which explains the statistical error associated with the PT2 correction in the following). +Moreover, a renormalized version of the PT2 correction (dubbed rPT2 below) has been recently implemented and tested for a more efficient extrapolation to the FCI limit thanks to a partial resummation of the higher-order of perturbation. \cite{Garniron_2019} +We refer the interested reader to Ref.~\onlinecite{Garniron_2019} where one can find all the details regarding the implementation of the rPT2 correction and the CIPSI algorithm. For all these calculations, we consider Dunning's correlation-consistent double-$\zeta$ basis (cc-pVDZ) which consists of Hilbert space sizes ranging from $10^{20}$ (for thiophene) to $10^{36}$ (for benzene). -We follow our usual procedure \cite{Scemama_2018,Scemama_2018b,Scemama_2019,Loos_2018a,Loos_2019,Loos_2020a,Loos_2020b,Loos_2020c} by performing a preliminary SCI calculation using Hartree-Fock orbitals in order to generate a SCI wave function with at least $10^7$ determinants. -Natural orbitals are then computed based on this wave function, and a second run is performed with localized orbitals. -This has the advantage to produce a smoother and faster convergence of the SCI energy toward the FCI limit by taking benefit of the local character of electron correlation.\cite{Angeli_2003,Angeli_2009,BenAmor_2011,Suaud_2017,Chien_2018,Eriksen_2020} -The Boys-Foster localization procedure \cite{Boys_1960} that we apply to the natural orbitals is performed in several orbital windows: i) core, ii) valence $\sigma$, iii) valence $\pi$, iv) valence $\pi^*$, v) valence $\sigma^*$, vi) the higher-lying $\sigma$ orbitals, and vii) the higher-lying $\pi$ orbitals. -Like Pipek-Mezey, \cite{Pipek_1989} this choice of orbital windows allows to preserve a strict $\sigma$-$\pi$ separation in planar systems like benzene. + +Although the FCI energy has the enjoyable property of being independent of the set of one-electron orbitals used to construct the many-electron Slater determinants, as a truncated CI method, the convergence properties of CIPSI strongly dependent on this orbital choice. +In the present study, we investigate the convergence behavior of the CIPSI energy for four distinct sets: HF orbitals, natural orbitals (NOs), localized orbitals (LOs), and optimized orbitals (OOs). +Following our usual procedure, \cite{Scemama_2018,Scemama_2018b,Scemama_2019,Loos_2018a,Loos_2019,Loos_2020a,Loos_2020b,Loos_2020c,Loos_2020e} we perform first a preliminary SCI calculation using HF orbitals in order to generate a SCI wave function with at least $10^7$ determinants. +Then, natural orbitals (NOs) are computed based on this wave function, and subsequently localized orbitals. +The Boys-Foster localization procedure \cite{Boys_1960} that we apply to the natural orbitals is performed in several orbital windows: \titou{i) core, ii) valence $\sigma$, iii) valence $\pi$, iv) valence $\pi^*$, v) valence $\sigma^*$, vi) the higher-lying $\sigma$ orbitals, and vii) the higher-lying $\pi$ orbitals.} +Like Pipek-Mezey, \cite{Pipek_1989} this choice of orbital windows allows to preserve a strict $\sigma$-$\pi$ separation in planar systems like the ones considered here. +Because they take advantage of the local character of electron correlation, localized orbitals have been shown to provide faster convergence towards the FCI limit compared to natural orbitals. \cite{Angeli_2003,Angeli_2009,BenAmor_2011,Suaud_2017,Chien_2018,Eriksen_2020,Loos_2020e} +Using these localized orbitals as starting point, we also perform successive orbital optimizations, which consist in minimizing the variational CIPSI energy at each iteration up to approximately $2 \times 10^5$ determinants. +When convergence is achieved in terms of orbital optimization, as our ``production'' run, we perform a new CIPSI calculation from scratch using this set of optimized orbitals. +As we shall see below, employing optimized orbitals has the advantage to produce a smoother and faster convergence of the SCI energy toward the FCI limit. The total SCI energy is defined as the sum of the variational energy $E_\text{var.}$ (computed via diagonalization of the CI matrix in the reference space) and a second-order perturbative correction $E_\text{(r)PT2}$ which takes into account the external determinants, \ie, the determinants which do not belong to the variational space but are linked to the reference space via a nonzero matrix element. The magnitude of $E_\text{(r)PT2}$ provides a qualitative idea of the ``distance'' to the FCI limit. We then linearly extrapolate the total SCI energy to $E_\text{(r)PT2} = 0$ (which effectively corresponds to the FCI limit). -Note that, unlike excited-state calculations where it is important to enforce that the wave functions are eigenfunctions of the $\Hat{S}^2$ spin operator, \cite{Applencourt_2018} the present wave functions do not fulfil this property as we aim for the lowest possible energy of a singlet state. +Note that, unlike excited-state calculations where it is important to enforce that the wave functions are eigenfunctions of the $\Hat{S}^2$ spin operator, \cite{Chilkuri_2021} the present wave functions do not fulfil this property as we aim for the lowest possible energy of a singlet state. We have found that $\expval*{\Hat{S}^2}$ is, nonetheless, very close to zero for each system. @@ -211,7 +222,7 @@ We have found that $\expval*{\Hat{S}^2}$ is, nonetheless, very close to zero for \section{Conclusion} \begin{acknowledgements} -This work was performed using HPC resources from GENCI-TGCC (2020-gen1738) and from CALMIP (Toulouse) under allocation 2020-18005. +This work was performed using HPC resources from GENCI-TGCC (2020-gen1738) and from CALMIP (Toulouse) under allocation 2021-18005. PFL, AS, and MC have received funding from the European Research Council (ERC) under the European Union's Horizon 2020 research and innovation programme (Grant agreement No.~863481). \end{acknowledgements}