This repo shall contain all the content for my senior year at La Salle College Prep.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
highschool-senior/pre-calc/LawOfCosines.nb

1320 lines
45 KiB

(* Content-type: application/vnd.wolfram.mathematica *)
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
(* CreatedBy='Mathematica 12.3' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 158, 7]
NotebookDataLength[ 45503, 1311]
NotebookOptionsPosition[ 32626, 1070]
NotebookOutlinePosition[ 33018, 1086]
CellTagsIndexPosition[ 32975, 1083]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"10", "^", "2"}], "+",
RowBox[{"12", "^", "2"}], "-",
RowBox[{"2", "*", "10", "*", "12",
RowBox[{"Cos", "[",
RowBox[{"62", "Degree"}], "]"}]}]}]], "Input",
CellChangeTimes->{{3.858090136981884*^9, 3.8580901577810707`*^9}},
CellLabel->"In[10]:=",ExpressionUUID->"3e0012bc-484c-40e8-9c83-903632f74560"],
Cell[BoxData[
RowBox[{"244", "-",
RowBox[{"240", " ",
RowBox[{"Sin", "[",
RowBox[{"28", " ", "\[Degree]"}], "]"}]}]}]], "Output",
CellChangeTimes->{3.8580901582746162`*^9},
CellLabel->"Out[10]=",ExpressionUUID->"4b58da65-d06e-4cf7-886c-bdc52a33a730"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
RowBox[{"244", "-",
RowBox[{"240", " ",
RowBox[{"Sin", "[",
RowBox[{"28", " ", "\[Degree]"}], "]"}]}]}], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[11]:=",ExpressionUUID->"2a24c1b6-53d4-49ac-a797-3d47c3d06165"],
Cell[BoxData["131.32682493138623`"], "Output",
CellChangeTimes->{3.858090161562478*^9},
CellLabel->"Out[11]=",ExpressionUUID->"ec613603-7570-44ad-9dbe-4af2aabc7dbd"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"10", "^", "2"}], "+",
RowBox[{"12", "^", "2"}], "-",
RowBox[{"2", "*", "10", "*", "12",
RowBox[{"Cos", "[",
RowBox[{"62", "Degree"}], "]"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.8580901745009937`*^9, 3.858090176579502*^9}},
CellLabel->"In[12]:=",ExpressionUUID->"534f5cbd-245b-416c-a9a1-5992e36665b7"],
Cell[BoxData[
SqrtBox[
RowBox[{"244", "-",
RowBox[{"240", " ",
RowBox[{"Sin", "[",
RowBox[{"28", " ", "\[Degree]"}], "]"}]}]}]]], "Output",
CellChangeTimes->{3.8580901771670523`*^9},
CellLabel->"Out[12]=",ExpressionUUID->"01dc065d-1063-4cd2-90b1-693f66a848c4"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
SqrtBox[
RowBox[{"244", "-",
RowBox[{"240", " ",
RowBox[{"Sin", "[",
RowBox[{"28", " ", "\[Degree]"}], "]"}]}]}]], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[13]:=",ExpressionUUID->"4f0e463b-82d3-4532-ada1-b521f9d4d9ef"],
Cell[BoxData["11.459791661779294`"], "Output",
CellChangeTimes->{3.858090179263216*^9},
CellLabel->"Out[13]=",ExpressionUUID->"7381b367-d7af-4b47-950c-3716f5a52c7b"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"8", "^", "2"}], "+",
RowBox[{"12", "^", "2"}], "-",
RowBox[{"2", "*", "8", "*", "12",
RowBox[{"Cos", "[",
RowBox[{"34", "Degree"}], "]"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.8580904243487167`*^9, 3.858090450797576*^9}},
CellLabel->"In[14]:=",ExpressionUUID->"9885dc61-80e4-4122-ac54-951dcc15a6ee"],
Cell[BoxData[
SqrtBox[
RowBox[{"208", "-",
RowBox[{"192", " ",
RowBox[{"Cos", "[",
RowBox[{"34", " ", "\[Degree]"}], "]"}]}]}]]], "Output",
CellChangeTimes->{3.858090451916285*^9},
CellLabel->"Out[14]=",ExpressionUUID->"5694346c-ac10-44d6-962b-cac08e412ece"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
SqrtBox[
RowBox[{"208", "-",
RowBox[{"192", " ",
RowBox[{"Cos", "[",
RowBox[{"34", " ", "\[Degree]"}], "]"}]}]}]], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[15]:=",ExpressionUUID->"812ee415-fe78-4082-bf59-55e1be0223b3"],
Cell[BoxData["6.987473511179274`"], "Output",
CellChangeTimes->{3.858090454370968*^9},
CellLabel->"Out[15]=",ExpressionUUID->"1aa29a96-5f30-4782-b859-24d9889ecc3c"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox[
RowBox[{
RowBox[{"11", "^", "2"}], "+",
RowBox[{"10", "^", "2"}], "-",
RowBox[{"9", "^", "2"}]}],
RowBox[{"2", "*", "11", "*", "10"}]], "]"}]], "Input",
CellChangeTimes->{{3.858090576924014*^9, 3.8580906164390182`*^9}, {
3.85809086944489*^9, 3.858090869987911*^9}},
CellLabel->"In[20]:=",ExpressionUUID->"68560d09-0e31-4f53-9bdd-39d8802e3415"],
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox["7", "11"], "]"}]], "Output",
CellChangeTimes->{3.8580906170994368`*^9, 3.858090871006152*^9},
CellLabel->"Out[20]=",ExpressionUUID->"d8b27107-1b22-4ff1-b3f7-f8cdc0b3a3b0"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
FractionBox[
RowBox[{"ArcCos", "[",
FractionBox["7", "11"], "]"}], "\[Degree]"], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[21]:=",ExpressionUUID->"e925ab6b-75e0-4ffd-a1cb-1d38fb4a6191"],
Cell[BoxData["50.47880364135783`"], "Output",
CellChangeTimes->{3.8580908733938513`*^9},
CellLabel->"Out[21]=",ExpressionUUID->"13bbcd4f-671f-47ee-907c-1dc0e05a2778"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
FractionBox[
RowBox[{"ArcCos", "[",
FractionBox["163", "220"], "]"}], "\[Degree]"], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[17]:=",ExpressionUUID->"0c65cad8-6205-4cd1-afbf-b23b0754ef01"],
Cell[BoxData["42.1910861530405`"], "Output",
CellChangeTimes->{3.858090625047518*^9},
CellLabel->"Out[17]=",ExpressionUUID->"d5fc59bc-6d3b-407c-a8d8-2098d576f064"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox[
RowBox[{
RowBox[{"11", "^", "2"}], "+",
RowBox[{"20", "^", "2"}], "-",
RowBox[{"7", "^", "2"}]}],
RowBox[{"2", "*", "11", "*", "20"}]], "]"}]], "Input",
CellChangeTimes->{{3.858090685131418*^9, 3.858090727620473*^9}},
CellLabel->"In[18]:=",ExpressionUUID->"8c5f374a-d1ce-4be4-8192-483b3b385d8d"],
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox["59", "55"], "]"}]], "Output",
CellChangeTimes->{3.858090728457954*^9},
CellLabel->"Out[18]=",ExpressionUUID->"21a431b9-7030-412d-a318-d26112c2fef2"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
FractionBox[
RowBox[{"ArcCos", "[",
FractionBox["59", "55"], "]"}], "\[Degree]"], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[19]:=",ExpressionUUID->"1cbda346-6949-4b90-a3a7-74561ee3da2a"],
Cell[BoxData[
RowBox[{"0.`", "\[VeryThinSpace]", "+",
RowBox[{"21.721439388127784`", " ", "\[ImaginaryI]"}]}]], "Output",
CellChangeTimes->{3.8580907317609673`*^9},
CellLabel->"Out[19]=",ExpressionUUID->"a6297b91-77c8-48cc-ab01-a922aada29d9"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox[
RowBox[{
RowBox[{"29", "^", "2"}], "+",
RowBox[{"50", "^", "2"}], "-",
RowBox[{"44", "^", "2"}]}],
RowBox[{"2", "*", "29", "*", "50"}]], "]"}]], "Input",
CellChangeTimes->{{3.858090978652596*^9,
3.8580910065217457`*^9}},ExpressionUUID->"d55babfa-2f65-4c59-896c-\
ced72bc3b832"],
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox["281", "580"], "]"}]], "Output",
CellChangeTimes->{3.858091001677544*^9},
CellLabel->"Out[22]=",ExpressionUUID->"8c15aafd-c3b1-4c47-874d-46e69474d73d"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
FractionBox[
RowBox[{"ArcCos", "[",
FractionBox[
RowBox[{
RowBox[{"29", "^", "2"}], "+",
RowBox[{"50", "^", "2"}], "-",
RowBox[{"44", "^", "2"}]}],
RowBox[{"2", "*", "29", "*", "50"}]], "]"}], "Degree"], "]"}]], "Input",
CellChangeTimes->{{3.858091008450304*^9, 3.858091017877679*^9}},
CellLabel->"In[23]:=",ExpressionUUID->"b7327f27-629b-471d-a1e6-dcbaae046a38"],
Cell[BoxData["61.021410279845824`"], "Output",
CellChangeTimes->{3.8580910182870607`*^9},
CellLabel->"Out[23]=",ExpressionUUID->"7c06440d-d162-40be-8f67-412ec3e28b41"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
FractionBox[
RowBox[{"ArcCos", "[",
FractionBox[
RowBox[{
RowBox[{"29", "^", "2"}], "+",
RowBox[{"44", "^", "2"}], "-",
RowBox[{"50", "^", "2"}]}],
RowBox[{"2", "*", "29", "*", "44"}]], "]"}], "Degree"], "]"}]], "Input",
CellChangeTimes->{{3.85809106090598*^9, 3.85809106530221*^9}},
CellLabel->"In[24]:=",ExpressionUUID->"ff239d30-8ec9-4201-be26-d8f104e87d1b"],
Cell[BoxData["83.768706490539`"], "Output",
CellChangeTimes->{3.8580910669840307`*^9},
CellLabel->"Out[24]=",ExpressionUUID->"1b29894f-df1e-4c59-a4b1-b01201e59304"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
FractionBox[
RowBox[{"ArcCos", "[",
FractionBox[
RowBox[{
RowBox[{"44", "^", "2"}], "+",
RowBox[{"50", "^", "2"}], "-",
RowBox[{"29", "^", "2"}]}],
RowBox[{"2", "*", "44", "*", "50"}]], "]"}], "Degree"], "]"}]], "Input",
CellChangeTimes->{{3.858091141017171*^9, 3.858091146584461*^9}},
CellLabel->"In[25]:=",ExpressionUUID->"c99ba440-b0a2-4de9-899d-db28055047b4"],
Cell[BoxData["35.20988322961519`"], "Output",
CellChangeTimes->{3.858091148190857*^9},
CellLabel->"Out[25]=",ExpressionUUID->"faad8780-f86e-4aa0-9ebc-f1c2d64a273f"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
FractionBox["1", "2"], "*", "400", "*", "357", "*",
RowBox[{"Sin", "[",
RowBox[{"35", "Degree"}], "]"}]}]], "Input",
CellChangeTimes->{{3.858091233587574*^9, 3.858091251613309*^9}},
CellLabel->"In[26]:=",ExpressionUUID->"206b1e1f-8758-497a-8c87-2d1b69b28e4d"],
Cell[BoxData[
RowBox[{"71400", " ",
RowBox[{"Sin", "[",
RowBox[{"35", " ", "\[Degree]"}], "]"}]}]], "Output",
CellChangeTimes->{3.858091252300457*^9},
CellLabel->"Out[26]=",ExpressionUUID->"58ee9769-3419-4cd3-a28c-d64ac58ab17e"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
RowBox[{"71400", " ",
RowBox[{"Sin", "[",
RowBox[{"35", " ", "\[Degree]"}], "]"}]}], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[27]:=",ExpressionUUID->"901d0fc8-bc49-4294-804a-775a257006ce"],
Cell[BoxData["40953.35755546469`"], "Output",
CellChangeTimes->{3.858091259083362*^9},
CellLabel->"Out[27]=",ExpressionUUID->"1c802569-f9f2-4a21-9689-e34d272445ec"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Sqrt", "[",
RowBox[{
FractionBox[
RowBox[{"80", "+", "43", "+", "117"}], "2"], "*",
RowBox[{"(",
RowBox[{
FractionBox[
RowBox[{"80", "+", "43", "+", "117"}], "2"], "-", "80"}], ")"}], "*",
RowBox[{"(",
RowBox[{
FractionBox[
RowBox[{"80", "+", "43", "+", "117"}], "2"], "-", "43"}], ")"}], "*",
RowBox[{"(",
RowBox[{
FractionBox[
RowBox[{"80", "+", "43", "+", "117"}], "2"], "-", "117"}], ")"}]}],
"]"}]], "Input",
CellChangeTimes->{{3.858091323622397*^9, 3.8580913873421297`*^9}},
CellLabel->"In[28]:=",ExpressionUUID->"f23c6227-f81c-43cd-84e8-80c85c4a9181"],
Cell[BoxData[
RowBox[{"120", " ",
SqrtBox["77"]}]], "Output",
CellChangeTimes->{3.8580913893065147`*^9},
CellLabel->"Out[28]=",ExpressionUUID->"1c2a621f-2acd-46af-9e88-2f66ba3d02b3"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
RowBox[{"120", " ",
SqrtBox["77"]}], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[29]:=",ExpressionUUID->"48bb8197-bcd3-4733-be85-ee37cb58df76"],
Cell[BoxData["1052.9957264870548`"], "Output",
CellChangeTimes->{3.858091403335595*^9},
CellLabel->"Out[29]=",ExpressionUUID->"78ff4ec1-8b51-4ed6-a593-9105c6eacee5"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Sqrt", "[",
RowBox[{
FractionBox[
RowBox[{"80", "+", "80", "+", "80"}], "2"], "*",
RowBox[{"(",
RowBox[{
FractionBox[
RowBox[{"80", "+", "80", "+", "80"}], "2"], "-", "80"}], ")"}], "*",
RowBox[{"(",
RowBox[{
FractionBox[
RowBox[{"80", "+", "80", "+", "80"}], "2"], "-", "80"}], ")"}], "*",
RowBox[{"(",
RowBox[{
FractionBox[
RowBox[{"80", "+", "43", "+", "80"}], "2"], "-", "80"}], ")"}]}],
"]"}]], "Input",
CellChangeTimes->{{3.858091458182886*^9, 3.858091477260433*^9}},
CellLabel->"In[30]:=",ExpressionUUID->"ef5f053f-b1e9-4e4b-a8d7-d76df6737103"],
Cell[BoxData[
RowBox[{"80", " ",
SqrtBox["645"]}]], "Output",
CellChangeTimes->{3.858091478605308*^9},
CellLabel->"Out[30]=",ExpressionUUID->"f0077cb6-a9d8-4a3a-97c6-8df878c647d4"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
RowBox[{"80", " ",
SqrtBox["645"]}], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[31]:=",ExpressionUUID->"eedda7c4-fdb4-4e3e-8fc2-b99cb0d1c8c3"],
Cell[BoxData["2031.748015872047`"], "Output",
CellChangeTimes->{3.858091480773704*^9},
CellLabel->"Out[31]=",ExpressionUUID->"02de70c7-dde7-4cb3-be8c-602dff83f250"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox[
RowBox[{
RowBox[{"19", "^", "2"}], "+",
RowBox[{"24", "^", "2"}], "-",
RowBox[{"27", "^", "2"}]}],
RowBox[{"2", "*", "19", "*", "24"}]], "]"}]], "Input",
CellChangeTimes->{{3.858110845165956*^9, 3.8581108695715723`*^9}},
CellLabel->"In[1]:=",ExpressionUUID->"781a4980-8190-4b93-8927-e2c81e4c3de7"],
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox["13", "57"], "]"}]], "Output",
CellChangeTimes->{3.858110870338716*^9},
CellLabel->"Out[1]=",ExpressionUUID->"4e5d9359-33cf-4ba4-bf9c-83cb7dc38721"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
FractionBox[
RowBox[{"ArcCos", "[",
FractionBox["13", "57"], "]"}], "\[Degree]"], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[2]:=",ExpressionUUID->"dc8f416e-bc87-4380-b71e-bf50dd5de9ba"],
Cell[BoxData["76.81651851377968`"], "Output",
CellChangeTimes->{3.858110872099329*^9},
CellLabel->"Out[2]=",ExpressionUUID->"186f3802-f4ed-44d6-8387-10a38a6c15c9"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox[
RowBox[{
RowBox[{"27", "^", "2"}], "+",
RowBox[{"24", "^", "2"}], "-",
RowBox[{"19", "^", "2"}]}],
RowBox[{"2", "*", "27", "*", "24"}]], "]"}]], "Input",
CellChangeTimes->{{3.858110919608917*^9, 3.858110925258649*^9}},
CellLabel->"In[3]:=",ExpressionUUID->"b1502f3c-4181-4079-af1c-288bbe84b435"],
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox["59", "81"], "]"}]], "Output",
CellChangeTimes->{3.858111039984002*^9},
CellLabel->"Out[3]=",ExpressionUUID->"7a06377f-515b-4eb8-8169-34e39fcab69a"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
FractionBox[
RowBox[{"ArcCos", "[",
FractionBox["59", "81"], "]"}], "\[Degree]"], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[4]:=",ExpressionUUID->"e43918fe-67b3-4373-bc21-289ef3ba8744"],
Cell[BoxData["43.24798537483548`"], "Output",
CellChangeTimes->{3.858111041172099*^9},
CellLabel->"Out[4]=",ExpressionUUID->"01550f4c-d519-42e3-b47d-262bb3e3b5f5"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox[
RowBox[{
RowBox[{"19", "^", "2"}], "+",
RowBox[{"27", "^", "2"}], "-",
RowBox[{"24", "^", "2"}]}],
RowBox[{"2", "*", "19", "*", "27"}]], "]"}]], "Input",
CellChangeTimes->{{3.858111098826696*^9, 3.858111103130219*^9}},
CellLabel->"In[5]:=",ExpressionUUID->"d03197f6-b389-45c3-b4ce-8e8bd86dedc6"],
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox["257", "513"], "]"}]], "Output",
CellChangeTimes->{3.858111105821973*^9},
CellLabel->"Out[5]=",ExpressionUUID->"b877f878-9a1d-451b-ab42-5eb8e7d96ebd"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
FractionBox[
RowBox[{"ArcCos", "[",
FractionBox["257", "513"], "]"}], "\[Degree]"], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[6]:=",ExpressionUUID->"28e3df34-2b11-44d6-8537-ea25a7b38189"],
Cell[BoxData["59.935496111384836`"], "Output",
CellChangeTimes->{3.8581111084816017`*^9},
CellLabel->"Out[6]=",ExpressionUUID->"ed97e960-604e-487b-8161-3075ac41eec4"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"22", "^", "2"}], "+",
RowBox[{"31", "^", "2"}]}], "==",
RowBox[{"x", "^", "2"}]}]], "Input",
CellChangeTimes->{{3.858111190153947*^9, 3.858111204266012*^9}},
CellLabel->"In[7]:=",ExpressionUUID->"9a67ed90-4ed3-405a-bb3e-6ea48d56bbc7"],
Cell[BoxData[
RowBox[{"1445", "\[Equal]",
SuperscriptBox["x", "2"]}]], "Output",
CellChangeTimes->{3.858111205252594*^9},
CellLabel->"Out[7]=",ExpressionUUID->"4bcb8078-78ef-430d-90ab-2c61444faff1"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Sqrt", "[", "1445", "]"}]], "Input",
CellChangeTimes->{{3.858111210317175*^9, 3.858111215052225*^9}},
CellLabel->"In[8]:=",ExpressionUUID->"0bef9ee5-fe09-41c1-993a-ad3ad85e7532"],
Cell[BoxData[
RowBox[{"17", " ",
SqrtBox["5"]}]], "Output",
CellChangeTimes->{3.8581112154657993`*^9},
CellLabel->"Out[8]=",ExpressionUUID->"12f83800-a700-4605-adc5-b99b500a50b9"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
RowBox[{"17", " ",
SqrtBox["5"]}], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[9]:=",ExpressionUUID->"ce86ff36-bd47-4009-a24f-b6a4351d3409"],
Cell[BoxData["38.01315561749642`"], "Output",
CellChangeTimes->{3.858111221180932*^9},
CellLabel->"Out[9]=",ExpressionUUID->"ccc233c2-e491-480b-aec8-33fa9e5249f7"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"22", "^", "2"}], "+",
RowBox[{"31", "^", "2"}], "-",
RowBox[{"2", "*", "22", "*", "31",
RowBox[{"Cos", "[",
RowBox[{"82", "Degree"}], "]"}]}]}]], "Input",
CellChangeTimes->{{3.858111337155507*^9, 3.8581113564021597`*^9}},
CellLabel->"In[10]:=",ExpressionUUID->"4895f04e-f867-434e-bbc1-deedf8e35815"],
Cell[BoxData[
RowBox[{"1445", "-",
RowBox[{"1364", " ",
RowBox[{"Sin", "[",
RowBox[{"8", " ", "\[Degree]"}], "]"}]}]}]], "Output",
CellChangeTimes->{3.858111357211121*^9},
CellLabel->"Out[10]=",ExpressionUUID->"bc5e2390-0a20-4d0d-9f97-a632e7541c65"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
RowBox[{"1445", "-",
RowBox[{"1364", " ",
RowBox[{"Sin", "[",
RowBox[{"8", " ", "\[Degree]"}], "]"}]}]}], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[11]:=",ExpressionUUID->"665871fc-7726-4092-b156-5056ac5e2df0"],
Cell[BoxData["1255.1678902904707`"], "Output",
CellChangeTimes->{3.8581113595554934`*^9},
CellLabel->"Out[11]=",ExpressionUUID->"ae68522e-ff01-4261-9102-5b2dce588279"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
RowBox[{
RowBox[{"22", "^", "2"}], "+",
RowBox[{"31", "^", "2"}], "-",
RowBox[{"2", "*", "22", "*", "31",
RowBox[{"Cos", "[",
RowBox[{"82", "Degree"}], "]"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.858111446771941*^9, 3.858111448166809*^9}},
CellLabel->"In[12]:=",ExpressionUUID->"d3998a55-11b4-4694-b6c2-f4b8d64d57e2"],
Cell[BoxData["1255.1678902904707`"], "Output",
CellChangeTimes->{3.858111448518186*^9},
CellLabel->"Out[12]=",ExpressionUUID->"d8135497-c166-4b7a-8144-0a1c84de45bb"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"22", "^", "2"}], "+",
RowBox[{"31", "^", "2"}], "-",
RowBox[{"2", "*", "22", "*", "31",
RowBox[{"Cos", "[",
RowBox[{"82", "Degree"}], "]"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.858111503891095*^9, 3.8581115076218863`*^9}},
CellLabel->"In[13]:=",ExpressionUUID->"ab0727e7-af5a-4f4c-97b0-ff1827af9d82"],
Cell[BoxData[
SqrtBox[
RowBox[{"1445", "-",
RowBox[{"1364", " ",
RowBox[{"Sin", "[",
RowBox[{"8", " ", "\[Degree]"}], "]"}]}]}]]], "Output",
CellChangeTimes->{3.858111508072508*^9},
CellLabel->"Out[13]=",ExpressionUUID->"dea98758-c3f8-4c71-a6ed-39a5653221b8"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
SqrtBox[
RowBox[{"1445", "-",
RowBox[{"1364", " ",
RowBox[{"Sin", "[",
RowBox[{"8", " ", "\[Degree]"}], "]"}]}]}]], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[14]:=",ExpressionUUID->"ff4445f9-6db8-48cc-9da0-7b782852d9bd"],
Cell[BoxData["35.428348681394546`"], "Output",
CellChangeTimes->{3.8581115110213223`*^9},
CellLabel->"Out[14]=",ExpressionUUID->"4f0d4b23-b1c1-4321-836a-20c6ab6ea6e4"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArcSin", "[",
FractionBox[
RowBox[{"22",
RowBox[{"Sin", "[",
RowBox[{"82", "Degree"}], "]"}]}], "35.42"], "]"}]], "Input",
CellChangeTimes->{{3.858111639540501*^9, 3.858111659061742*^9}},
CellLabel->"In[15]:=",ExpressionUUID->"93cbcc0d-67b5-46d7-9c26-545c4a8752ef"],
Cell[BoxData["0.6624789719055788`"], "Output",
CellChangeTimes->{3.858111659522942*^9},
CellLabel->"Out[15]=",ExpressionUUID->"9517590a-5b59-4529-a2d6-e0dfe0fdacc8"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
FractionBox[
RowBox[{"Sin", "[",
RowBox[{"82", "Degree"}], "]"}], "35.42"], "==",
FractionBox[
RowBox[{"Sin", "[",
RowBox[{"x", " ", "Degree"}], "]"}], "22"]}]], "Input",
CellChangeTimes->{{3.858111673440379*^9, 3.858111721001575*^9}},
CellLabel->"In[16]:=",ExpressionUUID->"62d2e725-cc5a-4a21-8de9-e3141f0ed77a"],
Cell[BoxData[
RowBox[{"0.027957878846458787`", "\[Equal]",
RowBox[{
FractionBox["1", "22"], " ",
RowBox[{"Sin", "[",
RowBox[{"\[Degree]", " ", "x"}], "]"}]}]}]], "Output",
CellChangeTimes->{3.858111725481679*^9},
CellLabel->"Out[16]=",ExpressionUUID->"8269e5a5-0334-4f4a-9b07-6f292f9c3f7d"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
FractionBox[
RowBox[{"ArcCos", "[",
FractionBox[
RowBox[{
RowBox[{"12", "^", "2"}], "+",
RowBox[{"23", "^", "2"}], "-",
RowBox[{"9.8", "^", "2"}]}],
RowBox[{"2", "*", "12", "*", "23"}]], "]"}], "Degree"], "]"}]], "Input",
CellChangeTimes->{{3.858111869821528*^9, 3.858111903191125*^9}},
CellLabel->"In[18]:=",ExpressionUUID->"f48bee69-7236-46ad-8352-602387dfb8a7"],
Cell[BoxData[
RowBox[{"0.`", "\[VeryThinSpace]", "+",
RowBox[{"17.165928901973462`", " ", "\[ImaginaryI]"}]}]], "Output",
CellChangeTimes->{3.858111904203109*^9},
CellLabel->"Out[18]=",ExpressionUUID->"b66b7ef9-754f-4c20-a9ce-4fc3bda7581f"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArcSin", "[",
FractionBox[
RowBox[{"8.5",
RowBox[{"Sin", "[",
RowBox[{"75", "Degree"}], "]"}]}], "9.3"], "]"}]], "Input",
CellChangeTimes->{{3.858111980051104*^9, 3.858112009232244*^9}},
CellLabel->"In[19]:=",ExpressionUUID->"cb691b12-224a-4a4c-97aa-a632146bd1fd"],
Cell[BoxData["1.081865282485764`"], "Output",
CellChangeTimes->{3.858112023365707*^9},
CellLabel->"Out[19]=",ExpressionUUID->"d1db8ecb-a4d9-44ca-b949-3146170f2ede"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"180", "-", "71", "-", "1.08"}]], "Input",
CellChangeTimes->{{3.858112164609761*^9, 3.858112170091173*^9}},
CellLabel->"In[20]:=",ExpressionUUID->"6b23efdc-9f9a-4c47-a7b7-f0cd00075068"],
Cell[BoxData["107.92`"], "Output",
CellChangeTimes->{3.8581121707136717`*^9},
CellLabel->"Out[20]=",ExpressionUUID->"8798e2f4-0b40-4932-b791-69f799f42776"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
FractionBox[
RowBox[{"9.3",
RowBox[{"Sin", "[",
RowBox[{"107.92", "Degree"}], "]"}]}],
RowBox[{"Sin", "[",
RowBox[{"71", "Degree"}], "]"}]]], "Input",
CellChangeTimes->{{3.858112855422649*^9, 3.858112875097616*^9}},
CellLabel->"In[21]:=",ExpressionUUID->"72a86536-c069-4959-a018-855a19f4e090"],
Cell[BoxData["9.358705232972921`"], "Output",
CellChangeTimes->{3.8581128756215763`*^9},
CellLabel->"Out[21]=",ExpressionUUID->"e76f9d54-8fa3-44f3-bf30-54cdb574b141"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"14", "^", "2"}], "+",
RowBox[{"21", "^", "2"}], "-",
RowBox[{"2", "*", "14", "*", "21",
RowBox[{"Cos", "[",
RowBox[{"52", "Degree"}], "]"}]}]}]], "Input",
CellChangeTimes->{{3.8581133889083652`*^9, 3.858113412514578*^9}},
CellLabel->"In[22]:=",ExpressionUUID->"6de994f0-e6ed-41e7-bbb3-6ad175151907"],
Cell[BoxData[
RowBox[{"637", "-",
RowBox[{"588", " ",
RowBox[{"Sin", "[",
RowBox[{"38", " ", "\[Degree]"}], "]"}]}]}]], "Output",
CellChangeTimes->{3.858113413854439*^9},
CellLabel->"Out[22]=",ExpressionUUID->"6b931bc6-14a3-4548-bd46-6956eb50cd6b"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
RowBox[{"637", "-",
RowBox[{"588", " ",
RowBox[{"Sin", "[",
RowBox[{"38", " ", "\[Degree]"}], "]"}]}]}], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[24]:=",ExpressionUUID->"eb9aa835-2d9a-438c-ad98-6e5a82359680"],
Cell[BoxData["274.99105250851295`"], "Output",
CellChangeTimes->{3.858113438901539*^9},
CellLabel->"Out[24]=",ExpressionUUID->"a53646e7-9b99-4017-ad93-164fc5df8788"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"14", "^", "2"}], "+",
RowBox[{"21", "^", "2"}], "-",
RowBox[{"2", "*", "14", "*", "21",
RowBox[{"Cos", "[",
RowBox[{"52", "Degree"}], "]"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.858113452434039*^9, 3.858113455706664*^9}},
CellLabel->"In[25]:=",ExpressionUUID->"ccdd54fb-5d04-4610-9655-58e95ce35f2b"],
Cell[BoxData[
SqrtBox[
RowBox[{"637", "-",
RowBox[{"588", " ",
RowBox[{"Sin", "[",
RowBox[{"38", " ", "\[Degree]"}], "]"}]}]}]]], "Output",
CellChangeTimes->{3.8581134562141237`*^9},
CellLabel->"Out[25]=",ExpressionUUID->"ea73d104-2379-4aa3-842d-e918cf43c292"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
SqrtBox[
RowBox[{"637", "-",
RowBox[{"588", " ",
RowBox[{"Sin", "[",
RowBox[{"38", " ", "\[Degree]"}], "]"}]}]}]], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[26]:=",ExpressionUUID->"4d40c1c7-b26b-45be-a7da-a0b5047d32a3"],
Cell[BoxData["16.58285417256369`"], "Output",
CellChangeTimes->{3.858113458753587*^9},
CellLabel->"Out[26]=",ExpressionUUID->"40ef9a71-462b-414a-88d0-1fba20cfc3f2"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox[
RowBox[{
RowBox[{"5", "^", "2"}], "+",
RowBox[{"3", "^", "2"}], "-",
RowBox[{"7", "^", "2"}]}],
RowBox[{"2", "*", "3", "*", "7"}]], "]"}]], "Input",
CellChangeTimes->{{3.8581139812079067`*^9, 3.858114012331716*^9}},
CellLabel->"In[27]:=",ExpressionUUID->"d5b79459-d75e-46de-8a1e-859f8676df9c"],
Cell[BoxData[
RowBox[{"ArcCos", "[",
RowBox[{"-",
FractionBox["5", "14"]}], "]"}]], "Output",
CellChangeTimes->{3.858114012994982*^9},
CellLabel->"Out[27]=",ExpressionUUID->"2a933cb4-905d-44eb-bf43-045c4628430c"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
FractionBox[
RowBox[{"ArcCos", "[",
RowBox[{"-",
FractionBox["5", "14"]}], "]"}], "\[Degree]"], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[28]:=",ExpressionUUID->"42e8d218-34dc-4b49-b275-5749b133fcf8"],
Cell[BoxData["110.92483242763832`"], "Output",
CellChangeTimes->{3.85811406080962*^9},
CellLabel->"Out[28]=",ExpressionUUID->"856153c8-3119-489f-adc4-7b8fa9ec3642"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox[
RowBox[{
RowBox[{"3", "^", "2"}], "+",
RowBox[{"5", "^", "2"}], "-",
RowBox[{"5", "^", "2"}]}],
RowBox[{"2", "*", "3", "*", "7"}]], "]"}]], "Input",
CellChangeTimes->{{3.858114127328188*^9, 3.858114144473805*^9}},
CellLabel->"In[29]:=",ExpressionUUID->"77d81d9d-9e3d-4b39-b2dc-7a011a88c909"],
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox["3", "14"], "]"}]], "Output",
CellChangeTimes->{3.858114146015956*^9},
CellLabel->"Out[29]=",ExpressionUUID->"e33aeee2-3e41-4688-808d-40bc51c76e43"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
FractionBox[
RowBox[{"ArcCos", "[",
FractionBox["3", "14"], "]"}], "\[Degree]"], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[30]:=",ExpressionUUID->"83910bc9-81ed-4421-9fa4-39b47d4c5666"],
Cell[BoxData["77.62637488381145`"], "Output",
CellChangeTimes->{3.8581141473111763`*^9},
CellLabel->"Out[30]=",ExpressionUUID->"436e1572-c312-407a-b5cb-58596db6c561"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox[
RowBox[{
RowBox[{"5", "^", "2"}], "+",
RowBox[{"7", "^", "2"}], "-",
RowBox[{"3", "^", "2"}]}],
RowBox[{"2", "*", "5", "*", "7"}]], "]"}]], "Input",
CellChangeTimes->{{3.858114168678945*^9, 3.858114179378572*^9}},
CellLabel->"In[31]:=",ExpressionUUID->"3cce7a0b-f00d-4cf1-bb93-542dd9cd496f"],
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox["13", "14"], "]"}]], "Output",
CellChangeTimes->{3.858114180645216*^9},
CellLabel->"Out[31]=",ExpressionUUID->"e363a144-810b-41ed-8f4e-6702ae6c7526"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
FractionBox[
RowBox[{"ArcCos", "[",
FractionBox["13", "14"], "]"}], "\[Degree]"], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[32]:=",ExpressionUUID->"68c16cc5-ce47-4ac1-ac5c-934538e6e4b4"],
Cell[BoxData["21.78678929826181`"], "Output",
CellChangeTimes->{3.858114181626195*^9},
CellLabel->"Out[32]=",ExpressionUUID->"60c1656a-703e-4d93-b46c-ebde6cdb6cab"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox[
RowBox[{
RowBox[{"23", "^", "2"}], "+",
RowBox[{"19", "^", "2"}], "-",
RowBox[{"12", "^", "2"}]}],
RowBox[{"2", "*", "23", "*", "19"}]], "]"}]], "Input",
CellChangeTimes->{{3.858116623992415*^9, 3.858116649310433*^9}},
CellLabel->"In[33]:=",ExpressionUUID->"e9346c45-d3f3-47c7-b57d-684086645b4c"],
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox["373", "437"], "]"}]], "Output",
CellChangeTimes->{3.858116649820381*^9},
CellLabel->"Out[33]=",ExpressionUUID->"31745284-7386-4618-9dbc-9b79d2735f2f"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
FractionBox[
RowBox[{"ArcCos", "[",
FractionBox["373", "437"], "]"}], "\[Degree]"], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[34]:=",ExpressionUUID->"3122f56a-523e-43e5-af83-dbd7cdd3822b"],
Cell[BoxData["31.400427400625578`"], "Output",
CellChangeTimes->{3.8581166515347633`*^9},
CellLabel->"Out[34]=",ExpressionUUID->"9f9386de-d00e-43c0-bf0c-d55cec4494d4"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox[
RowBox[{
RowBox[{"12", "^", "2"}], "+",
RowBox[{"23", "^", "2"}], "-",
RowBox[{"19", "^", "2"}]}],
RowBox[{"2", "*", "12", "*", "23"}]], "]"}]], "Input",
CellChangeTimes->{{3.858116667955755*^9, 3.858116689599388*^9}},
CellLabel->"In[35]:=",ExpressionUUID->"989e7975-cc7f-4649-a1e9-7b9636265ea5"],
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox["13", "23"], "]"}]], "Output",
CellChangeTimes->{3.858116690214079*^9},
CellLabel->"Out[35]=",ExpressionUUID->"007b08fb-3708-41dd-87ce-2d30fcc3b41e"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
FractionBox[
RowBox[{"ArcCos", "[",
FractionBox["13", "23"], "]"}], "\[Degree]"], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[36]:=",ExpressionUUID->"ef4de106-e998-4765-ae40-9e10cc5b385d"],
Cell[BoxData["55.582611289558436`"], "Output",
CellChangeTimes->{3.858116692110677*^9},
CellLabel->"Out[36]=",ExpressionUUID->"ae8e1856-0043-4c3e-9ae6-79f22c2c31f9"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArcCos", "[",
FractionBox[
RowBox[{
RowBox[{"19", "^", "2"}], "+",
RowBox[{"12", "^", "2"}], "-",
RowBox[{"23", "^", "2"}]}],
RowBox[{"2", "*", "19", "*", "12"}]], "]"}]], "Input",
CellChangeTimes->{{3.858116703839381*^9, 3.858116748776979*^9}},
CellLabel->"In[37]:=",ExpressionUUID->"eb32315a-86ce-4a83-89ab-f66a142b50ab"],
Cell[BoxData[
RowBox[{"ArcCos", "[",
RowBox[{"-",
FractionBox["1", "19"]}], "]"}]], "Output",
CellChangeTimes->{3.85811674936271*^9},
CellLabel->"Out[37]=",ExpressionUUID->"2165f06b-e234-4f67-9dec-57f267a1bb21"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"N", "[",
FractionBox[
RowBox[{"ArcCos", "[",
RowBox[{"-",
FractionBox["1", "19"]}], "]"}], "\[Degree]"], "]"}]], "Input",
NumberMarks->False,
CellLabel->"In[38]:=",ExpressionUUID->"de85be3a-09b4-49cf-bf41-1283999db20e"],
Cell[BoxData["93.016961309816`"], "Output",
CellChangeTimes->{3.85811675080866*^9},
CellLabel->"Out[38]=",ExpressionUUID->"b511619c-cd5f-43e2-80dd-4107d50b2aee"]
}, Open ]]
},
WindowSize->{755, 785},
WindowMargins->{{182, Automatic}, {Automatic, 0}},
FrontEndVersion->"12.3 for Mac OS X x86 (64-bit) (July 9, 2021)",
StyleDefinitions->"Default.nb",
ExpressionUUID->"70d1bcb0-67a7-40c8-bae3-59ead67f30fb"
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 351, 8, 30, "Input",ExpressionUUID->"3e0012bc-484c-40e8-9c83-903632f74560"],
Cell[934, 32, 265, 6, 34, "Output",ExpressionUUID->"4b58da65-d06e-4cf7-886c-bdc52a33a730"]
}, Open ]],
Cell[CellGroupData[{
Cell[1236, 43, 272, 7, 30, "Input",ExpressionUUID->"2a24c1b6-53d4-49ac-a797-3d47c3d06165"],
Cell[1511, 52, 167, 2, 34, "Output",ExpressionUUID->"ec613603-7570-44ad-9dbe-4af2aabc7dbd"]
}, Open ]],
Cell[CellGroupData[{
Cell[1715, 59, 387, 9, 30, "Input",ExpressionUUID->"534f5cbd-245b-416c-a9a1-5992e36665b7"],
Cell[2105, 70, 280, 7, 35, "Output",ExpressionUUID->"01dc065d-1063-4cd2-90b1-693f66a848c4"]
}, Open ]],
Cell[CellGroupData[{
Cell[2422, 82, 288, 8, 38, "Input",ExpressionUUID->"4f0e463b-82d3-4532-ada1-b521f9d4d9ef"],
Cell[2713, 92, 167, 2, 34, "Output",ExpressionUUID->"7381b367-d7af-4b47-950c-3716f5a52c7b"]
}, Open ]],
Cell[CellGroupData[{
Cell[2917, 99, 385, 9, 30, "Input",ExpressionUUID->"9885dc61-80e4-4122-ac54-951dcc15a6ee"],
Cell[3305, 110, 278, 7, 35, "Output",ExpressionUUID->"5694346c-ac10-44d6-962b-cac08e412ece"]
}, Open ]],
Cell[CellGroupData[{
Cell[3620, 122, 288, 8, 38, "Input",ExpressionUUID->"812ee415-fe78-4082-bf59-55e1be0223b3"],
Cell[3911, 132, 166, 2, 34, "Output",ExpressionUUID->"1aa29a96-5f30-4782-b859-24d9889ecc3c"]
}, Open ]],
Cell[CellGroupData[{
Cell[4114, 139, 422, 10, 48, "Input",ExpressionUUID->"68560d09-0e31-4f53-9bdd-39d8802e3415"],
Cell[4539, 151, 227, 4, 50, "Output",ExpressionUUID->"d8b27107-1b22-4ff1-b3f7-f8cdc0b3a3b0"]
}, Open ]],
Cell[CellGroupData[{
Cell[4803, 160, 241, 6, 50, "Input",ExpressionUUID->"e925ab6b-75e0-4ffd-a1cb-1d38fb4a6191"],
Cell[5047, 168, 168, 2, 34, "Output",ExpressionUUID->"13bbcd4f-671f-47ee-907c-1dc0e05a2778"]
}, Open ]],
Cell[CellGroupData[{
Cell[5252, 175, 244, 6, 50, "Input",ExpressionUUID->"0c65cad8-6205-4cd1-afbf-b23b0754ef01"],
Cell[5499, 183, 165, 2, 34, "Output",ExpressionUUID->"d5fc59bc-6d3b-407c-a8d8-2098d576f064"]
}, Open ]],
Cell[CellGroupData[{
Cell[5701, 190, 372, 9, 48, "Input",ExpressionUUID->"8c5f374a-d1ce-4be4-8192-483b3b385d8d"],
Cell[6076, 201, 204, 4, 51, "Output",ExpressionUUID->"21a431b9-7030-412d-a318-d26112c2fef2"]
}, Open ]],
Cell[CellGroupData[{
Cell[6317, 210, 242, 6, 50, "Input",ExpressionUUID->"1cbda346-6949-4b90-a3a7-74561ee3da2a"],
Cell[6562, 218, 248, 4, 34, "Output",ExpressionUUID->"a6297b91-77c8-48cc-ab01-a922aada29d9"]
}, Open ]],
Cell[CellGroupData[{
Cell[6847, 227, 356, 10, 48, "Input",ExpressionUUID->"d55babfa-2f65-4c59-896c-ced72bc3b832"],
Cell[7206, 239, 206, 4, 51, "Output",ExpressionUUID->"8c15aafd-c3b1-4c47-874d-46e69474d73d"]
}, Open ]],
Cell[CellGroupData[{
Cell[7449, 248, 440, 11, 58, "Input",ExpressionUUID->"b7327f27-629b-471d-a1e6-dcbaae046a38"],
Cell[7892, 261, 169, 2, 34, "Output",ExpressionUUID->"7c06440d-d162-40be-8f67-412ec3e28b41"]
}, Open ]],
Cell[CellGroupData[{
Cell[8098, 268, 438, 11, 58, "Input",ExpressionUUID->"ff239d30-8ec9-4201-be26-d8f104e87d1b"],
Cell[8539, 281, 166, 2, 34, "Output",ExpressionUUID->"1b29894f-df1e-4c59-a4b1-b01201e59304"]
}, Open ]],
Cell[CellGroupData[{
Cell[8742, 288, 440, 11, 58, "Input",ExpressionUUID->"c99ba440-b0a2-4de9-899d-db28055047b4"],
Cell[9185, 301, 166, 2, 34, "Output",ExpressionUUID->"faad8780-f86e-4aa0-9ebc-f1c2d64a273f"]
}, Open ]],
Cell[CellGroupData[{
Cell[9388, 308, 294, 6, 47, "Input",ExpressionUUID->"206b1e1f-8758-497a-8c87-2d1b69b28e4d"],
Cell[9685, 316, 238, 5, 34, "Output",ExpressionUUID->"58ee9769-3419-4cd3-a28c-d64ac58ab17e"]
}, Open ]],
Cell[CellGroupData[{
Cell[9960, 326, 246, 6, 30, "Input",ExpressionUUID->"901d0fc8-bc49-4294-804a-775a257006ce"],
Cell[10209, 334, 166, 2, 34, "Output",ExpressionUUID->"1c802569-f9f2-4a21-9689-e34d272445ec"]
}, Open ]],
Cell[CellGroupData[{
Cell[10412, 341, 657, 19, 47, "Input",ExpressionUUID->"f23c6227-f81c-43cd-84e8-80c85c4a9181"],
Cell[11072, 362, 188, 4, 35, "Output",ExpressionUUID->"1c2a621f-2acd-46af-9e88-2f66ba3d02b3"]
}, Open ]],
Cell[CellGroupData[{
Cell[11297, 371, 193, 5, 38, "Input",ExpressionUUID->"48bb8197-bcd3-4733-be85-ee37cb58df76"],
Cell[11493, 378, 167, 2, 34, "Output",ExpressionUUID->"78ff4ec1-8b51-4ed6-a593-9105c6eacee5"]
}, Open ]],
Cell[CellGroupData[{
Cell[11697, 385, 650, 19, 47, "Input",ExpressionUUID->"ef5f053f-b1e9-4e4b-a8d7-d76df6737103"],
Cell[12350, 406, 186, 4, 35, "Output",ExpressionUUID->"f0077cb6-a9d8-4a3a-97c6-8df878c647d4"]
}, Open ]],
Cell[CellGroupData[{
Cell[12573, 415, 193, 5, 38, "Input",ExpressionUUID->"eedda7c4-fdb4-4e3e-8fc2-b99cb0d1c8c3"],
Cell[12769, 422, 166, 2, 34, "Output",ExpressionUUID->"02de70c7-dde7-4cb3-be8c-602dff83f250"]
}, Open ]],
Cell[CellGroupData[{
Cell[12972, 429, 374, 9, 48, "Input",ExpressionUUID->"781a4980-8190-4b93-8927-e2c81e4c3de7"],
Cell[13349, 440, 203, 4, 51, "Output",ExpressionUUID->"4e5d9359-33cf-4ba4-bf9c-83cb7dc38721"]
}, Open ]],
Cell[CellGroupData[{
Cell[13589, 449, 241, 6, 50, "Input",ExpressionUUID->"dc8f416e-bc87-4380-b71e-bf50dd5de9ba"],
Cell[13833, 457, 165, 2, 34, "Output",ExpressionUUID->"186f3802-f4ed-44d6-8387-10a38a6c15c9"]
}, Open ]],
Cell[CellGroupData[{
Cell[14035, 464, 372, 9, 47, "Input",ExpressionUUID->"b1502f3c-4181-4079-af1c-288bbe84b435"],
Cell[14410, 475, 203, 4, 51, "Output",ExpressionUUID->"7a06377f-515b-4eb8-8169-34e39fcab69a"]
}, Open ]],
Cell[CellGroupData[{
Cell[14650, 484, 241, 6, 50, "Input",ExpressionUUID->"e43918fe-67b3-4373-bc21-289ef3ba8744"],
Cell[14894, 492, 165, 2, 34, "Output",ExpressionUUID->"01550f4c-d519-42e3-b47d-262bb3e3b5f5"]
}, Open ]],
Cell[CellGroupData[{
Cell[15096, 499, 372, 9, 48, "Input",ExpressionUUID->"d03197f6-b389-45c3-b4ce-8e8bd86dedc6"],
Cell[15471, 510, 205, 4, 51, "Output",ExpressionUUID->"b877f878-9a1d-451b-ab42-5eb8e7d96ebd"]
}, Open ]],
Cell[CellGroupData[{
Cell[15713, 519, 243, 6, 50, "Input",ExpressionUUID->"28e3df34-2b11-44d6-8537-ea25a7b38189"],
Cell[15959, 527, 168, 2, 34, "Output",ExpressionUUID->"ed97e960-604e-487b-8161-3075ac41eec4"]
}, Open ]],
Cell[CellGroupData[{
Cell[16164, 534, 290, 7, 30, "Input",ExpressionUUID->"9a67ed90-4ed3-405a-bb3e-6ea48d56bbc7"],
Cell[16457, 543, 204, 4, 34, "Output",ExpressionUUID->"4bcb8078-78ef-430d-90ab-2c61444faff1"]
}, Open ]],
Cell[CellGroupData[{
Cell[16698, 552, 204, 3, 30, "Input",ExpressionUUID->"0bef9ee5-fe09-41c1-993a-ad3ad85e7532"],
Cell[16905, 557, 185, 4, 35, "Output",ExpressionUUID->"12f83800-a700-4605-adc5-b99b500a50b9"]
}, Open ]],
Cell[CellGroupData[{
Cell[17127, 566, 190, 5, 38, "Input",ExpressionUUID->"ce86ff36-bd47-4009-a24f-b6a4351d3409"],
Cell[17320, 573, 165, 2, 34, "Output",ExpressionUUID->"ccc233c2-e491-480b-aec8-33fa9e5249f7"]
}, Open ]],
Cell[CellGroupData[{
Cell[17522, 580, 351, 8, 30, "Input",ExpressionUUID->"4895f04e-f867-434e-bbc1-deedf8e35815"],
Cell[17876, 590, 264, 6, 34, "Output",ExpressionUUID->"bc5e2390-0a20-4d0d-9f97-a632e7541c65"]
}, Open ]],
Cell[CellGroupData[{
Cell[18177, 601, 273, 7, 30, "Input",ExpressionUUID->"665871fc-7726-4092-b156-5056ac5e2df0"],
Cell[18453, 610, 169, 2, 34, "Output",ExpressionUUID->"ae68522e-ff01-4261-9102-5b2dce588279"]
}, Open ]],
Cell[CellGroupData[{
Cell[18659, 617, 382, 9, 30, "Input",ExpressionUUID->"d3998a55-11b4-4694-b6c2-f4b8d64d57e2"],
Cell[19044, 628, 167, 2, 34, "Output",ExpressionUUID->"d8135497-c166-4b7a-8144-0a1c84de45bb"]
}, Open ]],
Cell[CellGroupData[{
Cell[19248, 635, 387, 9, 30, "Input",ExpressionUUID->"ab0727e7-af5a-4f4c-97b0-ff1827af9d82"],
Cell[19638, 646, 279, 7, 35, "Output",ExpressionUUID->"dea98758-c3f8-4c71-a6ed-39a5653221b8"]
}, Open ]],
Cell[CellGroupData[{
Cell[19954, 658, 289, 8, 38, "Input",ExpressionUUID->"ff4445f9-6db8-48cc-9da0-7b782852d9bd"],
Cell[20246, 668, 169, 2, 34, "Output",ExpressionUUID->"4f0d4b23-b1c1-4321-836a-20c6ab6ea6e4"]
}, Open ]],
Cell[CellGroupData[{
Cell[20452, 675, 308, 7, 49, "Input",ExpressionUUID->"93cbcc0d-67b5-46d7-9c26-545c4a8752ef"],
Cell[20763, 684, 167, 2, 34, "Output",ExpressionUUID->"9517590a-5b59-4529-a2d6-e0dfe0fdacc8"]
}, Open ]],
Cell[CellGroupData[{
Cell[20967, 691, 360, 9, 49, "Input",ExpressionUUID->"62d2e725-cc5a-4a21-8de9-e3141f0ed77a"],
Cell[21330, 702, 308, 7, 50, "Output",ExpressionUUID->"8269e5a5-0334-4f4a-9b07-6f292f9c3f7d"]
}, Open ]],
Cell[CellGroupData[{
Cell[21675, 714, 441, 11, 58, "Input",ExpressionUUID->"f48bee69-7236-46ad-8352-602387dfb8a7"],
Cell[22119, 727, 246, 4, 34, "Output",ExpressionUUID->"b66b7ef9-754f-4c20-a9ce-4fc3bda7581f"]
}, Open ]],
Cell[CellGroupData[{
Cell[22402, 736, 307, 7, 49, "Input",ExpressionUUID->"cb691b12-224a-4a4c-97aa-a632146bd1fd"],
Cell[22712, 745, 166, 2, 34, "Output",ExpressionUUID->"d1db8ecb-a4d9-44ca-b949-3146170f2ede"]
}, Open ]],
Cell[CellGroupData[{
Cell[22915, 752, 210, 3, 30, "Input",ExpressionUUID->"6b23efdc-9f9a-4c47-a7b7-f0cd00075068"],
Cell[23128, 757, 157, 2, 34, "Output",ExpressionUUID->"8798e2f4-0b40-4932-b791-69f799f42776"]
}, Open ]],
Cell[CellGroupData[{
Cell[23322, 764, 328, 8, 51, "Input",ExpressionUUID->"72a86536-c069-4959-a018-855a19f4e090"],
Cell[23653, 774, 168, 2, 34, "Output",ExpressionUUID->"e76f9d54-8fa3-44f3-bf30-54cdb574b141"]
}, Open ]],
Cell[CellGroupData[{
Cell[23858, 781, 351, 8, 30, "Input",ExpressionUUID->"6de994f0-e6ed-41e7-bbb3-6ad175151907"],
Cell[24212, 791, 263, 6, 34, "Output",ExpressionUUID->"6b931bc6-14a3-4548-bd46-6956eb50cd6b"]
}, Open ]],
Cell[CellGroupData[{
Cell[24512, 802, 272, 7, 30, "Input",ExpressionUUID->"eb9aa835-2d9a-438c-ad98-6e5a82359680"],
Cell[24787, 811, 167, 2, 34, "Output",ExpressionUUID->"a53646e7-9b99-4017-ad93-164fc5df8788"]
}, Open ]],
Cell[CellGroupData[{
Cell[24991, 818, 385, 9, 30, "Input",ExpressionUUID->"ccdd54fb-5d04-4610-9655-58e95ce35f2b"],
Cell[25379, 829, 280, 7, 35, "Output",ExpressionUUID->"ea73d104-2379-4aa3-842d-e918cf43c292"]
}, Open ]],
Cell[CellGroupData[{
Cell[25696, 841, 288, 8, 38, "Input",ExpressionUUID->"4d40c1c7-b26b-45be-a7da-a0b5047d32a3"],
Cell[25987, 851, 166, 2, 34, "Output",ExpressionUUID->"40ef9a71-462b-414a-88d0-1fba20cfc3f2"]
}, Open ]],
Cell[CellGroupData[{
Cell[26190, 858, 370, 9, 48, "Input",ExpressionUUID->"d5b79459-d75e-46de-8a1e-859f8676df9c"],
Cell[26563, 869, 222, 5, 50, "Output",ExpressionUUID->"2a933cb4-905d-44eb-bf43-045c4628430c"]
}, Open ]],
Cell[CellGroupData[{
Cell[26822, 879, 262, 7, 50, "Input",ExpressionUUID->"42e8d218-34dc-4b49-b275-5749b133fcf8"],
Cell[27087, 888, 166, 2, 34, "Output",ExpressionUUID->"856153c8-3119-489f-adc4-7b8fa9ec3642"]
}, Open ]],
Cell[CellGroupData[{
Cell[27290, 895, 368, 9, 48, "Input",ExpressionUUID->"77d81d9d-9e3d-4b39-b2dc-7a011a88c909"],
Cell[27661, 906, 203, 4, 50, "Output",ExpressionUUID->"e33aeee2-3e41-4688-808d-40bc51c76e43"]
}, Open ]],
Cell[CellGroupData[{
Cell[27901, 915, 241, 6, 50, "Input",ExpressionUUID->"83910bc9-81ed-4421-9fa4-39b47d4c5666"],
Cell[28145, 923, 168, 2, 34, "Output",ExpressionUUID->"436e1572-c312-407a-b5cb-58596db6c561"]
}, Open ]],
Cell[CellGroupData[{
Cell[28350, 930, 368, 9, 48, "Input",ExpressionUUID->"3cce7a0b-f00d-4cf1-bb93-542dd9cd496f"],
Cell[28721, 941, 204, 4, 50, "Output",ExpressionUUID->"e363a144-810b-41ed-8f4e-6702ae6c7526"]
}, Open ]],
Cell[CellGroupData[{
Cell[28962, 950, 242, 6, 50, "Input",ExpressionUUID->"68c16cc5-ce47-4ac1-ac5c-934538e6e4b4"],
Cell[29207, 958, 166, 2, 34, "Output",ExpressionUUID->"60c1656a-703e-4d93-b46c-ebde6cdb6cab"]
}, Open ]],
Cell[CellGroupData[{
Cell[29410, 965, 373, 9, 48, "Input",ExpressionUUID->"e9346c45-d3f3-47c7-b57d-684086645b4c"],
Cell[29786, 976, 206, 4, 51, "Output",ExpressionUUID->"31745284-7386-4618-9dbc-9b79d2735f2f"]
}, Open ]],
Cell[CellGroupData[{
Cell[30029, 985, 244, 6, 50, "Input",ExpressionUUID->"3122f56a-523e-43e5-af83-dbd7cdd3822b"],
Cell[30276, 993, 169, 2, 34, "Output",ExpressionUUID->"9f9386de-d00e-43c0-bf0c-d55cec4494d4"]
}, Open ]],
Cell[CellGroupData[{
Cell[30482, 1000, 373, 9, 48, "Input",ExpressionUUID->"989e7975-cc7f-4649-a1e9-7b9636265ea5"],
Cell[30858, 1011, 204, 4, 51, "Output",ExpressionUUID->"007b08fb-3708-41dd-87ce-2d30fcc3b41e"]
}, Open ]],
Cell[CellGroupData[{
Cell[31099, 1020, 242, 6, 50, "Input",ExpressionUUID->"ef4de106-e998-4765-ae40-9e10cc5b385d"],
Cell[31344, 1028, 167, 2, 34, "Output",ExpressionUUID->"ae8e1856-0043-4c3e-9ae6-79f22c2c31f9"]
}, Open ]],
Cell[CellGroupData[{
Cell[31548, 1035, 373, 9, 48, "Input",ExpressionUUID->"eb32315a-86ce-4a83-89ab-f66a142b50ab"],
Cell[31924, 1046, 221, 5, 51, "Output",ExpressionUUID->"2165f06b-e234-4f67-9dec-57f267a1bb21"]
}, Open ]],
Cell[CellGroupData[{
Cell[32182, 1056, 262, 7, 50, "Input",ExpressionUUID->"de85be3a-09b4-49cf-bf41-1283999db20e"],
Cell[32447, 1065, 163, 2, 57, "Output",ExpressionUUID->"b511619c-cd5f-43e2-80dd-4107d50b2aee"]
}, Open ]]
}
]
*)