(* Content-type: application/mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 6.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 145, 7] NotebookDataLength[ 624016, 14251] NotebookOptionsPosition[ 255687, 6645] NotebookOutlinePosition[ 613120, 13894] CellTagsIndexPosition[ 613008, 13888] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageFirst"]}], ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPagePrevious"]}], ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageNext"]}], ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageLast"]}], ButtonNote->"Last Slide"], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], " ", "of", " ", CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], Appearance->{Automatic, None}]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[TextData[{ StyleBox["BI-BEZ \[Dash] Bezpe\[CHacek]nost \[Dash] Lab. cvi\[CHacek]en\ \[IAcute] 1\n", FontSize->24], "Tom\[AAcute]\[SHacek] Zahradnick\[YAcute], Ji\[RHacek]\[IAcute] \ Bu\[CHacek]ek\nKatedra po\[CHacek]\[IAcute]ta\[CHacek]ov\[YAcute]ch syst\ \[EAcute]m\[URing], FIT \[CapitalCHacek]VUT v Praze" }], "Section", CellChangeTimes->{{3.598934139859044*^9, 3.59893414432905*^9}, { 3.5989343360193186`*^9, 3.5989343405193253`*^9}, {3.598934380649381*^9, 3.5989344116694245`*^9}, {3.598934721319858*^9, 3.598934774989933*^9}, { 3.5989353254757123`*^9, 3.5989353646257677`*^9}}], Cell["", "Text", CellChangeTimes->{{3.5989349005801086`*^9, 3.598934902150111*^9}}], Cell[TextData[StyleBox["\[CapitalUAcute]vod do software Mathematica (opakov\ \[AAcute]n\[IAcute])", FontSize->24]], "Text", CellDingbat->"\[FilledSquare]", CellChangeTimes->{{3.5989344362494593`*^9, 3.5989344489494767`*^9}, { 3.5989346003096886`*^9, 3.598934712179845*^9}, {3.5989348200899963`*^9, 3.598934843480029*^9}}], Cell[TextData[StyleBox["Substitu\[CHacek]n\[IAcute] \[SHacek]ifra", FontSize->24]], "Text", CellDingbat->"\[FilledSquare]", CellChangeTimes->{{3.5989344362494593`*^9, 3.5989344489494767`*^9}, { 3.5989346003096886`*^9, 3.598934712179845*^9}, {3.5989348200899963`*^9, 3.5989348450400314`*^9}, {3.59893544532588*^9, 3.5989354484858847`*^9}}], Cell[TextData[StyleBox["Afinn\[IAcute] \[SHacek]ifry", FontSize->24]], "Text", CellDingbat->"\[FilledSquare]", CellChangeTimes->{{3.5989344362494593`*^9, 3.5989344489494767`*^9}, { 3.5989346003096886`*^9, 3.598934712179845*^9}, {3.5989348200899963`*^9, 3.5989348465200334`*^9}}], Cell[TextData[StyleBox["Transpozi\[CHacek]n\[IAcute] \[SHacek]ifra", FontSize->24]], "Text", CellDingbat->"\[FilledSquare]", CellChangeTimes->{{3.5989344362494593`*^9, 3.5989344489494767`*^9}, { 3.5989346003096886`*^9, 3.598934712179845*^9}, {3.5989348200899963`*^9, 3.5989348465200334`*^9}}], Cell["\<\ \ \>", "Text", CellChangeTimes->{{3.5989349047601147`*^9, 3.598934904930115*^9}}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageFirst"]}], ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPagePrevious"]}], ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageNext"]}], ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageLast"]}], ButtonNote->"Last Slide"], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], " ", "of", " ", CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], Appearance->{Automatic, None}]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["\<\ Velejemny uvod do software Mathematica\ \>", "Section", CellChangeTimes->{{3.598934139859044*^9, 3.59893414432905*^9}}, TextJustification->1], Cell[TextData[{ "Ve cvicenich bude vyuzivano software ", StyleBox["Mathematica", FontSlant->"Italic"], " pro demonstraci sifer, jejich kryptoanalyzy, atd., a proto je dulezite se \ se softwarem ", StyleBox["Mathematica", FontSlant->"Italic"], " naucit pracovat alespon na nejake zakladni bazi.\n\n", StyleBox["Mathematica", FontSlant->"Italic"], " je rozdelena na Front End (toto) a Kernel (neni videt). Front End posila \ prikazy oznacene In[cislo] do kernelu a vystup z kernelu je oznacen \ Out[cislo]. Prikaz In[cislo] spustite (poslete do kernelu k vyhodnoceni) \ pomoci klavesove kombinace SHIFT+ENTER, anebo ENTER na numericke klavesnici." }], "Text"], Cell[TextData[{ "\nPred tim, nez zacneme, ", StyleBox["Mathematica", FontSlant->"Italic"], " je case sensitive a velmi dba na typ zavorek a proto pozor. Kulate zavorky \ oznacuji prioritu vyhodnocovani, hranate urcuji argumenty funkce a slozene \ oznacuji vektory, matice a seznamy. Vice viz dale." }], "Text"], Cell["\<\ Nyni zkuste vyhodnoti nasledujici vyrazy:\ \>", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Mod", "[", RowBox[{"283", ",", "17"}], "]"}]], "Input", CellLabel->"In[1]:="], Cell[BoxData["11"], "Output", CellChangeTimes->{3.6337165145741367`*^9}, CellLabel->"Out[1]="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Sin", "[", RowBox[{"Pi", "/", "2"}], "]"}]], "Input", CellLabel->"In[2]:="], Cell[BoxData["1"], "Output", CellChangeTimes->{3.6337165158141384`*^9}, CellLabel->"Out[2]="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Sum", "[", RowBox[{ RowBox[{"1", "/", RowBox[{"i", "^", "2"}]}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "\[Infinity]"}], "}"}]}], "]"}]], "Input", CellLabel->"In[3]:="], Cell[BoxData[ FractionBox[ SuperscriptBox["\[Pi]", "2"], "6"]], "Output", CellChangeTimes->{3.6337165170051403`*^9}, CellLabel->"Out[3]="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Mod", "[", RowBox[{ RowBox[{"102", "*", RowBox[{"BEZInverse", "[", RowBox[{"102", ",", "113"}], "]"}]}], ",", "113"}], "]"}]], "Input", CellLabel->"In[4]:="], Cell[BoxData[ RowBox[{"Mod", "[", RowBox[{ RowBox[{"102", " ", RowBox[{"BEZInverse", "[", RowBox[{"102", ",", "113"}], "]"}]}], ",", "113"}], "]"}]], "Output", CellChangeTimes->{3.633716518325142*^9}, CellLabel->"Out[4]="] }, Open ]], Cell["\<\ \ \>", "Text", CellChangeTimes->{{3.5989349159001303`*^9, 3.5989349190501347`*^9}}], Cell[CellGroupData[{ Cell["", "Subsection"], Cell["", "Text"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageFirst"]}], ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPagePrevious"]}], ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageNext"]}], ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageLast"]}], ButtonNote->"Last Slide"], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], " ", "of", " ", CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], Appearance->{Automatic, None}]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Inicializace worksheetu", "Section", TextJustification->1], Cell["\<\ Aby bylo mozne pouzit programy v techno slajdech, je nutne provest \ inicializaci. Klepnete kamkoliv do bloku s programem a nechte ho vyhodnotit. \ Block obsahuje definice funkci, ktere budou pouzity pro sifrovani, \ desifrovani a analyzu. Neni nutne se temitito funkcemi zaobirat.\ \>", "Text"], Cell["", "Text"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"<<", "\"\\""}], ";"}], "\n", RowBox[{ RowBox[{"NCharacters", "=", "26"}], ";"}], "\n", RowBox[{ RowBox[{"SYMBOLS", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"FromCharacterCode", "[", RowBox[{"65", "+", "i"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "0", ",", "57"}], "}"}]}], "]"}]}], ";"}], "\n", RowBox[{ RowBox[{"ENGLISH", "=", RowBox[{"{", RowBox[{ "0.0805726131341181993`1.9999999999999998", ",", "0.0125943599170806117`1.9999999999999998", ",", "0.0362576759103531896`1.9999999999999976", ",", "0.0380959831032189932`1.9999999999999998", ",", "0.1146790784996284273`1.9999999999999998", ",", "0.0240935581022411703`1.9999999999999998", ",", "0.0157233934368521923`1.9999999999999998", ",", "0.031212109359721516`1.9999999999999998", ",", "0.0741972073375836039`1.9999999999999998", ",", "0.001290726326905777`1.9999999999999998", ",", "0.0015254038408886455`1.9999999999999998", ",", "0.0429459850588649431`1.9999999999999998", ",", "0.0222943638283725115`1.9999999999999998", ",", "0.0746274494465521962`1.9999999999999998", ",", "0.0873782610396213869`1.9999999999999998", ",", "0.0389955802401533226`1.9999999999999998", ",", "0.0010169358939257637`1.9999999999999976", ",", "0.0751750303125122228`1.9999999999999998", ",", "0.0571830875738256346`1.9999999999999998", ",", "0.0912504400203387179`1.9999999999999998", ",", "0.0322290452536472797`1.9999999999999998", ",", "0.0081746000704032542`1.9999999999999998", ",", "0.0116165369421519928`1.9999999999999976", ",", "0.0017991942738686588`1.9999999999999998", ",", "0.0243282356162240388`1.9999999999999998", ",", "0.0007431454609457504`1.9999999999999998"}], "}"}]}], ";"}], "\n", RowBox[{ RowBox[{"VelikostAbecedy", "[", "n_Integer", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "}"}], ",", RowBox[{ RowBox[{"NCharacters", "=", "n"}], ";", RowBox[{"Take", "[", RowBox[{"SYMBOLS", ",", "n"}], "]"}]}]}], "]"}]}], "\n", RowBox[{ RowBox[{"BEZRotChar", "[", RowBox[{"x_", ",", "amount_"}], "]"}], ":=", RowBox[{"FromCharacterCode", "[", RowBox[{ RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"ToCharacterCode", "[", "x", "]"}], "-", RowBox[{"ToCharacterCode", "[", "\"\\"", "]"}]}], ")"}], "+", "amount"}], ",", "NCharacters"}], "]"}], "+", RowBox[{"ToCharacterCode", "[", "\"\\"", "]"}]}], "]"}]}], "\n", RowBox[{ RowBox[{"AXPBChar", "[", RowBox[{"x_", ",", "a_", ",", "b_"}], "]"}], ":=", RowBox[{"FromCharacterCode", "[", RowBox[{ RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"ToCharacterCode", "[", "x", "]"}], "-", RowBox[{"ToCharacterCode", "[", "\"\\"", "]"}]}], ")"}], " ", "a"}], "+", "b"}], ",", "NCharacters"}], "]"}], "+", RowBox[{"ToCharacterCode", "[", "\"\\"", "]"}]}], "]"}]}], "\n", RowBox[{ RowBox[{"AXPB", "[", RowBox[{"x_String", ",", "a_", ",", "b_"}], "]"}], ":=", RowBox[{"StringJoin", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"AXPBChar", "[", RowBox[{"#1", ",", "a", ",", "b"}], "]"}], "&"}], ")"}], "/@", RowBox[{"Characters", "[", RowBox[{"BEZPrepText", "[", "x", "]"}], "]"}]}], "]"}]}], "\n", RowBox[{ RowBox[{"AXPBDecrypt", "[", RowBox[{"x_String", ",", "a_", ",", "b_"}], "]"}], ":=", RowBox[{"StringJoin", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"AXPBCharDecrypt", "[", RowBox[{"#1", ",", "a", ",", "b"}], "]"}], "&"}], ")"}], "/@", RowBox[{"Characters", "[", "x", "]"}]}], "]"}]}], "\n", RowBox[{ RowBox[{"BEZZnakPlusB", "[", RowBox[{"x_String", ",", "b_Integer"}], "]"}], ":=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"BEZRotChar", "[", RowBox[{"#1", ",", "b"}], "]"}], "&"}], ")"}], "/@", RowBox[{"Characters", "[", "x", "]"}]}]}], "\n", RowBox[{ RowBox[{"AXPBCharDecrypt", "[", RowBox[{"x_", ",", "a_", ",", "b_"}], "]"}], ":=", RowBox[{"FromCharacterCode", "[", RowBox[{ RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"ToCharacterCode", "[", "x", "]"}], "-", RowBox[{"ToCharacterCode", "[", "\"\\"", "]"}]}], ")"}], "-", "b"}], ")"}], " ", RowBox[{"BEZInverse", "[", RowBox[{"a", ",", "NCharacters"}], "]"}]}], ",", "NCharacters"}], "]"}], "+", RowBox[{"ToCharacterCode", "[", "\"\\"", "]"}]}], "]"}]}], "\n", RowBox[{ RowBox[{"BEZInverse", "[", RowBox[{"x_Integer", ",", "mod_"}], "]"}], ":=", RowBox[{ RowBox[{ RowBox[{"Inverse", "[", RowBox[{ RowBox[{"{", RowBox[{"{", "x", "}"}], "}"}], ",", RowBox[{"Modulus", "\[Rule]", "mod"}]}], "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}], "\n", RowBox[{ RowBox[{"Caesar", "[", RowBox[{"x_String", ",", "posun_"}], "]"}], ":=", RowBox[{"StringJoin", "[", RowBox[{"BEZZnakPlusB", "[", RowBox[{"x", ",", "posun"}], "]"}], "]"}]}], "\n", RowBox[{ RowBox[{"BEZPrepText", "[", "x_String", "]"}], ":=", RowBox[{"FromCharacterCode", "[", RowBox[{"Select", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"#1", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "&"}], ")"}], "/@", RowBox[{"ToCharacterCode", "[", RowBox[{"Characters", "[", RowBox[{"ToUpperCase", "[", "x", "]"}], "]"}], "]"}]}], ",", RowBox[{ RowBox[{"0", "\[LessEqual]", RowBox[{"#1", "-", RowBox[{ RowBox[{"ToCharacterCode", "[", "\"\\"", "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]}], "\[LessEqual]", "NCharacters"}], "&"}]}], "]"}], "]"}]}], "\n", RowBox[{ RowBox[{"BEZAbsCetnosti", "[", "x_String", "]"}], ":=", RowBox[{"Table", "[", RowBox[{ RowBox[{"Length", "[", RowBox[{"Select", "[", RowBox[{ RowBox[{"Characters", "[", RowBox[{"BEZPrepText", "[", "x", "]"}], "]"}], ",", RowBox[{ RowBox[{"#1", "===", RowBox[{ "SYMBOLS", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}], "&"}]}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "NCharacters"}], "}"}]}], "]"}]}], "\n", RowBox[{ RowBox[{ RowBox[{"BEZRelCetnosti", "[", "x_String", "]"}], ":=", RowBox[{"N", "[", RowBox[{ FractionBox[ RowBox[{"BEZAbsCetnosti", "[", "x", "]"}], RowBox[{"StringLength", "[", RowBox[{"BEZPrepText", "[", "x", "]"}], "]"}]], ",", "2"}], "]"}]}], "\n"}], "\n", RowBox[{ RowBox[{"RelCetnosti", "[", "x_String", "]"}], ":=", RowBox[{"TableForm", "[", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "X", "}"}], ",", RowBox[{ RowBox[{"X", "=", RowBox[{"BEZRelCetnosti", "[", "x", "]"}]}], ";", TagBox[ RowBox[{"Append", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"SYMBOLS", "\[LeftDoubleBracket]", RowBox[{ RowBox[{"7", " ", "i"}], "+", "j"}], "\[RightDoubleBracket]"}], ",", RowBox[{"X", "\[LeftDoubleBracket]", RowBox[{ RowBox[{"7", " ", "i"}], "+", "j"}], "\[RightDoubleBracket]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"j", ",", "1", ",", "7"}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "0", ",", RowBox[{ RowBox[{"-", "1"}], "+", RowBox[{"Floor", "[", FractionBox["NCharacters", "7"], "]"}]}]}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"SYMBOLS", "\[LeftDoubleBracket]", RowBox[{ RowBox[{"7", " ", RowBox[{"Floor", "[", FractionBox["NCharacters", "7"], "]"}]}], "+", "i"}], "\[RightDoubleBracket]"}], ",", RowBox[{"X", "\[LeftDoubleBracket]", RowBox[{ RowBox[{"7", " ", RowBox[{"Floor", "[", FractionBox["NCharacters", "7"], "]"}]}], "+", "i"}], "\[RightDoubleBracket]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", RowBox[{"Mod", "[", RowBox[{"NCharacters", ",", "7"}], "]"}]}], "}"}]}], "]"}]}], "]"}], Function[BoxForm`e$, TableForm[BoxForm`e$]]]}]}], "]"}], "]"}]}], "\n", RowBox[{ RowBox[{"BEZGrafyRelCetnosti", "[", RowBox[{"x_String", ",", "y_String"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"RC1", ",", "RC2"}], "}"}], ",", RowBox[{ RowBox[{"RC1", "=", RowBox[{"BEZRelCetnosti", "[", "x", "]"}]}], ";", RowBox[{"RC2", "=", RowBox[{"BEZRelCetnosti", "[", "y", "]"}]}], ";", RowBox[{"BarChart", "[", RowBox[{ RowBox[{"{", RowBox[{"RC1", ",", "RC2"}], "}"}], ",", RowBox[{"BarLabels", "\[Rule]", "SYMBOLS"}], ",", RowBox[{"BarEdges", "\[Rule]", "False"}], ",", RowBox[{"BarStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"Directive", "[", RowBox[{ RowBox[{"RGBColor", "[", RowBox[{".1", ",", ".2", ",", ".7"}], "]"}], ",", RowBox[{"Opacity", "[", "0.7", "]"}]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ RowBox[{"RGBColor", "[", RowBox[{"0", ",", ".7", ",", "0"}], "]"}], ",", RowBox[{"Opacity", "[", "0.7", "]"}]}], "]"}]}], "}"}]}], ",", RowBox[{"BarSpacing", "\[Rule]", "0.1"}], ",", RowBox[{"Background", "\[Rule]", RowBox[{"GrayLevel", "[", ".9", "]"}]}]}], "]"}]}]}], "]"}]}], "\n", RowBox[{ RowBox[{"BEZGrafyRelCetnostiSAnglictinou", "[", "x_String", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", RowBox[{"RC1", ",", "RC2"}], "}"}], ",", RowBox[{ RowBox[{"RC1", "=", RowBox[{"BEZRelCetnosti", "[", "x", "]"}]}], ";", RowBox[{"RC2", "=", "ENGLISH"}], ";", RowBox[{"BarChart", "[", RowBox[{ RowBox[{"{", RowBox[{"RC1", ",", "RC2"}], "}"}], ",", RowBox[{"BarLabels", "\[Rule]", "SYMBOLS"}], ",", RowBox[{"BarEdges", "\[Rule]", "False"}], ",", RowBox[{"BarStyle", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"Directive", "[", RowBox[{ RowBox[{"RGBColor", "[", RowBox[{".1", ",", ".2", ",", ".7"}], "]"}], ",", RowBox[{"Opacity", "[", "0.7", "]"}]}], "]"}], ",", RowBox[{"Directive", "[", RowBox[{ RowBox[{"RGBColor", "[", RowBox[{"0", ",", ".7", ",", "0"}], "]"}], ",", RowBox[{"Opacity", "[", "0.7", "]"}]}], "]"}]}], "}"}]}], ",", RowBox[{"BarSpacing", "\[Rule]", "0.1"}], ",", RowBox[{"Background", "\[Rule]", RowBox[{"GrayLevel", "[", ".9", "]"}]}]}], "]"}]}]}], "]"}]}], "\n", RowBox[{ RowBox[{"RelCetnostiZBEZRelCetnosti", "[", "x_", "]"}], ":=", RowBox[{"TableForm", "[", RowBox[{"{", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FromCharacterCode", "[", RowBox[{"64", "+", "i"}], "]"}], ",", RowBox[{ "x", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "7"}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FromCharacterCode", "[", RowBox[{"64", "+", "i"}], "]"}], ",", RowBox[{ "x", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "8", ",", "14"}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FromCharacterCode", "[", RowBox[{"64", "+", "i"}], "]"}], ",", RowBox[{ "x", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "15", ",", "21"}], "}"}]}], "]"}], ",", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"FromCharacterCode", "[", RowBox[{"64", "+", "i"}], "]"}], ",", RowBox[{ "x", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "22", ",", "26"}], "}"}]}], "]"}]}], "}"}], "]"}]}], "\n", RowBox[{ RowBox[{"Pozice", "[", "x_String", "]"}], ":=", RowBox[{ RowBox[{ RowBox[{ RowBox[{"StringPosition", "[", RowBox[{ RowBox[{"StringJoin", "[", "SYMBOLS", "]"}], ",", "x"}], "]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "-", "1"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"BEZPadString", "[", RowBox[{"x_String", ",", "n_Integer"}], "]"}], ":=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"StringLength", "[", "x", "]"}], "<", "n"}], ",", RowBox[{"BEZPadString", "[", RowBox[{ RowBox[{"StringJoin", "[", RowBox[{"x", ",", "\"\\""}], "]"}], ",", "n"}], "]"}], ",", " ", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"StringLength", "[", "x", "]"}], "==", "n"}], ",", " ", "x", ",", " ", RowBox[{"Abort", "[", "]"}]}], "]"}]}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"BEZNumToPad", "[", RowBox[{"x_String", ",", "cols_Integer"}], "]"}], ":=", RowBox[{ RowBox[{"Floor", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"StringLength", "[", "x", "]"}], "+", "cols", "-", "1"}], ")"}], "/", "cols"}], "]"}], "*", "cols"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{"BEZGenerMatrix", "[", RowBox[{"x_String", ",", "cols_Integer"}], "]"}], ":=", RowBox[{"Partition", "[", RowBox[{ RowBox[{"Characters", "[", RowBox[{"BEZPadString", "[", RowBox[{ RowBox[{"BEZPrepText", "[", "x", "]"}], ",", RowBox[{"BEZNumToPad", "[", RowBox[{ RowBox[{"BEZPrepText", "[", "x", "]"}], ",", "cols"}], "]"}]}], "]"}], "]"}], ",", "cols"}], "]"}]}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Transpozice", "[", RowBox[{"x_String", ",", "cols_Integer"}], "]"}], ":=", RowBox[{"StringJoin", "[", RowBox[{"Flatten", "[", RowBox[{"Transpose", "[", RowBox[{"BEZGenerMatrix", "[", RowBox[{ RowBox[{"BEZPrepText", "[", "x", "]"}], ",", "cols"}], "]"}], "]"}], "]"}], "]"}]}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"Print", "[", "\"\\"", "]"}]}], "Input", CellChangeTimes->{{3.412341629085438*^9, 3.412341632429482*^9}, { 3.412342640409195*^9, 3.412342664815284*^9}, {3.412343619761381*^9, 3.4123436576466227`*^9}, {3.412343711882279*^9, 3.412343761802808*^9}, { 3.412343801775918*^9, 3.412343844260603*^9}, {3.41235638875*^9, 3.412356412140625*^9}, 3.4123566106875*^9, {3.41250279278125*^9, 3.41250281046875*^9}, 3.41262227246875*^9, {3.5989351774745054`*^9, 3.598935181644511*^9}}, CellLabel->"In[5]:="], Cell[BoxData[ RowBox[{ StyleBox[ RowBox[{"General", "::", "obspkg"}], "MessageName"], RowBox[{ ":", " "}], "\<\"\[NoBreak]\\!\\(\\\"BarCharts`\\\"\\)\[NoBreak] is now \ obsolete. The legacy version being loaded may conflict with current \ Mathematica functionality. See the Compatibility Guide for updating \ information. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \ ButtonStyle->\\\"Link\\\", ButtonFrame->None, \ ButtonData:>\\\"paclet:Compatibility/Tutorials/BarCharts\\\", ButtonNote -> \ \\\"General::obspkg\\\"]\\)\"\>"}]], "Message", "MSG", CellChangeTimes->{3.6337165273671546`*^9}, CellLabel->"During evaluation of In[5]:="], Cell[BoxData["\<\"Initialization done\"\>"], "Print", CellChangeTimes->{3.6337165273871546`*^9}, CellLabel->"During evaluation of In[5]:="] }, Open ]], Cell[BoxData[""], "Input"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageFirst"]}], ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPagePrevious"]}], ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageNext"]}], ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageLast"]}], ButtonNote->"Last Slide"], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], " ", "of", " ", CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], Appearance->{Automatic, None}]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Jednoduche sifry (Caesarova sifra)", "Section", CellTags->"LastSlide"], Cell[TextData[{ "Caesarova sifra je znama jako jednoducha substitucni proudova (znakova) \ sifra, ktera provadi transformaci y = ", Cell[BoxData[ FormBox[ RowBox[{"|", RowBox[{"x", "+", "3"}], SubscriptBox["|", "26"]}], TraditionalForm]]], ". Mejme otevreny text (nechte vyhodnotit)" }], "Text"], Cell[BoxData[ RowBox[{"OT", ":=", "\"\\""}]], "Input", CellLabel->"In[31]:="], Cell["Zasifrovany text bude:", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ST", "=", RowBox[{"Caesar", "[", RowBox[{"OT", ",", "3"}], "]"}]}]], "Input", CellLabel->"In[32]:="], Cell[BoxData["\<\"DQRSHQWHAWWKDWZLOOJHWWUDQVIRUPHGZLWKFDHVDUFLSKHU\"\>"], \ "Output", CellChangeTimes->{3.633716543499177*^9}, CellLabel->"Out[32]="] }, Open ]], Cell["\<\ Text lze snadno desifrovat provedenim opacne operace (odectenim) posunu:\ \>", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Caesar", "[", RowBox[{"ST", ",", RowBox[{"-", "3"}]}], "]"}]], "Input", CellLabel->"In[33]:="], Cell[BoxData["\<\"ANOPENTEXTTHATWILLGETTRANSFORMEDWITHCAESARCIPHER\"\>"], \ "Output", CellChangeTimes->{3.63371654563918*^9}, CellLabel->"Out[33]="] }, Open ]], Cell["Kryptoanalyzu teto sifry naleznete na dalsi strance.", "Text"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageFirst"]}], ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPagePrevious"]}], ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageNext"]}], ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageLast"]}]], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], " ", "of", " ", CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], Appearance->{Automatic, None}]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Kryptoanalyza Caesarovy sifry", "Section"], Cell["Relativni cetnosti sifroveho textu z minuleho slajdu jsou:", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"RelCetnosti", "[", "ST", "]"}]], "Input", CellLabel->"In[34]:="], Cell[BoxData[ InterpretationBox[GridBox[{ {GridBox[{ {"\<\"A\"\>"}, {"0.02083333333333333333333333333333333333`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"B\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"C\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"D\"\>"}, {"0.10416666666666666666666666666666666667`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"E\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"F\"\>"}, {"0.04166666666666666666666666666666666667`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"G\"\>"}, {"0.02083333333333333333333333333333333333`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"H\"\>"}, {"0.125`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"I\"\>"}, {"0.02083333333333333333333333333333333333`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"J\"\>"}, {"0.02083333333333333333333333333333333333`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"K\"\>"}, {"0.0625`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"L\"\>"}, {"0.0625`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"M\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"N\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"O\"\>"}, {"0.04166666666666666666666666666666666667`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"P\"\>"}, {"0.02083333333333333333333333333333333333`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Q\"\>"}, {"0.0625`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"R\"\>"}, {"0.04166666666666666666666666666666666667`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"S\"\>"}, {"0.04166666666666666666666666666666666667`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"T\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"U\"\>"}, {"0.08333333333333333333333333333333333333`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"V\"\>"}, {"0.04166666666666666666666666666666666667`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"W\"\>"}, {"0.14583333333333333333333333333333333333`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"X\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Y\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Z\"\>"}, {"0.04166666666666666666666666666666666667`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\<\"\"\>", "\<\"\"\>"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[2.0999999999999996`]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], TableForm[{{{"A", 0.02083333333333333333333333333333333333`2.}, {"B", 0}, { "C", 0}, {"D", 0.10416666666666666666666666666666666667`2.}, {"E", 0}, { "F", 0.04166666666666666666666666666666666667`2.}, { "G", 0.02083333333333333333333333333333333333`2.}}, {{"H", 0.125`2.}, { "I", 0.02083333333333333333333333333333333333`2.}, { "J", 0.02083333333333333333333333333333333333`2.}, {"K", 0.0625`2.}, { "L", 0.0625`2.}, {"M", 0}, {"N", 0}}, {{ "O", 0.04166666666666666666666666666666666667`2.}, { "P", 0.02083333333333333333333333333333333333`2.}, {"Q", 0.0625`2.}, { "R", 0.04166666666666666666666666666666666667`2.}, { "S", 0.04166666666666666666666666666666666667`2.}, {"T", 0}, { "U", 0.08333333333333333333333333333333333333`2.}}, {{ "V", 0.04166666666666666666666666666666666667`2.}, { "W", 0.14583333333333333333333333333333333333`2.}, {"X", 0}, {"Y", 0}, { "Z", 0.04166666666666666666666666666666666667`2.}}}]]], "Output", CellChangeTimes->{3.6337165514191885`*^9}, CellLabel->"Out[34]//TableForm="] }, Open ]], Cell["Relativni cetnosti otevreneho textu z minuleho slajdu jsou:", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"RelCetnosti", "[", "OT", "]"}]], "Input", CellLabel->"In[35]:="], Cell[BoxData[ InterpretationBox[GridBox[{ {GridBox[{ {"\<\"A\"\>"}, {"0.10416666666666666666666666666666666667`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"B\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"C\"\>"}, {"0.04166666666666666666666666666666666667`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"D\"\>"}, {"0.02083333333333333333333333333333333333`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"E\"\>"}, {"0.125`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"F\"\>"}, {"0.02083333333333333333333333333333333333`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"G\"\>"}, {"0.02083333333333333333333333333333333333`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"H\"\>"}, {"0.0625`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"I\"\>"}, {"0.0625`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"J\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"K\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"L\"\>"}, {"0.04166666666666666666666666666666666667`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"M\"\>"}, {"0.02083333333333333333333333333333333333`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"N\"\>"}, {"0.0625`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"O\"\>"}, {"0.04166666666666666666666666666666666667`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"P\"\>"}, {"0.04166666666666666666666666666666666667`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Q\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"R\"\>"}, {"0.08333333333333333333333333333333333333`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"S\"\>"}, {"0.04166666666666666666666666666666666667`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"T\"\>"}, {"0.14583333333333333333333333333333333333`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"U\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"V\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"W\"\>"}, {"0.04166666666666666666666666666666666667`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"X\"\>"}, {"0.02083333333333333333333333333333333333`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Y\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Z\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\<\"\"\>", "\<\"\"\>"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[2.0999999999999996`]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], TableForm[{{{"A", 0.10416666666666666666666666666666666667`2.}, {"B", 0}, { "C", 0.04166666666666666666666666666666666667`2.}, { "D", 0.02083333333333333333333333333333333333`2.}, {"E", 0.125`2.}, { "F", 0.02083333333333333333333333333333333333`2.}, { "G", 0.02083333333333333333333333333333333333`2.}}, {{"H", 0.0625`2.}, { "I", 0.0625`2.}, {"J", 0}, {"K", 0}, { "L", 0.04166666666666666666666666666666666667`2.}, { "M", 0.02083333333333333333333333333333333333`2.}, {"N", 0.0625`2.}}, {{ "O", 0.04166666666666666666666666666666666667`2.}, { "P", 0.04166666666666666666666666666666666667`2.}, {"Q", 0}, { "R", 0.08333333333333333333333333333333333333`2.}, { "S", 0.04166666666666666666666666666666666667`2.}, { "T", 0.14583333333333333333333333333333333333`2.}, {"U", 0}}, {{ "V", 0}, {"W", 0.04166666666666666666666666666666666667`2.}, { "X", 0.02083333333333333333333333333333333333`2.}, {"Y", 0}, { "Z", 0}}}]]], "Output", CellChangeTimes->{3.6337165530291905`*^9}, CellLabel->"Out[35]//TableForm="] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageFirst"]}], ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPagePrevious"]}], ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageNext"]}], ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageLast"]}]], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], " ", "of", " ", CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], Appearance->{Automatic, None}]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Kryptoanalyza Caesarovy sifry (2)", "Section"], Cell["\<\ Srovnanim relativnich cetnosti (cervena pro sifrovy text, modra pro otevreny \ text) vidime ze sifra zpusobila posun relativnich cetnosti nasledujicim \ zpusobem:\ \>", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"BEZGrafyRelCetnosti", "[", RowBox[{"ST", ",", "OT"}], "]"}]], "Input", CellLabel->"In[36]:="], Cell[BoxData[ GraphicsBox[{ {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{0.85, 0}, {1.15, 0.020833333333333332`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{1.85, 0}, {2.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{2.85, 0}, {3.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{3.85, 0}, {4.15, 0.10416666666666667`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{4.85, 0}, {5.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{5.85, 0}, {6.15, 0.041666666666666664`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{6.85, 0}, {7.15, 0.020833333333333332`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{7.85, 0}, {8.15, 0.125}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{8.85, 0}, {9.15, 0.020833333333333332`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{9.85, 0}, {10.15, 0.020833333333333332`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{10.85, 0}, {11.15, 0.0625}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{11.85, 0}, {12.15, 0.0625}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{12.85, 0}, {13.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{13.85, 0}, {14.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{14.85, 0}, {15.15, 0.041666666666666664`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{15.85, 0}, {16.15, 0.020833333333333332`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{16.85, 0}, {17.15, 0.0625}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{17.85, 0}, {18.15, 0.041666666666666664`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{18.85, 0}, {19.15, 0.041666666666666664`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{19.85, 0}, {20.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{20.85, 0}, {21.15, 0.08333333333333333}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{21.85, 0}, {22.15, 0.041666666666666664`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{22.85, 0}, {23.15, 0.14583333333333334`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{23.85, 0}, {24.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{24.85, 0}, {25.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{25.85, 0}, {26.15, 0.041666666666666664`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{1.25, 0}, {1.5499999999999998`, 0.10416666666666667`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{2.25, 0}, {2.55, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{3.25, 0}, {3.55, 0.041666666666666664`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{4.25, 0}, {4.550000000000001, 0.020833333333333332`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{5.25, 0}, {5.550000000000001, 0.125}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{6.25, 0}, {6.550000000000001, 0.020833333333333332`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{7.25, 0}, {7.550000000000001, 0.020833333333333332`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{8.25, 0}, {8.55, 0.0625}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{9.25, 0}, {9.55, 0.0625}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{10.25, 0}, {10.55, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{11.25, 0}, {11.55, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{12.25, 0}, {12.55, 0.041666666666666664`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{13.25, 0}, {13.55, 0.020833333333333332`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{14.25, 0}, {14.55, 0.0625}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{15.25, 0}, {15.55, 0.041666666666666664`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{16.25, 0}, {16.549999999999997`, 0.041666666666666664`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{17.25, 0}, {17.549999999999997`, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{18.25, 0}, {18.549999999999997`, 0.08333333333333333}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{19.25, 0}, {19.549999999999997`, 0.041666666666666664`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{20.25, 0}, {20.549999999999997`, 0.14583333333333334`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{21.25, 0}, {21.549999999999997`, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{22.25, 0}, {22.549999999999997`, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{23.25, 0}, {23.549999999999997`, 0.041666666666666664`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{24.25, 0}, {24.549999999999997`, 0.020833333333333332`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{25.25, 0}, {25.549999999999997`, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{26.25, 0}, {26.549999999999997`, 0}]}}, AlignmentPoint->Center, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->None, AxesOrigin->{0.6000000000000001, 0}, AxesStyle->{}, Background->GrayLevel[0.9], BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, CoordinatesToolOptions:>Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->{{{1.2, FormBox["\"A\"", TraditionalForm], 0}, {2.2, FormBox["\"B\"", TraditionalForm], 0}, {3.2, FormBox["\"C\"", TraditionalForm], 0}, {4.2, FormBox["\"D\"", TraditionalForm], 0}, {5.2, FormBox["\"E\"", TraditionalForm], 0}, {6.2, FormBox["\"F\"", TraditionalForm], 0}, {7.2, FormBox["\"G\"", TraditionalForm], 0}, {8.2, FormBox["\"H\"", TraditionalForm], 0}, {9.2, FormBox["\"I\"", TraditionalForm], 0}, {10.2, FormBox["\"J\"", TraditionalForm], 0}, {11.2, FormBox["\"K\"", TraditionalForm], 0}, {12.2, FormBox["\"L\"", TraditionalForm], 0}, {13.2, FormBox["\"M\"", TraditionalForm], 0}, {14.2, FormBox["\"N\"", TraditionalForm], 0}, {15.2, FormBox["\"O\"", TraditionalForm], 0}, {16.2, FormBox["\"P\"", TraditionalForm], 0}, {17.2, FormBox["\"Q\"", TraditionalForm], 0}, {18.2, FormBox["\"R\"", TraditionalForm], 0}, {19.2, FormBox["\"S\"", TraditionalForm], 0}, {20.2, FormBox["\"T\"", TraditionalForm], 0}, {21.2, FormBox["\"U\"", TraditionalForm], 0}, {22.2, FormBox["\"V\"", TraditionalForm], 0}, {23.2, FormBox["\"W\"", TraditionalForm], 0}, {24.2, FormBox["\"X\"", TraditionalForm], 0}, {25.2, FormBox["\"Y\"", TraditionalForm], 0}, {26.2, FormBox["\"Z\"", TraditionalForm], 0}}, Automatic}, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->Automatic, ImageSizeRaw->Automatic, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->{{0.6000000000000001, 26.8}, All}, PlotRangeClipping->True, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->{{{1.2, FormBox["\"A\"", TraditionalForm], 0}, {2.2, FormBox["\"B\"", TraditionalForm], 0}, {3.2, FormBox["\"C\"", TraditionalForm], 0}, {4.2, FormBox["\"D\"", TraditionalForm], 0}, {5.2, FormBox["\"E\"", TraditionalForm], 0}, {6.2, FormBox["\"F\"", TraditionalForm], 0}, {7.2, FormBox["\"G\"", TraditionalForm], 0}, {8.2, FormBox["\"H\"", TraditionalForm], 0}, {9.2, FormBox["\"I\"", TraditionalForm], 0}, {10.2, FormBox["\"J\"", TraditionalForm], 0}, {11.2, FormBox["\"K\"", TraditionalForm], 0}, {12.2, FormBox["\"L\"", TraditionalForm], 0}, {13.2, FormBox["\"M\"", TraditionalForm], 0}, {14.2, FormBox["\"N\"", TraditionalForm], 0}, {15.2, FormBox["\"O\"", TraditionalForm], 0}, {16.2, FormBox["\"P\"", TraditionalForm], 0}, {17.2, FormBox["\"Q\"", TraditionalForm], 0}, {18.2, FormBox["\"R\"", TraditionalForm], 0}, {19.2, FormBox["\"S\"", TraditionalForm], 0}, {20.2, FormBox["\"T\"", TraditionalForm], 0}, {21.2, FormBox["\"U\"", TraditionalForm], 0}, {22.2, FormBox["\"V\"", TraditionalForm], 0}, {23.2, FormBox["\"W\"", TraditionalForm], 0}, {24.2, FormBox["\"X\"", TraditionalForm], 0}, {25.2, FormBox["\"Y\"", TraditionalForm], 0}, {26.2, FormBox["\"Z\"", TraditionalForm], 0}}, Automatic}, TicksStyle->{}]], "Output", CellChangeTimes->{3.6337165584991984`*^9}, CellLabel->"Out[36]="] }, Open ]], Cell[TextData[{ "Z grafu vidime, ze pokud zname otevreny text, je velmi snadne uhodnout \ transformaci, ktera povede k desifrovani textu. Staci jen posunout cetnosti \ tak, aby grafy splynuly. Pokud otevreny text k dispozici nemame, musime si \ vystacit napriklad se vzorkem relativnich cetnosti pro jazyk, kterym \ predpokladame, ze je sifrovy text psan. Predpokladame, ze sifrovy text je \ psan v anglictive, pro kterou mame relativni cetnosti ulozene v promenne ", StyleBox["ENGLISH", FontWeight->"Bold"], "." }], "Text"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageFirst"]}], ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPagePrevious"]}], ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageNext"]}], ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageLast"]}]], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], " ", "of", " ", CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], Appearance->{Automatic, None}]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Kryptoanalyza Caesarovy sifry (3)", "Section"], Cell["\<\ Relativni cetnosti pro anglictinu jsou (ziskano jako relativni cetnosti z cca \ 20KB souboru):\ \>", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"RelCetnostiZBEZRelCetnosti", "[", "ENGLISH", "]"}]], "Input", CellLabel->"In[37]:="], Cell[BoxData[ InterpretationBox[GridBox[{ {GridBox[{ {"\<\"A\"\>"}, {"0.0805726131341181993`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"B\"\>"}, {"0.0125943599170806117`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"C\"\>"}, {"0.0362576759103531896`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"D\"\>"}, {"0.0380959831032189932`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"E\"\>"}, {"0.1146790784996284273`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"F\"\>"}, {"0.0240935581022411703`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"G\"\>"}, {"0.0157233934368521923`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"H\"\>"}, {"0.031212109359721516`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"I\"\>"}, {"0.0741972073375836039`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"J\"\>"}, {"0.001290726326905777`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"K\"\>"}, {"0.0015254038408886455`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"L\"\>"}, {"0.0429459850588649431`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"M\"\>"}, {"0.0222943638283725115`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"N\"\>"}, {"0.0746274494465521962`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"O\"\>"}, {"0.0873782610396213869`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"P\"\>"}, {"0.0389955802401533226`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Q\"\>"}, {"0.0010169358939257637`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"R\"\>"}, {"0.0751750303125122228`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"S\"\>"}, {"0.0571830875738256346`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"T\"\>"}, {"0.0912504400203387179`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"U\"\>"}, {"0.0322290452536472797`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"V\"\>"}, {"0.0081746000704032542`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"W\"\>"}, {"0.0116165369421519928`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"X\"\>"}, {"0.0017991942738686588`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Y\"\>"}, {"0.0243282356162240388`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Z\"\>"}, {"0.0007431454609457504`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\<\"\"\>", "\<\"\"\>"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[2.0999999999999996`]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], TableForm[{{{"A", 0.0805726131341181993`2.}, { "B", 0.0125943599170806117`2.}, {"C", 0.0362576759103531896`2.}, { "D", 0.0380959831032189932`2.}, {"E", 0.1146790784996284273`2.}, { "F", 0.0240935581022411703`2.}, {"G", 0.0157233934368521923`2.}}, {{ "H", 0.031212109359721516`2.}, {"I", 0.0741972073375836039`2.}, { "J", 0.001290726326905777`2.}, {"K", 0.0015254038408886455`2.}, { "L", 0.0429459850588649431`2.}, {"M", 0.0222943638283725115`2.}, { "N", 0.0746274494465521962`2.}}, {{"O", 0.0873782610396213869`2.}, { "P", 0.0389955802401533226`2.}, {"Q", 0.0010169358939257637`2.}, { "R", 0.0751750303125122228`2.}, {"S", 0.0571830875738256346`2.}, { "T", 0.0912504400203387179`2.}, {"U", 0.0322290452536472797`2.}}, {{ "V", 0.0081746000704032542`2.}, {"W", 0.0116165369421519928`2.}, { "X", 0.0017991942738686588`2.}, {"Y", 0.0243282356162240388`2.}, { "Z", 0.0007431454609457504`2.}}}]]], "Output", CellChangeTimes->{3.633716568291212*^9}, CellLabel->"Out[37]//TableForm="] }, Open ]], Cell["\<\ Nyni muzeme udelat stejny krok, jako v minulem pripade a srovnat relativni \ cenosti sifroveho textu s relativnimi cetnostmi pro anglictinu:\ \>", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"BEZGrafyRelCetnostiSAnglictinou", "[", "ST", "]"}]], "Input", CellLabel->"In[38]:="], Cell[BoxData[ GraphicsBox[{ {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{0.85, 0}, {1.15, 0.020833333333333332`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{1.85, 0}, {2.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{2.85, 0}, {3.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{3.85, 0}, {4.15, 0.10416666666666667`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{4.85, 0}, {5.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{5.85, 0}, {6.15, 0.041666666666666664`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{6.85, 0}, {7.15, 0.020833333333333332`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{7.85, 0}, {8.15, 0.125}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{8.85, 0}, {9.15, 0.020833333333333332`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{9.85, 0}, {10.15, 0.020833333333333332`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{10.85, 0}, {11.15, 0.0625}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{11.85, 0}, {12.15, 0.0625}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{12.85, 0}, {13.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{13.85, 0}, {14.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{14.85, 0}, {15.15, 0.041666666666666664`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{15.85, 0}, {16.15, 0.020833333333333332`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{16.85, 0}, {17.15, 0.0625}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{17.85, 0}, {18.15, 0.041666666666666664`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{18.85, 0}, {19.15, 0.041666666666666664`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{19.85, 0}, {20.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{20.85, 0}, {21.15, 0.08333333333333333}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{21.85, 0}, {22.15, 0.041666666666666664`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{22.85, 0}, {23.15, 0.14583333333333334`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{23.85, 0}, {24.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{24.85, 0}, {25.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{25.85, 0}, {26.15, 0.041666666666666664`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{1.25, 0}, {1.5499999999999998`, 0.0805726131341182}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{2.25, 0}, {2.55, 0.012594359917080612`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{3.25, 0}, {3.55, 0.03625767591035319}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{4.25, 0}, {4.550000000000001, 0.038095983103218996`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{5.25, 0}, {5.550000000000001, 0.11467907849962843`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{6.25, 0}, {6.550000000000001, 0.02409355810224117}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{7.25, 0}, {7.550000000000001, 0.015723393436852192`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{8.25, 0}, {8.55, 0.031212109359721515`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{9.25, 0}, {9.55, 0.0741972073375836}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{10.25, 0}, {10.55, 0.001290726326905777}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{11.25, 0}, {11.55, 0.0015254038408886454`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{12.25, 0}, {12.55, 0.04294598505886494}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{13.25, 0}, {13.55, 0.02229436382837251}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{14.25, 0}, {14.55, 0.0746274494465522}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{15.25, 0}, {15.55, 0.08737826103962139}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{16.25, 0}, {16.549999999999997`, 0.03899558024015332}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{17.25, 0}, {17.549999999999997`, 0.0010169358939257638`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{18.25, 0}, {18.549999999999997`, 0.07517503031251223}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{19.25, 0}, {19.549999999999997`, 0.05718308757382563}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{20.25, 0}, {20.549999999999997`, 0.09125044002033872}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{21.25, 0}, {21.549999999999997`, 0.03222904525364728}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{22.25, 0}, {22.549999999999997`, 0.008174600070403255}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{23.25, 0}, {23.549999999999997`, 0.011616536942151992`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{24.25, 0}, {24.549999999999997`, 0.0017991942738686587`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{25.25, 0}, {25.549999999999997`, 0.024328235616224037`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{26.25, 0}, {26.549999999999997`, 0.0007431454609457504}]}}, AlignmentPoint->Center, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->None, AxesOrigin->{0.6000000000000001, 0}, AxesStyle->{}, Background->GrayLevel[0.9], BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, CoordinatesToolOptions:>Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->{{{1.2, FormBox["\"A\"", TraditionalForm], 0}, {2.2, FormBox["\"B\"", TraditionalForm], 0}, {3.2, FormBox["\"C\"", TraditionalForm], 0}, {4.2, FormBox["\"D\"", TraditionalForm], 0}, {5.2, FormBox["\"E\"", TraditionalForm], 0}, {6.2, FormBox["\"F\"", TraditionalForm], 0}, {7.2, FormBox["\"G\"", TraditionalForm], 0}, {8.2, FormBox["\"H\"", TraditionalForm], 0}, {9.2, FormBox["\"I\"", TraditionalForm], 0}, {10.2, FormBox["\"J\"", TraditionalForm], 0}, {11.2, FormBox["\"K\"", TraditionalForm], 0}, {12.2, FormBox["\"L\"", TraditionalForm], 0}, {13.2, FormBox["\"M\"", TraditionalForm], 0}, {14.2, FormBox["\"N\"", TraditionalForm], 0}, {15.2, FormBox["\"O\"", TraditionalForm], 0}, {16.2, FormBox["\"P\"", TraditionalForm], 0}, {17.2, FormBox["\"Q\"", TraditionalForm], 0}, {18.2, FormBox["\"R\"", TraditionalForm], 0}, {19.2, FormBox["\"S\"", TraditionalForm], 0}, {20.2, FormBox["\"T\"", TraditionalForm], 0}, {21.2, FormBox["\"U\"", TraditionalForm], 0}, {22.2, FormBox["\"V\"", TraditionalForm], 0}, {23.2, FormBox["\"W\"", TraditionalForm], 0}, {24.2, FormBox["\"X\"", TraditionalForm], 0}, {25.2, FormBox["\"Y\"", TraditionalForm], 0}, {26.2, FormBox["\"Z\"", TraditionalForm], 0}}, Automatic}, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->Automatic, ImageSizeRaw->Automatic, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->{{0.6000000000000001, 26.8}, All}, PlotRangeClipping->True, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->{{{1.2, FormBox["\"A\"", TraditionalForm], 0}, {2.2, FormBox["\"B\"", TraditionalForm], 0}, {3.2, FormBox["\"C\"", TraditionalForm], 0}, {4.2, FormBox["\"D\"", TraditionalForm], 0}, {5.2, FormBox["\"E\"", TraditionalForm], 0}, {6.2, FormBox["\"F\"", TraditionalForm], 0}, {7.2, FormBox["\"G\"", TraditionalForm], 0}, {8.2, FormBox["\"H\"", TraditionalForm], 0}, {9.2, FormBox["\"I\"", TraditionalForm], 0}, {10.2, FormBox["\"J\"", TraditionalForm], 0}, {11.2, FormBox["\"K\"", TraditionalForm], 0}, {12.2, FormBox["\"L\"", TraditionalForm], 0}, {13.2, FormBox["\"M\"", TraditionalForm], 0}, {14.2, FormBox["\"N\"", TraditionalForm], 0}, {15.2, FormBox["\"O\"", TraditionalForm], 0}, {16.2, FormBox["\"P\"", TraditionalForm], 0}, {17.2, FormBox["\"Q\"", TraditionalForm], 0}, {18.2, FormBox["\"R\"", TraditionalForm], 0}, {19.2, FormBox["\"S\"", TraditionalForm], 0}, {20.2, FormBox["\"T\"", TraditionalForm], 0}, {21.2, FormBox["\"U\"", TraditionalForm], 0}, {22.2, FormBox["\"V\"", TraditionalForm], 0}, {23.2, FormBox["\"W\"", TraditionalForm], 0}, {24.2, FormBox["\"X\"", TraditionalForm], 0}, {25.2, FormBox["\"Y\"", TraditionalForm], 0}, {26.2, FormBox["\"Z\"", TraditionalForm], 0}}, Automatic}, TicksStyle->{}]], "Output", CellChangeTimes->{3.6337165702412148`*^9}, CellLabel->"Out[38]=", ImageCache->GraphicsData["CompressedBitmap", "\<\ eJztXb2O3DYQ5q2ku9sENhIgdpHEsGEjKS+Ni2BTO0aKNFcYMeDmYGRhF0EC X17Ab7BX5QXcB0ixSG3AnZ8g1+9rbMT/ITnUkpJ2V9qbA3zWSdRw5psfDkcS +fPFn69+/e3iz9cvLx48fXPxx6vXLy8f/Pj7m/pUccTY0SvG2H8PGD9e14fq 15qtVqvX/Bdjj/h/J+v1+uOxOaqQI+xq6jlxdNofveZzJT+aZstBUIwNCnbC 1stzxmaX/BRbzrlxn7HF9UfxN4EkQRJgLGZM/swuJWjzq92A9FD8d8oeq/51 x1JbRmPiPlawdy+Y+ZmI34W+xfLLCnG8vr5ks7CdaFEqekJWnJ5oofu9XpyZ doX6PV/KNrKFbL1eXzHDuRSHTay4ldOh06BSJmt7OmdLQG22+JtpIkZb+qfW GiBSOeIjvZw68tRyABvgvX5sEpsz4oqdqL0TwLc4rVgUPRrZXARlOyhbAsRQ 8JDCKeDOCi8lPWfvVittG6sPbw0dbRu18KitaZK6nSZrbahBMtGhpFOoVhKT AhoGB091r6xINAKsAICVHsDfLGaBXJ8AnsLh0/iE4sjKozxXwaT6myghlnMb Z3UsBucMZBomCOViBqARtJhxtRK04xrj570+odui9PR9Pj1hNjVOJcRitXpn tIEJV4EYCs8rYhYAffNiZrXm+L1E3VLgqnPhOcZ7mV1C7cnznJaOCSrKabc1 1l2HUm1OHjSOSSlaQG1ndZ8SEe1QEiXLr2eeQVDWKB8bs/VkCk0bqtLKyCAf yhTVcI8BXkFNAMHc+AENU7OL+CnHdCZNKfBTnXPoqOL7KWDeAqbuSTEX3LJV Y+ikjzaNGDHvVCYDvdM5V/rM+O4IbQ5jOiCA+x9ipVvyP3tHBADtf+6gUR+3 8L9TR7Ll8grSC8KCsgyN0GLmmX2SK2eijMSCwAdhjBIolzEVRZ3OCbQNruv4 niQvMS6MZ+pAVJ/UCPH/55YXKIdyucAV091PRV8Yyoy/QfS09mP+ZgZcT18O kc3+phQLMg7H3/TwiOeJ9Y2O0VbKVj+8fWxYqC0/nkrvxgUr44IihtWiMW0C mP8B0IzDmfyHg7fB4TRmvsNBVDwfxx0OZlKKNhyLUXoAPlefsSheKEfxRtAe /W+iuIG8OXbl+6HAdyHdxMcaBhqtDytMs7HAe53A5blhlFE41jtziaWHS08+ GJ2NIHM11wdd66h8FvyJRzB5bQZSB+y4q2kPkBOFPFcTfSpM4q7maKmzq+lk Dc/0E10tHOqElcJotnGi2a/L+QMKc5JSjrmchpm8lOPf7HKBO5RGUhFZ51dW 2zq2AEgCdyuBAoXIhetp3oDnm3nH7LL7aOfmQcDTOo9tcS8L53QiVsyvojll 6Gjzc+A9ZyLfiTia20/3JDJ3fhnKH5nXwamQQNVet/L342DKbEEaGG8Kkgg7 W4dSoQmmN6F1ogeoTbtDjzOY2+k34nBCSXPBAnA4LMOMzUO96a6qCUFZnOgD RD9GJnbYbBSrs3jqcydHoqAA+Bc5G5rHb8UtC0jar0SF7hB1zZk3C5h5rqml P3MQCZFrVWLBCmiwSOEqHZ9TO54JngvEKzcBHRO7scw6z1ULi6TORfwUrSn6 1PzN3eiDFmL0fYkjV2iGMCtVDvs1HAphYVkPwzCxQp9yKAkDDQVV5cU5cF/8 CUdYnXZL/VjVt4QGq9rpRwJMuS+YDnrJ0bngy7cMy5v7rINbS9qzjokCGXKv KZpSfvC4wxGiBktX6H0qwWzghWTAM1N7zq3Dw4cclvnEBx2ROnzwbGojoZNg ksOC0chXl8wAXXXFTMRW3TXabx9bOoulIz2nJ5t5OpubChh41GKMaqIov3Ap bXrOpJ1Q/831qePzB82l7Rn+nTXHUv59wo+H/sB3Ny8ICDwKlaVw1LQmCSGF kEr9kTkkHNe01RbKEaNTztqfkGukhTQtXIPBSaUJTVpAmjM7EgXXrBYKRwvi PaunDiMw51G5xlR1ilwynSLXkjotYKdo4iWTjCk8FzAaud9G7jXn4Cf+62i3 HYdmX/zz7PX7iTx68v7JlB+V5kicK+W5up18v4Gf4//YJKddifS2/zumiOT7 4rRvDvJ1WW7d9w7H/qZ7t7XpwC1s6g0ptmCsZpXampBLzJnIuNcO25qatXp4 NnQ3bjnSBkowqxGR5RP8tE5GvNNqKCRzOXhzaZpjkaZJ06TpMWtaztpEA35d /yNNH5ymyacPW9P3ScmkZFIyKZmUTEomJXdXMlaK3KRQSqcPTKHkoaRQUigp lBTaUaFfdVUjZgekPFIeKY+UdyOVl1HEJw0OXIPkg6TB1hrMx4D0Rnobpd7a vM5+GntlXZ833xex3Pd6yTaGZxu9vWRf6I+k5V8UMcZsFZlvXdslgJj7JR5Z wPgsIPUrkOPYVyD6K3kRP+xX8kKYipvChNR/wOovwfChv2mWccD95ul4awbw WSKVz3tWMXZ13+psFc8rpTS4OACpcN+JWqtPV5w1JeyCluPW5p2x6TDvIxLz 7XC4hgDpbp/FD8J8P8X6fpC+cyNQfbhj+72hqN4nQAlQApQAJUAJ0EEBShkT 2eUNBPQ2gUfgEXiJVAgygmyvkG25wnOwaJGV9YzbPUKry+ti+Oqn5hp8gpH0 IJHUsYU3tPTzXPisN1UNt28g5K0XnWTuT8qz1puKdOp7JrcaF5tFNk+x1i3e O6v2jnQqlSHiC/dDGX702A/SHV6ZNFtIEbgbxsCsl1+c9MPuPNkSXOxcPqRY ce82chWD6q45+k7Ckvc+SQlfyLQLkh4EElkZfr4kXxLXGNfenH3QvI4J4eZC EjFMDBPD22F4+BFtnLgSw8Tw2BkefmwYZ7ZDXO+O6/5r+9hOgfuHBathxMDo cYMxb0fgegYuP4UcFR4ty9682qB2xIE12bHI3lch2pRb4P610iPEV6/liGVv 3vGNOwbf4BzbyXYyEivo4AHuXtVg5YOxSN2quirXe3C2cx6J1O2Kp/bhXo/R 7QdErod50vSYjhwwNy1T+INDpJ8JGDFy8Izsz2GGhQMxQoyMgZGWQ93z7v21 lP45Iv0N7m8LO8/z1T7Aj5qV7V6mHsssqqxiJ2FyarJ7mfralnr3/PdT7nCU VAuyhAs9ZZU79sN/bI1LTBPfDsd+4OuOQoS4/WyD65ZrEPEZta4J8XbO9tlb 5LrNqjul/856tLLRK6vR4Sa/l3tx2oJ0rxT75xbLqA6J7F+jJZZgPcMV7l8i ESeRFSEa7u6Li2502qTSt8KPN9g2soUYs4k5MvYhjx5lERL9AookJp828IM0 74ufzTngNI0xSMd+MvLNYNg5ML1tyCJLvVqlu5LwMXZHTyxFUkTNj80FwbOg ym/dVyzYeiD9vsVgkHlPmx6xEYxuDFKvITM4ohvFfb+0sOUB3NNuQ49IarN5 Q49cvjpnMdFNJHI5SRzzNmxckN5ruxTA+TALWyn/We9dVkAfTauz9wZx6lri KdaVmzdkLH7d0H1ejqD7zli8eQCBxRv01/zoTjJhvDkWpgfbskHsAXC3t5bb sIvtNm8zRCJLN8CacPo6Jo0sdRgdUxfwaOw/ex7oIRIPnpFuu82LI0s72Gm6 6PWLnnuNLHiwLbBzlwHYYGCpA6SeyKZ+II93mzcwVjDZaf4Kvee4sYMh7ekw rrOj/wEXMPnE\ \>"]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageFirst"]}], ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPagePrevious"]}], ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageNext"]}], ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageLast"]}]], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], " ", "of", " ", CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], Appearance->{Automatic, None}]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["\<\ Ukol 1: Zjistete co se skryva pod nasledujicim sifrovym textem?\ \>", "Section"], Cell["Neznamy sifrovy text ST je:", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ST", "=", "\"\\""}]], "Input", CellLabel->"In[39]:="], Cell[BoxData["\<\"BAGURNGGRZCGAHZOREGUERRABGONQPBATENGHYNGVBAF\"\>"], "Output", CellChangeTimes->{3.633716581154231*^9}, CellLabel->"Out[39]="] }, Open ]], Cell["\<\ Provedte analyzu relativnich cetnosti a naleznete k nemu otevreny text. Jde o \ sifru podobnou Caesarove sifre.\ \>", "Text", CellLabel->"In[280]:="], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"BEZGrafyRelCetnostiSAnglictinou", "[", "ST", "]"}]], "Input", CellLabel->"In[40]:="], Cell[BoxData[ GraphicsBox[{ {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{0.85, 0}, {1.15, 0.11363636363636363`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{1.85, 0}, {2.15, 0.09090909090909091}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{2.85, 0}, {3.15, 0.022727272727272728`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{3.85, 0}, {4.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{4.85, 0}, {5.15, 0.06818181818181818}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{5.85, 0}, {6.15, 0.022727272727272728`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{6.85, 0}, {7.15, 0.18181818181818182`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{7.85, 0}, {8.15, 0.045454545454545456`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{8.85, 0}, {9.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{9.85, 0}, {10.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{10.85, 0}, {11.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{11.85, 0}, {12.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{12.85, 0}, {13.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{13.85, 0}, {14.15, 0.09090909090909091}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{14.85, 0}, {15.15, 0.045454545454545456`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{15.85, 0}, {16.15, 0.022727272727272728`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{16.85, 0}, {17.15, 0.022727272727272728`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{17.85, 0}, {18.15, 0.11363636363636363`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{18.85, 0}, {19.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{19.85, 0}, {20.15, 0.022727272727272728`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{20.85, 0}, {21.15, 0.045454545454545456`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{21.85, 0}, {22.15, 0.022727272727272728`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{22.85, 0}, {23.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{23.85, 0}, {24.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{24.85, 0}, {25.15, 0.022727272727272728`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{25.85, 0}, {26.15, 0.045454545454545456`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{1.25, 0}, {1.5499999999999998`, 0.0805726131341182}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{2.25, 0}, {2.55, 0.012594359917080612`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{3.25, 0}, {3.55, 0.03625767591035319}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{4.25, 0}, {4.550000000000001, 0.038095983103218996`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{5.25, 0}, {5.550000000000001, 0.11467907849962843`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{6.25, 0}, {6.550000000000001, 0.02409355810224117}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{7.25, 0}, {7.550000000000001, 0.015723393436852192`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{8.25, 0}, {8.55, 0.031212109359721515`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{9.25, 0}, {9.55, 0.0741972073375836}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{10.25, 0}, {10.55, 0.001290726326905777}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{11.25, 0}, {11.55, 0.0015254038408886454`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{12.25, 0}, {12.55, 0.04294598505886494}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{13.25, 0}, {13.55, 0.02229436382837251}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{14.25, 0}, {14.55, 0.0746274494465522}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{15.25, 0}, {15.55, 0.08737826103962139}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{16.25, 0}, {16.549999999999997`, 0.03899558024015332}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{17.25, 0}, {17.549999999999997`, 0.0010169358939257638`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{18.25, 0}, {18.549999999999997`, 0.07517503031251223}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{19.25, 0}, {19.549999999999997`, 0.05718308757382563}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{20.25, 0}, {20.549999999999997`, 0.09125044002033872}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{21.25, 0}, {21.549999999999997`, 0.03222904525364728}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{22.25, 0}, {22.549999999999997`, 0.008174600070403255}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{23.25, 0}, {23.549999999999997`, 0.011616536942151992`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{24.25, 0}, {24.549999999999997`, 0.0017991942738686587`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{25.25, 0}, {25.549999999999997`, 0.024328235616224037`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{26.25, 0}, {26.549999999999997`, 0.0007431454609457504}]}}, AlignmentPoint->Center, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->None, AxesOrigin->{0.6000000000000001, 0}, AxesStyle->{}, Background->GrayLevel[0.9], BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, CoordinatesToolOptions:>Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->{{{1.2, FormBox["\"A\"", TraditionalForm], 0}, {2.2, FormBox["\"B\"", TraditionalForm], 0}, {3.2, FormBox["\"C\"", TraditionalForm], 0}, {4.2, FormBox["\"D\"", TraditionalForm], 0}, {5.2, FormBox["\"E\"", TraditionalForm], 0}, {6.2, FormBox["\"F\"", TraditionalForm], 0}, {7.2, FormBox["\"G\"", TraditionalForm], 0}, {8.2, FormBox["\"H\"", TraditionalForm], 0}, {9.2, FormBox["\"I\"", TraditionalForm], 0}, {10.2, FormBox["\"J\"", TraditionalForm], 0}, {11.2, FormBox["\"K\"", TraditionalForm], 0}, {12.2, FormBox["\"L\"", TraditionalForm], 0}, {13.2, FormBox["\"M\"", TraditionalForm], 0}, {14.2, FormBox["\"N\"", TraditionalForm], 0}, {15.2, FormBox["\"O\"", TraditionalForm], 0}, {16.2, FormBox["\"P\"", TraditionalForm], 0}, {17.2, FormBox["\"Q\"", TraditionalForm], 0}, {18.2, FormBox["\"R\"", TraditionalForm], 0}, {19.2, FormBox["\"S\"", TraditionalForm], 0}, {20.2, FormBox["\"T\"", TraditionalForm], 0}, {21.2, FormBox["\"U\"", TraditionalForm], 0}, {22.2, FormBox["\"V\"", TraditionalForm], 0}, {23.2, FormBox["\"W\"", TraditionalForm], 0}, {24.2, FormBox["\"X\"", TraditionalForm], 0}, {25.2, FormBox["\"Y\"", TraditionalForm], 0}, {26.2, FormBox["\"Z\"", TraditionalForm], 0}}, Automatic}, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->Automatic, ImageSizeRaw->Automatic, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->{{0.6000000000000001, 26.8}, All}, PlotRangeClipping->True, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->{{{1.2, FormBox["\"A\"", TraditionalForm], 0}, {2.2, FormBox["\"B\"", TraditionalForm], 0}, {3.2, FormBox["\"C\"", TraditionalForm], 0}, {4.2, FormBox["\"D\"", TraditionalForm], 0}, {5.2, FormBox["\"E\"", TraditionalForm], 0}, {6.2, FormBox["\"F\"", TraditionalForm], 0}, {7.2, FormBox["\"G\"", TraditionalForm], 0}, {8.2, FormBox["\"H\"", TraditionalForm], 0}, {9.2, FormBox["\"I\"", TraditionalForm], 0}, {10.2, FormBox["\"J\"", TraditionalForm], 0}, {11.2, FormBox["\"K\"", TraditionalForm], 0}, {12.2, FormBox["\"L\"", TraditionalForm], 0}, {13.2, FormBox["\"M\"", TraditionalForm], 0}, {14.2, FormBox["\"N\"", TraditionalForm], 0}, {15.2, FormBox["\"O\"", TraditionalForm], 0}, {16.2, FormBox["\"P\"", TraditionalForm], 0}, {17.2, FormBox["\"Q\"", TraditionalForm], 0}, {18.2, FormBox["\"R\"", TraditionalForm], 0}, {19.2, FormBox["\"S\"", TraditionalForm], 0}, {20.2, FormBox["\"T\"", TraditionalForm], 0}, {21.2, FormBox["\"U\"", TraditionalForm], 0}, {22.2, FormBox["\"V\"", TraditionalForm], 0}, {23.2, FormBox["\"W\"", TraditionalForm], 0}, {24.2, FormBox["\"X\"", TraditionalForm], 0}, {25.2, FormBox["\"Y\"", TraditionalForm], 0}, {26.2, FormBox["\"Z\"", TraditionalForm], 0}}, Automatic}, TicksStyle->{}]], "Output", CellChangeTimes->{3.6337165852742367`*^9}, CellLabel->"Out[40]="] }, Open ]], Cell[TextData[{ StyleBox["Navod:", FontWeight->"Bold"], " Srovnejte relativni cetnost. Promenna ", StyleBox["ST", FontWeight->"Bold"], " je", StyleBox[" ", FontWeight->"Bold"], "globalni, takze muzete pouzit pomucky uvedene na predchozich slajdech. ", " " }], "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"RelCetnosti", "[", "ST", "]"}]], "Input", CellLabel->"In[41]:="], Cell[BoxData[ InterpretationBox[GridBox[{ {GridBox[{ {"\<\"A\"\>"}, {"0.11363636363636363636363636363636363636`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"B\"\>"}, {"0.09090909090909090909090909090909090909`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"C\"\>"}, {"0.02272727272727272727272727272727272727`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"D\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"E\"\>"}, {"0.06818181818181818181818181818181818182`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"F\"\>"}, {"0.02272727272727272727272727272727272727`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"G\"\>"}, {"0.18181818181818181818181818181818181818`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"H\"\>"}, {"0.04545454545454545454545454545454545455`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"I\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"J\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"K\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"L\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"M\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"N\"\>"}, {"0.09090909090909090909090909090909090909`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"O\"\>"}, {"0.04545454545454545454545454545454545455`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"P\"\>"}, {"0.02272727272727272727272727272727272727`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Q\"\>"}, {"0.02272727272727272727272727272727272727`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"R\"\>"}, {"0.11363636363636363636363636363636363636`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"S\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"T\"\>"}, {"0.02272727272727272727272727272727272727`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"U\"\>"}, {"0.04545454545454545454545454545454545455`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"V\"\>"}, {"0.02272727272727272727272727272727272727`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"W\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"X\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Y\"\>"}, {"0.02272727272727272727272727272727272727`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Z\"\>"}, {"0.04545454545454545454545454545454545455`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\<\"\"\>", "\<\"\"\>"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[2.0999999999999996`]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], TableForm[{{{"A", 0.11363636363636363636363636363636363636`2.}, { "B", 0.09090909090909090909090909090909090909`2.}, { "C", 0.02272727272727272727272727272727272727`2.}, {"D", 0}, { "E", 0.06818181818181818181818181818181818182`2.}, { "F", 0.02272727272727272727272727272727272727`2.}, { "G", 0.18181818181818181818181818181818181818`2.}}, {{ "H", 0.04545454545454545454545454545454545455`2.}, {"I", 0}, {"J", 0}, { "K", 0}, {"L", 0}, {"M", 0}, { "N", 0.09090909090909090909090909090909090909`2.}}, {{ "O", 0.04545454545454545454545454545454545455`2.}, { "P", 0.02272727272727272727272727272727272727`2.}, { "Q", 0.02272727272727272727272727272727272727`2.}, { "R", 0.11363636363636363636363636363636363636`2.}, {"S", 0}, { "T", 0.02272727272727272727272727272727272727`2.}, { "U", 0.04545454545454545454545454545454545455`2.}}, {{ "V", 0.02272727272727272727272727272727272727`2.}, {"W", 0}, {"X", 0}, { "Y", 0.02272727272727272727272727272727272727`2.}, { "Z", 0.04545454545454545454545454545454545455`2.}}}]]], "Output", CellChangeTimes->{3.6337165953442507`*^9}, CellLabel->"Out[41]//TableForm="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"RelCetnostiZBEZRelCetnosti", "[", "ENGLISH", "]"}]], "Input", CellLabel->"In[42]:="], Cell[BoxData[ InterpretationBox[GridBox[{ {GridBox[{ {"\<\"A\"\>"}, {"0.0805726131341181993`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"B\"\>"}, {"0.0125943599170806117`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"C\"\>"}, {"0.0362576759103531896`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"D\"\>"}, {"0.0380959831032189932`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"E\"\>"}, {"0.1146790784996284273`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"F\"\>"}, {"0.0240935581022411703`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"G\"\>"}, {"0.0157233934368521923`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"H\"\>"}, {"0.031212109359721516`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"I\"\>"}, {"0.0741972073375836039`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"J\"\>"}, {"0.001290726326905777`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"K\"\>"}, {"0.0015254038408886455`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"L\"\>"}, {"0.0429459850588649431`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"M\"\>"}, {"0.0222943638283725115`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"N\"\>"}, {"0.0746274494465521962`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"O\"\>"}, {"0.0873782610396213869`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"P\"\>"}, {"0.0389955802401533226`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Q\"\>"}, {"0.0010169358939257637`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"R\"\>"}, {"0.0751750303125122228`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"S\"\>"}, {"0.0571830875738256346`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"T\"\>"}, {"0.0912504400203387179`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"U\"\>"}, {"0.0322290452536472797`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"V\"\>"}, {"0.0081746000704032542`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"W\"\>"}, {"0.0116165369421519928`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"X\"\>"}, {"0.0017991942738686588`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Y\"\>"}, {"0.0243282356162240388`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Z\"\>"}, {"0.0007431454609457504`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\<\"\"\>", "\<\"\"\>"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[2.0999999999999996`]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], TableForm[{{{"A", 0.0805726131341181993`2.}, { "B", 0.0125943599170806117`2.}, {"C", 0.0362576759103531896`2.}, { "D", 0.0380959831032189932`2.}, {"E", 0.1146790784996284273`2.}, { "F", 0.0240935581022411703`2.}, {"G", 0.0157233934368521923`2.}}, {{ "H", 0.031212109359721516`2.}, {"I", 0.0741972073375836039`2.}, { "J", 0.001290726326905777`2.}, {"K", 0.0015254038408886455`2.}, { "L", 0.0429459850588649431`2.}, {"M", 0.0222943638283725115`2.}, { "N", 0.0746274494465521962`2.}}, {{"O", 0.0873782610396213869`2.}, { "P", 0.0389955802401533226`2.}, {"Q", 0.0010169358939257637`2.}, { "R", 0.0751750303125122228`2.}, {"S", 0.0571830875738256346`2.}, { "T", 0.0912504400203387179`2.}, {"U", 0.0322290452536472797`2.}}, {{ "V", 0.0081746000704032542`2.}, {"W", 0.0116165369421519928`2.}, { "X", 0.0017991942738686588`2.}, {"Y", 0.0243282356162240388`2.}, { "Z", 0.0007431454609457504`2.}}}]]], "Output", CellChangeTimes->{3.6337166018962603`*^9}, CellLabel->"Out[42]//TableForm="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Caesar", "[", RowBox[{"ST", ",", RowBox[{"+", "13"}]}], "]"}]], "Input", CellLabel->"In[43]:="], Cell[BoxData["\<\"ONTHEATTEMPTNUMBERTHREENOTBADCONGRATULATIONS\"\>"], "Output", CellChangeTimes->{3.6337166171872816`*^9}, CellLabel->"Out[43]="] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageFirst"]}], ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPagePrevious"]}], ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageNext"]}], ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageLast"]}]], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], " ", "of", " ", CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], Appearance->{Automatic, None}]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[TextData[{ "Sifry typu ", Cell[BoxData[ FormBox[ RowBox[{"|", RowBox[{"ap", "+", "b"}], SubscriptBox["|", "m"]}], TraditionalForm]]] }], "Section"], Cell[TextData[{ "Caesarova sifra je specialnim pripadem afinni sifry ", Cell[BoxData[ FormBox[ RowBox[{"|", RowBox[{"ap", "+", "b"}], SubscriptBox["|", "m"]}], TraditionalForm]]], " a je definovana jako ", Cell[BoxData[ FormBox[ RowBox[{"|", RowBox[{"p", "+", "b"}], SubscriptBox["|", "m"]}], TraditionalForm]]], ". Sifra tez predstavuje substituci, avsak nyni jiz tato substituce \ neposunuje graf relativnich cetnosti, ale dochazi k dukladnejsimu \ \"promichani\" (viz graf relativnich cetnosti). Celou vec si ukazme na \ prikladu:" }], "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"OT", "=", "\"\\""}]], "Input", CellLabel->"In[44]:="], Cell[BoxData["\<\"THISISYETANOTHERCIPHERTEXTTHATWEWILLENCIPHER\"\>"], "Output", CellChangeTimes->{3.633716638218311*^9}, CellLabel->"Out[44]="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"NCharacters", "=", "29"}], "\[IndentingNewLine]", RowBox[{"ST", "=", RowBox[{"AXPB", "[", RowBox[{"OT", ",", "6", ",", "19"}], "]"}]}]}], "Input", CellLabel->"In[45]:="], Cell[BoxData["29"], "Output", CellChangeTimes->{3.6337166413183155`*^9}, CellLabel->"Out[45]="], Cell[BoxData["\<\"RDJLJLSORTKQRDOFCJWDOFROMRRDTRGOGJ\\\\\\\\OKCJWDOF\"\>"], \ "Output", CellChangeTimes->{3.6337166413283157`*^9}, CellLabel->"Out[46]="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"BEZGrafyRelCetnosti", "[", RowBox[{"ST", ",", "OT"}], "]"}]], "Input", CellLabel->"In[47]:="], Cell[BoxData[ GraphicsBox[{ {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{0.85, 0}, {1.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{1.85, 0}, {2.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{2.85, 0}, {3.15, 0.045454545454545456`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{3.85, 0}, {4.15, 0.11363636363636363`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{4.85, 0}, {5.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{5.85, 0}, {6.15, 0.06818181818181818}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{6.85, 0}, {7.15, 0.045454545454545456`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{7.85, 0}, {8.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{8.85, 0}, {9.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{9.85, 0}, {10.15, 0.11363636363636363`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{10.85, 0}, {11.15, 0.045454545454545456`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{11.85, 0}, {12.15, 0.045454545454545456`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{12.85, 0}, {13.15, 0.022727272727272728`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{13.85, 0}, {14.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{14.85, 0}, {15.15, 0.1590909090909091}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{15.85, 0}, {16.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{16.85, 0}, {17.15, 0.022727272727272728`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{17.85, 0}, {18.15, 0.1590909090909091}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{18.85, 0}, {19.15, 0.022727272727272728`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{19.85, 0}, {20.15, 0.045454545454545456`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{20.85, 0}, {21.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{21.85, 0}, {22.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{22.85, 0}, {23.15, 0.045454545454545456`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{23.85, 0}, {24.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{24.85, 0}, {25.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{25.85, 0}, {26.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{26.85, 0}, {27.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{27.85, 0}, {28.15, 0.045454545454545456`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{28.85, 0}, {29.15, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{1.25, 0}, {1.5499999999999998`, 0.045454545454545456`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{2.25, 0}, {2.55, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{3.25, 0}, {3.55, 0.045454545454545456`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{4.25, 0}, {4.550000000000001, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{5.25, 0}, {5.550000000000001, 0.1590909090909091}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{6.25, 0}, {6.550000000000001, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{7.25, 0}, {7.550000000000001, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{8.25, 0}, {8.55, 0.11363636363636363`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{9.25, 0}, {9.55, 0.11363636363636363`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{10.25, 0}, {10.55, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{11.25, 0}, {11.55, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{12.25, 0}, {12.55, 0.045454545454545456`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{13.25, 0}, {13.55, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{14.25, 0}, {14.55, 0.045454545454545456`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{15.25, 0}, {15.55, 0.022727272727272728`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{16.25, 0}, {16.549999999999997`, 0.045454545454545456`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{17.25, 0}, {17.549999999999997`, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{18.25, 0}, {18.549999999999997`, 0.06818181818181818}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{19.25, 0}, {19.549999999999997`, 0.045454545454545456`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{20.25, 0}, {20.549999999999997`, 0.1590909090909091}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{21.25, 0}, {21.549999999999997`, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{22.25, 0}, {22.549999999999997`, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{23.25, 0}, {23.549999999999997`, 0.045454545454545456`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{24.25, 0}, {24.549999999999997`, 0.022727272727272728`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{25.25, 0}, {25.549999999999997`, 0.022727272727272728`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{26.25, 0}, {26.549999999999997`, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{27.25, 0}, {27.549999999999997`, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{28.25, 0}, {28.549999999999997`, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{29.25, 0}, {29.549999999999997`, 0}]}}, AlignmentPoint->Center, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->None, AxesOrigin->{0.6000000000000001, 0}, AxesStyle->{}, Background->GrayLevel[0.9], BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, CoordinatesToolOptions:>Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->{{{1.2, FormBox["\"A\"", TraditionalForm], 0}, {2.2, FormBox["\"B\"", TraditionalForm], 0}, {3.2, FormBox["\"C\"", TraditionalForm], 0}, {4.2, FormBox["\"D\"", TraditionalForm], 0}, {5.2, FormBox["\"E\"", TraditionalForm], 0}, {6.2, FormBox["\"F\"", TraditionalForm], 0}, {7.2, FormBox["\"G\"", TraditionalForm], 0}, {8.2, FormBox["\"H\"", TraditionalForm], 0}, {9.2, FormBox["\"I\"", TraditionalForm], 0}, {10.2, FormBox["\"J\"", TraditionalForm], 0}, {11.2, FormBox["\"K\"", TraditionalForm], 0}, {12.2, FormBox["\"L\"", TraditionalForm], 0}, {13.2, FormBox["\"M\"", TraditionalForm], 0}, {14.2, FormBox["\"N\"", TraditionalForm], 0}, {15.2, FormBox["\"O\"", TraditionalForm], 0}, {16.2, FormBox["\"P\"", TraditionalForm], 0}, {17.2, FormBox["\"Q\"", TraditionalForm], 0}, {18.2, FormBox["\"R\"", TraditionalForm], 0}, {19.2, FormBox["\"S\"", TraditionalForm], 0}, {20.2, FormBox["\"T\"", TraditionalForm], 0}, {21.2, FormBox["\"U\"", TraditionalForm], 0}, {22.2, FormBox["\"V\"", TraditionalForm], 0}, {23.2, FormBox["\"W\"", TraditionalForm], 0}, {24.2, FormBox["\"X\"", TraditionalForm], 0}, {25.2, FormBox["\"Y\"", TraditionalForm], 0}, {26.2, FormBox["\"Z\"", TraditionalForm], 0}, {27.2, FormBox["\"[\"", TraditionalForm], 0}, {28.2, FormBox["\"\\\\\"", TraditionalForm], 0}, {29.2, FormBox["\"]\"", TraditionalForm], 0}}, Automatic}, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->Automatic, ImageSizeRaw->Automatic, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->{{0.6000000000000001, 29.8}, All}, PlotRangeClipping->True, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->{{{1.2, FormBox["\"A\"", TraditionalForm], 0}, {2.2, FormBox["\"B\"", TraditionalForm], 0}, {3.2, FormBox["\"C\"", TraditionalForm], 0}, {4.2, FormBox["\"D\"", TraditionalForm], 0}, {5.2, FormBox["\"E\"", TraditionalForm], 0}, {6.2, FormBox["\"F\"", TraditionalForm], 0}, {7.2, FormBox["\"G\"", TraditionalForm], 0}, {8.2, FormBox["\"H\"", TraditionalForm], 0}, {9.2, FormBox["\"I\"", TraditionalForm], 0}, {10.2, FormBox["\"J\"", TraditionalForm], 0}, {11.2, FormBox["\"K\"", TraditionalForm], 0}, {12.2, FormBox["\"L\"", TraditionalForm], 0}, {13.2, FormBox["\"M\"", TraditionalForm], 0}, {14.2, FormBox["\"N\"", TraditionalForm], 0}, {15.2, FormBox["\"O\"", TraditionalForm], 0}, {16.2, FormBox["\"P\"", TraditionalForm], 0}, {17.2, FormBox["\"Q\"", TraditionalForm], 0}, {18.2, FormBox["\"R\"", TraditionalForm], 0}, {19.2, FormBox["\"S\"", TraditionalForm], 0}, {20.2, FormBox["\"T\"", TraditionalForm], 0}, {21.2, FormBox["\"U\"", TraditionalForm], 0}, {22.2, FormBox["\"V\"", TraditionalForm], 0}, {23.2, FormBox["\"W\"", TraditionalForm], 0}, {24.2, FormBox["\"X\"", TraditionalForm], 0}, {25.2, FormBox["\"Y\"", TraditionalForm], 0}, {26.2, FormBox["\"Z\"", TraditionalForm], 0}, {27.2, FormBox["\"[\"", TraditionalForm], 0}, {28.2, FormBox["\"\\\\\"", TraditionalForm], 0}, {29.2, FormBox["\"]\"", TraditionalForm], 0}}, Automatic}, TicksStyle->{}]], "Output", CellChangeTimes->{3.6337166444733205`*^9}, CellLabel->"Out[47]="] }, Open ]], Cell[TextData[{ "Sifrovy text muzeme desifrovat obracenim sifrovaciho predpisu a to je-li ", Cell[BoxData[ FormBox[ RowBox[{"y", "=", RowBox[{"|", RowBox[{"ap", "+", "b"}], SubscriptBox["|", "m"]}]}], TraditionalForm]]], "bude ", Cell[BoxData[ FormBox[ RowBox[{"p", "=", RowBox[{"|", RowBox[{ SuperscriptBox["a", RowBox[{"-", "1"}]], "(", RowBox[{"y", "-", "b"}], ")"}], SubscriptBox["|", "m"]}]}], TraditionalForm]]], "." }], "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"AXPB", "[", RowBox[{"ST", ",", "5", ",", "21"}], "]"}]], "Input", CellLabel->"In[48]:="], Cell[BoxData["\<\"THISISYETANOTHERCIPHERTEXTTHATWEWILLENCIPHER\"\>"], "Output", CellChangeTimes->{3.633716646363323*^9}, CellLabel->"Out[48]="] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Poznamka:", StyleBox[" Prikazem NCharacters=29 se rozsirila abeceda na 29 symbolu; \ jejich seznam viz dole.", FontWeight->"Plain"] }], "SubsubsectionIcon"], Cell[TextData[{ "Vsimnete si, ze jsme pred pouzitim transformace ", Cell[BoxData[ FormBox[ RowBox[{"|", RowBox[{"ap", "+", "b"}], SubscriptBox["|", "m"]}], TraditionalForm]]], " rozsirili vstupni abecedu na 29 znaku z 26 pouzitim prirazeni ", StyleBox["NCharacters=26", FontWeight->"Bold"], ". Proc byla tato operace nutna a co se stane, kdyz ", StyleBox["NCharacters", FontWeight->"Bold"], " zustane 26?\nPromenna ", StyleBox["SYMBOLS", FontWeight->"Bold"], " obsahuje celou abecedu, ktera muze byt rozsirena az na 58 znaku. Pro \ vypsani abecedy pouzite pro sifrovani muzeme pouzit funkci softwaru ", StyleBox["Mathematica", FontSlant->"Italic"], " ", StyleBox["Take", FontWeight->"Bold"], ", ktera vezme prvnich ", StyleBox["N", FontWeight->"Bold"], " znaku ze seznamu ", StyleBox["SYMBOLS", FontWeight->"Bold"], ", kde N=NCharacters." }], "Text", CellChangeTimes->{{3.41250568584375*^9, 3.41250571328125*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Take", "[", RowBox[{"SYMBOLS", ",", "NCharacters"}], "]"}]], "Input", CellLabel->"In[49]:="], Cell[BoxData[ RowBox[{"{", RowBox[{"\<\"A\"\>", ",", "\<\"B\"\>", ",", "\<\"C\"\>", ",", "\<\"D\"\>", ",", "\<\"E\"\>", ",", "\<\"F\"\>", ",", "\<\"G\"\>", ",", "\<\"H\"\>", ",", "\<\"I\"\>", ",", "\<\"J\"\>", ",", "\<\"K\"\>", ",", "\<\"L\"\>", ",", "\<\"M\"\>", ",", "\<\"N\"\>", ",", "\<\"O\"\>", ",", "\<\"P\"\>", ",", "\<\"Q\"\>", ",", "\<\"R\"\>", ",", "\<\"S\"\>", ",", "\<\"T\"\>", ",", "\<\"U\"\>", ",", "\<\"V\"\>", ",", "\<\"W\"\>", ",", "\<\"X\"\>", ",", "\<\"Y\"\>", ",", "\<\"Z\"\>", ",", "\<\"[\"\>", ",", "\<\"\\\\\"\>", ",", "\<\"]\"\>"}], "}"}]], "Output", CellChangeTimes->{3.633716649693328*^9}, CellLabel->"Out[49]="] }, Open ]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageFirst"]}], ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPagePrevious"]}], ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageNext"]}], ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageLast"]}]], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], " ", "of", " ", CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], Appearance->{Automatic, None}]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[TextData[{ "Ukol 2: Kryptoanalyza sifry ", Cell[BoxData[ FormBox[ RowBox[{"|", RowBox[{"ap", "+", "b"}], SubscriptBox["|", "m"]}], TraditionalForm]]] }], "Section", CellChangeTimes->{{3.41250585584375*^9, 3.412505855953125*^9}}], Cell[TextData[{ "1. Vyberte nahodne konstanty ", Cell[BoxData[ FormBox["a", TraditionalForm]]], " a ", Cell[BoxData[ FormBox["b", TraditionalForm]]], " a pro NCharacters=29 s nimi anglicky text alespon o 100 znacich. Takovy \ text muzete nalezt napriklad v libovolne dokumentaci k software. Az budete \ mit sifrovy text, poskytnete ho sousedovi (napr. e-mailem) ale nesdelujte mu \ hodnoty konstant!" }], "Text"], Cell[BoxData[{ RowBox[{ RowBox[{"NCharacters", "=", "29"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ "OT", "=", "\"\\""}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"a", "=", "9"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"b", "=", "25"}], ";"}]}], "Input", CellChangeTimes->{{3.6337166847083783`*^9, 3.6337166855483794`*^9}}, CellLabel->"In[50]:="], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ST", "=", RowBox[{"AXPB", "[", RowBox[{"OT", ",", "a", ",", "b"}], "]"}]}]], "Input", CellLabel->"In[54]:="], Cell[BoxData["\<\"[GWKODWBKNNGMWUZEDUKII[GWPDEMGERGEOGRPIDWDZ[JZOWCZIMK[Z[\ OKZIWEZ[NZOWKG[NJGCRCNWGFWZK[ZNDPZEZWDOGRRDEOKZICNDIKOD[NDMEGRRK[XLKNKG[\ WGCNDDNDIIDEZWDWGOG[XCOWDIDOWEG[KOOGRRDEODDLD[WBGCVBKWZPPDZENWGFDMCIIJMC[OWKG[\ ZIKWKN[GWMCIIJMC[OWKG[ZIKWUKII[GWOG[XCOWMK[Z[OKZIWEZ[NZOWKG[NZ[\ XWBDNGMWUZEDPEGLKXDXC[XDEWBKNZVEDDRD[WKN[GWMGEXKNWEKFCWKG[C[XDE[GOKEOCRNWZ[\ ODNNBZIIRK[XLKNKG[FDIKZFIDMGEZ[JWEZ[NZOWKG[NCWKIKSK[VWBDNGMWUZEDC[\ XDEWBKNDLZICZWKG[IKOD[NDZVEDDRD[W\"\>"], "Output", CellChangeTimes->{3.633716691688388*^9}, CellLabel->"Out[54]="] }, Open ]], Cell["", "Text"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageFirst"]}], ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPagePrevious"]}], ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageNext"]}], ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageLast"]}]], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], " ", "of", " ", CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], Appearance->{Automatic, None}]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[TextData[{ "Ukol 2: Kryptoanalyza sifry ", Cell[BoxData[ FormBox[ RowBox[{"|", RowBox[{"ap", "+", "b"}], SubscriptBox["|", "m"]}], TraditionalForm]]], " (2)" }], "Section", CellChangeTimes->{{3.41250586*^9, 3.412505860171875*^9}}], Cell["\<\ 2. Az obdrzite sifrovy text od souseda, priradte jeho hodnotu do promenne ST:\ \>", "Text"], Cell[BoxData[ RowBox[{ RowBox[{ "ST", "=", "\"\\""}], ";"}]], "Input", CellChangeTimes->{{3.6337167032884045`*^9, 3.633716706568409*^9}, 3.6337169628647785`*^9, 3.633717204971132*^9}, CellLabel->"In[97]:="], Cell["Nyni provedte analyzu cetnosti:", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"RelCetnosti", "[", "ST", "]"}]], "Input", CellLabel->"In[98]:="], Cell[BoxData[ InterpretationBox[GridBox[{ {GridBox[{ {"\<\"A\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"B\"\>"}, {"0.01354401805869074492099322799097065463`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"C\"\>"}, {"0.04288939051918735891647855530474040632`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"D\"\>"}, {"0.00225733634311512415349887133182844244`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"E\"\>"}, {"0.01128668171557562076749435665914221219`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"F\"\>"}, {"0.00902934537246049661399548532731376975`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"G\"\>"}, {"0.05869074492099322799097065462753950339`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"H\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"I\"\>"}, {"0.01128668171557562076749435665914221219`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"J\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"K\"\>"}, {"0.05643340857787810383747178329571106095`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"L\"\>"}, {"0.0180586907449209932279909706546275395`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"M\"\>"}, {"0.02934537246049661399548532731376975169`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"N\"\>"}, {"0.05869074492099322799097065462753950339`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"O\"\>"}, {"0.01128668171557562076749435665914221219`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"P\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Q\"\>"}, {"0.02483069977426636568848758465011286682`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"R\"\>"}, {"0.09255079006772009029345372460496613995`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"S\"\>"}, {"0.09706546275395033860045146726862302483`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"T\"\>"}, {"0.06320541760722347629796839729119638826`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"U\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"V\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"W\"\>"}, {"0.09932279909706546275395033860045146727`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"X\"\>"}, {"0"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Y\"\>"}, {"0.08126410835214446952595936794582392776`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Z\"\>"}, {"0.09932279909706546275395033860045146727`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"[\"\>"}, {"0.01128668171557562076749435665914221219`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"\\\\\"\>"}, {"0.07900677200902934537246049661399548533`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"]\"\>"}, {"0.02934537246049661399548532731376975169`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", \ "\<\"\"\>", "\<\"\"\>", "\<\"\"\>"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[2.0999999999999996`]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], TableForm[{{{"A", 0}, {"B", 0.01354401805869074492099322799097065463`2.}, { "C", 0.04288939051918735891647855530474040632`2.}, { "D", 0.00225733634311512415349887133182844244`2.}, { "E", 0.01128668171557562076749435665914221219`2.}, { "F", 0.00902934537246049661399548532731376975`2.}, { "G", 0.05869074492099322799097065462753950339`2.}}, {{"H", 0}, { "I", 0.01128668171557562076749435665914221219`2.}, {"J", 0}, { "K", 0.05643340857787810383747178329571106095`2.}, { "L", 0.0180586907449209932279909706546275395`2.}, { "M", 0.02934537246049661399548532731376975169`2.}, { "N", 0.05869074492099322799097065462753950339`2.}}, {{ "O", 0.01128668171557562076749435665914221219`2.}, {"P", 0}, { "Q", 0.02483069977426636568848758465011286682`2.}, { "R", 0.09255079006772009029345372460496613995`2.}, { "S", 0.09706546275395033860045146726862302483`2.}, { "T", 0.06320541760722347629796839729119638826`2.}, {"U", 0}}, {{ "V", 0}, {"W", 0.09932279909706546275395033860045146727`2.}, {"X", 0}, { "Y", 0.08126410835214446952595936794582392776`2.}, { "Z", 0.09932279909706546275395033860045146727`2.}, { "[", 0.01128668171557562076749435665914221219`2.}, { "\\", 0.07900677200902934537246049661399548533`2.}}, {{ "]", 0.02934537246049661399548532731376975169`2.}}}]]], "Output", CellChangeTimes->{3.6337167147094207`*^9, 3.6337169707527943`*^9, 3.633717026789874*^9, 3.6337172082011366`*^9}, CellLabel->"Out[98]//TableForm="] }, Open ]], Cell["A srovnejte ji s cetnostmi pro anglictinu:", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"RelCetnostiZBEZRelCetnosti", "[", "ENGLISH", "]"}]], "Input", CellLabel->"In[99]:="], Cell[BoxData[ InterpretationBox[GridBox[{ {GridBox[{ {"\<\"A\"\>"}, {"0.0805726131341181993`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"B\"\>"}, {"0.0125943599170806117`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"C\"\>"}, {"0.0362576759103531896`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"D\"\>"}, {"0.0380959831032189932`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"E\"\>"}, {"0.1146790784996284273`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"F\"\>"}, {"0.0240935581022411703`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"G\"\>"}, {"0.0157233934368521923`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"H\"\>"}, {"0.031212109359721516`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"I\"\>"}, {"0.0741972073375836039`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"J\"\>"}, {"0.001290726326905777`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"K\"\>"}, {"0.0015254038408886455`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"L\"\>"}, {"0.0429459850588649431`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"M\"\>"}, {"0.0222943638283725115`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"N\"\>"}, {"0.0746274494465521962`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"O\"\>"}, {"0.0873782610396213869`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"P\"\>"}, {"0.0389955802401533226`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Q\"\>"}, {"0.0010169358939257637`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"R\"\>"}, {"0.0751750303125122228`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"S\"\>"}, {"0.0571830875738256346`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"T\"\>"}, {"0.0912504400203387179`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"U\"\>"}, {"0.0322290452536472797`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}]}, {GridBox[{ {"\<\"V\"\>"}, {"0.0081746000704032542`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"W\"\>"}, {"0.0116165369421519928`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"X\"\>"}, {"0.0017991942738686588`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Y\"\>"}, {"0.0243282356162240388`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{ {"\<\"Z\"\>"}, {"0.0007431454609457504`2."} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.1]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\<\"\"\>", "\<\"\"\>"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[2.0999999999999996`]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], TableForm[{{{"A", 0.0805726131341181993`2.}, { "B", 0.0125943599170806117`2.}, {"C", 0.0362576759103531896`2.}, { "D", 0.0380959831032189932`2.}, {"E", 0.1146790784996284273`2.}, { "F", 0.0240935581022411703`2.}, {"G", 0.0157233934368521923`2.}}, {{ "H", 0.031212109359721516`2.}, {"I", 0.0741972073375836039`2.}, { "J", 0.001290726326905777`2.}, {"K", 0.0015254038408886455`2.}, { "L", 0.0429459850588649431`2.}, {"M", 0.0222943638283725115`2.}, { "N", 0.0746274494465521962`2.}}, {{"O", 0.0873782610396213869`2.}, { "P", 0.0389955802401533226`2.}, {"Q", 0.0010169358939257637`2.}, { "R", 0.0751750303125122228`2.}, {"S", 0.0571830875738256346`2.}, { "T", 0.0912504400203387179`2.}, {"U", 0.0322290452536472797`2.}}, {{ "V", 0.0081746000704032542`2.}, {"W", 0.0116165369421519928`2.}, { "X", 0.0017991942738686588`2.}, {"Y", 0.0243282356162240388`2.}, { "Z", 0.0007431454609457504`2.}}}]]], "Output", CellChangeTimes->{3.63371672109943*^9, 3.6337169732627983`*^9, 3.6337170283198767`*^9, 3.6337172099111385`*^9}, CellLabel->"Out[99]//TableForm="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"BEZGrafyRelCetnostiSAnglictinou", "[", "ST", "]"}]], "Input", CellLabel->"In[100]:="], Cell[BoxData[ GraphicsBox[{ {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{0.85, 0}, {1.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{1.85, 0}, {2.15, 0.013544018058690745`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{2.85, 0}, {3.15, 0.04288939051918736}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{3.85, 0}, {4.15, 0.002257336343115124}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{4.85, 0}, {5.15, 0.011286681715575621`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{5.85, 0}, {6.15, 0.009029345372460496}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{6.85, 0}, {7.15, 0.05869074492099323}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{7.85, 0}, {8.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{8.85, 0}, {9.15, 0.011286681715575621`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{9.85, 0}, {10.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{10.85, 0}, {11.15, 0.056433408577878104`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{11.85, 0}, {12.15, 0.01805869074492099}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{12.85, 0}, {13.15, 0.029345372460496615`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{13.85, 0}, {14.15, 0.05869074492099323}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{14.85, 0}, {15.15, 0.011286681715575621`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{15.85, 0}, {16.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{16.85, 0}, {17.15, 0.024830699774266364`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{17.85, 0}, {18.15, 0.09255079006772009}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{18.85, 0}, {19.15, 0.09706546275395034}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{19.85, 0}, {20.15, 0.06320541760722348}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{20.85, 0}, {21.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{21.85, 0}, {22.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{22.85, 0}, {23.15, 0.09932279909706546}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{23.85, 0}, {24.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{24.85, 0}, {25.15, 0.08126410835214447}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{25.85, 0}, {26.15, 0.09932279909706546}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{26.85, 0}, {27.15, 0.011286681715575621`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{27.85, 0}, {28.15, 0.07900677200902935}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{28.85, 0}, {29.15, 0.029345372460496615`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{1.25, 0}, {1.5499999999999998`, 0.0805726131341182}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{2.25, 0}, {2.55, 0.012594359917080612`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{3.25, 0}, {3.55, 0.03625767591035319}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{4.25, 0}, {4.550000000000001, 0.038095983103218996`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{5.25, 0}, {5.550000000000001, 0.11467907849962843`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{6.25, 0}, {6.550000000000001, 0.02409355810224117}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{7.25, 0}, {7.550000000000001, 0.015723393436852192`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{8.25, 0}, {8.55, 0.031212109359721515`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{9.25, 0}, {9.55, 0.0741972073375836}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{10.25, 0}, {10.55, 0.001290726326905777}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{11.25, 0}, {11.55, 0.0015254038408886454`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{12.25, 0}, {12.55, 0.04294598505886494}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{13.25, 0}, {13.55, 0.02229436382837251}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{14.25, 0}, {14.55, 0.0746274494465522}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{15.25, 0}, {15.55, 0.08737826103962139}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{16.25, 0}, {16.549999999999997`, 0.03899558024015332}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{17.25, 0}, {17.549999999999997`, 0.0010169358939257638`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{18.25, 0}, {18.549999999999997`, 0.07517503031251223}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{19.25, 0}, {19.549999999999997`, 0.05718308757382563}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{20.25, 0}, {20.549999999999997`, 0.09125044002033872}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{21.25, 0}, {21.549999999999997`, 0.03222904525364728}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{22.25, 0}, {22.549999999999997`, 0.008174600070403255}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{23.25, 0}, {23.549999999999997`, 0.011616536942151992`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{24.25, 0}, {24.549999999999997`, 0.0017991942738686587`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{25.25, 0}, {25.549999999999997`, 0.024328235616224037`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{26.25, 0}, {26.549999999999997`, 0.0007431454609457504}]}}, AlignmentPoint->Center, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->None, AxesOrigin->{0.6000000000000001, 0}, AxesStyle->{}, Background->GrayLevel[0.9], BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, CoordinatesToolOptions:>Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->{{{1.2, FormBox["\"A\"", TraditionalForm], 0}, {2.2, FormBox["\"B\"", TraditionalForm], 0}, {3.2, FormBox["\"C\"", TraditionalForm], 0}, {4.2, FormBox["\"D\"", TraditionalForm], 0}, {5.2, FormBox["\"E\"", TraditionalForm], 0}, {6.2, FormBox["\"F\"", TraditionalForm], 0}, {7.2, FormBox["\"G\"", TraditionalForm], 0}, {8.2, FormBox["\"H\"", TraditionalForm], 0}, {9.2, FormBox["\"I\"", TraditionalForm], 0}, {10.2, FormBox["\"J\"", TraditionalForm], 0}, {11.2, FormBox["\"K\"", TraditionalForm], 0}, {12.2, FormBox["\"L\"", TraditionalForm], 0}, {13.2, FormBox["\"M\"", TraditionalForm], 0}, {14.2, FormBox["\"N\"", TraditionalForm], 0}, {15.2, FormBox["\"O\"", TraditionalForm], 0}, {16.2, FormBox["\"P\"", TraditionalForm], 0}, {17.2, FormBox["\"Q\"", TraditionalForm], 0}, {18.2, FormBox["\"R\"", TraditionalForm], 0}, {19.2, FormBox["\"S\"", TraditionalForm], 0}, {20.2, FormBox["\"T\"", TraditionalForm], 0}, {21.2, FormBox["\"U\"", TraditionalForm], 0}, {22.2, FormBox["\"V\"", TraditionalForm], 0}, {23.2, FormBox["\"W\"", TraditionalForm], 0}, {24.2, FormBox["\"X\"", TraditionalForm], 0}, {25.2, FormBox["\"Y\"", TraditionalForm], 0}, {26.2, FormBox["\"Z\"", TraditionalForm], 0}, {27.2, FormBox["\"[\"", TraditionalForm], 0}, {28.2, FormBox["\"\\\\\"", TraditionalForm], 0}, {29.2, FormBox["\"]\"", TraditionalForm], 0}}, Automatic}, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->Automatic, ImageSizeRaw->Automatic, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->{{0.6000000000000001, 29.8}, All}, PlotRangeClipping->True, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->{{{1.2, FormBox["\"A\"", TraditionalForm], 0}, {2.2, FormBox["\"B\"", TraditionalForm], 0}, {3.2, FormBox["\"C\"", TraditionalForm], 0}, {4.2, FormBox["\"D\"", TraditionalForm], 0}, {5.2, FormBox["\"E\"", TraditionalForm], 0}, {6.2, FormBox["\"F\"", TraditionalForm], 0}, {7.2, FormBox["\"G\"", TraditionalForm], 0}, {8.2, FormBox["\"H\"", TraditionalForm], 0}, {9.2, FormBox["\"I\"", TraditionalForm], 0}, {10.2, FormBox["\"J\"", TraditionalForm], 0}, {11.2, FormBox["\"K\"", TraditionalForm], 0}, {12.2, FormBox["\"L\"", TraditionalForm], 0}, {13.2, FormBox["\"M\"", TraditionalForm], 0}, {14.2, FormBox["\"N\"", TraditionalForm], 0}, {15.2, FormBox["\"O\"", TraditionalForm], 0}, {16.2, FormBox["\"P\"", TraditionalForm], 0}, {17.2, FormBox["\"Q\"", TraditionalForm], 0}, {18.2, FormBox["\"R\"", TraditionalForm], 0}, {19.2, FormBox["\"S\"", TraditionalForm], 0}, {20.2, FormBox["\"T\"", TraditionalForm], 0}, {21.2, FormBox["\"U\"", TraditionalForm], 0}, {22.2, FormBox["\"V\"", TraditionalForm], 0}, {23.2, FormBox["\"W\"", TraditionalForm], 0}, {24.2, FormBox["\"X\"", TraditionalForm], 0}, {25.2, FormBox["\"Y\"", TraditionalForm], 0}, {26.2, FormBox["\"Z\"", TraditionalForm], 0}, {27.2, FormBox["\"[\"", TraditionalForm], 0}, {28.2, FormBox["\"\\\\\"", TraditionalForm], 0}, {29.2, FormBox["\"]\"", TraditionalForm], 0}}, Automatic}, TicksStyle->{}]], "Output", CellChangeTimes->{3.6337167384614544`*^9, 3.633716975142801*^9, 3.6337170304898796`*^9, 3.6337172118411417`*^9}, CellLabel->"Out[100]=", ImageCache->GraphicsData["CompressedBitmap", "\<\ eJztXb1uG0cQXvFIkUr8A8QBEhhG7LizCyMJnIa9Y6RIoyKVG8cIYRdGAssv 4DYVVeQN3BtwwQcw4E5PEPV6Deb2Z3Zn9ue4xztSS2oESDre7e3MfPPN7N9x 77fnb1/++fr521cvnt97+ub53y9fvTi598tfb+pT1YEQBy+FEP/dE/J4WR+a P0txcXHxSv4R4r78N14ul2dDezSKnIsd5ZZTR5PMcp11qeTRkT3qp2YGar+A EmOxXBwLMT2Rp8RiJgPjkZifn6nPG4ZQjJSU5fKDmE+tZDGI3A5Fz0+EKjk9 EedLU3S3AFd2aHO1HcoBs9OtAF45wOenYmgvqCNRhbpU5nAxV4DLTwjy79W/ I3Hx+Z0Ai+B2zSXt1Xefa9FaAXReiIH6W9l7ZAnjbudqV692N1R08f5ZqiKn f33ufP7IlqvM39lCC5O/AxC4PBWzmMARFJDgpDWaiM/vHpsrx2KBapvOPyAi O+fDT02CASpAmR4KOkKChDQFUUoKPjPO1ObjsmC+UQiZPxGPnbDAf3VUDk26 cMrrYNV6KrEG8bHhGEbTSylZaBP/o8wAaCP3WxC0r5U24H5cD9AE21+hwACb oRxUS3gZGob0GkAgqVIGFqe1xg/Ea0I5lwUYG1egz4LEsSFkg1n13/dWXRsl gcxVeWE+9TzYnBfuY+yNEYDMYqYxC7FHWJo8AWHqgLFqWH+Bj6CMpIA5h+sN jDV1WXnmvkAvYwMCxaKq3esZRliOz0FFLtQHFl3nD5QIxoZFrgpJBGpvRESd TaqgEt3AW9YAU3AuhXMeIARcvy4pfDol0W8DBO5FLKdsw8COQg/j1OKFByrj 4owkfYMEMcjA7DxMghUXHllskRnYffR2CehUsyeIdehaocwUIorO4+4YiTRE kgRghiK5sQ0VozY/uNYY3iQ32dxidF8V3oaFNFchFo4whf2YxhSOxTSO1YYg jpB+E0HskmBCeUo0SEQtg3hC7FksTnFliaqsOXMSwxWpfr0EmZVQRiSWTXZD 6I1SbUYyckmCjse/w4w6XdWkrYA+kanFwiP/zxwbSH9Hx208ITXGME1WIXWT gYt42Spwxz4zIpQc46BFmVZ7CFCWfUuoozlgUUcA93IhYEl2CLrBNbmMo3GB IRFfR1BsNFFtK4aHtvMom4KaCSQcME9RE2Fj1nblJLorYhaw8mMWO7QhyzoI mrM2QdfWF/hxSIcz0xOXtob4JtwB6Cd6xWFALQNNFYthBc9c9498hHGGAi84 hZqj1waTxDkjemNQhrJWx2/E7qA9bBrPxNy8ZgxHBkPJoSyN4aT4EZkngMFP bsTi6YwwTCF81ECsXZgqcSZ9pMOUQNU5TMHueBOcGaa0pVU8J3hiUtHBrauk 17D1m59aHRq2ckpJJn7TuZbwNIetzz58VeVkMsPg9HNWYmNWRC+OuFbRS3EJ GrVEu4sHBN06yt3b3aT4bq1sOmZpvSrd1PVWWKPmwJ0do2h8pHpwicClgrr3 iXNHO4MG44PhrucO4tBIO9MtWulU1iDeFA4w2rI34+YtsEnR/nJ8kO9QREsT tp0I2tGIfYkAxg6C7n7b2FVen2mPro5dMvVh+iPCm1cQ3iTxmOZHbxqoaRor mORIMdIwyZUD1ZD6qlPqDXc2FeWH/ngGXE5I2xzoU29IM/UCHe5/RKAIIWs/ idU8a+l7O5xjIEGum8OQWuHkmAl6ypnoaKF11AfZbui3LoOmRFarN6MjyuhU V9ao06g7ivAPOt75kQ8eyo38O/L40IhOLkoAvLHVrXAVwfHLVjSPT8om6sJp gCxweVP8pMHBMmElSJgUQLhPjDxWugHeONzgOl7qIuG2aqlLk+WQGACVvq8v q0qC1S5iB8VsRMpC+crliUo801p4/Bd0ztWuweA1LmcBaaMa17ko6I3LnY3L SjVIeLnLIX8WJAmfotMpTQBxtvhrMhPhgKyvLQgALvgPKeAzO+moa75GlqTk 7zNay6pVRrgdPrvJp7EzxEmFzwJP4JMfmlZXPX+Qnptb/TiCyxulP5NQwtMy d1CMqqezgDAM3mrw8EwYTSGVyXB4YqsyjWmyLaujOjEPwA7q5KBz1JCaDlKT gyLFhWsyg2spB6nHHJ8SRXCHz/SwjozQyCUrNHItS2iFhUZ7nbrpOvLHlaRM 4n4lQ7VGS6nBr/LPwXYFe7Yrp1cfn3x6opAZfvz91Sfdaslz8Ku7nupaha+J gb2z+Wqi3kyZwbWJvm+l7Elb69a2fJAlyelzGYg66TH8BvRqb5yY0KOhPdpi hDPLL5vlk42gtylGT1JHEfaa9QlNQz1LAOyNXBJkHEmvXU323qC4MkP7YyjM hbmRpcqYX8RPQ1fOO206Epuh5ZiCwhS8RAreyEI5i3jJETJzhjnDnGHOMGeY M8wZ5syOcOauuiTZwiRhkjSRhHMK04XpwnRhujBdmC5MF6YL04XpwnQpkS43 95kkMUCZEiVQYsvzKEyEUonAuYEpwZRgSlwiJby+cwsCuDo25exm3bbn2ltZ ON9iN7IbffjYaew0dlrPTrvZaAi7il3Frkq6ypt8YAeV5qANx9I1dkx7x2Q8 MsfeYe+wd9g7O+addXYjmCR3HjTn7X41Ive719tgwLXIHVfV371tblDBFn/6 Uxmxzp5e+7vlwAL1HUi88xJ7tQyv5u6ScZjaJQM2UFNx7japV5aMlipvs1d3 zqtDlL1hCzsO2TKcu1Yihrcp4D0V2aElOXTNfS/IBqPu/THs2yJ8227HCLsD W3xfyTJ96ryxh/4rZLaBcWfcdxd3dwejzWh3R3uSg20/q5PbALNZq8uGcMeY yWAymAwmg8lgMpgMZllgxr7dUDKEXyPgLqEnuctwMc8YuD0A7huGa1/gus0g MUgMUskg9djH2jdomD/NIG14Jv2qInWNUWFUGBWKSn9v3LPX8PMeLR/O+vZK gN3DA+bwBFzkhccMcrf3hgn60+4JtL6xvV0EorlP4F5vfPsgftt1wNvk09WM aBpR/ErfEjJBGdh2+G7HyL55nuH026xWD/SSzkANL8Np4Gz3DO0Qfx/FvXHt SiOY0Y9/mGn3d2wtW1vWPOG+mXdl/MiGsqFsKBvKhrKh3E1gP7KhbCgbyoay oQUYyq3nzht6taaGOlv7A9vINloNx/1Z1P8DI1Be33SasUa0m5D1tq/gIV74 NUvrevuyTNQeWKx+LgqhNZ/ZkItm0/kHhIbm486i0dfzFnYd0TyUpY9jz1vs AxpHjWjIcJrVxBioQKvsNlNSRvP+qyVj0yFuKlis15/aNFSl4rDWQwp6l1bA IWM/z4JxWO/pAvfM227nzVadLdYeP/exx7o2TwCUoNyOYMhqspqsJqtZjJqc 1FlNVpPVLF/NPy5NuWSOfF0eSjGVJt3FtxqssA57r0N/Kxh2Ol5uVY9+zNxi GXb2uOxglhncZKKeUCvDzrW/8FmATQ+NJf1M/BMX1iYt8DtPkhP/JVqSepda zDs/bciSjktT3gvg0uzqov/dhNZrvoZDzhPD+ogsZybHN671Oi+YGPobDiRn 8HtVNdmQsZSEFNcd7b/ajevNAtYX8A9X27VaL2yK1LFVtQ+KqOzfq1eFx6Rt yc5oYkqr59Om7l5n/Hk93JhGdO0mr1Yxc+gY24wIupKRKvoAL9Ln/rJBi0jx 1Vos5dFXRuzq8cxRnnxcj55bk+J/3LbUPKsvCewVg5chvCeQvrb1MHZHO8mJ AQiIdSMN9PzMyC+dEXpYZkYy2V7xWBsRXM+viUsy3ltFUZ19mr5/m9fFwf+O kH0j\ \>"]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageFirst"]}], ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPagePrevious"]}], ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageNext"]}], ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageLast"]}]], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], " ", "of", " ", CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], Appearance->{Automatic, None}]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[TextData[{ "Ukol 2: Kryptoanalyza sifry ", Cell[BoxData[ FormBox[ RowBox[{"|", RowBox[{"ap", "+", "b"}], SubscriptBox["|", "m"]}], TraditionalForm]]], " (3)" }], "Section", CellChangeTimes->{{3.412505865109375*^9, 3.41250586525*^9}}], Cell[TextData[{ "Z analyzy relativnich cetnosti muzeme zjistit, ze nejcetni pismena pro \ anglictinu jsou T a E. Toho muzeme pouzit pro zjisteni desifrovaciho klice. \ Vybereme tedy 2 nejcetnejsi pismena z analyzy sifroveho textu a zkusime je \ namapovat na T a E. Resenim soustavy 2 rovnic o 2 neznamych vypocteme nezname \ koeficienty ", Cell[BoxData[ FormBox["a", TraditionalForm]]], " a ", Cell[BoxData[ FormBox["b", TraditionalForm]]], "." }], "Text"], Cell[TextData[{ "Rekneme ze pro nas priklad vidime, ze nejcetnejsi jsou pismena U a B. \ Zkusme tedy predpokladat, ze:\n\t", Cell[BoxData[ FormBox[ RowBox[{"U", "=", RowBox[{"|", RowBox[{ RowBox[{"a", " ", "T"}], "+", "b"}], SubscriptBox["|", "29"]}]}], TraditionalForm]]], "\n\t", Cell[BoxData[ FormBox[ RowBox[{"B", "=", RowBox[{"|", RowBox[{ RowBox[{"a", " ", "E"}], "+", "b"}], SubscriptBox["|", "29"]}]}], TraditionalForm]]], "\nTedy, z ", Cell[BoxData[ FormBox["T", TraditionalForm]]], " neznamou transformaci vznikne ", Cell[BoxData[ FormBox["U", TraditionalForm]]], " a z ", Cell[BoxData[ FormBox["E", TraditionalForm]]], " touz transformaci vznikne ", Cell[BoxData[ FormBox["B", TraditionalForm]]], ". Abychom urcili ", Cell[BoxData[ FormBox["a", TraditionalForm]]], " a ", Cell[BoxData[ FormBox["b", TraditionalForm]]], ", musime uz jen vyresit tyto dve rovnice napriklad dosazovaci metodou:" }], "Text"], Cell[TextData[{ "\t", Cell[BoxData[ FormBox[ RowBox[{"b", "=", RowBox[{"|", RowBox[{"U", "-", RowBox[{"a", " ", "T"}]}], SubscriptBox["|", "29"]}]}], TraditionalForm]]], "\n\t", Cell[BoxData[ FormBox["B", TraditionalForm]]], " = ", Cell[BoxData[ FormBox[ RowBox[{"|", RowBox[{ RowBox[{"a", " ", "E"}], "+"}], "|", RowBox[{"U", "-", RowBox[{"a", " ", "T"}]}], SubscriptBox["|", "29"], SubscriptBox["|", "29"]}], TraditionalForm]]] }], "Text"], Cell[TextData[{ "Protoze nezalezi, kdy redukci mod 29 provedeme, muzeme vztah prepsat jako:\n\ \t", Cell[BoxData[ FormBox[ RowBox[{"B", " "}], TraditionalForm]]], "= ", Cell[BoxData[ FormBox[ RowBox[{"|", RowBox[{ RowBox[{"a", " ", RowBox[{"(", " ", RowBox[{"E", " ", "-", " ", "T"}], " ", ")"}]}], "+", "U"}], SubscriptBox["|", "29"]}], TraditionalForm]]], "\n\t", Cell[BoxData[ FormBox[ RowBox[{"a", " ", "=", RowBox[{"|", RowBox[{ RowBox[{"(", RowBox[{"B", "-", "U"}], ")"}], "*", SuperscriptBox[ RowBox[{"(", RowBox[{"E", "-", "T"}], ")"}], RowBox[{"-", "1"}]]}], SubscriptBox["|", "29"]}]}], TraditionalForm]]], "\n\t", Cell[BoxData[ FormBox[ RowBox[{"b", " ", "=", " ", RowBox[{"|", RowBox[{"U", "-", RowBox[{ RowBox[{"(", RowBox[{"B", "-", "U"}], ")"}], "*", SuperscriptBox[ RowBox[{"(", RowBox[{"E", "-", "T"}], ")"}], RowBox[{"-", "1"}]], "T"}]}], SubscriptBox["|", "29"]}]}], TraditionalForm]]] }], "Text"], Cell["\<\ Nyni muzeme predpis zkusit (pozn. pokud budete pocitat na papire, nezapomente \ ze A odpovida 0, B 1, atd.):\ \>", "Text"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageFirst"]}], ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPagePrevious"]}], ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageNext"]}], ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageLast"]}]], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], " ", "of", " ", CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], Appearance->{Automatic, None}]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[TextData[{ "Ukol 2: Kryptoanalyza sifry ", Cell[BoxData[ FormBox[ RowBox[{"|", RowBox[{"ap", "+", "b"}], SubscriptBox["|", "m"]}], TraditionalForm]]], " (4)" }], "Section", CellChangeTimes->{{3.412505868890625*^9, 3.412505869015625*^9}}], Cell[TextData[{ "Pro jednoduchost jsou zde rovnice implementovany do systemu ", StyleBox["Mathematica", FontSlant->"Italic"], " a vypoctene konstanty se ulozi do promennych ", Cell[BoxData[ FormBox["c", TraditionalForm]]], " a ", Cell[BoxData[ FormBox["d", TraditionalForm]]], "." }], "Text"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{"c", "=", RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Pozice", "[", "\"\\"", "]"}], "-", RowBox[{"Pozice", "[", "\"\\"", "]"}]}], ")"}], "*", RowBox[{"BEZInverse", "[", RowBox[{ RowBox[{ RowBox[{"Pozice", "[", "\"\\"", "]"}], "-", RowBox[{"Pozice", "[", "\"\\"", "]"}]}], ",", "NCharacters"}], "]"}]}], ",", "NCharacters"}], "]"}]}], "\[IndentingNewLine]", RowBox[{"d", "=", RowBox[{"Mod", "[", RowBox[{ RowBox[{ RowBox[{"Pozice", "[", "\"\\"", "]"}], "-", RowBox[{"c", "*", RowBox[{"Pozice", "[", "\"\\"", "]"}]}]}], ",", "NCharacters"}], "]"}]}]}], "Input", CellChangeTimes->{{3.6337167561884794`*^9, 3.633716768180496*^9}, { 3.6337169972938323`*^9, 3.633717004923843*^9}, {3.6337172274431634`*^9, 3.6337172368031836`*^9}}, CellLabel->"In[103]:="], Cell[BoxData["6"], "Output", CellChangeTimes->{ 3.633716771305501*^9, 3.633717006903846*^9, 3.633717063951928*^9, { 3.633717217161149*^9, 3.6337172385931854`*^9}}, CellLabel->"Out[103]="], Cell[BoxData["27"], "Output", CellChangeTimes->{ 3.633716771305501*^9, 3.633717006903846*^9, 3.633717063951928*^9, { 3.633717217161149*^9, 3.6337172385931854`*^9}}, CellLabel->"Out[104]="] }, Open ]], Cell["Nyni se muzeme pokusit text desifrovat:", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"AXPBDecrypt", "[", RowBox[{"ST", ",", "c", ",", "d"}], "]"}]], "Input", CellLabel->"In[105]:="], Cell[BoxData["\<\"\ NOTICETHISSOFTWAREWILLNOTPERFORMORCOMPLETEANYACTUALFINANCIALTRANSACTIONSYOUMUS\ TOBTAINASEPARATECOMMERCIALUSELICENSEFROMMINDVISIONTOUSEESELLERATETOCONDUCTELEC\ TRONICCOMMERCEEVENTHOUGHITAPPEARSTOBEFULLYFUNCTIONALITISNOTFULLYFUNCTIONALITWI\ LLNOTCONDUCTFINANCIALTRANSACTIONSANDTHESOFTWAREPROVIDEDUNDERTHISAGREEMENTISNOT\ FORDISTRIBUTIONUNDERNOCIRCUMSTANCESSHALLMINDVISIONBELIABLEFORANYTRANSACTIONSUT\ ILIZINGTHESOFTWAREUNDERTHISEVALUATIONLICENSEAGREEMENT\"\>"], "Output", CellChangeTimes->{3.6337167770665092`*^9, 3.633717240484188*^9}, CellLabel->"Out[105]="] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageFirst"]}], ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPagePrevious"]}], ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageNext"]}], ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageLast"]}], ButtonNote->"Last Slide"], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], " ", "of", " ", CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], Appearance->{Automatic, None}]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Transpozice", "Section", TextJustification->1], Cell[TextData[{ "Substituce zpusobuje konfuzi nahradou jednoho znaku znakem jinym a sifry \ zalozene na ni jsou zranitelne frekvencni analyzou. Proto obvykle substituci \ kombinujeme s transpozici, ktera preskupuje poradi pismen v textu (difuze). \ To se v praxi provadi zapsanim otevreho textu do matice po radcich a precteni \ po sloupcich. Ukazme si to na priklade textu \"PLEASE SEND MONEY\", ktery \ nejdrive doplnime vyplni (X) na delku, ktera obsadi celou matici. Tak ziskame \ matici:\n", Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"\<\"P\"\>", "\<\"L\"\>", "\<\"E\"\>", "\<\"A\"\>", "\<\"S\"\>", \ "\<\"E\"\>"}, {"\<\"S\"\>", "\<\"E\"\>", "\<\"N\"\>", "\<\"D\"\>", "\<\"M\"\>", \ "\<\"O\"\>"}, {"\<\"N\"\>", "\<\"E\"\>", "\<\"Y\"\>", "\<\"X\"\>", "\<\"X\"\>", \ "\<\"X\"\>"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]]], ", kterou transponujeme ", Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"\<\"P\"\>", "\<\"S\"\>", "\<\"N\"\>"}, {"\<\"L\"\>", "\<\"E\"\>", "\<\"E\"\>"}, {"\<\"E\"\>", "\<\"N\"\>", "\<\"Y\"\>"}, {"\<\"A\"\>", "\<\"D\"\>", "\<\"X\"\>"}, {"\<\"S\"\>", "\<\"M\"\>", "\<\"X\"\>"}, {"\<\"E\"\>", "\<\"O\"\>", "\<\"X\"\>"} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]]], " a precteme text po radcich, cimz dostavame:\nPSNLEEENYADXSMXEOX. V \ kombinaci se substituci napriklad pomoci afinni sifry je vysledna sifra \ posilena. Transpozici si muzete vyzkouset volanim funkce ", StyleBox["Transpozice[retezec, pocet sloupcu]", "Input", FontWeight->"Bold"], ":" }], "Text"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"NCharacters", "=", "26"}], ";"}], "\[IndentingNewLine]", RowBox[{"ST", "=", RowBox[{"Transpozice", "[", RowBox[{"\"\\"", ",", "6"}], "]"}]}]}], "Input", CellLabel->"In[106]:="], Cell[BoxData["\<\"TDIRHIEOESDNGBIOOUNXLROX\"\>"], "Output", CellChangeTimes->{3.6337172489242*^9}, CellLabel->"Out[107]="] }, Open ]], Cell[TextData[{ "Pokud bychom chteli videt matici, muzete pouzit funkci ", StyleBox["BEZGenerMatrix[retez, pocet sloupcu].", FontWeight->"Bold"], " Tim zaroven uvidime mnozstvi vyplne, ktere se pridalo na zarovnani na \ potrebnou delku." }], "Text"], Cell[CellGroupData[{ Cell[BoxData[ StyleBox[ RowBox[{ RowBox[{"BEZGenerMatrix", "[", RowBox[{"\"\\"", ",", "6"}], "]"}], "//", "MatrixForm"}], FontWeight->"Bold"]], "Input", CellLabel->"In[108]:="], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"\<\"T\"\>", "\<\"H\"\>", "\<\"E\"\>", "\<\"G\"\>", "\<\"O\"\>", "\<\"L\ \"\>"}, {"\<\"D\"\>", "\<\"I\"\>", "\<\"S\"\>", "\<\"B\"\>", "\<\"U\"\>", "\<\"R\ \"\>"}, {"\<\"I\"\>", "\<\"E\"\>", "\<\"D\"\>", "\<\"I\"\>", "\<\"N\"\>", "\<\"O\ \"\>"}, {"\<\"R\"\>", "\<\"O\"\>", "\<\"N\"\>", "\<\"O\"\>", "\<\"X\"\>", "\<\"X\ \"\>"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.633717250804203*^9}, CellLabel->"Out[108]//MatrixForm="] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageFirst"]}], ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPagePrevious"]}], ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageNext"]}], ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageLast"]}]], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], " ", "of", " ", CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], Appearance->{Automatic, None}]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Transpozice (2)", "Section"], Cell["\<\ Detranspozice se provadi obracenim predpisu, tedy zadanim poctu radku \ vysledne matice:\ \>", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"OT", "=", RowBox[{"Transpozice", "[", RowBox[{"ST", ",", "4"}], "]"}]}]], "Input", CellLabel->"In[109]:="], Cell[BoxData["\<\"THEGOLDISBURIEDINORONOXX\"\>"], "Output", CellChangeTimes->{3.633717257935213*^9}, CellLabel->"Out[109]="] }, Open ]], Cell[TextData[{ "Je zrejme, ze transpozice ", StyleBox["NEMA", FontWeight->"Bold"], " vliv na frekvencni usporadani a graf otevreneho i sifroveho textu bude pro \ analyzu relativni cetnosti naprosto identiticky. To si muzeme ukazat v \ nasledujicim prikladu:" }], "Text"], Cell[CellGroupData[{ Cell[BoxData[{"OT", "\[IndentingNewLine]", "ST"}], "Input", CellLabel->"In[110]:="], Cell[BoxData["\<\"THEGOLDISBURIEDINORONOXX\"\>"], "Output", CellChangeTimes->{3.6337172619982185`*^9}, CellLabel->"Out[110]="], Cell[BoxData["\<\"TDIRHIEOESDNGBIOOUNXLROX\"\>"], "Output", CellChangeTimes->{3.6337172619982185`*^9}, CellLabel->"Out[111]="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"BEZGrafyRelCetnosti", "[", RowBox[{"OT", ",", "ST"}], "]"}]], "Input", CellLabel->"In[112]:="], Cell[BoxData[ GraphicsBox[{ {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{0.85, 0}, {1.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{1.85, 0}, {2.15, 0.041666666666666664`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{2.85, 0}, {3.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{3.85, 0}, {4.15, 0.08333333333333333}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{4.85, 0}, {5.15, 0.08333333333333333}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{5.85, 0}, {6.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{6.85, 0}, {7.15, 0.041666666666666664`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{7.85, 0}, {8.15, 0.041666666666666664`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{8.85, 0}, {9.15, 0.125}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{9.85, 0}, {10.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{10.85, 0}, {11.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{11.85, 0}, {12.15, 0.041666666666666664`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{12.85, 0}, {13.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{13.85, 0}, {14.15, 0.08333333333333333}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{14.85, 0}, {15.15, 0.16666666666666666`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{15.85, 0}, {16.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{16.85, 0}, {17.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{17.85, 0}, {18.15, 0.08333333333333333}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{18.85, 0}, {19.15, 0.041666666666666664`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{19.85, 0}, {20.15, 0.041666666666666664`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{20.85, 0}, {21.15, 0.041666666666666664`}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{21.85, 0}, {22.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{22.85, 0}, {23.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{23.85, 0}, {24.15, 0.08333333333333333}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{24.85, 0}, {25.15, 0}]}, {RGBColor[0.1, 0.2, 0.7], Opacity[0.7], EdgeForm[None], RectangleBox[{25.85, 0}, {26.15, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{1.25, 0}, {1.5499999999999998`, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{2.25, 0}, {2.55, 0.041666666666666664`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{3.25, 0}, {3.55, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{4.25, 0}, {4.550000000000001, 0.08333333333333333}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{5.25, 0}, {5.550000000000001, 0.08333333333333333}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{6.25, 0}, {6.550000000000001, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{7.25, 0}, {7.550000000000001, 0.041666666666666664`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{8.25, 0}, {8.55, 0.041666666666666664`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{9.25, 0}, {9.55, 0.125}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{10.25, 0}, {10.55, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{11.25, 0}, {11.55, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{12.25, 0}, {12.55, 0.041666666666666664`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{13.25, 0}, {13.55, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{14.25, 0}, {14.55, 0.08333333333333333}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{15.25, 0}, {15.55, 0.16666666666666666`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{16.25, 0}, {16.549999999999997`, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{17.25, 0}, {17.549999999999997`, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{18.25, 0}, {18.549999999999997`, 0.08333333333333333}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{19.25, 0}, {19.549999999999997`, 0.041666666666666664`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{20.25, 0}, {20.549999999999997`, 0.041666666666666664`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{21.25, 0}, {21.549999999999997`, 0.041666666666666664`}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{22.25, 0}, {22.549999999999997`, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{23.25, 0}, {23.549999999999997`, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{24.25, 0}, {24.549999999999997`, 0.08333333333333333}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{25.25, 0}, {25.549999999999997`, 0}]}, {RGBColor[0, 0.7, 0], Opacity[0.7], EdgeForm[None], RectangleBox[{26.25, 0}, {26.549999999999997`, 0}]}}, AlignmentPoint->Center, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->None, AxesOrigin->{0.6000000000000001, 0}, AxesStyle->{}, Background->GrayLevel[0.9], BaseStyle->{}, BaselinePosition->Automatic, ColorOutput->Automatic, ContentSelectable->Automatic, CoordinatesToolOptions:>Automatic, DisplayFunction:>$DisplayFunction, Epilog->{}, FormatType:>TraditionalForm, Frame->False, FrameLabel->None, FrameStyle->{}, FrameTicks->{{{1.2, FormBox["\"A\"", TraditionalForm], 0}, {2.2, FormBox["\"B\"", TraditionalForm], 0}, {3.2, FormBox["\"C\"", TraditionalForm], 0}, {4.2, FormBox["\"D\"", TraditionalForm], 0}, {5.2, FormBox["\"E\"", TraditionalForm], 0}, {6.2, FormBox["\"F\"", TraditionalForm], 0}, {7.2, FormBox["\"G\"", TraditionalForm], 0}, {8.2, FormBox["\"H\"", TraditionalForm], 0}, {9.2, FormBox["\"I\"", TraditionalForm], 0}, {10.2, FormBox["\"J\"", TraditionalForm], 0}, {11.2, FormBox["\"K\"", TraditionalForm], 0}, {12.2, FormBox["\"L\"", TraditionalForm], 0}, {13.2, FormBox["\"M\"", TraditionalForm], 0}, {14.2, FormBox["\"N\"", TraditionalForm], 0}, {15.2, FormBox["\"O\"", TraditionalForm], 0}, {16.2, FormBox["\"P\"", TraditionalForm], 0}, {17.2, FormBox["\"Q\"", TraditionalForm], 0}, {18.2, FormBox["\"R\"", TraditionalForm], 0}, {19.2, FormBox["\"S\"", TraditionalForm], 0}, {20.2, FormBox["\"T\"", TraditionalForm], 0}, {21.2, FormBox["\"U\"", TraditionalForm], 0}, {22.2, FormBox["\"V\"", TraditionalForm], 0}, {23.2, FormBox["\"W\"", TraditionalForm], 0}, {24.2, FormBox["\"X\"", TraditionalForm], 0}, {25.2, FormBox["\"Y\"", TraditionalForm], 0}, {26.2, FormBox["\"Z\"", TraditionalForm], 0}}, Automatic}, FrameTicksStyle->{}, GridLines->None, GridLinesStyle->{}, ImageMargins->0., ImagePadding->All, ImageSize->Automatic, ImageSizeRaw->Automatic, LabelStyle->{}, Method->Automatic, PlotLabel->None, PlotRange->{{0.6000000000000001, 26.8}, All}, PlotRangeClipping->True, PlotRangePadding->Automatic, PlotRegion->Automatic, PreserveImageOptions->Automatic, Prolog->{}, RotateLabel->True, Ticks->{{{1.2, FormBox["\"A\"", TraditionalForm], 0}, {2.2, FormBox["\"B\"", TraditionalForm], 0}, {3.2, FormBox["\"C\"", TraditionalForm], 0}, {4.2, FormBox["\"D\"", TraditionalForm], 0}, {5.2, FormBox["\"E\"", TraditionalForm], 0}, {6.2, FormBox["\"F\"", TraditionalForm], 0}, {7.2, FormBox["\"G\"", TraditionalForm], 0}, {8.2, FormBox["\"H\"", TraditionalForm], 0}, {9.2, FormBox["\"I\"", TraditionalForm], 0}, {10.2, FormBox["\"J\"", TraditionalForm], 0}, {11.2, FormBox["\"K\"", TraditionalForm], 0}, {12.2, FormBox["\"L\"", TraditionalForm], 0}, {13.2, FormBox["\"M\"", TraditionalForm], 0}, {14.2, FormBox["\"N\"", TraditionalForm], 0}, {15.2, FormBox["\"O\"", TraditionalForm], 0}, {16.2, FormBox["\"P\"", TraditionalForm], 0}, {17.2, FormBox["\"Q\"", TraditionalForm], 0}, {18.2, FormBox["\"R\"", TraditionalForm], 0}, {19.2, FormBox["\"S\"", TraditionalForm], 0}, {20.2, FormBox["\"T\"", TraditionalForm], 0}, {21.2, FormBox["\"U\"", TraditionalForm], 0}, {22.2, FormBox["\"V\"", TraditionalForm], 0}, {23.2, FormBox["\"W\"", TraditionalForm], 0}, {24.2, FormBox["\"X\"", TraditionalForm], 0}, {25.2, FormBox["\"Y\"", TraditionalForm], 0}, {26.2, FormBox["\"Z\"", TraditionalForm], 0}}, Automatic}, TicksStyle->{}]], "Output", CellChangeTimes->{3.633717264148222*^9}, CellLabel->"Out[112]=", ImageCache->GraphicsData["CompressedBitmap", "\<\ eJztXb1uG0cQXvFIUYphIOltxEiQFClUGSlYJkiMFGlUpHIjGCasIkhg+QX0 AgH1Dq6TwAUfwIA6P0HU8zWY25/Zndmf4x1J8U+fAFHU3t7szHzzzc7uHY+/ Xrx78/r3i3eXry6evXh78eeby1dXz37+423dVB0pdfRGKfXfM6Xfz+u37mWu ZrPZpX5R6mv9Zzifzz8d+3eDxrbmo8UzTpY7t3tbX7877awzXLFvrlBDNZ+e KzW60k1qOtbBfaYmd5/M/3CSdZJxxmSk7M/oyjptfLMZJ31l/pyq2e21Ih1o cIuYRe36dqbMIKpS718q/9MzrxWdE5RWlXk/v7sycqN+pgfJmzGBDfLU3eTM 96vc63hqZTlJ9eugTqA3yqtu7VG9YPPAejjXYeDiNox0rqZM2mjyjyIhHjL6 qaFjQgbC/MwoJ8Ke2g4WCHrUT01ma0Wk2SfqeQN8NenItqC3aXYqmhG9bdKD th+3rYWLueGphBOmXTDeWnqu3s9mPjZYXFJs1MZnY41EUj8SazVaYJkZ0Mqp XC/rk4oHhnaeG95FkenEVGEOdjiw/1UpAjWezD2V0NNzwmkU7LE5TnfX7nbj 9ZwR07E1L3QfUpt3n3YZuYm7cjJirjGylKcaJ4k718mKkntBljuPp4DAldpH fe6H2ey9RyIyjDs9UYA7xDidTp6MAmKC89bjQYKGTbrmOD/K6IojZ9u1LMoH Gp4abqIsz3oUSpFrRDg5WcLNI2uEIjJZLwV9o9BMEjJ5+diHbGRTGtYcymCj 4no4trr5PufwAUeCGSZzBw9KUjfDUe3TkQ2lhKNUdFBGiTnKlA8Oc+e0CZd8 ZLvOGYKKROD57AZsIqiLHDEP8jYBY8zIzMlC735sUJ6CmUC9JwqGMwr6EwXl nFG/X4KCJ8Ky6fSGy0syg8OKPDQZRZHfis0dvZxJBwkNeZoyXu6XICryTuTa BvYK+lnx1seVJyflorqRPKT/joMu3A7HuoSN7RnoEjCngaPcMEZTRNNxSjc/ 5UaQCRnNdGMBz4tAohtNyPkqsQ4IEbMDF6q318/98HXglwvpzTBw4Blo6pba NEURkKMfi3HPN1/96NS9gG/ks5hv3CsRxfN8K+TdfpO8Ip68crtik1fleBLN oWukX89pw3UTcRXT0Ph3YlkS+5rnGcIjGNMcLPxckbcyLMwoy1g4EGsBocca KVhcimQWapKCMjgGcaTHqw5OzMFiP1K6LjONCGBXCd2YZsZ02aXMNOG2lZlG 1Vq+1G/JtHSiM0HKk9nCVeZ6GRdPJUpUpdrnuvjVWdwVptr/zYxjCluL+t5S k1jHNwFtSi3MJTHbpAlsKgk8i2a7ONBXqCxXn+pkDcR4tvLEVuZYuqQzmWJ8 U6wnU5qNzxl3zkytU6CZHGf1ArLr8jK1v7Cs4ysh49VwPNi/Hnq5mGclYLkr qyDCYp1blS0uo/WsyB1sb1pOOmImD6vvHN0MSuPzsIdTLi5LC9Fovav4TuNQ Zp5ol6LtcjS30RIBKJdGZkeB6W9KtmwVfy/ErLjoeBsqJUSRnKOo/h9F5CTr z4RHUs8ttcfStHvG120W9PyKWnCTXRkob90kcvw0nCusu5G14tlf0VpQlGdN +afWbyzzT3YnRq7SFs5baRjyotRR9on+Z9iqbihc4uDzn0g08ZbyxHqHZ/bF suQ+f27Lt88D1vWj6wHK0ZetBiMjz41ecWSEfWh5oUNHS7sLHT3nZK49SfT7 +Mm1DmFE7Szano+lJCuBl1aBKExDm9yE51c4gvItr3IUNuHj8n6xoGGywFHJ fBTDZSvAKMsXQiRs85O3r58HOZOpsF7Ls90izMZ+/4tdZ/FB1XOSX0pJiy4y EQnpf40n5edb0jKMzP/vtMbi/N71S76buUXA+KNyFZb2GiEJDzkPueI/Mxfw eY2itnJELE4dNZ8yx4BCOxTu2OTkyoQmFDLdVZiJkmMBhUqgYO60eiEU4TWP qzVO3aCZQ37QzLFWg1Z80GzhZYuMU96WKFo4P2TuudbgF/1ytNmBI9sf69f+ h98uP9rbFj789PEn/at6+vXzxqP28oM+2rPv6rYvMm39zlKerlmrZnm5M9at 89MNxzRw3QaufEvUrZsI18whJUp1eQy47gSuFqE+q6oNAz/LN9NkGDW7VAww twzmE5AKOAAH4AAcgEMGhy8BASAABIBgJyAwCMDxiH1AAAgAASAABIAAEAAC QAAIAAEgAASAANsSD8bxiH1AAAgAASAABIAAEAACQAAIAAEgAASAABBsHQLs DCH2AQEgAASAABAAAkAACAABIAAEgAAQAAJA8FAhwM4QYh8QmN9vOw/1Xabt +zUr/APM2Xdzig8RgE2w6Z5t2vCDGw/Nb50etfi49DjF5Enk/Hnqh+m4jo/R O275TMR9dkzbp0gel54i6Z8Az79x0QytffTNA3DNSeMDNmtGsq86NU2HGEcr PKdSfgVRdch5e4mnPR6+d7o9M7H0uPqGZ2DusW8OsfqDTbBpWzYd2CIe5uy8 OcaafTfiwDCBOTAH5sAcmANzYA7MQaUGc2AOzIE5MAfmwJyDMwelDcyBOTCH zHmdGerHTNtfELHDIoyE/VV/6yKKFzghx8hZ5jbNx/6b4sMPu/Enf5umWp+y Le+NHGTu5lri66eX0zFzK9SjBn06fItvV30W3+J22k4xLscoNtB6vdoZdQ4M twX3k/UNCXWckw+6f3FwR5UKN3GRPvbuUN/c7/jFt3ueSNclZzemTZQvEAER YMaDE/EvuosI3SuN0R3Qr7t7sa7bgXO2u3hfrFinhfqjZHHX9cOLixVqubpr +6HApgGXW+fSnkXySTuz1v577eOVPmnjPsZ2r17u9NmnNsHWbaW8+sDd1sNV wdUN6/MdSDGbOmencj7mwG13n+vXF2s8bg53OUsd/Q+qqswp\ \>"]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageFirst"]}], ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPagePrevious"]}], ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageNext"]}], ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageLast"]}]], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], " ", "of", " ", CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], Appearance->{Automatic, None}]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["Kryptoanalyza transpozice", "Section"], Cell[TextData[{ "Kryptoanalyzu transpozicni sifry provadime na zaklade bigramove analyzy. V \ sifrovem textu hledame bigramy avsak mezi jednotlivymi znaky bigramu byva \ zpravidla nekolik (nekdy mnoho) dalsich znaku. Pro anglictinu je typicke \ hledat bigramy s nejvetsi cetnosti, coz jsou: TH, HE, AN, RE, ER, IN, ON, AT, \ ND, ST, ES, EN, OF, TE a ze vzdalenosti znaku bigramu se snazime stanovit \ parametry transpozice, ktere byly pouzity. Pro sifrovy text ", StyleBox["T", FontColor->RGBColor[1, 0, 0]], "DIR", StyleBox["H", FontColor->RGBColor[1, 0, 0]], "IEO", StyleBox["E", FontColor->RGBColor[1, 0, 0]], "SDNGBIOOUNXLROX vidime ihned bigramy TH a HE z cehoz usoudime, ze mela \ matice 4 radky:" }], "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Transpozice", "[", RowBox[{"\"\\"", ",", "4"}], "]"}]], "Input", CellLabel->"In[113]:="], Cell[BoxData["\<\"THEGOLDISBURIEDINORONOXX\"\>"], "Output", CellChangeTimes->{3.633717268838228*^9}, CellLabel->"Out[113]="] }, Open ]], Cell["\<\ Dalsi moznosti je faktorizovat delku textu a tim zjistit vsechny delitele \ delky textu a postupne je zkusit.\ \>", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"FactorInteger", "[", RowBox[{"StringLength", "[", "\"\\"", "]"}], "]"}], "/.", RowBox[{ RowBox[{"{", RowBox[{"x_Integer", ",", "y_Integer"}], "}"}], "\[Rule]", RowBox[{"HoldForm", "[", RowBox[{"x", "^", "y"}], "]"}]}]}]], "Input", CellLabel->"In[114]:="], Cell[BoxData[ RowBox[{"{", RowBox[{ TagBox[ SuperscriptBox["2", "3"], HoldForm], ",", TagBox[ SuperscriptBox["3", "1"], HoldForm]}], "}"}]], "Output", CellChangeTimes->{3.633717270948231*^9}, CellLabel->"Out[114]="] }, Open ]], Cell["\<\ Zde tento pripad vidime, ze delka textu je 24 znaku. Z toho muzeme usoudit, \ ze pro transpozice mohla byt: 2*12, 3*8, 4*6, 6*4, 8*3, 12*2. Jine kombinace \ neexistuji. Pro nas pripad byla pouzita transpozice 6*4.\ \>", "Text"], Cell["\<\ Pokud text nebyl tak dlouhy, jak byl zadan predpis, musel byt doplnen vyplni \ (padding). Ze znalosti funkce, ktera transpozici provadi vime, ze tato funkce \ doplnuje na konec textu pismena X, dokud nezarovna text na potrebnou delku a \ to je skutecnost, kterou muzeme vyuzit k prolomeni transpozice, protoze \ vzdalenost teto vyplne (zvlaste v pripade, ze bylo doplneno vice znaku X) \ udava transpozicni konstantu, ktera byla pouzita pri sifrovani. Delka \ textu/tato konstanta udava detranspozicni konstantu. \ \>", "Text"], Cell["\<\ Pro nas text vidime, ze vzdalenost paddingu X je 4 znaky, z cehoz rovnou \ plyne konstanta pro detranspozici.\ \>", "Text"], Cell[TextData[{ StyleBox["Upozorneni:", FontWeight->"Bold"], " Pokud byla transpozice pouzita vicenosobne, je jeji kryptoanalyza znacne \ obtiznejsi!!" }], "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Transpozice", "[", RowBox[{ RowBox[{"Transpozice", "[", RowBox[{"\"\\"", ",", "4"}], "]"}], ",", "3"}], "]"}]], "Input", CellLabel->"In[115]:="], Cell[BoxData["\<\"TIHEEDGIONLODRIOSNBOUXRX\"\>"], "Output", CellChangeTimes->{3.6337172727212343`*^9}, CellLabel->"Out[115]="] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[Cell[BoxData[GridBox[{ { ButtonBox[ StyleBox["\[FirstPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageFirst"]}], ButtonNote->"First Slide"], ButtonBox[ StyleBox["\[LeftPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPagePrevious"]}], ButtonNote->"Previous Slide"], ButtonBox[ StyleBox["\[RightPointer]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageNext"]}], ButtonNote->"Next Slide"], ButtonBox[ StyleBox["\[LastPage]", "SR"], BaseStyle->"SlideHyperlink", ButtonFunction:>FrontEndExecute[{ FrontEndToken[ FrontEnd`SelectedNotebook[], "ScrollPageLast"]}], ButtonNote->"Last Slide"], " ", ButtonBox[ StyleBox[ RowBox[{ CounterBox["SlideShowNavigationBar"], " ", "of", " ", CounterBox["SlideShowNavigationBar", {None, "SlideShowHeader", -1}]}], "SR"], Appearance->{Automatic, None}]} }]]]], "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell["\<\ Ukol 3: Kryptoanalyza transpozice\ \>", "Section", CellChangeTimes->{{3.598935007650259*^9, 3.598935021530278*^9}}], Cell["\<\ Napiste kus anglickeho textu o delce 30-50 znaku a nahodne zvolte \ transpozicni konstantu. Provedte nad timto textem transpozici s vami zvolenou \ konstantou a vysledny sifrovy text poslete sousedovi.\ \>", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"OT", "=", "\"\\""}]], "Input", CellChangeTimes->{3.6337172888212566`*^9}, CellLabel->"In[116]:="], Cell[BoxData["\<\"THISISNTCHALLENGETHISISMADNESS\"\>"], "Output", CellChangeTimes->{3.6337172950112653`*^9}, CellLabel->"Out[116]="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ StyleBox[ RowBox[{ RowBox[{"BEZGenerMatrix", "[", RowBox[{"\"\\"", ",", "12"}], "]"}], "//", "MatrixForm"}], FontWeight->"Bold"]], "Input", CellLabel->"In[118]:="], Cell[BoxData[ TagBox[ RowBox[{"(", "\[NoBreak]", GridBox[{ {"\<\"T\"\>", "\<\"H\"\>", "\<\"I\"\>", "\<\"S\"\>", "\<\"I\"\>", "\<\"S\ \"\>", "\<\"N\"\>", "\<\"T\"\>", "\<\"C\"\>", "\<\"H\"\>", "\<\"A\"\>", \ "\<\"L\"\>"}, {"\<\"L\"\>", "\<\"E\"\>", "\<\"N\"\>", "\<\"G\"\>", "\<\"E\"\>", "\<\"T\ \"\>", "\<\"H\"\>", "\<\"I\"\>", "\<\"S\"\>", "\<\"I\"\>", "\<\"S\"\>", \ "\<\"M\"\>"}, {"\<\"A\"\>", "\<\"D\"\>", "\<\"N\"\>", "\<\"E\"\>", "\<\"S\"\>", "\<\"S\ \"\>", "\<\"X\"\>", "\<\"X\"\>", "\<\"X\"\>", "\<\"X\"\>", "\<\"X\"\>", \ "\<\"X\"\>"} }, GridBoxAlignment->{ "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellChangeTimes->{3.633717356428356*^9}, CellLabel->"Out[118]//MatrixForm="] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Transpozice", "[", RowBox[{"OT", ",", "12"}], "]"}]], "Input", CellChangeTimes->{{3.633717384405396*^9, 3.6337173846353965`*^9}}, CellLabel->"In[119]:="], Cell[BoxData["\<\"TLAHEDINNSGEIESSTSNHXTIXCSXHIXASXLMX\"\>"], "Output", CellChangeTimes->{3.633717324691308*^9, 3.6337173852353973`*^9}, CellLabel->"Out[119]="] }, Open ]], Cell["Az obdrzite text od souseda, priradte ho to teto promenne:", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ST", "=", "\"\\""}]], "Input", CellChangeTimes->{{3.633717547529115*^9, 3.633717551253121*^9}, { 3.633717662881285*^9, 3.6337176664312906`*^9}, {3.6337177010033393`*^9, 3.633717743162407*^9}}, CellLabel->"In[137]:="], Cell[BoxData["\<\"YOOOUBATRHEAPTRIOSOLRIYFOEUXAXRXEXNX\"\>"], "Output", CellChangeTimes->{ 3.6337175546951256`*^9, 3.633717623651228*^9, 3.6337176674212914`*^9, { 3.6337177052633452`*^9, 3.63371774530241*^9}}, CellLabel->"Out[137]="] }, Open ]], Cell["\<\ Nyni se snazte zjistit, jakou transpozici vas soused pouzil. Vyuzijte metod \ popsanych na minulem slajdu. Pro jednoduchost faktorizaci opakujeme nyni pro \ promennou sifroveho textu:\ \>", "Text"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{"FactorInteger", "[", RowBox[{"StringLength", "[", "ST", "]"}], "]"}], "/.", RowBox[{ RowBox[{"{", RowBox[{"x_Integer", ",", "y_Integer"}], "}"}], "\[Rule]", RowBox[{"HoldForm", "[", RowBox[{"x", "^", "y"}], "]"}]}]}]], "Input", CellLabel->"In[138]:="], Cell[BoxData[ RowBox[{"{", RowBox[{ TagBox[ SuperscriptBox["2", "2"], HoldForm], ",", TagBox[ SuperscriptBox["3", "2"], HoldForm]}], "}"}]], "Output", CellChangeTimes->{ 3.6337175771371613`*^9, 3.6337176254972315`*^9, 3.633717669921295*^9, { 3.633717707033348*^9, 3.6337177472024126`*^9}}, CellLabel->"Out[138]="] }, Open ]], Cell["\<\ Transpozice m\[URing]\[ZHacek]e b\[YAcute]t: 2*18, 3*12, 4*9, 9*4, 12*3, 18*2\ \>", "Text", CellChangeTimes->{{3.633717600871196*^9, 3.6337176057812023`*^9}, 3.6337176401132526`*^9, {3.633717673914301*^9, 3.633717684381316*^9}, { 3.633717730360381*^9, 3.633717756385426*^9}}], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Transpozice", "[", RowBox[{"ST", ",", "2"}], "]"}]], "Input", CellChangeTimes->{3.6337177795614586`*^9}, CellLabel->"In[140]:="], Cell[BoxData["\<\"YOUAREPROORYOUARENOOBTHATISLIFEXXXXX\"\>"], "Output", CellChangeTimes->{3.6337177801914597`*^9}, CellLabel->"Out[140]="] }, Open ]] }, Open ]] }, Open ]] }, ScreenStyleEnvironment->"SlideShow", WindowToolbars->"EditBar", WindowSize->{944, 1002}, WindowMargins->{{Automatic, 0}, {0, Automatic}}, PrintingCopies->1, PrintingPageRange->{32000, 32000}, PrintingOptions->{"Magnification"->1., "PaperOrientation"->"Portrait", "PaperSize"->{594.9599999999999, 842.04}}, TaggingRules->{"SlideshowSettings" -> {"Toolbar" -> True}}, FrontEndVersion->"8.0 for Microsoft Windows (64-bit) (November 13, 2010)", StyleDefinitions->Notebook[{ Cell[ CellGroupData[{ Cell["Style Definitions for Online Help", "Title"], Cell[ "These styles are carefully tuned for all aspects of the online help. \ It's recommended that they remain unchanged.", "Text"], Cell[ CellGroupData[{ Cell["Style Environment Names", "Section"], Cell[ StyleData[All, "Working"], PageWidth -> WindowWidth, ShowCellBracket -> False, CellBracketOptions -> { "Color" -> RGBColor[0.269993, 0.308507, 0.6]}, ShowAutoStyles -> False, ScriptMinSize -> 9], Cell[ StyleData[All, "Brackets"], PageWidth -> WindowWidth, ShowCellBracket -> True, CellBracketOptions -> { "Color" -> RGBColor[0.269993, 0.308507, 0.6]}, ShowAutoStyles -> False, ScriptMinSize -> 9], Cell[ StyleData[All, "Presentation"], PageWidth -> WindowWidth, ShowCellBracket -> False, CellBracketOptions -> { "Color" -> RGBColor[0.269993, 0.308507, 0.6]}, ShowAutoStyles -> False, ScriptMinSize -> 9], Cell[ StyleData[All, "SlideShow"], PageWidth -> WindowWidth, ScrollingOptions -> { "PagewiseDisplay" -> True, "VerticalScrollRange" -> Fit}, ShowCellBracket -> False, ScriptMinSize -> 9], Cell[ StyleData[All, "Printout"], PageWidth -> PaperWidth, ShowCellBracket -> False, ShowAutoStyles -> False, ScriptMinSize -> 5, PrivateFontOptions -> {"FontType" -> "Outline"}], Cell[ StyleData[All, "EnhancedPrintout"], PageWidth -> PaperWidth, ShowCellBracket -> True, ScriptMinSize -> 5, FontFamily -> "Palatino", PrivateFontOptions -> {"FontType" -> "Outline"}], Cell[ StyleData[All, "EnhancedPrintoutNonGray"], PageWidth -> PaperWidth, ShowCellBracket -> False, ScriptMinSize -> 5, FontFamily -> "Palatino", PrivateFontOptions -> {"FontType" -> "Outline"}]}, Open]], Cell[ CellGroupData[{ Cell["Notebook Options", "Section"], Cell[ " The options defined for the style below will be used at the \ Notebook level. ", "Text"], Cell[ CellGroupData[{ Cell[ StyleData["Notebook"], PageHeaders -> {{ Cell[ TextData[{ CounterBox["Page"]}], "PageNumber"], None, Cell[ TextData[{"Printed from the ", StyleBox["Mathematica", FontSlant -> "Italic"], " Help Browser"}], "PageHeader"]}, { Cell[ TextData[{"Printed from the ", StyleBox["Mathematica", FontSlant -> "Italic"], " Help Browser"}], "PageHeader"], None, Cell[ TextData[{ CounterBox["Page"]}], "PageNumber"]}}, PageFooters -> {{None, Cell[ TextData[{ "\[Copyright]1988-2005 Wolfram Research, Inc. All rights \ reserved."}], "PageFooter"], None}, {None, Cell[ TextData[{ "\[Copyright]1988-2005 Wolfram Research, Inc. All rights \ reserved."}], "PageFooter"], None}}, PageHeaderLines -> {True, True}, PageFooterLines -> {True, True}, PrintingOptions -> {"FacingPages" -> True}, CellLabelAutoDelete -> False, CellFrameLabelMargins -> 6, StyleMenuListing -> None], Cell[ StyleData["Notebook", "Printout"], PageHeaders -> {{ Cell[ TextData[{ CounterBox["Page"]}], "PageNumber"], None, Cell[ TextData[{"Printed from the ", StyleBox["Mathematica", FontSlant -> "Italic"], " Help Browser"}], "PageHeader"]}, { Cell[ TextData[{"Printed from the ", StyleBox["Mathematica", FontSlant -> "Italic"], " Help Browser"}], "PageHeader"], None, Cell[ TextData[{ CounterBox["Page"]}], "PageNumber"]}}, PageFooters -> {{None, Cell[ TextData[{ "\[Copyright]1988-2005 Wolfram Research, Inc. All rights \ reserved."}], "PageFooter"], None}, {None, Cell[ TextData[{ "\[Copyright]1988-2005 Wolfram Research, Inc. All rights \ reserved."}], "PageFooter"], None}}, PageHeaderLines -> {True, True}, PageFooterLines -> {True, True}, PrintingOptions -> {"FacingPages" -> True}], Cell[ StyleData["Notebook", "EnhancedPrintout"], PageFooters -> {{None, None, None}, {None, None, None}}, PageHeaderLines -> {True, True}, PageFooterLines -> {False, False}, PrintingOptions -> { "FacingPages" -> True, "FirstPageFace" -> Right, "FirstPageHeader" -> False, "PageSize" -> {594, 657}, "PrintRegistrationMarks" -> True, "PrintingMargins" -> {{54, 54}, {36, 72}}}]}, Closed]]}, Closed]], Cell[ CellGroupData[{ Cell["Headings", "Section"], Cell[ CellGroupData[{ Cell[ StyleData["Chapter"], CellFrame -> {{0, 0}, {0.5, 0}}, CellMargins -> {{27, 27}, {10, 40}}, CellGroupingRules -> {"TitleGrouping", 0}, PageBreakBelow -> False, DefaultNewInlineCellStyle -> "None", InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, LanguageCategory -> "NaturalLanguage", CounterIncrements -> "Chapter", CounterAssignments -> {{"Section", 0}, {"Equation", 0}, { "Figure", 0}, {"Subtitle", 0}, {"Subsubtitle", 0}}, FontFamily -> "Helvetica", FontSize -> 28, FontWeight -> "Plain", FontColor -> RGBColor[0.592157, 0.313726, 0.313726]], Cell[ StyleData["Chapter", "Presentation"], FontSize -> 36], Cell[ StyleData["Chapter", "Printout"], CellMargins -> {{2, 10}, {6, 30}}, FontSize -> 24], Cell[ StyleData["Chapter", "EnhancedPrintout"], CellMargins -> {{2, 10}, {6, 30}}, FontFamily -> "Frutiger-Roman", FontSize -> 24, FontColor -> GrayLevel[0]], Cell[ StyleData["Chapter", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 10}, {6, 30}}, FontFamily -> "Frutiger-Roman", FontSize -> 24]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Section"], CellMargins -> {{27, 27}, {9, 30}}, CellGroupingRules -> {"SectionGrouping", 30}, PageBreakBelow -> False, InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, CounterIncrements -> "Section", CounterAssignments -> {{"Subsection", 0}, {"Subsubsection", 0}}, FontFamily -> "Helvetica", FontSize -> 20, FontWeight -> "Bold", FontColor -> RGBColor[0.592157, 0.313726, 0.313726]], Cell[ StyleData["Section", "Presentation"], FontSize -> 30], Cell[ StyleData["Section", "SlideShow"], CellFrame -> {{0, 0}, {0, 0.5}}, ShowCellBracket -> False, CellMargins -> {{0, 0}, {5, 0}}, PageBreakBelow -> False, CellFrameMargins -> {{36, 36}, {Inherited, 15}}, FontFamily -> "Helvetica", FontSize -> 18, FontWeight -> "Bold", FontColor -> GrayLevel[1], Background -> RGBColor[0.408011, 0.440726, 0.8]], Cell[ StyleData["Section", "Printout"], CellMargins -> {{2, 0}, {0, 18}}, PageBreakBelow -> False, FontSize -> 18], Cell[ StyleData["Section", "EnhancedPrintout"], CellFrame -> {{0, 0}, {0.5, 0}}, CellMargins -> {{2, 2}, {5, 30}}, CellGroupingRules -> {"SectionGrouping", 30}, PageBreakBelow -> False, CellFrameMargins -> 8, CounterIncrements -> "Section", CounterAssignments -> {{"Subsection", 0}, {"Subsubsection", 0}}, FontFamily -> "Frutiger-Bold", FontSize -> 16, FontWeight -> "Plain", FontColor -> GrayLevel[0]], Cell[ StyleData["Section", "EnhancedPrintoutNonGray"], CellFrame -> {{0, 0}, {0.5, 0}}, CellMargins -> {{2, Inherited}, {5, 30}}, CellGroupingRules -> {"SectionGrouping", 30}, PageBreakBelow -> False, CellFrameMargins -> 8, CounterIncrements -> "Section", CounterAssignments -> {{"Subsection", 0}, {"Subsubsection", 0}}, FontFamily -> "Frutiger-Bold", FontSize -> 16, FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Subsection"], CellDingbat -> None, CellMargins -> {{27, 27}, {0, 18}}, CellElementSpacings -> {"ClosedGroupTopMargin" -> 18}, CellGroupingRules -> {"SectionGrouping", 40}, PageBreakBelow -> False, CellFrameLabelMargins -> 6, InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, CounterIncrements -> "Subsection", CounterAssignments -> {{"Subsubsection", 0}}, FontFamily -> "Helvetica", FontSize -> 16, FontWeight -> "Bold", FontColor -> RGBColor[0.592157, 0.313726, 0.313726]], Cell[ StyleData["Subsection", "Presentation"], FontSize -> 24], Cell[ StyleData["Subsection", "SlideShow"], CellDingbat -> None, CellMargins -> {{70, 0}, {4, 12}}, FontSize -> 12], Cell[ StyleData["Subsection", "Printout"], CellMargins -> {{2, 0}, {5, 24}}, FontSize -> 12], Cell[ StyleData["Subsection", "EnhancedPrintout"], CellMargins -> {{2, 0}, {5, 20}}, FontFamily -> "Frutiger-Bold", FontSize -> 12, FontWeight -> "Plain", FontColor -> GrayLevel[0]], Cell[ StyleData["Subsection", "EnhancedPrintoutNonGray"], CellMargins -> {{9, 0}, {5, 20}}, FontFamily -> "Frutiger-Bold", FontSize -> 12, FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Subsubsection"], CellMargins -> {{27, 27}, {0, 18}}, CellElementSpacings -> {"ClosedGroupTopMargin" -> 18}, CellGroupingRules -> {"SectionGrouping", 50}, PageBreakBelow -> False, InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, FontFamily -> "Helvetica", FontSize -> 12, FontWeight -> "Bold", FontColor -> RGBColor[0.592157, 0.313726, 0.313726]], Cell[ StyleData["Subsubsection", "Presentation"], FontSize -> 18], Cell[ StyleData["Subsubsection", "Printout"], CellMargins -> {{2, 0}, {3, 8}}, FontSize -> 10], Cell[ StyleData["Subsubsection", "EnhancedPrintout"], CellMargins -> {{2, 0}, {3, 8}}, FontFamily -> "Frutiger-Bold", FontSize -> 10, FontWeight -> "Plain", FontColor -> GrayLevel[0]], Cell[ StyleData["Subsubsection", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {3, 8}}, FontFamily -> "Frutiger-Bold", FontSize -> 10, FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SubsubsectionColor"], CellMargins -> {{27, 27}, {0, 18}}, CellElementSpacings -> {"ClosedGroupTopMargin" -> 18}, CellGroupingRules -> {"SectionGrouping", 50}, InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 12, FontWeight -> "Bold", FontColor -> RGBColor[0.297993, 0, 0.454994]], Cell[ StyleData["SubsubsectionColor", "Presentation"], FontSize -> 18], Cell[ StyleData["SubsubsectionColor", "Printout"], CellMargins -> {{2, 0}, {0, 18}}, PageBreakBelow -> False, FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SubsectionIcon"], ShowGroupOpener -> True, CellMargins -> {{46, 27}, {0, 18}}, CellElementSpacings -> {"ClosedGroupTopMargin" -> 8}, CellGroupingRules -> {"SectionGrouping", 40}, InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, CounterIncrements -> "Subsection", FontFamily -> "Helvetica", FontSize -> 16, FontWeight -> "Bold", FontColor -> RGBColor[0.592157, 0.313726, 0.313726]], Cell[ StyleData["SubsectionIcon", "Presentation"], FontSize -> 24], Cell[ StyleData["SubsectionIcon", "Printout"], CellDingbat -> "\[FilledSquare]", ShowGroupOpener -> False, CellMargins -> {{16, 0}, {0, 18}}, PageBreakBelow -> False, FontSize -> 14]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SubsubsectionIcon"], ShowGroupOpener -> True, CellMargins -> {{46, 27}, {0, 8}}, CellElementSpacings -> {"ClosedGroupTopMargin" -> 4}, CellGroupingRules -> {"SectionGrouping", 50}, InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, CounterIncrements -> "Subsubsection", FontFamily -> "Helvetica", FontSize -> 12, FontWeight -> "Bold", FontColor -> RGBColor[0.592157, 0.313726, 0.313726]], Cell[ StyleData["SubsubsectionIcon", "Presentation"], FontSize -> 18], Cell[ StyleData["SubsubsectionIcon", "Printout"], ShowGroupOpener -> False, CellMargins -> {{2, 0}, {0, 18}}, PageBreakBelow -> False, FontSize -> 10]}, Closed]]}, Closed]], Cell[ CellGroupData[{ Cell["Text", "Section"], Cell[ CellGroupData[{ Cell[ StyleData["Text"], CellMargins -> {{27, 27}, {0, 8}}, InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, ParagraphSpacing -> {0, 8}, CounterIncrements -> "Text", FontSize -> 12], Cell[ StyleData["Text", "Presentation"], FontSize -> 18], Cell[ StyleData["Text", "SlideShow"], CellMargins -> {{36, 24}, {4, 4}}, Hyphenation -> False, FontSize -> 14], Cell[ StyleData["Text", "Printout"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, Hyphenation -> True, FontSize -> 10], Cell[ StyleData["Text", "EnhancedPrintout"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["Text", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["CompactText"], CellMargins -> {{27, 27}, {0, 8}}, ParagraphSpacing -> {0, 0}, StyleMenuListing -> None, FontSize -> 10], Cell[ StyleData["CompactText", "Presentation"], FontSize -> 15], Cell[ StyleData["CompactText", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, Hyphenation -> True, FontSize -> 8], Cell[ StyleData["CompactText", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 8], Cell[ StyleData["CompactText", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 8]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Compact12Text"], CellMargins -> {{27, 27}, {0, 8}}, ParagraphSpacing -> {0, 0}, StyleMenuListing -> None], Cell[ StyleData["Compact12Text", "Presentation"], FontSize -> 18], Cell[ StyleData["Compact12Text", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, Hyphenation -> True, FontSize -> 10], Cell[ StyleData["Compact12Text", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["Compact12Text", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TextSans"], CellMargins -> {{27, 27}, {0, 8}}, CellHorizontalScrolling -> True, ParagraphSpacing -> {0, 8}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 10], Cell[ StyleData["TextSans", "Presentation"], FontSize -> 15], Cell[ StyleData["TextSans", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, Hyphenation -> True, FontSize -> 8], Cell[ StyleData["TextSans", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, Hyphenation -> True, FontFamily -> "Frutiger-Roman", FontSize -> 8], Cell[ StyleData["TextSans", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, Hyphenation -> True, FontFamily -> "Frutiger-Roman", FontSize -> 8]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemizedText"], CellMargins -> {{66, 4}, {4, 4}}, LineSpacing -> {1, 3}, ParagraphIndent -> -22, CounterIncrements -> "ItemizedText", StyleMenuListing -> None], Cell[ StyleData["ItemizedText", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemizedText", "Printout"], CellMargins -> {{16, 4}, {2, 4}}, Hyphenation -> True, FontSize -> 10], Cell[ StyleData["ItemizedText", "EnhancedPrintout"], CellMargins -> {{16, 4}, {2, 4}}, Hyphenation -> True, LineSpacing -> {1, 1}, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["ItemizedText", "EnhancedPrintoutNonGray"], Hyphenation -> True, LineSpacing -> {1, 1}, ParagraphIndent -> -18, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemizedTextNote"], CellMargins -> {{88, 4}, {4, 0}}, LineSpacing -> {1, 2}, CounterIncrements -> "ItemizedTextNote", StyleMenuListing -> None], Cell[ StyleData["ItemizedTextNote", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemizedTextNote", "Printout"], CellMargins -> {{34, 4}, {4, 1}}, Hyphenation -> True, FontSize -> 10], Cell[ StyleData["ItemizedTextNote", "EnhancedPrintout"], CellMargins -> {{39, 4}, {4, 1}}, Hyphenation -> True, LineSpacing -> {1, 1}, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["ItemizedTextNote", "EnhancedPrintoutNonGray"], CellMargins -> {{39, 4}, {4, 1}}, Hyphenation -> True, LineSpacing -> {1, 1}, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["IndentedText"], CellMargins -> {{66, 4}, {0, 6}}, LineSpacing -> {1, 3}, CounterIncrements -> "IndentedText", StyleMenuListing -> None], Cell[ StyleData["IndentedText", "Presentation"], FontSize -> 18], Cell[ StyleData["IndentedText", "SlideShow"], CellMargins -> {{80, 24}, {5, 5}}, Hyphenation -> False, FontSize -> 13], Cell[ StyleData["IndentedText", "Printout"], CellMargins -> {{16, 4}, {2, 4}}, Hyphenation -> True, FontSize -> 10], Cell[ StyleData["IndentedText", "EnhancedPrintout"], CellMargins -> {{39, Inherited}, {Inherited, Inherited}}, Hyphenation -> True, LineSpacing -> {1, 1}, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["IndentedText", "EnhancedPrintoutNonGray"], Hyphenation -> True, LineSpacing -> {1, 1}, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemizedList"], CellMargins -> {{58, 4}, {4, 4}}, CellFrameLabels -> {{ Cell[ TextData[{ StyleBox[ CounterBox["ItemizedList"], "TB"], StyleBox[".", "TB"]}], CellBaseline -> Baseline, CellSize -> {24, Inherited}, TextAlignment -> Right], Inherited}, {Inherited, Inherited}}, LineSpacing -> {1, 3}, CounterIncrements -> "ItemizedList", StyleMenuListing -> None], Cell[ StyleData["ItemizedList", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemizedList", "Printout"], CellMargins -> {{9, 4}, {2, 4}}, Hyphenation -> True, FontSize -> 10], Cell[ StyleData["ItemizedList", "EnhancedPrintout"], CellMargins -> {{9, 4}, {2, 4}}, Hyphenation -> True, LineSpacing -> {1, 1}, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["ItemizedList", "EnhancedPrintoutNonGray"], Hyphenation -> True, LineSpacing -> {1, 1}, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemizedSubList"], CellMargins -> {{92, 4}, {4, 4}}, CellFrameLabels -> {{ Cell[ TextData[{ StyleBox[ CounterBox["ItemizedSubList"], "TB"], StyleBox[".", "TB"]}], CellBaseline -> Baseline, CellSize -> {24, Inherited}, TextAlignment -> Right], Inherited}, {Inherited, Inherited}}, CounterIncrements -> "ItemizedSubList", StyleMenuListing -> None, CounterBoxOptions -> {CounterFunction :> (Part[ CharacterRange["a", "z"], #]& )}], Cell[ StyleData["ItemizedSubList", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemizedSubList", "Printout"], CellMargins -> {{34, 4}, {4, 1}}, Hyphenation -> True, FontSize -> 10], Cell[ StyleData["ItemizedSubList", "EnhancedPrintout"], CellMargins -> {{26, 4}, {2, 4}}, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["ItemizedSubList", "EnhancedPrintoutNonGray"], Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemizedSubListNote"], CellMargins -> {{110, 4}, {4, 4}}, CounterIncrements -> "ItemizedSubList", StyleMenuListing -> None, CounterBoxOptions -> {CounterFunction :> (Part[ CharacterRange["a", "z"], #]& )}], Cell[ StyleData["ItemizedSubListNote", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemizedSubListNote", "Printout"], CellMargins -> {{34, 4}, {4, 1}}, Hyphenation -> True, FontSize -> 10], Cell[ StyleData["ItemizedSubListNote", "EnhancedPrintout"], CellMargins -> {{56, 4}, {2, 4}}, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["ItemizedSubListNote", "EnhancedPrintoutNonGray"], CellMargins -> {{48, 4}, {2, 4}}, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["BulletedList"], CellMargins -> {{76, 4}, {4, 4}}, CellFrameLabels -> {{ Cell["\[Bullet]", "BulletedList", CellBaseline -> Baseline], Inherited}, {Inherited, Inherited}}, LineSpacing -> {1, 3}, CounterIncrements -> "BulletText", StyleMenuListing -> None], Cell[ StyleData["BulletedList", "Presentation"], FontSize -> 18], Cell[ StyleData["BulletedList", "Printout"], CellMargins -> {{16, 4}, {4, 1}}, Hyphenation -> True, FontSize -> 10], Cell[ StyleData["BulletedList", "EnhancedPrintout"], CellMargins -> {{26, 4}, {2, 4}}, Hyphenation -> True, LineSpacing -> {1, 1}, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["BulletedList", "EnhancedPrintoutNonGray"], Hyphenation -> True, LineSpacing -> {1, 1}, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ListNote"], CellMargins -> {{88, 4}, {4, 0}}, LineSpacing -> {1, 2}, CounterIncrements -> "ListNote", StyleMenuListing -> None], Cell[ StyleData["ListNote", "Presentation"], FontSize -> 18], Cell[ StyleData["ListNote", "Printout"], CellMargins -> {{34, 4}, {4, 1}}, Hyphenation -> True, FontSize -> 10], Cell[ StyleData["ListNote", "EnhancedPrintout"], CellMargins -> {{39, 4}, {4, 1}}, Hyphenation -> True, LineSpacing -> {1, 1}, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["ListNote", "EnhancedPrintoutNonGray"], CellMargins -> {{39, 4}, {4, 1}}, Hyphenation -> True, LineSpacing -> {1, 1}, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["MathCaption"], CellFrame -> {{0, 0}, {0, 0.5}}, CellMargins -> {{66, 12}, {2, 20}}, PageBreakBelow -> False, CellFrameMargins -> {{8, 8}, {8, 2}}, CellFrameColor -> GrayLevel[0.700008], CellFrameLabelMargins -> 4, LineSpacing -> {1, 1}, ParagraphSpacing -> {0, 8}, FontColor -> GrayLevel[0.2]], Cell[ StyleData["MathCaption", "Presentation"], FontSize -> 18], Cell[ StyleData["MathCaption", "SlideShow"], ShowCellBracket -> False, CellMargins -> {{36, 36}, {6, 6}}], Cell[ StyleData["MathCaption", "Printout"], CellMargins -> {{9, 0}, {0, 14}}, Hyphenation -> True, FontSize -> 9, FontColor -> GrayLevel[0]], Cell[ StyleData["MathCaption", "EnhancedPrintout"], CellMargins -> {{9, 0}, {0, 14}}, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 9, FontColor -> GrayLevel[0]], Cell[ StyleData["MathCaption", "EnhancedPrintoutNonGray"], CellMargins -> {{9, 0}, {0, 14}}, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 9, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SmallText"], CellMargins -> {{27, 27}, {0, 8}}, LineSpacing -> {1, 3}, ParagraphSpacing -> {0.7, 0}, CounterIncrements -> "SmallText", FontSize -> 9], Cell[ StyleData["SmallText", "Presentation"], FontSize -> 14], Cell[ StyleData["SmallText", "Printout"], CellMargins -> {{2, 2}, {5, 5}}, TextJustification -> 1, Hyphenation -> True, FontSize -> 7], Cell[ StyleData["SmallText", "EnhancedPrintout"], CellMargins -> {{2, 2}, {5, 5}}, TextJustification -> 1, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 7], Cell[ StyleData["SmallText", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 2}, {5, 5}}, TextJustification -> 1, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 7]}, Closed]]}, Closed]], Cell[ CellGroupData[{ Cell["Input/Output", "Section"], Cell[ "The cells in this section define styles used for input and output \ to the kernel. Be careful when modifying, renaming, or removing these \ styles, because the front end associates special meanings with these style \ names. ", "Text"], Cell[ CellGroupData[{ Cell[ StyleData["Input"], ShowCellBracket -> True, CellMargins -> {{66, 4}, {3, 8}}, Evaluatable -> True, CellGroupingRules -> "InputGrouping", PageBreakWithin -> False, GroupPageBreakWithin -> False, CellLabelAutoDelete -> False, CellLabelMargins -> {{14, Inherited}, {Inherited, Inherited}}, DefaultFormatType -> DefaultInputFormatType, ShowSpecialCharacters -> Automatic, "TwoByteSyntaxCharacterAutoReplacement" -> True, HyphenationOptions -> { "HyphenationCharacter" -> "\[Continuation]"}, AutoItalicWords -> {}, LanguageCategory -> "Mathematica", FormatType -> StandardForm, ShowStringCharacters -> True, NumberMarks -> True, FontWeight -> "Bold"], Cell[ StyleData["Input", "Presentation"], FontSize -> 18], Cell[ StyleData["Input", "SlideShow"], ShowCellBracket -> True, CellMargins -> {{100, 50}, {0, 6}}, PageBreakWithin -> False, GroupPageBreakWithin -> False, CellFrameMargins -> {{8, 8}, {4, 8}}, Background -> RGBColor[1, 1, 0.8]], Cell[ StyleData["Input", "Printout"], ShowCellBracket -> False, CellMargins -> {{39, 0}, {4, 6}}, FontSize -> 9], Cell[ StyleData["Input", "EnhancedPrintout"], ShowCellBracket -> False, CellMargins -> {{39, 0}, {4, 6}}, FontSize -> 9], Cell[ StyleData["Input", "EnhancedPrintoutNonGray"], ShowCellBracket -> False, CellMargins -> {{39, 0}, {4, 6}}, FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Output"], ShowCellBracket -> True, CellMargins -> {{66, 4}, {8, 2}}, CellEditDuplicate -> True, CellGroupingRules -> "OutputGrouping", CellHorizontalScrolling -> True, PageBreakWithin -> False, GroupPageBreakWithin -> False, GeneratedCell -> True, CellAutoOverwrite -> True, CellLabelAutoDelete -> False, CellLabelMargins -> {{14, Inherited}, {Inherited, Inherited}}, DefaultFormatType -> DefaultOutputFormatType, "TwoByteSyntaxCharacterAutoReplacement" -> True, HyphenationOptions -> { "HyphenationCharacter" -> "\[Continuation]"}, AutoItalicWords -> {}, LanguageCategory -> None, FormatType -> StandardForm], Cell[ StyleData["Output", "Presentation"], FontSize -> 18], Cell[ StyleData["Output", "SlideShow"], ShowCellBracket -> True, CellMargins -> {{100, 50}, {6, 0}}, PageBreakWithin -> False, GroupPageBreakWithin -> False, CellFrameMargins -> {{8, 8}, {8, 4}}, Background -> RGBColor[1, 1, 0.8]], Cell[ StyleData["Output", "Printout"], ShowCellBracket -> False, CellMargins -> {{39, 0}, {6, 4}}, FontSize -> 9], Cell[ StyleData["Output", "EnhancedPrintout"], ShowCellBracket -> False, CellMargins -> {{39, 0}, {6, 4}}, FontSize -> 9], Cell[ StyleData["Output", "EnhancedPrintoutNonGray"], ShowCellBracket -> False, CellMargins -> {{39, 0}, {6, 4}}, FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["InputOnly"], ShowCellBracket -> True, CellMargins -> {{66, 4}, {8, 8}}, Evaluatable -> True, CellGroupingRules -> "InputGrouping", PageBreakWithin -> False, GroupPageBreakWithin -> False, CellLabelAutoDelete -> False, CellLabelMargins -> {{14, Inherited}, {Inherited, Inherited}}, DefaultFormatType -> DefaultInputFormatType, ShowSpecialCharacters -> Automatic, "TwoByteSyntaxCharacterAutoReplacement" -> True, HyphenationOptions -> { "HyphenationCharacter" -> "\[Continuation]"}, AutoItalicWords -> {}, LanguageCategory -> "Mathematica", FormatType -> StandardForm, ShowStringCharacters -> True, NumberMarks -> True, StyleMenuListing -> None, FontWeight -> "Bold"], Cell[ StyleData["InputOnly", "Presentation"], FontSize -> 18], Cell[ StyleData["InputOnly", "SlideShow"], ShowCellBracket -> True, CellMargins -> {{100, 50}, {6, 6}}, PageBreakWithin -> False, GroupPageBreakWithin -> False, Background -> RGBColor[1, 1, 0.8]], Cell[ StyleData["InputOnly", "Printout"], ShowCellBracket -> False, CellMargins -> {{39, 0}, {6, 6}}, FontSize -> 9], Cell[ StyleData["InputOnly", "EnhancedPrintout"], ShowCellBracket -> False, CellMargins -> {{39, 0}, {6, 6}}, FontSize -> 9], Cell[ StyleData["InputOnly", "EnhancedPrintoutNonGray"], ShowCellBracket -> False, CellMargins -> {{39, 0}, {6, 6}}, FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Message"], ShowCellBracket -> True, CellMargins -> {{66, 4}, {4, 2}}, CellGroupingRules -> "OutputGrouping", PageBreakWithin -> False, GroupPageBreakWithin -> False, GeneratedCell -> True, CellAutoOverwrite -> True, ShowCellLabel -> False, CellLabelMargins -> {{14, Inherited}, {Inherited, Inherited}}, DefaultFormatType -> DefaultOutputFormatType, "TwoByteSyntaxCharacterAutoReplacement" -> True, HyphenationOptions -> { "HyphenationCharacter" -> "\[Continuation]"}, AutoItalicWords -> {}, LanguageCategory -> None, FormatType -> InputForm, CounterIncrements -> "Message", StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 10, FontColor -> RGBColor[0.6, 0.100008, 0.100008]], Cell[ StyleData["Message", "Presentation"], FontSize -> 18], Cell[ StyleData["Message", "SlideShow"], CellMargins -> {{100, 50}, {6, 6}}, FontSize -> 10, FontColor -> RGBColor[0.699992, 0.4, 0]], Cell[ StyleData["Message", "Printout"], ShowCellBracket -> False, CellMargins -> {{39, Inherited}, {Inherited, Inherited}}, FontSize -> 9, FontColor -> GrayLevel[0]], Cell[ StyleData["Message", "EnhancedPrintout"], ShowCellBracket -> False, CellMargins -> {{39, Inherited}, {Inherited, Inherited}}, FontFamily -> "Courier", FontSize -> 9, FontColor -> GrayLevel[0]], Cell[ StyleData["Message", "EnhancedPrintoutNonGray"], ShowCellBracket -> False, CellMargins -> {{39, Inherited}, {Inherited, Inherited}}, FontFamily -> "Courier", FontSize -> 9, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Print"], ShowCellBracket -> True, CellMargins -> {{66, 4}, {4, 2}}, CellGroupingRules -> "OutputGrouping", PageBreakWithin -> False, GroupPageBreakWithin -> False, GeneratedCell -> True, CellAutoOverwrite -> True, ShowCellLabel -> False, CellLabelMargins -> {{14, Inherited}, {Inherited, Inherited}}, DefaultFormatType -> DefaultOutputFormatType, "TwoByteSyntaxCharacterAutoReplacement" -> True, HyphenationOptions -> { "HyphenationCharacter" -> "\[Continuation]"}, AutoItalicWords -> {}, LanguageCategory -> None, FormatType -> InputForm, StyleMenuListing -> None], Cell[ StyleData["Print", "Presentation"], FontSize -> 18], Cell[ StyleData["Print", "SlideShow"], CellMargins -> {{100, 50}, {6, 6}}], Cell[ StyleData["Print", "Printout"], ShowCellBracket -> False, CellMargins -> {{57, Inherited}, {Inherited, Inherited}}, FontSize -> 9], Cell[ StyleData["Print", "EnhancedPrintout"], ShowCellBracket -> False, CellMargins -> {{57, Inherited}, {Inherited, Inherited}}, FontFamily -> "Courier Std", FontSize -> 9], Cell[ StyleData["Print", "EnhancedPrintoutNonGray"], ShowCellBracket -> False, CellMargins -> {{57, Inherited}, {Inherited, Inherited}}, FontFamily -> "Courier Std", FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Graphics"], ShowCellBracket -> True, CellMargins -> {{66, 4}, {4, 2}}, CellGroupingRules -> "GraphicsGrouping", PageBreakWithin -> False, GeneratedCell -> True, CellAutoOverwrite -> True, ShowCellLabel -> False, DefaultFormatType -> DefaultFormatTypeForOutput, LanguageCategory -> None, FormatType -> InputForm, StyleMenuListing -> None, FontWeight -> "Plain"], Cell[ StyleData["Graphics", "Presentation"], FontSize -> 18], Cell[ StyleData["Graphics", "SlideShow"], ShowCellBracket -> True, CellMargins -> {{100, 50}, {6, 0}}, PageBreakWithin -> False, GroupPageBreakWithin -> False, CellFrameMargins -> {{8, 8}, {4, 4}}, Background -> RGBColor[1, 1, 0.8]], Cell[ StyleData["Graphics", "Printout"], ShowCellBracket -> False, CellMargins -> {{39, Inherited}, {Inherited, Inherited}}, ImageSize -> {250, 250}, FontSize -> 9], Cell[ StyleData["Graphics", "EnhancedPrintout"], ShowCellBracket -> False, CellMargins -> {{32, Inherited}, {Inherited, Inherited}}, ImageSize -> {250, 250}, FontFamily -> "Courier Std", FontSize -> 9], Cell[ StyleData["Graphics", "EnhancedPrintoutNonGray"], ShowCellBracket -> False, CellMargins -> {{32, Inherited}, {Inherited, Inherited}}, ImageSize -> {250, 250}, FontFamily -> "Courier Std", FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["CellLabel"], LanguageCategory -> None, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 9, FontWeight -> "Plain", FontColor -> RGBColor[0.269993, 0.308507, 0.6]], Cell[ StyleData["CellLabel", "Presentation"], FontSize -> 14], Cell[ StyleData["CellLabel", "SlideShow"], FontColor -> RGBColor[0.699992, 0.4, 0]], Cell[ StyleData["CellLabel", "Printout"], FontFamily -> "Courier", FontSize -> 8, FontSlant -> "Oblique", FontColor -> GrayLevel[0]], Cell[ StyleData["CellLabel", "EnhancedPrintout"], FontFamily -> "Courier Std", FontSize -> 8, FontSlant -> "Oblique", FontColor -> GrayLevel[0]], Cell[ StyleData["CellLabel", "EnhancedPrintoutNonGray"], FontFamily -> "Courier Std", FontSize -> 8, FontSlant -> "Oblique", FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Name"], StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 9, FontWeight -> "Plain", FontSlant -> "Italic", FontColor -> RGBColor[0.269993, 0.308507, 0.6]], Cell[ StyleData["Name", "Presentation"], FontSize -> 14], Cell[ StyleData["Name", "Printout"], FontSize -> 7, FontSlant -> "Oblique", FontColor -> GrayLevel[0]], Cell[ StyleData["Name", "EnhancedPrintout"], FontFamily -> "Frutiger-Italic", FontSize -> 7, FontSlant -> "Plain", FontColor -> GrayLevel[0]], Cell[ StyleData["Name", "EnhancedPrintoutNonGray"], FontFamily -> "Frutiger-Italic", FontSize -> 7, FontSlant -> "Plain", FontColor -> GrayLevel[0]]}, Closed]]}, Closed]], Cell[ CellGroupData[{ Cell["Hyperlinks", "Section"], Cell[ "The cells below define styles useful for making hypertext \ ButtonBoxes. The \"Hyperlink\" style is for links within the same Notebook, \ or between Notebooks. The others point to the various sections of the help \ browser. These styles will modify individual words or letters in a cell \ exclusive of the cell tag.", "Text"], Cell[ CellGroupData[{ Cell[ StyleData["Hyperlink"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, FontWeight -> "Bold", FontColor -> RGBColor[0.269993, 0.308507, 0.6], Background -> GrayLevel[0.900008], ButtonBoxOptions -> { Active -> True, ButtonFunction :> (FrontEndExecute[{ FrontEnd`NotebookLocate[#2]}]& ), ButtonNote -> ButtonData}], Cell[ StyleData["Hyperlink", "Printout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["Hyperlink", "EnhancedPrintout"], FontFamily -> "Palatino", FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["Hyperlink", "EnhancedPrintoutNonGray"], FontFamily -> "Palatino", FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["MainBookLink"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, FontWeight -> "Bold", FontColor -> RGBColor[0.269993, 0.308507, 0.6], Background -> GrayLevel[0.900008], ButtonBoxOptions -> { Active -> True, Appearance -> {Automatic, None}, ButtonFunction :> (FrontEndExecute[{ FrontEnd`HelpBrowserLookup["MainBook", #]}]& )}], Cell[ StyleData["MainBookLink", "Printout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["MainBookLink", "EnhancedPrintout"], FontFamily -> "Palatino", FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["MainBookLink", "EnhancedPrintoutNonGray"], FontFamily -> "Palatino", FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["MainBookLinkMR"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, FontFamily -> "Courier", FontWeight -> "Bold", FontColor -> RGBColor[0.269993, 0.308507, 0.6], Background -> GrayLevel[0.900008], ButtonBoxOptions -> { Active -> True, Appearance -> {Automatic, None}, ButtonFunction :> (FrontEndExecute[{ FrontEnd`HelpBrowserLookup["MainBook", #]}]& )}], Cell[ StyleData["MainBookLinkMR", "Printout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["MainBookLinkMR", "EnhancedPrintout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["MainBookLinkMR", "EnhancedPrintoutNonGray"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["AddOnsLink"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, FontFamily -> "Courier", FontWeight -> "Bold", FontColor -> RGBColor[0.269993, 0.308507, 0.6], Background -> GrayLevel[0.900008], ButtonBoxOptions -> { Active -> True, Appearance -> {Automatic, None}, ButtonFunction :> (FrontEndExecute[{ FrontEnd`HelpBrowserLookup["AddOns", #]}]& )}], Cell[ StyleData["AddOnsLink", "Printout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["AddOnsLink", "EnhancedPrintout"], FontFamily -> "WRICourier", FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["AddOnsLink", "EnhancedPrintoutNonGray"], FontFamily -> "WRICourier", FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["AddOnsLinkText"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, FontFamily -> "Times", FontWeight -> "Bold", FontColor -> RGBColor[0.269993, 0.308507, 0.6], Background -> GrayLevel[0.900008], ButtonBoxOptions -> { Active -> True, Appearance -> {Automatic, None}, ButtonFunction :> (FrontEndExecute[{ FrontEnd`HelpBrowserLookup["AddOns", #]}]& )}], Cell[ StyleData["AddOnsLinkText", "Printout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["AddOnsLinkText", "EnhancedPrintout"], FontFamily -> "Palatino", FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["AddOnsLinkText", "EnhancedPrintoutNonGray"], FontFamily -> "Palatino", FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["RefGuideLink"], CellFrame -> {{0, 0}, {3, 0}}, StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, FontFamily -> "Courier", FontSize -> 16, FontWeight -> "Bold", FontColor -> RGBColor[0.269993, 0.308507, 0.6], Background -> GrayLevel[0.900008], ButtonBoxOptions -> { Active -> True, Appearance -> {Automatic, None}, ButtonFunction :> (FrontEndExecute[{ FrontEnd`HelpBrowserLookup["RefGuide", #]}]& )}], Cell[ StyleData["RefGuideLink", "Printout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["RefGuideLink", "EnhancedPrintout"], FontFamily -> "WRICourier", FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["RefGuideLink", "EnhancedPrintoutNonGray"], FontFamily -> "WRICourier", FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]]}, Open]], Cell[ CellGroupData[{ Cell[ StyleData["GettingStartedLink"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, FontWeight -> "Bold", FontColor -> RGBColor[0.269993, 0.308507, 0.6], Background -> GrayLevel[0.900008], ButtonBoxOptions -> { Active -> True, Appearance -> {Automatic, None}, ButtonFunction :> (FrontEndExecute[{ FrontEnd`HelpBrowserLookup["GettingStarted", #]}]& )}], Cell[ StyleData["GettingStartedLink", "Printout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["GettingStartedLink", "EnhancedPrintout"], FontFamily -> "Palatino", FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["GettingStartedLink", "EnhancedPrintoutNonGray"], FontFamily -> "Palatino", FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["DemosLink"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, FontWeight -> "Bold", FontColor -> RGBColor[0.269993, 0.308507, 0.6], Background -> GrayLevel[0.900008], ButtonBoxOptions -> { Active -> True, Appearance -> {Automatic, None}, ButtonFunction :> (FrontEndExecute[{ FrontEnd`HelpBrowserLookup["Demos", #]}]& )}], Cell[ StyleData["DemosLink", "Printout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["DemosLink", "EnhancedPrintout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["DemosLink", "EnhancedPrintoutNonGray"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TourLink"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, FontWeight -> "Bold", FontColor -> RGBColor[0.269993, 0.308507, 0.6], Background -> GrayLevel[0.900008], ButtonBoxOptions -> { Active -> True, Appearance -> {Automatic, None}, ButtonFunction :> (FrontEndExecute[{ FrontEnd`HelpBrowserLookup["Tour", #]}]& )}], Cell[ StyleData["TourLink", "Printout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["TourLink", "EnhancedPrintout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["TourLink", "EnhancedPrintoutNonGray"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["OtherInformationLink"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, FontWeight -> "Bold", FontColor -> RGBColor[0.269993, 0.308507, 0.6], Background -> GrayLevel[0.900008], ButtonBoxOptions -> { Active -> True, Appearance -> {Automatic, None}, ButtonFunction :> (FrontEndExecute[{ FrontEnd`HelpBrowserLookup["OtherInformation", #]}]& )}], Cell[ StyleData["OtherInformationLink", "Printout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["OtherInformationLink", "EnhancedPrintout"], FontFamily -> "Palatino", FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["OtherInformationLink", "EnhancedPrintoutNonGray"], FontFamily -> "Palatino", FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["OtherInformationLinkMR"], StyleMenuListing -> None, FontFamily -> "Courier", FontWeight -> "Bold", FontColor -> RGBColor[0.269993, 0.308507, 0.6], Background -> GrayLevel[0.900008], ButtonBoxOptions -> { Active -> True, Appearance -> {Automatic, None}, ButtonFunction :> (FrontEndExecute[{ FrontEnd`HelpBrowserLookup["OtherInformation", #]}]& )}], Cell[ StyleData["OtherInformationLinkMR", "Printout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["OtherInformationLinkMR", "EnhancedPrintout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["OtherInformationLinkMR", "EnhancedPrintoutNonGray"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["MasterIndexLink"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, FontWeight -> "Bold", FontColor -> RGBColor[0.269993, 0.308507, 0.6], Background -> GrayLevel[0.900008], ButtonBoxOptions -> { Active -> True, Appearance -> {Automatic, None}, ButtonFunction :> (FrontEndExecute[{ FrontEnd`HelpBrowserLookup["MasterIndex", #]}]& )}], Cell[ StyleData["MasterIndexLink", "Printout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["MasterIndexLink", "EnhancedPrintout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["MasterIndexLink", "EnhancedPrintoutNonGray"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["NotebookLink"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, FontFamily -> "Times", FontWeight -> "Bold", FontColor -> RGBColor[0.269993, 0.308507, 0.6], Background -> GrayLevel[0.900008], ButtonBoxOptions -> { Active -> True, Appearance -> {Automatic, None}, ButtonFunction :> (FrontEndExecute[{ FrontEnd`NotebookLocate[#]}]& )}], Cell[ StyleData["NotebookLink", "Printout"], FontSize -> 11, FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["NotebookLink", "EnhancedPrintout"], FontFamily -> "Palatino", FontSize -> 10, FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["NotebookLink", "EnhancedPrintoutNonGray"], FontFamily -> "Palatino", FontSize -> 10, FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["NotebookLinkMR"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, FontFamily -> "Courier", FontWeight -> "Bold", FontColor -> RGBColor[0.269993, 0.308507, 0.6], Background -> GrayLevel[0.900008], ButtonBoxOptions -> { Active -> True, Appearance -> {Automatic, None}, ButtonFunction :> (FrontEndExecute[{ FrontEnd`NotebookLocate[#]}]& )}], Cell[ StyleData["NotebookLinkMR", "Printout"], FontSize -> 11, FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["NotebookLinkMR", "EnhancedPrintout"], FontSize -> 10, FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]], Cell[ StyleData["NotebookLinkMR", "EnhancedPrintoutNonGray"], FontSize -> 10, FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]]}, Open]]}, Open]], Cell[ CellGroupData[{ Cell["Palette Styles", "Section"], Cell[ "The cells below define styles that define standard ButtonFunctions, \ for use in palette buttons.", "Text"], Cell[ StyleData["Paste"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, ButtonBoxOptions -> {ButtonFunction :> (FrontEndExecute[{ FrontEnd`NotebookApply[ FrontEnd`InputNotebook[], #, After]}]& )}], Cell[ StyleData["Evaluate"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, ButtonBoxOptions -> {ButtonFunction :> (FrontEndExecute[{ FrontEnd`NotebookApply[ FrontEnd`InputNotebook[], #, All], FrontEnd`SelectionEvaluate[ FrontEnd`InputNotebook[], All]}]& )}], Cell[ StyleData["EvaluateCell"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, ButtonBoxOptions -> {ButtonFunction :> (FrontEndExecute[{ FrontEnd`NotebookApply[ FrontEnd`InputNotebook[], #, All], FrontEnd`SelectionMove[ FrontEnd`InputNotebook[], All, Cell, 1], FrontEnd`SelectionEvaluateCreateCell[ FrontEnd`InputNotebook[], All]}]& )}], Cell[ StyleData["CopyEvaluate"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, ButtonBoxOptions -> {ButtonFunction :> (FrontEndExecute[{ FrontEnd`SelectionCreateCell[ FrontEnd`InputNotebook[], All], FrontEnd`NotebookApply[ FrontEnd`InputNotebook[], #, All], FrontEnd`SelectionEvaluate[ FrontEnd`InputNotebook[], All]}]& )}], Cell[ StyleData["CopyEvaluateCell"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, ButtonBoxOptions -> {ButtonFunction :> (FrontEndExecute[{ FrontEnd`SelectionCreateCell[ FrontEnd`InputNotebook[], All], FrontEnd`NotebookApply[ FrontEnd`InputNotebook[], #, All], FrontEnd`SelectionEvaluateCreateCell[ FrontEnd`InputNotebook[], All]}]& )}]}, Closed]], Cell[ CellGroupData[{ Cell["Inline Formatting", "Section"], Cell[ "These styles are for modifying individual words or letters in a \ cell exclusive of the cell tag.", "Text"], Cell[ CellGroupData[{ Cell[ StyleData["JT"], StyleMenuListing -> None, FontFamily -> "JFontText"], Cell[ StyleData["JT", "Printout"]], Cell[ StyleData["JT", "EnhancedPrintout"]], Cell[ StyleData["JT", "EnhancedPrintoutNonGray"]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["JS"], StyleMenuListing -> None, FontFamily -> "JFontSans"], Cell[ StyleData["JS", "Printout"]], Cell[ StyleData["JS", "EnhancedPrintout"]], Cell[ StyleData["JS", "EnhancedPrintoutNonGray"]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["JSB"], StyleMenuListing -> None, FontFamily -> "JFontSansBold"], Cell[ StyleData["JSB", "Printout"]], Cell[ StyleData["JSB", "EnhancedPrintout"]], Cell[ StyleData["JSB", "EnhancedPrintoutNonGray"]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["RM"], StyleMenuListing -> None, FontWeight -> "Plain", FontSlant -> "Plain"], Cell[ StyleData["RM", "Printout"]], Cell[ StyleData["RM", "EnhancedPrintout"]], Cell[ StyleData["RM", "EnhancedPrintoutNonGray"]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["BF"], StyleMenuListing -> None, FontWeight -> "Bold"], Cell[ StyleData["BF", "Printout"]], Cell[ StyleData["BF", "EnhancedPrintout"]], Cell[ StyleData["BF", "EnhancedPrintoutNonGray"]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["IT"], StyleMenuListing -> None, FontSlant -> "Italic"], Cell[ StyleData["IT", "Printout"]], Cell[ StyleData["IT", "EnhancedPrintout"]], Cell[ StyleData["IT", "EnhancedPrintoutNonGray"]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TR"], StyleMenuListing -> None, FontFamily -> "Times", FontWeight -> "Plain", FontSlant -> "Plain"], Cell[ StyleData["TR", "Printout"]], Cell[ StyleData["TR", "EnhancedPrintout"], FontFamily -> "Palatino"], Cell[ StyleData["TR", "EnhancedPrintoutNonGray"], FontFamily -> "Palatino"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TI"], StyleMenuListing -> None, FontFamily -> "Times", FontSlant -> "Italic"], Cell[ StyleData["TI", "Printout"]], Cell[ StyleData["TI", "EnhancedPrintout"], FontFamily -> "Palatino"], Cell[ StyleData["TI", "EnhancedPrintoutNonGray"], FontFamily -> "Palatino"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TB"], StyleMenuListing -> None, FontFamily -> "Times", FontWeight -> "Bold", FontSlant -> "Plain"], Cell[ StyleData["TB", "Printout"]], Cell[ StyleData["TB", "EnhancedPrintout"], FontFamily -> "Palatino"], Cell[ StyleData["TB", "EnhancedPrintoutNonGray"], FontFamily -> "Palatino"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TBI"], StyleMenuListing -> None, FontFamily -> "Times", FontWeight -> "Bold", FontSlant -> "Italic"], Cell[ StyleData["TBI", "Printout"]], Cell[ StyleData["TBI", "EnhancedPrintout"], FontFamily -> "Palatino"], Cell[ StyleData["TBI", "EnhancedPrintoutNonGray"], FontFamily -> "Palatino"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["MR"], Hyphenation -> True, HyphenationOptions -> { "HyphenationCharacter" -> "\[Continuation]"}, AutoItalicWords -> {}, StyleMenuListing -> None, FontFamily -> "Courier", FontWeight -> "Plain", FontSlant -> "Plain"], Cell[ StyleData["MR", "Printout"]], Cell[ StyleData["MR", "EnhancedPrintout"], FontFamily -> "Courier Std"], Cell[ StyleData["MR", "EnhancedPrintoutNonGray"], FontFamily -> "Courier Std"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["MO"], HyphenationOptions -> { "HyphenationCharacter" -> "\[Continuation]"}, StyleMenuListing -> None, FontFamily -> "Courier", FontWeight -> "Plain", FontSlant -> "Italic"], Cell[ StyleData["MO", "Printout"], FontSlant -> "Oblique"], Cell[ StyleData["MO", "EnhancedPrintout"], FontFamily -> "Courier Std", FontSlant -> "Oblique"], Cell[ StyleData["MO", "EnhancedPrintoutNonGray"], FontFamily -> "Courier Std", FontSlant -> "Oblique"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["MB"], HyphenationOptions -> { "HyphenationCharacter" -> "\[Continuation]"}, StyleMenuListing -> None, FontFamily -> "Courier", FontWeight -> "Bold", FontSlant -> "Plain"], Cell[ StyleData["MB", "Printout"]], Cell[ StyleData["MB", "EnhancedPrintout"], FontFamily -> "Courier Std"], Cell[ StyleData["MB", "EnhancedPrintoutNonGray"], FontFamily -> "Courier Std"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["MBO"], HyphenationOptions -> { "HyphenationCharacter" -> "\[Continuation]"}, StyleMenuListing -> None, FontFamily -> "Courier", FontWeight -> "Bold", FontSlant -> "Italic"], Cell[ StyleData["MBO", "Printout"], FontSlant -> "Oblique"], Cell[ StyleData["MBO", "EnhancedPrintout"], FontFamily -> "Courier Std", FontSlant -> "Oblique"], Cell[ StyleData["MBO", "EnhancedPrintoutNonGray"], FontFamily -> "Courier Std", FontSlant -> "Oblique"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SR"], StyleMenuListing -> None, FontFamily -> "Helvetica", FontWeight -> "Plain", FontSlant -> "Plain"], Cell[ StyleData["SR", "Printout"]], Cell[ StyleData["SR", "EnhancedPrintout"], FontFamily -> "Frutiger-Roman"], Cell[ StyleData["SR", "EnhancedPrintoutNonGray"], FontFamily -> "Frutiger-Roman"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SO"], StyleMenuListing -> None, FontFamily -> "Helvetica", FontWeight -> "Plain", FontSlant -> "Italic"], Cell[ StyleData["SO", "Printout"], StyleMenuListing -> None, FontFamily -> "Helvetica", FontWeight -> "Plain", FontSlant -> "Italic"], Cell[ StyleData["SO", "EnhancedPrintout"], FontFamily -> "Frutiger-Italic", FontSlant -> "Plain"], Cell[ StyleData["SO", "EnhancedPrintoutNonGray"], FontFamily -> "Frutiger-Italic", FontSlant -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SB"], StyleMenuListing -> None, FontFamily -> "Helvetica", FontWeight -> "Bold", FontSlant -> "Plain"], Cell[ StyleData["SB", "Printout"], StyleMenuListing -> None], Cell[ StyleData["SB", "EnhancedPrintout"], FontFamily -> "Frutiger-Bold", FontWeight -> "Plain"], Cell[ StyleData["SB", "EnhancedPrintoutNonGray"], FontFamily -> "Frutiger-Bold", FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SBColor"], StyleMenuListing -> None, FontFamily -> "Helvetica", FontWeight -> "Bold", FontSlant -> "Plain"], Cell[ StyleData["SBColor", "Printout"], StyleMenuListing -> None], Cell[ StyleData["SBColor", "EnhancedPrintout"], FontFamily -> "Frutiger-Bold", FontWeight -> "Plain"], Cell[ StyleData["SBColor", "EnhancedPrintoutNonGray"], FontFamily -> "Frutiger-Bold", FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SBO"], StyleMenuListing -> None, FontFamily -> "Helvetica", FontWeight -> "Bold", FontSlant -> "Italic"], Cell[ StyleData["SBO", "Printout"], StyleMenuListing -> None, FontFamily -> "Helvetica", FontWeight -> "Bold", FontSlant -> "Italic"], Cell[ StyleData["SBO", "EnhancedPrintout"], FontFamily -> "Frutiger-BoldItalic", FontWeight -> "Plain", FontSlant -> "Plain"], Cell[ StyleData["SBO", "EnhancedPrintoutNonGray"], FontFamily -> "Frutiger-BoldItalic", FontWeight -> "Plain", FontSlant -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["M4"], ShowCellBracket -> True, StyleMenuListing -> None, FontFamily -> "Mathematica4", CharacterEncoding -> "Mathematica4"], Cell[ StyleData["M4", "Printout"], ShowCellBracket -> True, StyleMenuListing -> None, FontFamily -> "Mathematica4", CharacterEncoding -> "Mathematica4"], Cell[ StyleData["M4", "EnhancedPrintout"], ShowCellBracket -> True, StyleMenuListing -> None, FontFamily -> "Mathematica4", CharacterEncoding -> "Mathematica4"], Cell[ StyleData["M4", "EnhancedPrintoutNonGray"], ShowCellBracket -> True, StyleMenuListing -> None, FontFamily -> "Mathematica4", CharacterEncoding -> "Mathematica4"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SO10"], StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 10, FontWeight -> "Plain", FontSlant -> "Italic"], Cell[ StyleData["SO10", "Printout"], StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 8, FontWeight -> "Plain", FontSlant -> "Italic"], Cell[ StyleData["SO10", "EnhancedPrintout"], StyleMenuListing -> None, FontFamily -> "Frutiger-Italic", FontSize -> 8, FontWeight -> "Plain", FontSlant -> "Plain"], Cell[ StyleData["SO10", "EnhancedPrintoutNonGray"], StyleMenuListing -> None, FontFamily -> "Frutiger-Italic", FontSize -> 8, FontWeight -> "Plain", FontSlant -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["S9"], StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 9, FontWeight -> "Plain"], Cell[ StyleData["S9", "Printout"], FontSize -> 9, FontWeight -> "Plain"], Cell[ StyleData["S9", "EnhancedPrintout"], FontFamily -> "Frutiger-Roman", FontSize -> 9, FontWeight -> "Plain"], Cell[ StyleData["S9", "EnhancedPrintoutNonGray"], FontFamily -> "Frutiger-Roman", FontSize -> 9, FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["S10"], StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 10, FontWeight -> "Plain"], Cell[ StyleData["S10", "Printout"], FontSize -> 10, FontWeight -> "Plain"], Cell[ StyleData["S10", "EnhancedPrintout"], FontFamily -> "Frutiger-Roman", FontSize -> 10, FontWeight -> "Plain"], Cell[ StyleData["S10", "EnhancedPrintoutNonGray"], FontFamily -> "Frutiger-Roman", FontSize -> 10, FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SB9"], StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 9, FontWeight -> "Bold", PrivateFontOptions -> {"OperatorSubstitution" -> False}], Cell[ StyleData["SB9", "Printout"], FontSize -> 7], Cell[ StyleData["SB9", "EnhancedPrintout"], FontFamily -> "Frutiger-Bold", FontSize -> 7, FontWeight -> "Plain"], Cell[ StyleData["SB9", "EnhancedPrintoutNonGray"], FontFamily -> "Frutiger-Bold", FontSize -> 7, FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SB10"], StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 10, FontWeight -> "Bold"], Cell[ StyleData["SB10", "Printout"], FontSize -> 8], Cell[ StyleData["SB10", "EnhancedPrintout"], FontFamily -> "Frutiger-Bold", FontSize -> 8, FontWeight -> "Plain"], Cell[ StyleData["SB10", "EnhancedPrintoutNonGray"], FontFamily -> "Frutiger-Bold", FontSize -> 8, FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["MR10"], Hyphenation -> True, HyphenationOptions -> { "HyphenationCharacter" -> "\[Continuation]"}, SingleLetterItalics -> False, StyleMenuListing -> None, FontFamily -> "Courier", FontSize -> 10, FontWeight -> "Plain", FontSlant -> "Plain"], Cell[ StyleData["MR10", "Printout"], FontSize -> 7], Cell[ StyleData["MR10", "EnhancedPrintout"], FontFamily -> "Courier Std", FontSize -> 7], Cell[ StyleData["MR10", "EnhancedPrintoutNonGray"], FontFamily -> "Courier Std", FontSize -> 7]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["MO10"], Hyphenation -> True, HyphenationOptions -> { "HyphenationCharacter" -> "\[Continuation]"}, SingleLetterItalics -> False, StyleMenuListing -> None, FontFamily -> "Courier", FontSize -> 10, FontSlant -> "Italic"], Cell[ StyleData["MO10", "Printout"], FontSize -> 7], Cell[ StyleData["MO10", "EnhancedPrintout"], FontFamily -> "Courier Std", FontSize -> 7], Cell[ StyleData["MO10", "EnhancedPrintoutNonGray"], FontFamily -> "Courier Std", FontSize -> 7]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["C1"], StyleMenuListing -> None, FontColor -> RGBColor[0.4, 0, 1]], Cell[ StyleData["C1", "Printout"], FontSize -> 10, FontColor -> GrayLevel[0]], Cell[ StyleData["C1", "EnhancedPrintout"], FontFamily -> "Palatino", FontSize -> 10, FontColor -> GrayLevel[0]], Cell[ StyleData["C1", "EnhancedPrintoutNonGray"], FontFamily -> "Palatino", FontSize -> 10, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["C1MR"], StyleMenuListing -> None, FontFamily -> "Courier", FontColor -> RGBColor[0.4, 0, 1]], Cell[ StyleData["C1MR", "Printout"], FontSize -> 10, FontColor -> GrayLevel[0]], Cell[ StyleData["C1MR", "EnhancedPrintout"], FontFamily -> "Courier Std", FontSize -> 10, FontColor -> GrayLevel[0]], Cell[ StyleData["C1MR", "EnhancedPrintoutNonGray"], FontFamily -> "Courier Std", FontSize -> 10, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SmallCaps"], StyleMenuListing -> None, Magnification -> 0.8], Cell[ StyleData["SmallCaps", "Printout"]], Cell[ StyleData["SmallCaps", "EnhancedPrintout"], FontFamily -> "Palatino"], Cell[ StyleData["SmallCaps", "EnhancedPrintoutNonGray"], FontFamily -> "Palatino"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["KeyboardChars"], StyleMenuListing -> None, FontSize -> 12], Cell[ StyleData["KeyboardChars", "Printout"], FontSize -> 10], Cell[ StyleData["KeyboardChars", "EnhancedPrintout"], FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["KeyboardChars", "EnhancedPrintoutNonGray"], FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Inert"], StyleMenuListing -> None, Background -> RGBColor[0.870588, 0.905882, 0.972549]], Cell[ StyleData["Inert", "Printout"], StyleMenuListing -> None, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell["TMB Specific", "Subsection"], Cell[ StyleData["HeadingNumber"], StyleMenuListing -> None]}, Open]]}, Closed]], Cell[ CellGroupData[{ Cell["Emphasis Boxes and Pictures", "Section"], Cell[ CellGroupData[{ Cell[ StyleData["Box"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions -> {BoxFrame -> 0.5, FrameMargins -> True}, GridBoxOptions -> {GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["Box", "Presentation"], FontSize -> 18], Cell[ StyleData["Box", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["Box", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["Box", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["DoubleBox"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions -> {BoxFrame -> 0.5, FrameMargins -> True}, GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Top}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[1.4]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["DoubleBox", "Presentation"], FontSize -> 18], Cell[ StyleData["DoubleBox", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["DoubleBox", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["DoubleBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["1ColumnBox"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], LineIndent -> 0, StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions -> {BoxFrame -> 0.5, FrameMargins -> True}, GridBoxOptions -> {GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["1ColumnBox", "Presentation"], FontSize -> 18], Cell[ StyleData["1ColumnBox", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["1ColumnBox", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["1ColumnBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["2ColumnBox"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], SingleLetterItalics -> False, LineIndent -> 0, StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions -> {BoxFrame -> 0.5, FrameMargins -> True}, GridBoxOptions -> {GridBoxItemSize -> {"Columns" -> { Scaled[0.31], { Scaled[0.67]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}}], Cell[ StyleData["2ColumnBox", "Presentation"], FontSize -> 18], Cell[ StyleData["2ColumnBox", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 9, Background -> GrayLevel[0.900008]], Cell[ StyleData["2ColumnBox", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 9, Background -> GrayLevel[0.900008]], Cell[ StyleData["2ColumnBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 9, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["2ColumnEvenBox"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], LineIndent -> 0, StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions -> {BoxFrame -> 0.5, FrameMargins -> True}, GridBoxOptions -> {GridBoxItemSize -> {"Columns" -> {{ Scaled[0.46]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}}], Cell[ StyleData["2ColumnEvenBox", "Presentation"], FontSize -> 18], Cell[ StyleData["2ColumnEvenBox", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["2ColumnEvenBox", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["2ColumnEvenBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["2ColumnSmallBox"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], LineIndent -> 0, StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions -> {BoxFrame -> 0.5, FrameMargins -> True}, GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {Right, {Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> {{ Scaled[0.35]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[1.0499999999999998`]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["2ColumnSmallBox", "Presentation"], FontSize -> 18], Cell[ StyleData["2ColumnSmallBox", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["2ColumnSmallBox", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["2ColumnSmallBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["3ColumnBox"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], LineIndent -> 0, StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions -> {BoxFrame -> 0.5, FrameMargins -> True}, GridBoxOptions -> {GridBoxItemSize -> {"Columns" -> {{ Scaled[0.32]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}}], Cell[ StyleData["3ColumnBox", "Presentation"], FontSize -> 18], Cell[ StyleData["3ColumnBox", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["3ColumnBox", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["3ColumnBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["3ColumnSmallBox"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], LineIndent -> 0, StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions -> {BoxFrame -> 0.5, FrameMargins -> True}, GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {Right, Center, {Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> {{ Scaled[0.24]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[1.0499999999999998`]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["3ColumnSmallBox", "Presentation"], FontSize -> 18], Cell[ StyleData["3ColumnSmallBox", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["3ColumnSmallBox", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["3ColumnSmallBox", "EnhancedPrintoutNonGray"], CellFrame -> 0.5, CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["4ColumnBox"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], SingleLetterItalics -> False, LineIndent -> 0, StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions -> {BoxFrame -> 0.5, FrameMargins -> True}, GridBoxOptions -> {GridBoxItemSize -> {"Columns" -> { Scaled[0.13], Scaled[0.35], Scaled[0.13], { Scaled[0.35]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}}], Cell[ StyleData["4ColumnBox", "Presentation"], FontSize -> 18], Cell[ StyleData["4ColumnBox", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["4ColumnBox", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["4ColumnBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["5ColumnBox"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], LineIndent -> 0, StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions -> {BoxFrame -> 0.5, FrameMargins -> True}, GridBoxOptions -> {GridBoxItemSize -> {"Columns" -> {{ Scaled[0.202]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}}], Cell[ StyleData["5ColumnBox", "Presentation"], FontSize -> 18], Cell[ StyleData["5ColumnBox", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 9, Background -> GrayLevel[0.900008]], Cell[ StyleData["5ColumnBox", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 9, Background -> GrayLevel[0.900008]], Cell[ StyleData["5ColumnBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 9, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["6ColumnBox"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], LineIndent -> 0, StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions -> {BoxFrame -> 0.5, FrameMargins -> True}, GridBoxOptions -> {GridBoxItemSize -> {"Columns" -> { Scaled[0.12], Scaled[0.22], Scaled[0.12], Scaled[0.12], Scaled[0.22], { Scaled[0.12]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}}], Cell[ StyleData["6ColumnBox", "Presentation"], FontSize -> 18], Cell[ StyleData["6ColumnBox", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["6ColumnBox", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["6ColumnBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["FramedBox"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, PageBreakWithin -> False, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, FontWeight -> "Plain", Background -> RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.5599999999999999]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["FramedBox", "Presentation"], FontSize -> 18], Cell[ StyleData["FramedBox", "Printout"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]], Cell[ StyleData["FramedBox", "EnhancedPrintout"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1]], Cell[ StyleData["FramedBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["DefinitionBox"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, PageBreakWithin -> False, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, FontWeight -> "Plain", Background -> RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> { Scaled[0.4], { Scaled[0.6]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["DefinitionBox", "Presentation"], FontSize -> 18], Cell[ StyleData["DefinitionBox", "Printout"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]], Cell[ StyleData["DefinitionBox", "EnhancedPrintout"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1]], Cell[ StyleData["DefinitionBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["DefinitionBox3Col"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, PageBreakWithin -> False, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, FontWeight -> "Plain", Background -> RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> { Scaled[0.35], Scaled[0.2], { Scaled[0.45]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["DefinitionBox3Col", "Presentation"], FontSize -> 18], Cell[ StyleData["DefinitionBox3Col", "Printout"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]], Cell[ StyleData["DefinitionBox3Col", "EnhancedPrintout"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1]], Cell[ StyleData["DefinitionBox3Col", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["DefinitionBox4Col"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, PageBreakWithin -> False, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, FontWeight -> "Plain", Background -> RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> { Scaled[0.15], Scaled[0.35], Scaled[0.15], { Scaled[0.35]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["DefinitionBox4Col", "Presentation"], FontSize -> 18], Cell[ StyleData["DefinitionBox4Col", "Printout"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]], Cell[ StyleData["DefinitionBox4Col", "EnhancedPrintout"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1]], Cell[ StyleData["DefinitionBox4Col", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PrecedenceTable"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, PageBreakWithin -> False, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, FontWeight -> "Plain", Background -> RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> { Scaled[0.3], Scaled[0.45], Scaled[0.2], { Scaled[0.05]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["PrecedenceTable", "Presentation"], FontSize -> 18], Cell[ StyleData["PrecedenceTable", "Printout"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]], Cell[ StyleData["PrecedenceTable", "EnhancedPrintout"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1]], Cell[ StyleData["PrecedenceTable", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["DefinitionBox5Col"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, PageBreakWithin -> False, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, FontWeight -> "Plain", Background -> RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> {{ Scaled[0.2]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["DefinitionBox5Col", "Presentation"], FontSize -> 18], Cell[ StyleData["DefinitionBox5Col", "Printout"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]], Cell[ StyleData["DefinitionBox5Col", "EnhancedPrintout"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1]], Cell[ StyleData["DefinitionBox5Col", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["DefinitionBox6Col"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, PageBreakWithin -> False, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, FontWeight -> "Plain", Background -> RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> { Scaled[0.13], Scaled[0.24], Scaled[0.13], Scaled[0.13], Scaled[0.24], { Scaled[0.13]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["DefinitionBox6Col", "Presentation"], FontSize -> 18], Cell[ StyleData["DefinitionBox6Col", "Printout"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]], Cell[ StyleData["DefinitionBox6Col", "EnhancedPrintout"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1]], Cell[ StyleData["DefinitionBox6Col", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 4}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TopBox"], CellFrame -> {{0.5, 0.5}, {0, 0.5}}, CellMargins -> {{27, 12}, {0, 8}}, CellHorizontalScrolling -> True, PageBreakBelow -> False, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, StyleMenuListing -> None, FontWeight -> "Plain", Background -> RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> { Scaled[0.31], { Scaled[0.62]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["TopBox", "Presentation"], FontSize -> 18], Cell[ StyleData["TopBox", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], Background -> GrayLevel[1]], Cell[ StyleData["TopBox", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", Background -> GrayLevel[1]], Cell[ StyleData["TopBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["MiddleBox"], CellFrame -> {{0.5, 0.5}, {0, 0}}, CellMargins -> {{27, 12}, {0, -7}}, CellHorizontalScrolling -> True, PageBreakAbove -> False, PageBreakBelow -> False, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, StyleMenuListing -> None, FontWeight -> "Plain", Background -> RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> { Scaled[0.31], { Scaled[0.62]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["MiddleBox", "Presentation"], FontSize -> 18], Cell[ StyleData["MiddleBox", "Printout"], CellMargins -> {{2, 0}, {0, 2}}, CellFrameColor -> GrayLevel[0], Background -> GrayLevel[1]], Cell[ StyleData["MiddleBox", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 4}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", Background -> GrayLevel[1]], Cell[ StyleData["MiddleBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 4}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["BottomBox"], CellFrame -> {{0.5, 0.5}, {0.5, 0}}, CellMargins -> {{27, 12}, {0, -7}}, CellHorizontalScrolling -> True, PageBreakAbove -> False, PageBreakBelow -> False, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, StyleMenuListing -> None, FontWeight -> "Plain", Background -> RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> { Scaled[0.31], { Scaled[0.62]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["BottomBox", "Presentation"], FontSize -> 18], Cell[ StyleData["BottomBox", "Printout"], CellMargins -> {{2, 0}, {0, -5}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1], GridBoxOptions -> { GridBoxItemSize -> { "Columns" -> {{All}}, "ColumnsIndexed" -> {}, "Rows" -> {{2.2}}, "RowsIndexed" -> {}}}], Cell[ StyleData["BottomBox", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, -5}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1], GridBoxOptions -> { GridBoxItemSize -> { "Columns" -> {{All}}, "ColumnsIndexed" -> {}, "Rows" -> {{2.2}}, "RowsIndexed" -> {}}}], Cell[ StyleData["BottomBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, -5}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1], GridBoxOptions -> { GridBoxItemSize -> { "Columns" -> {{All}}, "ColumnsIndexed" -> {}, "Rows" -> {{2.2}}, "RowsIndexed" -> {}}}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TopSpanBox"], CellFrame -> {{0.5, 0.5}, {0, 0.5}}, CellMargins -> {{27, 12}, {-2, 8}}, CellHorizontalScrolling -> True, PageBreakBelow -> False, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, StyleMenuListing -> None, FontWeight -> "Plain", Background -> RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> { Scaled[0.9], { Scaled[0.03]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["TopSpanBox", "Presentation"], FontSize -> 18], Cell[ StyleData["TopSpanBox", "Printout"], CellMargins -> {{2, 0}, {-2, 8}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]], Cell[ StyleData["TopSpanBox", "EnhancedPrintout"], CellMargins -> {{2, 0}, {-4, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1]], Cell[ StyleData["TopSpanBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {-4, 8}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["MiddleSpanBox"], CellFrame -> {{0.5, 0.5}, {0, 0}}, CellMargins -> {{27, 12}, {0, 0}}, CellHorizontalScrolling -> True, PageBreakAbove -> False, PageBreakBelow -> False, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, StyleMenuListing -> None, FontWeight -> "Plain", Background -> RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> { Scaled[0.9], { Scaled[0.03]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["MiddleSpanBox", "Presentation"], FontSize -> 18], Cell[ StyleData["MiddleSpanBox", "Printout"], CellMargins -> {{2, 0}, {-5, 0}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1], GridBoxOptions -> { GridBoxItemSize -> { "Columns" -> {{All}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.8}}, "RowsIndexed" -> {}}}], Cell[ StyleData["MiddleSpanBox", "EnhancedPrintout"], CellMargins -> {{2, 0}, {-7, 0}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1], GridBoxOptions -> { GridBoxItemSize -> { "Columns" -> {{All}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.8}}, "RowsIndexed" -> {}}}], Cell[ StyleData["MiddleSpanBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {-7, 0}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", FontSize -> 10, Background -> GrayLevel[1], GridBoxOptions -> { GridBoxItemSize -> { "Columns" -> {{All}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.8}}, "RowsIndexed" -> {}}}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Picture"], CellMargins -> {{27, Inherited}, {4, 4}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["Picture", "Presentation"], FontSize -> 18], Cell[ StyleData["Picture", "Printout"], CellMargins -> {{2, Inherited}, {4, 4}}, Magnification -> 0.65], Cell[ StyleData["Picture", "EnhancedPrintout"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.65], Cell[ StyleData["Picture", "EnhancedPrintoutNonGray"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.65]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["OpenCloseItemizedPicture"], CellMargins -> {{88, 4}, {4, 4}}, PrivateCellOptions -> {"DefaultCellGroupOpen" -> False}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["OpenCloseItemizedPicture", "Presentation"], FontSize -> 18], Cell[ StyleData["OpenCloseItemizedPicture", "Printout"], CellMargins -> {{76, 2}, {0, 0}}, CellElementSpacings -> { "CellMinHeight" -> 1, "ClosedCellHeight" -> 0}, CellOpen -> False], Cell[ StyleData["OpenCloseItemizedPicture", "EnhancedPrintout"], CellMargins -> {{76, 2}, {0, 0}}, CellElementSpacings -> { "CellMinHeight" -> 1, "ClosedCellHeight" -> 0}, CellOpen -> False], Cell[ StyleData["OpenCloseItemizedPicture", "EnhancedPrintoutNonGray"], CellMargins -> {{76, 2}, {0, 0}}, CellElementSpacings -> { "CellMinHeight" -> 1, "ClosedCellHeight" -> 0}, CellOpen -> False]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemizedPicture"], CellMargins -> {{88, 4}, {4, 4}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["ItemizedPicture", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemizedPicture", "Printout"], CellMargins -> {{77, 2}, {4, -4}}, Magnification -> 0.5], Cell[ StyleData["ItemizedPicture", "EnhancedPrintout"], CellMargins -> {{78, 2}, {12, -6}}, Magnification -> 0.5], Cell[ StyleData["ItemizedPicture", "EnhancedPrintoutNonGray"], CellMargins -> {{75, 2}, {4, -6}}, Magnification -> 0.5]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ListGraphic"], CellMargins -> {{88, 4}, {4, 4}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["ListGraphic", "Presentation"], FontSize -> 18], Cell[ StyleData["ListGraphic", "Printout"], CellMargins -> {{77, 2}, {4, -4}}, Magnification -> 0.5], Cell[ StyleData["ListGraphic", "EnhancedPrintout"], CellMargins -> {{78, 2}, {12, -6}}, Magnification -> 0.5], Cell[ StyleData["ListGraphic", "EnhancedPrintoutNonGray"], CellMargins -> {{75, 2}, {4, -6}}, Magnification -> 0.5]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ListNoteBox"], CellFrame -> 0.5, CellMargins -> {{88, 12}, {8, 8}}, CellHorizontalScrolling -> True, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], LineIndent -> 0, StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions -> {FrameMargins -> {{1, 1}, {1.5, 1.5}}}, GridBoxOptions -> {GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["ListNoteBox", "Presentation"], FontSize -> 18], Cell[ StyleData["ListNoteBox", "Printout"], CellMargins -> {{77, 4}, {6, 2}}, FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["ListNoteBox", "EnhancedPrintout"], CellMargins -> {{39, 4}, {6, 2}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["ListNoteBox", "EnhancedPrintoutNonGray"], CellMargins -> {{77, 4}, {6, 2}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PictureGroup"], CellMargins -> {{41, 4}, {0, 4}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["PictureGroup", "Presentation"], FontSize -> 18], Cell[ StyleData["PictureGroup", "Printout"], CellMargins -> {{76, 2}, {0, 0}}, CellElementSpacings -> { "CellMinHeight" -> 1, "ClosedCellHeight" -> 0}, CellOpen -> False], Cell[ StyleData["PictureGroup", "EnhancedPrintout"], CellMargins -> {{76, 2}, {0, 0}}, CellElementSpacings -> { "CellMinHeight" -> 1, "ClosedCellHeight" -> 0}, CellOpen -> False], Cell[ StyleData["PictureGroup", "EnhancedPrintoutNonGray"], CellMargins -> {{76, 2}, {0, 0}}, CellElementSpacings -> { "CellMinHeight" -> 1, "ClosedCellHeight" -> 0}, CellOpen -> False]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Sound"], ShowCellBracket -> True, CellMargins -> {{27, Inherited}, {0, 8}}, StyleMenuListing -> None], Cell[ StyleData["Sound", "Presentation"], FontSize -> 18], Cell[ StyleData["Sound", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 10], Cell[ StyleData["Sound", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 10], Cell[ StyleData["Sound", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Caption"], CellMargins -> {{27, 4}, {0, 3}}, PageBreakAbove -> False, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 9], Cell[ StyleData["Caption", "Presentation"], FontSize -> 14], Cell[ StyleData["Caption", "Printout"], CellMargins -> {{2, 4}, {2, 0}}, FontSize -> 7], Cell[ StyleData["Caption", "EnhancedPrintout"], CellMargins -> {{2, 4}, {2, 2}}, FontFamily -> "Frutiger-Roman", FontSize -> 7], Cell[ StyleData["Caption", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 4}, {2, -2}}, FontFamily -> "Frutiger-Roman", FontSize -> 7]}, Closed]]}, Closed]], Cell[ CellGroupData[{ Cell["Tables", "Section"], Cell[ CellGroupData[{ Cell[ StyleData["2ColumnTable"], CellMargins -> {{35, 4}, {0, 8}}, CellHorizontalScrolling -> True, LineIndent -> 0, StyleMenuListing -> None, GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> { Scaled[0.34], { Scaled[0.64]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}}], Cell[ StyleData["2ColumnTable", "Presentation"], FontSize -> 18], Cell[ StyleData["2ColumnTable", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 9], Cell[ StyleData["2ColumnTable", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 9], Cell[ StyleData["2ColumnTable", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["2ColumnEvenTable"], CellMargins -> {{35, 4}, {0, 8}}, CellHorizontalScrolling -> True, LineIndent -> 0, StyleMenuListing -> None, GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> {{ Scaled[0.49]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}}], Cell[ StyleData["2ColumnEvenTable", "Presentation"], FontSize -> 18], Cell[ StyleData["2ColumnEvenTable", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 9], Cell[ StyleData["2ColumnEvenTable", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 9], Cell[ StyleData["2ColumnEvenTable", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["3ColumnTable"], CellMargins -> {{35, 4}, {0, 8}}, CellHorizontalScrolling -> True, LineIndent -> 0, StyleMenuListing -> None, GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> { Scaled[0.28], Scaled[0.28], { Scaled[0.43]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}}], Cell[ StyleData["3ColumnTable", "Presentation"], FontSize -> 18], Cell[ StyleData["3ColumnTable", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 9], Cell[ StyleData["3ColumnTable", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 9], Cell[ StyleData["3ColumnTable", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 9]}, Closed]]}, Closed]], Cell[ CellGroupData[{ Cell["Formulas and Programming", "Section"], Cell[ CellGroupData[{ Cell[ StyleData["InlineFormula"], CellMargins -> {{27, 4}, {0, 8}}, CellHorizontalScrolling -> True, "TwoByteSyntaxCharacterAutoReplacement" -> True, HyphenationOptions -> { "HyphenationCharacter" -> "\[Continuation]"}, LanguageCategory -> "Formula", AutoSpacing -> True, ScriptLevel -> 1, SingleLetterItalics -> True, SpanMaxSize -> Infinity, StyleMenuListing -> None, GridBoxOptions -> { GridBoxItemSize -> { "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}}], Cell[ StyleData["InlineFormula", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 10], Cell[ StyleData["InlineFormula", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 10], Cell[ StyleData["InlineFormula", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["InlineOutput"], CellMargins -> {{27, 4}, {0, 8}}, CellHorizontalScrolling -> True, "TwoByteSyntaxCharacterAutoReplacement" -> True, HyphenationOptions -> { "HyphenationCharacter" -> "\[Continuation]"}, LanguageCategory -> None, StyleMenuListing -> None, FontFamily -> "Courier"], Cell[ StyleData["InlineOutput", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 9.5], Cell[ StyleData["InlineOutput", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 9.5], Cell[ StyleData["InlineOutput", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}, FontSize -> 9.5]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["DisplayFormula"], CellMargins -> {{66, Inherited}, {Inherited, 10}}, CellHorizontalScrolling -> True, "TwoByteSyntaxCharacterAutoReplacement" -> True, HyphenationOptions -> { "HyphenationCharacter" -> "\[Continuation]"}, LanguageCategory -> "Formula", ScriptLevel -> 0, SingleLetterItalics -> True, SpanMaxSize -> Infinity, StyleMenuListing -> None, UnderoverscriptBoxOptions -> {LimitsPositioning -> True}, GridBoxOptions -> { GridBoxItemSize -> { "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}}], Cell[ StyleData["DisplayFormula", "Presentation"], FontSize -> 18], Cell[ StyleData["DisplayFormula", "Printout"]], Cell[ StyleData["DisplayFormula", "EnhancedPrintout"], FontFamily -> "Palatino"], Cell[ StyleData["DisplayFormula", "EnhancedPrintoutNonGray"], FontFamily -> "Palatino"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["DisplayMath"], CellMargins -> {{66, 10}, {7, 7}}, Evaluatable -> False, CellGroupingRules -> "InputGrouping", CellHorizontalScrolling -> True, PageBreakWithin -> False, GroupPageBreakWithin -> False, DefaultFormatType -> DefaultInputFormatType, "TwoByteSyntaxCharacterAutoReplacement" -> True, HyphenationOptions -> { "HyphenationCharacter" -> "\[Continuation]"}, AutoItalicWords -> {}, LanguageCategory -> "Formula", FormatType -> InputForm, ShowStringCharacters -> True, NumberMarks -> True, CounterIncrements -> "Input"], Cell[ StyleData["DisplayMath", "Presentation"], FontSize -> 18], Cell[ StyleData["DisplayMath", "Printout"], CellMargins -> {{39, 0}, {6, 6}}, FontSize -> 9], Cell[ StyleData["DisplayMath", "EnhancedPrintout"], CellMargins -> {{39, 0}, {4, 6}}, FontFamily -> "WRICourier", FontSize -> 9], Cell[ StyleData["DisplayMath", "EnhancedPrintoutNonGray"], CellMargins -> {{39, 0}, {4, 6}}, FontFamily -> "WRICourier", FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["NumberedEquation"], CellMargins -> {{66, 27}, {7, 7}}, CellFrameLabels -> {{None, Cell[ TextData[{"(", CounterBox["NumberedEquation"], ")"}]]}, {None, None}}, DefaultFormatType -> DefaultInputFormatType, "TwoByteSyntaxCharacterAutoReplacement" -> True, LanguageCategory -> "Formula", CounterIncrements -> "NumberedEquation", FormatTypeAutoConvert -> False], Cell[ StyleData["NumberedEquation", "Presentation"], FontSize -> 18], Cell[ StyleData["NumberedEquation", "Printout"], CellMargins -> {{39, 55}, {0, 10}}, FontSize -> 10], Cell[ StyleData["NumberedEquation", "EnhancedPrintout"], CellMargins -> {{39, 55}, {0, 10}}, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["NumberedEquation", "EnhancedPrintoutNonGray"], CellMargins -> {{39, 55}, {0, 10}}, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["EquationNumber"], CellMargins -> {{66, Inherited}, {Inherited, Inherited}}, LineSpacing -> {1.83, 0}, LanguageCategory -> "Formula"], Cell[ StyleData["EquationNumber", "Presentation"], FontSize -> 18], Cell[ StyleData["EquationNumber", "Printout"], LineSpacing -> {1.7, 0}], Cell[ StyleData["EquationNumber", "EnhancedPrintout"], LineSpacing -> {1.7, 0}, FontFamily -> "Palatino"], Cell[ StyleData["EquationNumber", "EnhancedPrintoutNonGray"], LineSpacing -> {1.7, 0}, FontFamily -> "Palatino"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Program"], CellMargins -> {{66, Inherited}, {Inherited, 10}}, CellHorizontalScrolling -> True, ShowSpecialCharacters -> Automatic, AutoItalicWords -> {}, LanguageCategory -> "Formula", FontFamily -> "Courier"], Cell[ StyleData["Program", "Presentation"], FontSize -> 18], Cell[ StyleData["Program", "Printout"], CellMargins -> {{42, 30}, {Inherited, 4}}, FontSize -> 9.5], Cell[ StyleData["Program", "EnhancedPrintout"], CellMargins -> {{42, 30}, {Inherited, 4}}, FontFamily -> "WRICourier", FontSize -> 9.5], Cell[ StyleData["Program", "EnhancedPrintoutNonGray"], CellMargins -> {{42, 30}, {Inherited, 4}}, FontFamily -> "WRICourier", FontSize -> 9.5]}, Closed]]}, Closed]], Cell[ CellGroupData[{ Cell["Unique Help Browser Styles", "Section"], Cell[ CellGroupData[{ Cell["Standard Styles\n", "Subsection"], Cell[ CellGroupData[{ Cell[ StyleData["InspectorLevel1"], ShowGroupOpener -> True, CellMargins -> {{27, 10}, {2, 7}}, CellGroupingRules -> {"SectionGrouping", 60}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, ParagraphIndent -> -38, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 16, FontWeight -> "Bold"], Cell[ StyleData["InspectorLevel1", "Presentation"], FontSize -> 24], Cell[ StyleData["InspectorLevel1", "SlideShow"], HyphenationOptions -> {"HyphenationCharacter" -> "-"}], Cell[ StyleData["InspectorLevel1", "Printout"], HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 14]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["InspectorLevel2"], ShowGroupOpener -> True, CellMargins -> {{27, 4}, {0, 14}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 14, FontWeight -> "Bold"], Cell[ StyleData["InspectorLevel2", "Presentation"], FontSize -> 21], Cell[ StyleData["InspectorLevel2", "SlideShow"], ShowGroupOpener -> True, CellMargins -> {{48, 10}, {2, 12}}, CellGroupingRules -> {"SectionGrouping", 70}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, ParagraphIndent -> -27, FontFamily -> "Helvetica", FontSize -> 14, FontWeight -> "Bold"], Cell[ StyleData["InspectorLevel2", "Printout"], HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 12]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ObjectName"], CellFrame -> {{0, 0}, {0.5, 0}}, CellMargins -> {{0, 0}, {0, 0}}, CellGroupingRules -> {"SectionGrouping", 50}, CellFrameMargins -> {{27, 12}, {3, 15}}, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontFamily -> "Courier", FontSize -> 18, FontWeight -> "Bold", Background -> RGBColor[0.960784, 0.878431, 0.666667]], Cell[ StyleData["ObjectName", "Presentation"], FontSize -> 24], Cell[ StyleData["ObjectName", "SlideShow"], CellMargins -> {{72, 4}, {1, 14}}, CellGroupingRules -> {"SectionGrouping", 90}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontFamily -> "Courier", FontSize -> 12, FontWeight -> "Bold"], Cell[ StyleData["ObjectName", "Printout"], CellMargins -> {{0, 0}, {0, 10}}, CellFrameMargins -> {{24, 8}, {Inherited, Inherited}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 12]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SubObjectNameClosed"], ShowGroupOpener -> True, CellMargins -> {{27, 4}, {1, 10}}, PrivateCellOptions -> {"DefaultCellGroupOpen" -> False}, CellGroupingRules -> {"SectionGrouping", 90}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontFamily -> "Courier", FontSize -> 14, FontWeight -> "Bold"], Cell[ StyleData["SubObjectNameClosed", "Presentation"], FontSize -> 21], Cell[ StyleData["SubObjectNameClosed", "SlideShow"], CellMargins -> {{72, 4}, {1, 14}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontFamily -> "Courier", FontSize -> 12, FontWeight -> "Bold"], Cell[ StyleData["SubObjectNameClosed", "Printout"], CellMargins -> {{2, 0}, {1, 10}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 12]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SubObjectName"], ShowGroupOpener -> True, CellMargins -> {{27, 4}, {1, 10}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontFamily -> "Courier", FontSize -> 18, FontWeight -> "Bold"], Cell[ StyleData["SubObjectName", "Presentation"], FontSize -> 24], Cell[ StyleData["SubObjectName", "SlideShow"], ShowGroupOpener -> True, CellMargins -> {{90, 4}, {1, 14}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontFamily -> "Courier", FontSize -> 12], Cell[ StyleData["SubObjectName", "Printout"], CellMargins -> {{2, 0}, {1, 10}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontFamily -> "Courier", FontSize -> 12]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["GroupObjectName"], ShowGroupOpener -> True, CellMargins -> {{27, 4}, {0, 14}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontFamily -> "Courier", FontSize -> 18, FontWeight -> "Bold"], Cell[ StyleData["GroupObjectName", "Presentation"], FontSize -> 24], Cell[ StyleData["GroupObjectName", "SlideShow"], ShowGroupOpener -> True, CellMargins -> {{72, 10}, {2, 12}}, CellGroupingRules -> {"SectionGrouping", 70}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, ParagraphIndent -> -27, CounterIncrements -> "Outline2", FontFamily -> "Courier", FontSize -> 12, FontWeight -> "Bold"], Cell[ StyleData["GroupObjectName", "Printout"], HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 14]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["GroupObjectNameClosed"], ShowGroupOpener -> True, CellMargins -> {{27, 4}, {0, 14}}, PrivateCellOptions -> {"DefaultCellGroupOpen" -> False}, CellGroupingRules -> {"SectionGrouping", 80}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontFamily -> "Courier", FontSize -> 18, FontWeight -> "Bold"], Cell[ StyleData["GroupObjectNameClosed", "Presentation"], FontSize -> 24], Cell[ StyleData["GroupObjectNameClosed", "SlideShow"], ShowGroupOpener -> True, CellMargins -> {{72, 10}, {2, 12}}, CellGroupingRules -> {"SectionGrouping", 70}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, ParagraphIndent -> -27, CounterIncrements -> "Outline2", FontFamily -> "Courier", FontSize -> 12, FontWeight -> "Bold"], Cell[ StyleData["GroupObjectNameClosed", "Printout"], HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 14]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ObjectNameWarningMessages"], CellMargins -> {{27, 4}, {1, 10}}, CellGroupingRules -> {"SectionGrouping", 65}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontFamily -> "Courier", FontSize -> 18, FontWeight -> "Bold"], Cell[ StyleData["ObjectNameWarningMessages", "Presentation"], FontSize -> 24], Cell[ StyleData["ObjectNameWarningMessages", "SlideShow"], CellMargins -> {{10, 4}, {1, 10}}, CellGroupingRules -> {"SectionGrouping", 65}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontFamily -> "Courier", FontSize -> 16, FontWeight -> "Bold"], Cell[ StyleData["ObjectNameWarningMessages", "Printout"], CellMargins -> {{2, 0}, {1, 10}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 12]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Command"], CellFrame -> {{0, 0}, {0.5, 0}}, CellMargins -> {{0, 0}, {0, 0}}, CellFrameMargins -> {{27, 12}, {3, 15}}, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], HyphenationOptions -> {"HyphenationCharacter" -> "-"}, CounterIncrements -> "Section", StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 18, FontWeight -> "Bold", Background -> RGBColor[0.960784, 0.878431, 0.666667]], Cell[ StyleData["Command", "Presentation"], FontSize -> 24], Cell[ StyleData["Command", "Printout"], CellMargins -> {{0, 0}, {0, 14}}, PageBreakBelow -> False, CellFrameMargins -> {{24, 8}, {Inherited, Inherited}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 14]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["CharacterName"], CellFrame -> {{0, 0}, {0.5, 0}}, CellMargins -> {{0, 0}, {0, 0}}, CellFrameMargins -> {{27, 27}, {8, 8}}, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216]], Cell[ StyleData["CharacterName", "Presentation"], FontSize -> 18], Cell[ StyleData["CharacterName", "SlideShow"], CellMargins -> {{72, 4}, {1, 14}}, CellGroupingRules -> {"SectionGrouping", 90}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontFamily -> "Courier", FontSize -> 12, FontWeight -> "Bold"], Cell[ StyleData["CharacterName", "Printout"], CellMargins -> {{2, 0}, {0, 4}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Usage"], CellFrame -> {{0, 0}, {0.5, 0}}, CellMargins -> {{0, 0}, {0, 0}}, CellFrameMargins -> {{27, 27}, {8, 8}}, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], Hyphenation -> False, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, ParagraphSpacing -> {0, 6}, ParagraphIndent -> -10, StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216]], Cell[ StyleData["Usage", "Presentation"], FontSize -> 18], Cell[ StyleData["Usage", "SlideShow"], CellFrame -> {{0, 0}, {0.5, 0.5}}, CellMargins -> {{72, 4}, {0, 4}}, CellFrameMargins -> 5, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, ParagraphSpacing -> {0, 6}, ParagraphIndent -> -10, StyleMenuListing -> None], Cell[ StyleData["Usage", "Printout"], CellMargins -> {{0, 0}, {0, 0}}, CellFrameMargins -> {{24, 8}, {Inherited, Inherited}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontSize -> 10, FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ErrorMessage"], CellFrame -> {{0, 0}, {0.5, 0.5}}, ShowCellBracket -> True, CellMargins -> {{27, 4}, {0, 4}}, CellGroupingRules -> "OutputGrouping", PageBreakWithin -> False, GroupPageBreakWithin -> False, GeneratedCell -> True, CellAutoOverwrite -> True, ShowCellLabel -> False, CellLabelMargins -> {{14, Inherited}, {Inherited, Inherited}}, CellFrameMargins -> 5, DefaultFormatType -> DefaultOutputFormatType, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FormatType -> InputForm, StyleMenuListing -> None, FontColor -> RGBColor[0, 0, 1]], Cell[ StyleData["ErrorMessage", "Presentation"], FontSize -> 18], Cell[ StyleData["ErrorMessage", "SlideShow"], CellMargins -> {{72, 4}, {0, 8}}, CellHorizontalScrolling -> True, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None], Cell[ StyleData["ErrorMessage", "Printout"], HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 9, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Notes"], CellMargins -> {{27, 27}, {0, 8}}, CellHorizontalScrolling -> True, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, ParagraphSpacing -> {0, 6}, ParagraphIndent -> -10, StyleMenuListing -> None, FontFamily -> "Times"], Cell[ StyleData["Notes", "Presentation"], FontSize -> 18], Cell[ StyleData["Notes", "SlideShow"], CellMargins -> {{72, 4}, {0, 8}}, CellHorizontalScrolling -> True, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, ParagraphSpacing -> {0, 6}, ParagraphIndent -> -10, StyleMenuListing -> None, FontFamily -> "Times"], Cell[ StyleData["Notes", "Printout"], CellMargins -> {{24, 0}, {0, 8}}, Hyphenation -> True, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["NotesList"], CellMargins -> {{20, 4}, {2, 8}}, CellHorizontalScrolling -> True, ScriptLevel -> 1, SingleLetterItalics -> True, StyleMenuListing -> None, FontFamily -> "Times"], Cell[ StyleData["NotesList", "Presentation"], FontSize -> 18], Cell[ StyleData["NotesList", "SlideShow"], CellMargins -> {{82, 4}, {2, 8}}, CellHorizontalScrolling -> True, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, ScriptLevel -> 1, SingleLetterItalics -> True, StyleMenuListing -> None, FontFamily -> "Times"], Cell[ StyleData["NotesList", "Printout"], CellMargins -> {{12, 0}, {2, 8}}, Hyphenation -> True, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ReferenceSection"], CellFrame -> {{0, 0}, {0, 0.5}}, ShowGroupOpener -> True, CellMargins -> {{27, 4}, {0, 10}}, CellGroupingRules -> {"SectionGrouping", 30}, CellFrameMargins -> 12, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontWeight -> "Bold"], Cell[ StyleData["ReferenceSection", "Presentation"], FontSize -> 20], Cell[ StyleData["ReferenceSection", "Printout"], CellMargins -> {{3, 0}, {0, 10}}, PageBreakBelow -> False, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 9, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Reference"], CellMargins -> {{27, 27}, {0, 8}}, InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, ParagraphSpacing -> {0, 8}, CounterIncrements -> "Reference", FontSize -> 12], Cell[ StyleData["Reference", "Presentation"], FontSize -> 18], Cell[ StyleData["Reference", "SlideShow"], CellMargins -> {{27, 27}, {4, 4}}, Hyphenation -> False, FontSize -> 14], Cell[ StyleData["Reference", "Printout"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, Hyphenation -> True, FontSize -> 10], Cell[ StyleData["Reference", "EnhancedPrintout"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["Reference", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ExampleSection"], CellFrame -> {{0, 0}, {0, 0.5}}, ShowGroupOpener -> True, CellMargins -> {{27, 4}, {0, 10}}, CellGroupingRules -> {"SectionGrouping", 70}, CellFrameMargins -> 12, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontWeight -> "Bold"], Cell[ StyleData["ExampleSection", "Presentation"], FontSize -> 20], Cell[ StyleData["ExampleSection", "Printout"], CellMargins -> {{3, 0}, {0, 10}}, PageBreakBelow -> False, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 9, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ExampleText"], CellMargins -> {{27, 40}, {0, 18}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, ParagraphSpacing -> {0, 6}, StyleMenuListing -> None, FontColor -> RGBColor[0, 0, 0.4]], Cell[ StyleData["ExampleText", "Presentation"], FontSize -> 18], Cell[ StyleData["ExampleText", "Printout"], CellMargins -> {{2, 80}, {0, 8}}, PageBreakBelow -> False, Hyphenation -> True, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 8, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ExampleSubsection"], ShowCellBracket -> True, CellMargins -> {{27, 4}, {0, 16}}, CellGroupingRules -> {"SectionGrouping", 80}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 10, FontWeight -> "Bold"], Cell[ StyleData["ExampleSubsection", "Presentation"], FontSize -> 15], Cell[ StyleData["ExampleSubsection", "Printout"], CellMargins -> {{12, 0}, {0, 16}}, PageBreakBelow -> False, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 7]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["MessagesSection"], CellFrame -> {{0, 0}, {0, 0.5}}, ShowGroupOpener -> True, CellMargins -> {{27, 4}, {0, 10}}, CellGroupingRules -> {"SectionGrouping", 70}, CellFrameMargins -> 12, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontWeight -> "Bold"], Cell[ StyleData["MessagesSection", "Presentation"], FontSize -> 20], Cell[ StyleData["MessagesSection", "Printout"], CellMargins -> {{3, 0}, {0, 10}}, PageBreakBelow -> False, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 9, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TemplateSection"], CellFrame -> {{0, 0}, {0, 0.5}}, CellMargins -> {{27, 4}, {0, 10}}, PrivateCellOptions -> {"DefaultCellGroupOpen" -> True}, CellGroupingRules -> {"SectionGrouping", 70}, CellFrameMargins -> 12, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontWeight -> "Bold"], Cell[ StyleData["TemplateSection", "Presentation"], FontSize -> 20], Cell[ StyleData["TemplateSection", "Printout"], CellMargins -> {{3, 0}, {0, 10}}, PageBreakBelow -> False, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 9, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["LineHead"], CellFrame -> {{0, 0}, {0.5, 0}}, CellMargins -> {{27, 4}, {8, 18}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, CounterIncrements -> "Subsection", CounterAssignments -> {{"Subsubsection", 0}}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 12, FontWeight -> "Bold"], Cell[ StyleData["LineHead", "Presentation"], FontSize -> 18], Cell[ StyleData["LineHead", "Printout"], CellMargins -> {{2, 0}, {8, 18}}, PageBreakBelow -> False, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["FlushInput"], CellMargins -> {{27, 4}, {1, 4}}, Evaluatable -> True, CellGroupingRules -> "InputGrouping", CellHorizontalScrolling -> True, PageBreakWithin -> False, GroupPageBreakWithin -> False, CellLabelAutoDelete -> False, CellLabelMargins -> {{23, Inherited}, {Inherited, Inherited}}, DefaultFormatType -> DefaultInputFormatType, ShowSpecialCharacters -> Automatic, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FormatType -> StandardForm, ShowStringCharacters -> True, NumberMarks -> True, StyleMenuListing -> None, FontWeight -> "Bold"], Cell[ StyleData["FlushInput", "Presentation"], FontSize -> 18], Cell[ StyleData["FlushInput", "Printout"], CellMargins -> {{2, 0}, {1, 4}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["FlushOutput"], CellMargins -> {{27, Inherited}, {Inherited, Inherited}}, CellEditDuplicate -> True, CellGroupingRules -> "OutputGrouping", CellHorizontalScrolling -> True, PageBreakWithin -> False, GroupPageBreakWithin -> False, GeneratedCell -> True, CellAutoOverwrite -> True, CellLabelAutoDelete -> False, CellLabelMargins -> {{23, Inherited}, {Inherited, Inherited}}, DefaultFormatType -> DefaultOutputFormatType, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FormatType -> StandardForm, StyleMenuListing -> None], Cell[ StyleData["FlushOutput", "Presentation"], FontSize -> 18], Cell[ StyleData["FlushOutput", "Printout"], CellMargins -> {{2, Inherited}, {Inherited, Inherited}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["DialogItem"], CellDingbat -> "\[EmptyDiamond]", CellMargins -> {{27, 4}, {0, 12}}, CellGroupingRules -> {"SectionGrouping", 70}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 10, FontWeight -> "Bold"], Cell[ StyleData["DialogItem", "Presentation"], FontSize -> 15], Cell[ StyleData["DialogItem", "Printout"], CellMargins -> {{12, 0}, {0, 12}}, PageBreakBelow -> False, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 8]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["GroupDivider"], CellMargins -> {{27, Inherited}, {Inherited, Inherited}}, CellEditDuplicate -> True, CellGroupingRules -> {"TitleGrouping", 0}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None], Cell[ StyleData["GroupDivider", "Presentation"], FontSize -> 18]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Highlight"], CellFrame -> 0.5, CellMargins -> {{27, 4}, {0, 18}}, CellFrameColor -> GrayLevel[0.800015], HyphenationOptions -> {"HyphenationCharacter" -> "-"}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 12, Background -> GrayLevel[0.950011]], Cell[ StyleData["Highlight", "Presentation"], FontSize -> 18], Cell[ StyleData["Highlight", "Printout"], CellMargins -> {{2, 0}, {0, 18}}, Hyphenation -> True, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, LineSpacing -> {1, 3}, FontSize -> 8]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["UserNotes"], CellFrame -> {{3, 0}, {0, 0}}, CellMargins -> {{27, 4}, {0, 8}}, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], ParagraphIndent -> -7, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 10], Cell[ StyleData["UserNotes", "Presentation"], FontSize -> 15], Cell[ StyleData["UserNotes", "Printout"], CellMargins -> {{2, 0}, {0, 4}}, Hyphenation -> True, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, LineSpacing -> {1, 3}, FontSize -> 8], Cell[ StyleData["UserNotes", "EnhancedPrintout"], CellMargins -> {{0, 0}, {0, 4}}, Hyphenation -> True, LineSpacing -> {1, 3}, FontFamily -> "Frutiger-Roman", FontSize -> 8], Cell[ StyleData["UserNotes", "EnhancedPrintoutNonGray"], CellMargins -> {{0, 0}, {0, 4}}, Hyphenation -> True, LineSpacing -> {1, 3}, FontFamily -> "Frutiger-Roman", FontSize -> 8]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["MoreInfo"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], ParagraphIndent -> -7, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 10, Background -> RGBColor[0.964706, 0.929412, 0.839216]], Cell[ StyleData["MoreInfo", "Presentation"], FontSize -> 15], Cell[ StyleData["MoreInfo", "Printout"], CellMargins -> {{2, 0}, {0, 4}}, Hyphenation -> True, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, LineSpacing -> {1, 3}, FontSize -> 8]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["UserTips"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {0, 8}}, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], ParagraphIndent -> -7, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 10, Background -> RGBColor[0.964706, 0.929412, 0.839216]], Cell[ StyleData["UserTips", "Presentation"], FontSize -> 15], Cell[ StyleData["UserTips", "Printout"], CellMargins -> {{2, 0}, {0, 4}}, CellFrameColor -> GrayLevel[0.800015], Hyphenation -> True, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, LineSpacing -> {1, 3}, FontSize -> 8, Background -> GrayLevel[0.900008]], Cell[ StyleData["UserTips", "EnhancedPrintout"], CellMargins -> {{0, 0}, {0, 4}}, CellFrameColor -> GrayLevel[0], Hyphenation -> True, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, LineSpacing -> {1, 3}, FontFamily -> "Frutiger-Roman", FontSize -> 8, Background -> GrayLevel[0.700008]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Theorem"], CellFrame -> {{4, 0}, {0, 0}}, CellMargins -> {{27, 62}, {0, 14}}, CellFrameMargins -> 4, CellFrameColor -> RGBColor[0, 0, 0.8], HyphenationOptions -> {"HyphenationCharacter" -> "-"}, LineSpacing -> {1, 1}, ParagraphSpacing -> {0, 8}], Cell[ StyleData["Theorem", "Presentation"], FontSize -> 18], Cell[ StyleData["Theorem", "Printout"], CellMargins -> {{2, 0}, {0, 14}}, CellFrameMargins -> 3, CellFrameColor -> GrayLevel[0.8], HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 9, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Commentary"], CellFrame -> {{2, 0}, {0, 0}}, CellMargins -> {{36, 10}, {7, 7}}, PageBreakBelow -> False, CellFrameMargins -> 8, CellFrameColor -> RGBColor[0, 0.2, 1], LineSpacing -> {1, 3}, FontSlant -> "Italic"], Cell[ StyleData["Commentary", "Presentation"], FontSize -> 18], Cell[ StyleData["Commentary", "Printout"], CellMargins -> {{36, 0}, {6, 6}}, CellFrameColor -> GrayLevel[0.8], FontSize -> 10], Cell[ StyleData["Commentary", "EnhancedPrintout"], CellMargins -> {{36, 0}, {6, 6}}, CellFrameColor -> GrayLevel[0.8], FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["Commentary", "EnhancedPrintoutNonGray"], CellMargins -> {{36, 0}, {6, 6}}, CellFrameColor -> GrayLevel[0.8], FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Level1Icon"], ShowGroupOpener -> True, CellMargins -> {{48, 4}, {0, 8}}, CellHorizontalScrolling -> True, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, ParagraphSpacing -> {0, 8}, StyleMenuListing -> None], Cell[ StyleData["Level1Icon", "Presentation"], FontSize -> 18], Cell[ StyleData["Level1Icon", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Level2Icon"], ShowGroupOpener -> True, CellMargins -> {{48, 4}, {0, 8}}, CellHorizontalScrolling -> True, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, ParagraphSpacing -> {0, 8}, StyleMenuListing -> None], Cell[ StyleData["Level2Icon", "Presentation"], FontSize -> 18], Cell[ StyleData["Level2Icon", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, HyphenationOptions -> {"HyphenationCharacter" -> "-"}, FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["CopyrightHead"], CellMargins -> {{27, 4}, {0, 8}}, PageBreakAbove -> False, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 12, FontWeight -> "Bold"], Cell[ StyleData["CopyrightHead", "Presentation"], FontSize -> 18], Cell[ StyleData["CopyrightHead", "Printout"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Copyright"], CellMargins -> {{27, 4}, {0, 8}}, PageBreakAbove -> False, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 10], Cell[ StyleData["Copyright", "Presentation"], FontSize -> 15], Cell[ StyleData["Copyright", "Printout"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, FontSize -> 8], Cell[ StyleData["Copyright", "EnhancedPrintout"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, FontFamily -> "Frutiger-Roman", FontSize -> 7]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["RegisterSubsection"], CellDingbat -> None, CellMargins -> {{27, 27}, {0, 18}}, CellElementSpacings -> {"ClosedGroupTopMargin" -> 18}, CellGroupingRules -> {"SectionGrouping", 45}, CellFrameLabelMargins -> 6, InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, FontFamily -> "Helvetica", FontSize -> 16], Cell[ StyleData["RegisterSubsection", "Presentation"], FontSize -> 24], Cell[ StyleData["RegisterSubsection", "SlideShow"], CellDingbat -> None, CellMargins -> {{70, 0}, {4, 12}}, FontSize -> 12], Cell[ StyleData["RegisterSubsection", "Printout"], CellMargins -> {{9, 0}, {5, 24}}, FontSize -> 12], Cell[ StyleData["RegisterSubsection", "EnhancedPrintout"], CellMargins -> {{9, 0}, {5, 20}}, FontFamily -> "Frutiger-Roman", FontSize -> 12], Cell[ StyleData["RegisterSubsection", "EnhancedPrintoutNonGray"], CellMargins -> {{9, 0}, {5, 20}}, FontFamily -> "Frutiger-Roman", FontSize -> 12]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["RegisterSubsubsection"], CellMargins -> {{27, 27}, {0, 18}}, CellElementSpacings -> {"ClosedGroupTopMargin" -> 18}, CellGroupingRules -> {"SectionGrouping", 50}, InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, FontFamily -> "Helvetica", FontWeight -> "Bold", FontColor -> RGBColor[0.592157, 0.313726, 0.313726]], Cell[ StyleData["RegisterSubsubsection", "Presentation"], FontSize -> 18], Cell[ StyleData["RegisterSubsubsection", "Printout"], CellMargins -> {{2, 0}, {3, 8}}, FontSize -> 10], Cell[ StyleData["RegisterSubsubsection", "EnhancedPrintout"], CellMargins -> {{2, 0}, {3, 8}}, FontFamily -> "Frutiger-Bold", FontSize -> 10, FontWeight -> "Plain", FontColor -> GrayLevel[0]], Cell[ StyleData["RegisterSubsubsection", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {3, 8}}, FontFamily -> "Frutiger-Bold", FontSize -> 10, FontWeight -> "Plain", FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["RegisterText"], CellMargins -> {{27, 4}, {0, 8}}, PageBreakAbove -> False, StyleMenuListing -> None, FontSize -> 10], Cell[ StyleData["RegisterText", "Presentation"], FontSize -> 15], Cell[ StyleData["RegisterText", "Printout"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, FontSize -> 8], Cell[ StyleData["RegisterText", "EnhancedPrintout"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, FontFamily -> "Palatino", FontSize -> 7]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["CaptionHead"], CellMargins -> {{27, 4}, {0, 8}}, PageBreakAbove -> False, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 12, FontWeight -> "Bold"], Cell[ StyleData["CaptionHead", "Presentation"], FontSize -> 15], Cell[ StyleData["CaptionHead", "Printout"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, FontSize -> 8], Cell[ StyleData["CaptionHead", "EnhancedPrintout"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, FontFamily -> "Palatino", FontSize -> 7]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["CaptionText"], CellMargins -> {{66, 4}, {0, 8}}, PageBreakAbove -> False, StyleMenuListing -> None], Cell[ StyleData["CaptionText", "Presentation"], FontSize -> 15], Cell[ StyleData["CaptionText", "Printout"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, FontSize -> 8], Cell[ StyleData["CaptionText", "EnhancedPrintout"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, FontFamily -> "Palatino", FontSize -> 7]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["BulletText"], CellMargins -> {{76, 4}, {4, 4}}, CellFrameLabels -> {{ Cell["\[Bullet]", "BulletText", CellBaseline -> Baseline], Inherited}, {Inherited, Inherited}}, Hyphenation -> False, LineSpacing -> {1, 3}, CounterIncrements -> "BulletText", StyleMenuListing -> None], Cell[ StyleData["BulletText", "Presentation"], FontSize -> 18], Cell[ StyleData["BulletText", "Printout"], FontSize -> 10], Cell[ StyleData["BulletText", "EnhancedPrintout"], CellMargins -> {{16, 4}, {2, 4}}, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["BulletText", "EnhancedPrintoutNonGray"], FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["HelpLabels"], CellMargins -> {{88, 4}, {0, 8}}, StyleMenuListing -> None], Cell[ StyleData["HelpLabels", "Presentation"], FontSize -> 15], Cell[ StyleData["HelpLabels", "Printout"], CellMargins -> {{34, 2}, {6, 6}}, FontSize -> 10], Cell[ StyleData["HelpLabels", "EnhancedPrintout"], CellMargins -> {{34, 2}, {6, 6}}, FontFamily -> "Palatino", FontSize -> 10]}, Closed]]}, Closed]], Cell[ CellGroupData[{ Cell["Manual.nb Merge", "Subsection"], Cell[ CellGroupData[{ Cell["Function List", "Subsubsection"], Cell[ CellGroupData[{ Cell[ StyleData["FunctionName"], CellDingbat -> "\[FilledSquare]", CellMargins -> {{24, 10}, {10, 12}}, CellGroupingRules -> {"SectionGrouping", 40}, PageBreakBelow -> False, StyleMenuListing -> None, FontFamily -> "Courier", FontSize -> 14, FontWeight -> "Bold", CellTags -> "FunctionName"], Cell[ StyleData["FunctionName", "Presentation"], FontSize -> 21], Cell[ StyleData["FunctionName", "Printout"], CellMargins -> {{9, 0}, {10, 10}}, FontSize -> 12], Cell[ StyleData["FunctionName", "EnhancedPrintout"], CellMargins -> {{9, 0}, {10, 10}}, FontFamily -> "Courier", FontSize -> 12], Cell[ StyleData["FunctionName", "EnhancedPrintoutNonGray"], CellMargins -> {{9, 0}, {10, 10}}, FontFamily -> "Courier", FontSize -> 12]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["FunctionSubsection"], CellDingbat -> "\[FilledSquare]", CellMargins -> {{36, 10}, {0, 6}}, CellGroupingRules -> {"SectionGrouping", 60}, PageBreakBelow -> False, StyleMenuListing -> None, FontWeight -> "Bold", CellTags -> "FunctionSubsection"], Cell[ StyleData["FunctionSubsection", "Presentation"], FontSize -> 18], Cell[ StyleData["FunctionSubsection", "Printout"], CellMargins -> {{30, 0}, {0, 6}}], Cell[ StyleData["FunctionSubsection", "EnhancedPrintout"], CellMargins -> {{30, 0}, {0, 6}}, FontFamily -> "Palatino", FontSize -> 11], Cell[ StyleData["FunctionSubsection", "EnhancedPrintoutNonGray"], CellMargins -> {{30, 0}, {0, 6}}, FontFamily -> "Palatino", FontSize -> 11]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["FunctionDescription"], CellMargins -> {{36, 10}, {4, 0}}, LineSpacing -> {1, 3}, ParagraphSpacing -> {0.7, 0}, CounterIncrements -> "FunctionDescription", StyleMenuListing -> None, FontWeight -> "Plain"], Cell[ StyleData["FunctionDescription", "Presentation"], FontSize -> 18], Cell[ StyleData["FunctionDescription", "Printout"], CellMargins -> {{30, 0}, {4, 0}}, FontSize -> 11], Cell[ StyleData["FunctionDescription", "EnhancedPrintout"], CellMargins -> {{30, 0}, {4, 0}}, TextJustification -> 0, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData[ "FunctionDescription", "EnhancedPrintoutNonGray"], CellMargins -> {{30, 0}, {4, 0}}, TextJustification -> 0, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["FunctionDescriptionRuled"], CellFrame -> {{0, 0}, {0.25, 0.25}}, CellMargins -> {{36, 10}, {4, 0}}, LineSpacing -> {1, 3}, ParagraphSpacing -> {0.7, 0}, CounterIncrements -> "FunctionDescriptionRuled", StyleMenuListing -> None], Cell[ StyleData["FunctionDescriptionRuled", "Presentation"], FontSize -> 18], Cell[ StyleData["FunctionDescriptionRuled", "Printout"], CellMargins -> {{30, 0}, {4, 0}}, FontSize -> 11], Cell[ StyleData["FunctionDescriptionRuled", "EnhancedPrintout"], CellMargins -> {{30, 0}, {4, 0}}, TextJustification -> 0, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData[ "FunctionDescriptionRuled", "EnhancedPrintoutNonGray"], CellMargins -> {{30, 0}, {4, 0}}, TextJustification -> 0, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["FunctionDescriptionRuleTop"], CellFrame -> {{0, 0}, {0, 0.25}}, CellMargins -> {{36, 10}, {4, 0}}, LineSpacing -> {1, 3}, ParagraphSpacing -> {0.7, 0}, CounterIncrements -> "FunctionDescriptionRuleTop", StyleMenuListing -> None], Cell[ StyleData["FunctionDescriptionRuleTop", "Presentation"], FontSize -> 18], Cell[ StyleData["FunctionDescriptionRuleTop", "Printout"], CellMargins -> {{30, 0}, {4, 0}}, FontSize -> 11], Cell[ StyleData[ "FunctionDescriptionRuleTop", "EnhancedPrintout"], CellMargins -> {{30, 0}, {4, 0}}, TextJustification -> 0, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData[ "FunctionDescriptionRuleTop", "EnhancedPrintoutNonGray"], CellMargins -> {{30, 0}, {4, 0}}, TextJustification -> 0, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["FunctionDescriptionRuleBottom"], CellFrame -> {{0, 0}, {0.25, 0}}, CellMargins -> {{36, 10}, {4, 0}}, LineSpacing -> {1, 3}, ParagraphSpacing -> {0.7, 0}, CounterIncrements -> "FunctionDescriptionRuleBottom", StyleMenuListing -> None], Cell[ StyleData["FunctionDescriptionRuleBottom", "Presentation"], FontSize -> 18], Cell[ StyleData["FunctionDescriptionRuleBottom", "Printout"], CellMargins -> {{30, 0}, {4, 0}}, FontSize -> 11], Cell[ StyleData[ "FunctionDescriptionRuleBottom", "EnhancedPrintout"], CellMargins -> {{30, 0}, {4, 0}}, TextJustification -> 0, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData[ "FunctionDescriptionRuleBottom", "EnhancedPrintoutNonGray"], CellMargins -> {{30, 0}, {4, 0}}, TextJustification -> 0, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["FunctionExample"], CellMargins -> {{36, 10}, {4, 0}}, StyleMenuListing -> None, FontSize -> 10], Cell[ StyleData["FunctionExample", "Presentation"], FontSize -> 15], Cell[ StyleData["FunctionExample", "Printout"], CellMargins -> {{30, 0}, {4, 0}}, FontSize -> 9], Cell[ StyleData["FunctionExample", "EnhancedPrintout"], CellMargins -> {{30, 0}, {4, 0}}, FontFamily -> "Palatino", FontSize -> 9], Cell[ StyleData["FunctionExample", "EnhancedPrintoutNonGray"], CellMargins -> {{30, 0}, {4, 0}}, FontFamily -> "Palatino", FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["FunctionTextNote"], CellMargins -> {{36, 4}, {0, 4}}, LineSpacing -> {1, 3}, ParagraphSpacing -> {0, 4}, LineIndent -> 0, StyleMenuListing -> None], Cell[ StyleData["FunctionTextNote", "Presentation"], FontSize -> 18], Cell[ StyleData["FunctionTextNote", "Printout"], CellMargins -> {{36, 4}, {0, 4}}, FontSize -> 9], Cell[ StyleData["FunctionTextNote", "EnhancedPrintout"], CellMargins -> {{36, 4}, {0, 4}}, FontFamily -> "Palatino", FontSize -> 8], Cell[ StyleData["FunctionTextNote", "EnhancedPrintoutNonGray"], CellMargins -> {{36, 4}, {0, 4}}, FontFamily -> "Palatino", FontSize -> 8]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["3ColumnFunctionTable"], CellMargins -> {{36, 4}, {0, 8}}, CellHorizontalScrolling -> True, PageBreakWithin -> False, AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, StyleMenuListing -> None, GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> { Scaled[0.28], Scaled[0.28], { Scaled[0.43]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[1.4]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["3ColumnFunctionTable", "Presentation"], FontSize -> 18], Cell[ StyleData["3ColumnFunctionTable", "Printout"], CellMargins -> {{30, 0}, {0, 8}}, FontSize -> 10], Cell[ StyleData["3ColumnFunctionTable", "EnhancedPrintout"], CellMargins -> {{30, 0}, {0, 8}}, FontSize -> 10], Cell[ StyleData[ "3ColumnFunctionTable", "EnhancedPrintoutNonGray"], CellMargins -> {{30, 0}, {0, 8}}, FontSize -> 10]}, Closed]]}, Closed]], Cell[ CellGroupData[{ Cell["Browser Emulation", "Subsubsection"], Cell[ CellGroupData[{ Cell[ StyleData["TextNormal"], CellMargins -> {{12, 10}, {7, 7}}, LineSpacing -> {1, 3}, CounterIncrements -> "TextNormal", StyleMenuListing -> None, FontFamily -> "Times", FontSize -> 12], Cell[ StyleData["TextNormal", "Presentation"], FontSize -> 18], Cell[ StyleData["TextNormal", "Printout"], CellMargins -> {{2, 2}, {6, 6}}, FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["BrowserEmulation"], CellMargins -> {{12, 1}, {7, 24}}, CellGroupingRules -> {"SectionGrouping", 70}, LineSpacing -> {1, 3}, StyleMenuListing -> None, FontFamily -> "Helvetica", GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxDividers -> { "Columns" -> {{True}}, "ColumnsIndexed" -> {}, "Rows" -> {True, {False}, True}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> {{ Scaled[0.25]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.35], { Offset[0.5599999999999999]}, Offset[0.35]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["BrowserEmulation", "Presentation"], FontSize -> 18], Cell[ StyleData["BrowserEmulation", "Printout"], CellMargins -> {{2, 2}, {6, 6}}, FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["CategoryDefs"], CellMargins -> {{300, 10}, {7, 7}}, LineSpacing -> {1, 3}, StyleMenuListing -> None, FontFamily -> "Helvetica", Background -> RGBColor[1, 0.8, 0.6], GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxDividers -> { "Columns" -> {False, {True}, False}, "ColumnsIndexed" -> {}, "Rows" -> {False, {True}, False}, "RowsIndexed" -> {}}}], Cell[ StyleData["CategoryDefs", "Presentation"], FontSize -> 18], Cell[ StyleData["CategoryDefs", "Printout"], CellMargins -> {{2, 2}, {6, 6}}, FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Category1"], ShowCellBracket -> False, ShowGroupOpener -> True, CellMargins -> {{12, 10}, {7, 7}}, CellGroupingRules -> {"SectionGrouping", 50}, StyleMenuListing -> None, FontSize -> 16, FontWeight -> "Bold"], Cell[ StyleData["Category1", "Presentation"], FontSize -> 24], Cell[ StyleData["Category1", "Printout"], CellMargins -> {{2, 2}, {6, 6}}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Category2"], ShowCellBracket -> False, ShowGroupOpener -> True, CellMargins -> {{85, 10}, {7, 7}}, CellGroupingRules -> {"SectionGrouping", 60}, StyleMenuListing -> None, FontSize -> 14, FontWeight -> "Bold", FontColor -> RGBColor[0, 0, 0.500008]], Cell[ StyleData["Category2", "Presentation"], FontSize -> 21], Cell[ StyleData["Category2", "Printout"], CellMargins -> {{2, 2}, {6, 6}}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Category3"], ShowCellBracket -> False, ShowGroupOpener -> True, CellMargins -> {{157, 10}, {7, 7}}, CellGroupingRules -> {"SectionGrouping", 70}, StyleMenuListing -> None, FontSize -> 12, FontWeight -> "Bold", FontColor -> RGBColor[0.2, 0, 0.4]], Cell[ StyleData["Category3", "Presentation"], FontSize -> 18], Cell[ StyleData["Category3", "Printout"], CellMargins -> {{2, 2}, {6, 6}}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Category4"], ShowCellBracket -> False, ShowGroupOpener -> True, CellMargins -> {{230, 10}, {7, 7}}, CellGroupingRules -> {"SectionGrouping", 80}, StyleMenuListing -> None, FontWeight -> "Bold", FontColor -> RGBColor[0, 0.300008, 0.4]], Cell[ StyleData["Category4", "Presentation"], FontSize -> 18], Cell[ StyleData["Category4", "Printout"], CellMargins -> {{2, 2}, {6, 6}}]}, Closed]]}, Closed]], Cell[ CellGroupData[{ Cell["Misc", "Subsubsection"], Cell[ CellGroupData[{ Cell[ StyleData["4ColumnTable"], CellMargins -> {{10, 4}, {0, 8}}, CellHorizontalScrolling -> True, PageBreakWithin -> False, AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, StyleMenuListing -> None, GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {Left, {Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> {{ Scaled[0.25]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[1.4]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["4ColumnTable", "Presentation"], FontSize -> 18], Cell[ StyleData["4ColumnTable", "Printout"], CellMargins -> {{2, 0}, {0, 8}}], Cell[ StyleData["4ColumnTable", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}], Cell[ StyleData["4ColumnTable", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["5ColumnTable"], CellMargins -> {{10, 4}, {0, 8}}, CellHorizontalScrolling -> True, PageBreakWithin -> False, AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, StyleMenuListing -> None, GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {Left, {Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> {{ Scaled[0.2]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[1.4]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["5ColumnTable", "Presentation"], FontSize -> 18], Cell[ StyleData["5ColumnTable", "Printout"], CellMargins -> {{2, 0}, {0, 8}}], Cell[ StyleData["5ColumnTable", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}], Cell[ StyleData["5ColumnTable", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["6ColumnTable"], CellMargins -> {{10, 4}, {0, 8}}, CellHorizontalScrolling -> True, PageBreakWithin -> False, AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, StyleMenuListing -> None, GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {Left, {Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> {{ Scaled[0.16]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[1.4]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["6ColumnTable", "Presentation"], FontSize -> 18], Cell[ StyleData["6ColumnTable", "Printout"], CellMargins -> {{2, 0}, {0, 8}}], Cell[ StyleData["6ColumnTable", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}], Cell[ StyleData["6ColumnTable", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["7ColumnTable"], CellMargins -> {{10, 4}, {0, 8}}, CellHorizontalScrolling -> True, PageBreakWithin -> False, AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, StyleMenuListing -> None, GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {Left, {Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> {{ Scaled[0.14]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[1.4]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["7ColumnTable", "Presentation"], FontSize -> 18], Cell[ StyleData["7ColumnTable", "Printout"], CellMargins -> {{2, 0}, {0, 8}}], Cell[ StyleData["7ColumnTable", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}], Cell[ StyleData["7ColumnTable", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["8ColumnTable"], CellMargins -> {{10, 4}, {0, 8}}, CellHorizontalScrolling -> True, PageBreakWithin -> False, AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, StyleMenuListing -> None, GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {Left, {Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> {{ Scaled[0.12]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[1.4]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["8ColumnTable", "Presentation"], FontSize -> 18], Cell[ StyleData["8ColumnTable", "Printout"], CellMargins -> {{2, 0}, {0, 8}}], Cell[ StyleData["8ColumnTable", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}], Cell[ StyleData["8ColumnTable", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ABItemizedText"], CellMargins -> {{20, 4}, {0, 5}}, LineSpacing -> {1, 3}, ParagraphIndent -> -21, CounterIncrements -> "ItemizedText", StyleMenuListing -> None], Cell[ StyleData["ABItemizedText", "Presentation"], FontSize -> 18], Cell[ StyleData["ABItemizedText", "Printout"], Hyphenation -> True, ParagraphIndent -> -21, FontSize -> 11], Cell[ StyleData["ABItemizedText", "EnhancedPrintout"], Hyphenation -> True, ParagraphIndent -> -21, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["ABItemizedText", "EnhancedPrintoutNonGray"], Hyphenation -> True, ParagraphIndent -> -21, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ChapNumber"], CellMargins -> {{27, Inherited}, {20, 40}}, CellGroupingRules -> {"TitleGrouping", 0}, PageBreakBelow -> False, DefaultNewInlineCellStyle -> "None", InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, LanguageCategory -> "NaturalLanguage", CounterIncrements -> "Title", CounterAssignments -> {{"Section", 0}, {"Equation", 0}, { "Figure", 0}, {"Subtitle", 0}, {"Subsubtitle", 0}}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 42, FontWeight -> "Plain", FontColor -> RGBColor[0.592157, 0.313726, 0.313726]], Cell[ StyleData["ChapNumber", "Presentation"], FontSize -> 63], Cell[ StyleData["ChapNumber", "Printout"], CellMargins -> {{2, 10}, {15, 30}}, FontSize -> 36], Cell[ StyleData["ChapNumber", "EnhancedPrintout"], CellMargins -> {{2, 10}, {15, 30}}, FontFamily -> "Frutiger-Roman", FontSize -> 36, FontColor -> GrayLevel[0]], Cell[ StyleData["ChapNumber", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 10}, {15, 30}}, FontFamily -> "Frutiger-Roman", FontSize -> 36, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ChapTitle"], CellMargins -> {{27, Inherited}, {80, 10}}, CellGroupingRules -> {"TitleGrouping", 0}, PageBreakBelow -> False, DefaultNewInlineCellStyle -> "None", InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, LanguageCategory -> "NaturalLanguage", CounterIncrements -> "Title", CounterAssignments -> {{"Section", 0}, {"Equation", 0}, { "Figure", 0}, {"Subtitle", 0}, {"Subsubtitle", 0}}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 36, FontWeight -> "Bold", FontColor -> RGBColor[0.592157, 0.313726, 0.313726]], Cell[ StyleData["ChapTitle", "Presentation"], FontSize -> 54], Cell[ StyleData["ChapTitle", "Printout"], CellMargins -> {{2, 10}, {80, 6}}, FontSize -> 30], Cell[ StyleData["ChapTitle", "EnhancedPrintout"], CellMargins -> {{2, 10}, {80, 6}}, FontFamily -> "Frutiger-Bold", FontSize -> 30, FontWeight -> "Plain", FontColor -> GrayLevel[0]], Cell[ StyleData["ChapTitle", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 10}, {80, 6}}, FontFamily -> "Frutiger-Bold", FontSize -> 30, FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemDingbat"], CellSize -> {22, 14}, TextAlignment -> Right, StyleMenuListing -> None, FontWeight -> "Bold"], Cell[ StyleData["ItemDingbat", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemDingbat", "Printout"], CellSize -> {22, 13.125}], Cell[ StyleData["ItemDingbat", "EnhancedPrintout"], CellSize -> {22, 11}], Cell[ StyleData["ItemDingbat", "EnhancedPrintoutNonGray"], CellSize -> {22, 11}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Item1"], CellMargins -> {{19, 4}, {4, 4}}, ParagraphIndent -> -22, CounterIncrements -> "Item1", StyleMenuListing -> None], Cell[ StyleData["Item1", "Presentation"], FontSize -> 18], Cell[ StyleData["Item1", "Printout"], CellMargins -> {{12, 0}, {2, 4}}, FontSize -> 10], Cell[ StyleData["Item1", "EnhancedPrintout"], CellMargins -> {{16, 0}, {2, 4}}, FontSize -> 10], Cell[ StyleData["Item1", "EnhancedPrintoutNonGray"], CellMargins -> {{16, 0}, {2, 4}}, FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Item1Continued"], CellMargins -> {{41, 4}, {4, 1}}, CounterIncrements -> "Item1Continued", StyleMenuListing -> None], Cell[ StyleData["Item1Continued", "Presentation"], FontSize -> 18], Cell[ StyleData["Item1Continued", "Printout"], CellMargins -> {{34, 0}, {4, 1}}, FontSize -> 10], Cell[ StyleData["Item1Continued", "EnhancedPrintout"], CellMargins -> {{39, 0}, {4, 1}}, FontSize -> 10], Cell[ StyleData["Item1Continued", "EnhancedPrintoutNonGray"], CellMargins -> {{39, 0}, {4, 1}}, FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Item2"], CellMargins -> {{32, 4}, {4, 4}}, ParagraphIndent -> -22, CounterIncrements -> "Item2", StyleMenuListing -> None], Cell[ StyleData["Item2", "Presentation"], FontSize -> 18], Cell[ StyleData["Item2", "Printout"], CellMargins -> {{26, 0}, {4, 4}}, ParagraphIndent -> -22, FontSize -> 10], Cell[ StyleData["Item2", "EnhancedPrintout"], CellMargins -> {{29, 0}, {2, 4}}, ParagraphIndent -> -22, FontSize -> 10], Cell[ StyleData["Item2", "EnhancedPrintoutNonGray"], CellMargins -> {{29, 0}, {2, 4}}, ParagraphIndent -> -22, FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Item2Continued"], CellMargins -> {{54, 4}, {4, 1}}, CounterIncrements -> "Item2Continued", StyleMenuListing -> None], Cell[ StyleData["Item2Continued", "Presentation"], FontSize -> 18], Cell[ StyleData["Item2Continued", "Printout"], CellMargins -> {{27, 0}, {4, 1}}], Cell[ StyleData["Item2Continued", "EnhancedPrintout"], CellMargins -> {{52, 0}, {4, 1}}, FontSize -> 10], Cell[ StyleData["Item2Continued", "EnhancedPrintoutNonGray"], CellMargins -> {{52, 0}, {4, 1}}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Item3"], CellMargins -> {{45, 4}, {4, 4}}, ParagraphIndent -> -23, CounterIncrements -> "Item3", StyleMenuListing -> None], Cell[ StyleData["Item3", "Presentation"], FontSize -> 18], Cell[ StyleData["Item3", "Printout"], CellMargins -> {{27, 0}, {2, 4}}], Cell[ StyleData["Item3", "EnhancedPrintout"], CellMargins -> {{42, 0}, {2, 4}}, FontSize -> 10], Cell[ StyleData["Item3", "EnhancedPrintoutNonGray"], CellMargins -> {{42, 0}, {2, 4}}, StyleMenuListing -> None]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Item3Continued"], CellMargins -> {{67, 4}, {4, 1}}, CounterIncrements -> "Item3Continued", StyleMenuListing -> None], Cell[ StyleData["Item3Continued", "Presentation"], FontSize -> 18], Cell[ StyleData["Item3Continued", "Printout"], CellMargins -> {{27, 0}, {4, 1}}], Cell[ StyleData["Item3Continued", "EnhancedPrintout"], CellMargins -> {{65, 0}, {4, 1}}, FontSize -> 10], Cell[ StyleData["Item3Continued", "EnhancedPrintoutNonGray"], CellMargins -> {{65, 0}, {4, 1}}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemizedBulletText"], CellMargins -> {{19, 4}, {0, 5}}, LineSpacing -> {1, 3}, ParagraphIndent -> -22, CounterIncrements -> "ItemizedBulletText", StyleMenuListing -> None], Cell[ StyleData["ItemizedBulletText", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemizedBulletText", "Printout"], Hyphenation -> True, ParagraphIndent -> -20, FontSize -> 11], Cell[ StyleData["ItemizedBulletText", "EnhancedPrintout"], Hyphenation -> True, ParagraphIndent -> -19, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["ItemizedBulletText", "EnhancedPrintoutNonGray"], Hyphenation -> True, ParagraphIndent -> -19, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["NoteBox"], CellFrame -> 0.5, CellMargins -> {{27, 12}, {8, 8}}, CellHorizontalScrolling -> True, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], LineIndent -> 0, StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions -> {FrameMargins -> {{1, 1}, {1.5, 1.5}}}, GridBoxOptions -> {GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["NoteBox", "Presentation"], FontSize -> 18], Cell[ StyleData["NoteBox", "Printout"], CellMargins -> {{2, 4}, {6, 2}}, FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["NoteBox", "EnhancedPrintout"], CellMargins -> {{2, 2}, {6, 2}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["NoteBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 4}, {6, 2}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemizedNoteBox"], CellFrame -> 0.5, CellMargins -> {{41, 4}, {8, 2}}, CellHorizontalScrolling -> True, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], LineIndent -> 0, StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216], FrameBoxOptions -> {FrameMargins -> {{1, 1}, {1.5, 1.5}}}, GridBoxOptions -> {GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["ItemizedNoteBox", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemizedNoteBox", "Printout"], CellMargins -> {{39, 4}, {6, 2}}, FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["ItemizedNoteBox", "EnhancedPrintout"], CellMargins -> {{39, 4}, {6, 2}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["ItemizedNoteBox", "EnhancedPrintoutNonGray"], CellMargins -> {{39, 4}, {6, 2}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemizedTopBox"], CellFrame -> {{0.5, 0.5}, {0, 0.5}}, CellMargins -> {{37, 4}, {0, 8}}, CellHorizontalScrolling -> True, CellFrameMargins -> {{8, 8}, {0, 8}}, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], LineIndent -> 0, StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> { Scaled[0.31], { Scaled[0.62]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["ItemizedTopBox", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemizedTopBox", "Printout"], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["ItemizedTopBox", "EnhancedPrintout"], CellMargins -> {{39, 4}, {0, 6}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["ItemizedTopBox", "EnhancedPrintoutNonGray"], CellMargins -> {{39, 4}, {0, 6}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemizedBottomBox"], CellFrame -> {{0.5, 0.5}, {0.5, 0}}, CellMargins -> {{37, 4}, {4, 0}}, CellHorizontalScrolling -> True, CellFrameMargins -> {{8, 8}, {8, 0}}, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], LineIndent -> 0, StyleMenuListing -> None, Background -> RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> { Scaled[0.31], { Scaled[0.62]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["ItemizedBottomBox", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemizedBottomBox", "Printout"], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["ItemizedBottomBox", "EnhancedPrintout"], CellMargins -> {{39, 4}, {6, 0}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[0.900008]], Cell[ StyleData["ItemizedBottomBox", "EnhancedPrintoutNonGray"], CellMargins -> {{39, 4}, {6, 0}}, CellFrameColor -> GrayLevel[0], FontSize -> 10, Background -> GrayLevel[1]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["MiddleSpacedBox"], CellFrame -> {{0.5, 0.5}, {0, 0}}, CellMargins -> {{27, 12}, {0, -7}}, CellHorizontalScrolling -> True, PageBreakAbove -> False, PageBreakBelow -> False, CellFrameColor -> RGBColor[0.74902, 0.694118, 0.552941], AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, StyleMenuListing -> None, FontWeight -> "Plain", Background -> RGBColor[0.964706, 0.929412, 0.839216], GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> { Scaled[0.31], { Scaled[0.62]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["MiddleSpacedBox", "Presentation"], FontSize -> 18], Cell[ StyleData["MiddleSpacedBox", "Printout"], CellMargins -> {{2, 0}, {0, 0}}, Background -> GrayLevel[1], GridBoxOptions -> { GridBoxItemSize -> { "Columns" -> {{All}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.8}}, "RowsIndexed" -> {}}}], Cell[ StyleData["MiddleSpacedBox", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 0}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", Background -> GrayLevel[1], GridBoxOptions -> { GridBoxItemSize -> { "Columns" -> {{All}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.8}}, "RowsIndexed" -> {}}}], Cell[ StyleData["MiddleSpacedBox", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 0}}, CellFrameColor -> GrayLevel[0], FontFamily -> "Palatino", Background -> GrayLevel[1], GridBoxOptions -> { GridBoxItemSize -> { "Columns" -> {{All}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.8}}, "RowsIndexed" -> {}}}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemizedNote"], CellMargins -> {{41, 4}, {0, 12}}, LineSpacing -> {1, 2}, CounterIncrements -> "ItemizedNote", StyleMenuListing -> None], Cell[ StyleData["ItemizedNote", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemizedNote", "Printout"], CellMargins -> {{38, 4}, {0, 9}}, Hyphenation -> True, FontSize -> 11], Cell[ StyleData["ItemizedNote", "EnhancedPrintout"], CellMargins -> {{38, 4}, {0, 0}}, TextJustification -> 1, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["ItemizedNote", "EnhancedPrintoutNonGray"], CellMargins -> {{38, 4}, {0, 0}}, TextJustification -> 1, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemizedNoteBelow"], CellMargins -> {{41, 4}, {0, 8}}, LineSpacing -> {1, 2}, CounterIncrements -> "ItemizedNote", StyleMenuListing -> None], Cell[ StyleData["ItemizedNoteBelow", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemizedNoteBelow", "Printout"], CellMargins -> {{38, 4}, {0, 12}}, Hyphenation -> True, FontSize -> 11], Cell[ StyleData["ItemizedNoteBelow", "EnhancedPrintout"], CellMargins -> {{38, 4}, {0, 8}}, TextJustification -> 1, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["ItemizedNoteBelow", "EnhancedPrintoutNonGray"], CellMargins -> {{38, 4}, {0, 8}}, TextJustification -> 1, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemizedTextBelowPic"], CellMargins -> {{19, 4}, {0, 8}}, LineSpacing -> {1, 3}, ParagraphIndent -> -22, CounterIncrements -> "ItemizedText", StyleMenuListing -> None], Cell[ StyleData["ItemizedTextBelowPic", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemizedTextBelowPic", "Printout"], CellMargins -> {{20, 4}, {2, 12}}, Hyphenation -> True, ParagraphIndent -> -18, FontSize -> 11], Cell[ StyleData["ItemizedTextBelowPic", "EnhancedPrintout"], CellMargins -> {{20, 4}, {2, 12}}, Hyphenation -> True, ParagraphIndent -> -17, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData[ "ItemizedTextBelowPic", "EnhancedPrintoutNonGray"], CellMargins -> {{20, 4}, {2, 12}}, Hyphenation -> True, ParagraphIndent -> -17, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemizedTextNote2"], CellMargins -> {{41, 4}, {0, 4}}, LineSpacing -> {1, 2}, CounterIncrements -> "ItemizedNote", StyleMenuListing -> None], Cell[ StyleData["ItemizedTextNote2", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemizedTextNote2", "Printout"], CellMargins -> {{38, 4}, {0, 2}}, Hyphenation -> True, FontSize -> 11], Cell[ StyleData["ItemizedTextNote2", "EnhancedPrintout"], CellMargins -> {{38, 4}, {0, 2}}, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["ItemizedTextNote2", "EnhancedPrintoutNonGray"], CellMargins -> {{38, 4}, {0, 2}}, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["NumberedItem1"], CellMargins -> {{48, 4}, {4, 4}}, CellGroupingRules -> {"SectionGrouping", 15}, ParagraphIndent -> -23, CounterIncrements -> "NumberedItem1", StyleMenuListing -> None], Cell[ StyleData["NumberedItem1", "Presentation"], FontSize -> 18], Cell[ StyleData["NumberedItem1", "Printout"], CellMargins -> {{12, 0}, {0, 8}}], Cell[ StyleData["NumberedItem1", "EnhancedPrintout"], CellMargins -> {{12, 0}, {0, 8}}], Cell[ StyleData["NumberedItem1", "EnhancedPrintoutNonGray"], CellMargins -> {{12, 0}, {0, 8}}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["NumberedItem2"], CellMargins -> {{71, 4}, {3, 3}}, CellGroupingRules -> {"SectionGrouping", 15}, ParagraphIndent -> -21, CounterIncrements -> "NumberedItem2", StyleMenuListing -> None], Cell[ StyleData["NumberedItem2", "Presentation"], FontSize -> 18], Cell[ StyleData["NumberedItem2", "Printout"], CellMargins -> {{27, 0}, {0, 4}}], Cell[ StyleData["NumberedItem2", "EnhancedPrintout"], CellMargins -> {{27, 0}, {0, 4}}], Cell[ StyleData["NumberedItem2", "EnhancedPrintoutNonGray"], CellMargins -> {{27, 0}, {0, 4}}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["NumberedItem3"], CellMargins -> {{94, 4}, {2, 2}}, CellGroupingRules -> {"SectionGrouping", 15}, ParagraphIndent -> -23, CounterIncrements -> "NumberedItem3", StyleMenuListing -> None], Cell[ StyleData["NumberedItem3", "Presentation"], FontSize -> 18], Cell[ StyleData["NumberedItem3", "Printout"], CellMargins -> {{27, 0}, {0, 4}}], Cell[ StyleData["NumberedItem3", "EnhancedPrintout"], CellMargins -> {{27, 0}, {0, 4}}], Cell[ StyleData["NumberedItem3", "EnhancedPrintoutNonGray"], CellMargins -> {{27, 0}, {0, 4}}, StyleMenuListing -> None]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PageHeaderBold"], CellMargins -> {{0, 0}, {2, 0}}, StyleMenuListing -> None, FontSize -> 8, FontWeight -> "Bold", FontSlant -> "Italic"], Cell[ StyleData["PageHeaderBold", "Printout"]], Cell[ StyleData["PageHeaderBold", "EnhancedPrintout"], FontFamily -> "Frutiger-BoldItalic", FontWeight -> "Plain", FontSlant -> "Plain"], Cell[ StyleData["PageHeaderBold", "EnhancedPrintoutNonGray"], FontFamily -> "Frutiger-BoldItalic", FontWeight -> "Plain", FontSlant -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SingleRowTable"], CellMargins -> {{10, 4}, {0, 8}}, CellHorizontalScrolling -> True, PageBreakWithin -> False, AutoIndent -> False, AutoSpacing -> False, LineIndent -> 0, StyleMenuListing -> None, GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[1.4]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.6]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["SingleRowTable", "Presentation"], FontSize -> 18], Cell[ StyleData["SingleRowTable", "Printout"], CellMargins -> {{2, 0}, {0, 8}}], Cell[ StyleData["SingleRowTable", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}], Cell[ StyleData["SingleRowTable", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {0, 8}}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Subsubsubsection"], CellMargins -> {{27, 4}, {0, 18}}, CellElementSpacings -> {"ClosedGroupTopMargin" -> 18}, StyleMenuListing -> None, FontSize -> 12, FontWeight -> "Bold"], Cell[ StyleData["Subsubsubsection", "Presentation"], FontSize -> 18], Cell[ StyleData["Subsubsubsection", "Printout"], CellMargins -> {{2, 0}, {3, 8}}, FontSize -> 10], Cell[ StyleData["Subsubsubsection", "EnhancedPrintout"], CellMargins -> {{2, 0}, {3, 8}}, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["Subsubsubsection", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {3, 8}}, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Subsubtitle"], CellMargins -> {{27, Inherited}, {20, 15}}, CellGroupingRules -> {"TitleGrouping", 20}, PageBreakBelow -> False, DefaultNewInlineCellStyle -> "None", InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, LanguageCategory -> "NaturalLanguage", CounterIncrements -> "Subsubtitle", CounterAssignments -> {{"Section", 0}, {"Equation", 0}, { "Figure", 0}}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 14, FontSlant -> "Italic"], Cell[ StyleData["Subsubtitle", "Presentation"], FontSize -> 21], Cell[ StyleData["Subsubtitle", "Printout"], CellMargins -> {{2, 10}, {8, 10}}, FontSize -> 12], Cell[ StyleData["Subsubtitle", "EnhancedPrintout"], CellMargins -> {{2, 10}, {8, 10}}, FontFamily -> "Frutiger-Roman", FontSize -> 12], Cell[ StyleData["Subsubtitle", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 10}, {8, 10}}, FontFamily -> "Frutiger-Roman", FontSize -> 12]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Subtitle"], CellMargins -> {{27, Inherited}, {20, 15}}, CellGroupingRules -> {"TitleGrouping", 10}, PageBreakBelow -> False, DefaultNewInlineCellStyle -> "None", InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, LanguageCategory -> "NaturalLanguage", CounterIncrements -> "Subtitle", CounterAssignments -> {{"Section", 0}, {"Equation", 0}, { "Figure", 0}, {"Subsubtitle", 0}}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 24], Cell[ StyleData["Subtitle", "Presentation"], FontSize -> 36], Cell[ StyleData["Subtitle", "Printout"], CellMargins -> {{2, 10}, {10, 15}}, FontSize -> 24], Cell[ StyleData["Subtitle", "EnhancedPrintout"], CellMargins -> {{2, 10}, {10, 15}}, FontFamily -> "Frutiger-Roman", FontSize -> 24], Cell[ StyleData["Subtitle", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 10}, {10, 15}}, FontFamily -> "Frutiger-Roman", FontSize -> 24]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TextBelow"], CellMargins -> {{27, 4}, {0, 14}}, InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, ParagraphSpacing -> {0, 8}, StyleMenuListing -> None, FontSize -> 12], Cell[ StyleData["TextBelow", "Presentation"], FontSize -> 18], Cell[ StyleData["TextBelow", "Printout"], CellMargins -> {{2, 2}, {6, 12}}, TextJustification -> 1, Hyphenation -> True, FontSize -> 10], Cell[ StyleData["TextBelow", "EnhancedPrintout"], CellMargins -> {{2, 2}, {6, 12}}, TextJustification -> 1, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["TextBelow", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 2}, {6, 12}}, TextJustification -> 1, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Title"], CellMargins -> {{27, Inherited}, {20, 40}}, CellGroupingRules -> {"TitleGrouping", 0}, PageBreakBelow -> False, DefaultNewInlineCellStyle -> "None", InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, LanguageCategory -> "NaturalLanguage", CounterIncrements -> "Title", CounterAssignments -> {{"Section", 0}, {"Equation", 0}, { "Figure", 0}, {"Subtitle", 0}, {"Subsubtitle", 0}}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 36, FontWeight -> "Bold", FontColor -> RGBColor[0.592157, 0.313726, 0.313726]], Cell[ StyleData["Title", "Presentation"], FontSize -> 54], Cell[ StyleData["Title", "Printout"], CellMargins -> {{2, 10}, {15, 30}}, FontSize -> 30], Cell[ StyleData["Title", "EnhancedPrintout"], CellMargins -> {{2, 10}, {15, 30}}, FontFamily -> "Frutiger-Bold", FontSize -> 30.5, FontWeight -> "Plain"], Cell[ StyleData["Title", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 10}, {15, 30}}, FontFamily -> "Frutiger-Bold", FontSize -> 30.5, FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Undersubsection"], CellMargins -> {{10, 4}, {0, 18}}, CellElementSpacings -> {"ClosedGroupTopMargin" -> 18}, InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm]}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 12, FontWeight -> "Bold"], Cell[ StyleData["Undersubsection", "Presentation"], FontSize -> 18], Cell[ StyleData["Undersubsection", "Printout"], CellMargins -> {{2, 0}, {7, 10}}, FontSize -> 10], Cell[ StyleData["Undersubsection", "EnhancedPrintout"], CellMargins -> {{2, 0}, {7, 8}}, FontFamily -> "Frutiger-Bold", FontSize -> 10, FontWeight -> "Plain"], Cell[ StyleData["Undersubsection", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {7, 8}}, FontFamily -> "Frutiger-Bold", FontSize -> 10, FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SectionFirst"], CellMargins -> {{27, 27}, {12, 18}}, CellGroupingRules -> {"SectionGrouping", 30}, PageBreakBelow -> False, CounterIncrements -> "Section", StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 20, FontWeight -> "Bold", FontColor -> RGBColor[0.592157, 0.313726, 0.313726]], Cell[ StyleData["SectionFirst", "Presentation"], FontSize -> 30], Cell[ StyleData["SectionFirst", "Printout"], CellMargins -> {{2, 0}, {0, 6}}, PageBreakBelow -> False, FontSize -> 18], Cell[ StyleData["SectionFirst", "EnhancedPrintout"], CellFrame -> {{0, 0}, {0.5, 0}}, CellMargins -> {{2, Inherited}, {5, 6}}, CellGroupingRules -> {"SectionGrouping", 30}, PageBreakBelow -> False, CellFrameMargins -> 8, CounterIncrements -> "Section", CounterAssignments -> {{"Subsection", 0}, { "Subsubsection", 0}}, FontFamily -> "Frutiger-Bold", FontSize -> 16, FontWeight -> "Plain", FontColor -> GrayLevel[0]], Cell[ StyleData["SectionFirst", "EnhancedPrintoutNonGray"], CellFrame -> {{0, 0}, {0.5, 0}}, CellMargins -> {{2, Inherited}, {5, 6}}, CellGroupingRules -> {"SectionGrouping", 30}, PageBreakBelow -> False, CellFrameMargins -> 8, CounterIncrements -> "Section", CounterAssignments -> {{"Subsection", 0}, { "Subsubsection", 0}}, FontFamily -> "Frutiger-Bold", FontSize -> 16, FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SubsectionFirst"], CellDingbat -> None, CellMargins -> {{27, 27}, {0, 18}}, CellElementSpacings -> {"ClosedGroupTopMargin" -> 18}, CellGroupingRules -> {"SectionGrouping", 40}, PageBreakBelow -> False, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 16, FontWeight -> "Bold", FontColor -> RGBColor[0.592157, 0.313726, 0.313726]], Cell[ StyleData["SubsectionFirst", "Presentation"], FontSize -> 24], Cell[ StyleData["SubsectionFirst", "SlideShow"], CellDingbat -> None, CellMargins -> {{70, 0}, {4, 6}}, FontSize -> 12], Cell[ StyleData["SubsectionFirst", "Printout"], CellMargins -> {{9, 0}, {5, 6}}, CellBracketOptions -> {"Color" -> RGBColor[1, 0, 0]}, FontSize -> 12], Cell[ StyleData["SubsectionFirst", "EnhancedPrintout"], CellMargins -> {{2, 0}, {5, 6}}, CellBracketOptions -> {"Color" -> RGBColor[1, 0, 0]}, FontFamily -> "Frutiger-Bold", FontSize -> 12, FontWeight -> "Plain", FontColor -> GrayLevel[0]], Cell[ StyleData["SubsectionFirst", "EnhancedPrintoutNonGray"], CellMargins -> {{9, 0}, {5, 6}}, CellBracketOptions -> {"Color" -> RGBColor[1, 0, 0]}, FontFamily -> "Frutiger-Bold", FontSize -> 12, FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SubsubsectionFirst"], CellMargins -> {{27, 27}, {0, 18}}, CellElementSpacings -> {"ClosedGroupTopMargin" -> 18}, CellGroupingRules -> {"SectionGrouping", 50}, PageBreakBelow -> False, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 12, FontWeight -> "Bold", FontColor -> RGBColor[0.592157, 0.313726, 0.313726]], Cell[ StyleData["SubsubsectionFirst", "Presentation"], FontSize -> 18], Cell[ StyleData["SubsubsectionFirst", "Printout"], CellMargins -> {{2, 0}, {3, 3}}, CellBracketOptions -> {"Color" -> RGBColor[1, 0, 0]}, FontSize -> 10], Cell[ StyleData["SubsubsectionFirst", "EnhancedPrintout"], CellMargins -> {{2, 0}, {3, 3}}, CellBracketOptions -> {"Color" -> RGBColor[1, 0, 0]}, FontFamily -> "Frutiger-Bold", FontSize -> 10, FontWeight -> "Plain", FontColor -> GrayLevel[0]], Cell[ StyleData["SubsubsectionFirst", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {3, 3}}, CellBracketOptions -> {"Color" -> RGBColor[1, 0, 0]}, FontFamily -> "Frutiger-Bold", FontSize -> 10, FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SubsubsubsectionFirst"], CellMargins -> {{10, 4}, {0, 12}}, CellElementSpacings -> {"ClosedGroupTopMargin" -> 18}, StyleMenuListing -> None, FontSize -> 12, FontWeight -> "Bold"], Cell[ StyleData["SubsubsubsectionFirst", "Presentation"], FontSize -> 18], Cell[ StyleData["SubsubsubsectionFirst", "Printout"], CellMargins -> {{2, 0}, {3, 3}}, FontSize -> 10], Cell[ StyleData["SubsubsubsectionFirst", "EnhancedPrintout"], CellMargins -> {{2, 0}, {3, 3}}, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData[ "SubsubsubsectionFirst", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 0}, {3, 3}}, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell["Spacer Cell", "Text"], Cell[ CellGroupData[{ Cell[ StyleData["Spacer"], CellMargins -> {{10, 10}, {0, 0}}, CellElementSpacings -> { "CellMinHeight" -> 2, "ClosedCellHeight" -> 1}, CellOpen -> False, StyleMenuListing -> None], Cell[ StyleData["Spacer", "Printout"], CellOpen -> True, FontSize -> 3]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["DiscretionaryHyphen"], StyleMenuListing -> None, FontSize -> 0.0625, FontColor -> GrayLevel[1]], Cell[ StyleData["DiscretionaryHyphen", "Printout"], FontSize -> 10, FontColor -> GrayLevel[0]], Cell[ StyleData["DiscretionaryHyphen", "EnhancedPrintout"], FontSize -> 10, FontColor -> GrayLevel[0]], Cell[ StyleData[ "DiscretionaryHyphen", "EnhancedPrintoutNonGray"], FontSize -> 10, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PictureSmaller1"], CellMargins -> {{10, Inherited}, {4, 4}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["PictureSmaller1", "Presentation"], FontSize -> 18], Cell[ StyleData["PictureSmaller1", "Printout"], CellMargins -> {{2, Inherited}, {4, 4}}, Magnification -> 0.63], Cell[ StyleData["PictureSmaller1", "EnhancedPrintout"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.63], Cell[ StyleData["PictureSmaller1", "EnhancedPrintoutNonGray"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.63]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PictureSmaller2"], CellMargins -> {{10, Inherited}, {4, 4}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["PictureSmaller2", "Presentation"], FontSize -> 18], Cell[ StyleData["PictureSmaller2", "Printout"], CellMargins -> {{2, Inherited}, {4, 4}}, Magnification -> 0.61], Cell[ StyleData["PictureSmaller2", "EnhancedPrintout"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.61], Cell[ StyleData["PictureSmaller2", "EnhancedPrintoutNonGray"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.61]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PictureSmaller3"], CellMargins -> {{10, Inherited}, {4, 4}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["PictureSmaller3", "Presentation"], FontSize -> 18], Cell[ StyleData["PictureSmaller3", "Printout"], CellMargins -> {{2, Inherited}, {4, 4}}, Magnification -> 0.59], Cell[ StyleData["PictureSmaller3", "EnhancedPrintout"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.59], Cell[ StyleData["PictureSmaller3", "EnhancedPrintoutNonGray"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.59]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PictureSmaller4"], CellMargins -> {{10, Inherited}, {4, 4}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["PictureSmaller4", "Presentation"], FontSize -> 18], Cell[ StyleData["PictureSmaller4", "Printout"], CellMargins -> {{2, Inherited}, {4, 4}}, Magnification -> 0.57], Cell[ StyleData["PictureSmaller4", "EnhancedPrintout"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.57], Cell[ StyleData["PictureSmaller4", "EnhancedPrintoutNonGray"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.57]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PictureSmaller5"], CellMargins -> {{10, Inherited}, {4, 4}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["PictureSmaller5", "Presentation"], FontSize -> 18], Cell[ StyleData["PictureSmaller5", "Printout"], CellMargins -> {{2, Inherited}, {4, 4}}, Magnification -> 0.55], Cell[ StyleData["PictureSmaller5", "EnhancedPrintout"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.55], Cell[ StyleData["PictureSmaller5", "EnhancedPrintoutNonGray"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.55]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PictureSmaller6"], CellMargins -> {{10, Inherited}, {4, 4}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["PictureSmaller6", "Presentation"], FontSize -> 18], Cell[ StyleData["PictureSmaller6", "Printout"], CellMargins -> {{2, Inherited}, {4, 4}}, Magnification -> 0.53], Cell[ StyleData["PictureSmaller6", "EnhancedPrintout"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.53], Cell[ StyleData["PictureSmaller6", "EnhancedPrintoutNonGray"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.53]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemPicture"], CellMargins -> {{41, Inherited}, {4, 2}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["ItemPicture", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemPicture", "Printout"], CellMargins -> {{55, Inherited}, {8, -4}}, Magnification -> 0.65], Cell[ StyleData["ItemPicture", "EnhancedPrintout"], CellMargins -> {{60, Inherited}, {10, -3}}, Magnification -> 0.65], Cell[ StyleData["ItemPicture", "EnhancedPrintoutNonGray"], CellMargins -> {{60, Inherited}, {10, -3}}, Magnification -> 0.65]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemPictureSmaller1"], CellMargins -> {{41, Inherited}, {4, 2}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["ItemPictureSmaller1", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemPictureSmaller1", "Printout"], CellMargins -> {{56, Inherited}, {9, -3}}, Magnification -> 0.63], Cell[ StyleData["ItemPictureSmaller1", "EnhancedPrintout"], CellMargins -> {{63, Inherited}, {10, -3}}, Magnification -> 0.63], Cell[ StyleData[ "ItemPictureSmaller1", "EnhancedPrintoutNonGray"], CellMargins -> {{63, Inherited}, {10, -3}}, Magnification -> 0.63]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemPictureSmaller2"], CellMargins -> {{41, Inherited}, {4, 2}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["ItemPictureSmaller2", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemPictureSmaller2", "Printout"], CellMargins -> {{58, Inherited}, {8, -4}}, Magnification -> 0.61], Cell[ StyleData["ItemPictureSmaller2", "EnhancedPrintout"], CellMargins -> {{65, Inherited}, {11, -3}}, Magnification -> 0.61], Cell[ StyleData[ "ItemPictureSmaller2", "EnhancedPrintoutNonGray"], CellMargins -> {{65, Inherited}, {11, -3}}, Magnification -> 0.61]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemPictureSmaller3"], CellMargins -> {{41, Inherited}, {4, 2}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["ItemPictureSmaller3", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemPictureSmaller3", "Printout"], CellMargins -> {{61, Inherited}, {10, -2}}, Magnification -> 0.59], Cell[ StyleData["ItemPictureSmaller3", "EnhancedPrintout"], CellMargins -> {{67, Inherited}, {11, -3}}, Magnification -> 0.59], Cell[ StyleData[ "ItemPictureSmaller3", "EnhancedPrintoutNonGray"], CellMargins -> {{67, Inherited}, {11, -3}}, Magnification -> 0.59]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemPictureSmaller4"], CellMargins -> {{41, Inherited}, {4, 2}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["ItemPictureSmaller4", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemPictureSmaller4", "Printout"], CellMargins -> {{63, Inherited}, {10, -2}}, Magnification -> 0.57], Cell[ StyleData["ItemPictureSmaller4", "EnhancedPrintout"], CellMargins -> {{69, Inherited}, {12, -4}}, Magnification -> 0.57], Cell[ StyleData[ "ItemPictureSmaller4", "EnhancedPrintoutNonGray"], CellMargins -> {{69, Inherited}, {12, -4}}, Magnification -> 0.57]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemPictureSmaller5"], CellMargins -> {{41, Inherited}, {4, 2}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["ItemPictureSmaller5", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemPictureSmaller5", "Printout"], CellMargins -> {{65, Inherited}, {11, -2}}, Magnification -> 0.55], Cell[ StyleData["ItemPictureSmaller5", "EnhancedPrintout"], CellMargins -> {{71, Inherited}, {13, -2}}, Magnification -> 0.55], Cell[ StyleData[ "ItemPictureSmaller5", "EnhancedPrintoutNonGray"], CellMargins -> {{71, Inherited}, {13, -2}}, Magnification -> 0.55]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemPictureSmaller6"], CellMargins -> {{41, Inherited}, {4, 2}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["ItemPictureSmaller6", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemPictureSmaller6", "Printout"], CellMargins -> {{67, Inherited}, {12, -2}}, Magnification -> 0.53], Cell[ StyleData["ItemPictureSmaller6", "EnhancedPrintout"], CellMargins -> {{74, Inherited}, {13, -3}}, Magnification -> 0.53], Cell[ StyleData[ "ItemPictureSmaller6", "EnhancedPrintoutNonGray"], CellMargins -> {{74, Inherited}, {13, -3}}, Magnification -> 0.53]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PictureBigger1"], CellMargins -> {{10, Inherited}, {4, 4}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["PictureBigger1", "Presentation"], FontSize -> 18], Cell[ StyleData["PictureBigger1", "Printout"], CellMargins -> {{2, Inherited}, {4, 4}}, Magnification -> 0.68], Cell[ StyleData["PictureBigger1", "EnhancedPrintout"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.68], Cell[ StyleData["PictureBigger1", "EnhancedPrintoutNonGray"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.68]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PictureBigger2"], CellMargins -> {{10, Inherited}, {4, 4}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["PictureBigger2", "Presentation"], FontSize -> 18], Cell[ StyleData["PictureBigger2", "Printout"], CellMargins -> {{2, Inherited}, {4, 4}}, Magnification -> 0.71], Cell[ StyleData["PictureBigger2", "EnhancedPrintout"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.71], Cell[ StyleData["PictureBigger2", "EnhancedPrintoutNonGray"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.71]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PictureBigger3"], CellMargins -> {{10, Inherited}, {4, 4}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["PictureBigger3", "Presentation"], FontSize -> 18], Cell[ StyleData["PictureBigger3", "Printout"], CellMargins -> {{2, Inherited}, {4, 4}}, Magnification -> 0.74], Cell[ StyleData["PictureBigger3", "EnhancedPrintout"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.74], Cell[ StyleData["PictureBigger3", "EnhancedPrintoutNonGray"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.74]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PictureBigger4"], CellMargins -> {{10, Inherited}, {4, 4}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["PictureBigger4", "Presentation"], FontSize -> 18], Cell[ StyleData["PictureBigger4", "Printout"], CellMargins -> {{2, Inherited}, {4, 4}}, Magnification -> 0.77], Cell[ StyleData["PictureBigger4", "EnhancedPrintout"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.77], Cell[ StyleData["PictureBigger4", "EnhancedPrintoutNonGray"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.77]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PictureBigger5"], CellMargins -> {{10, Inherited}, {4, 4}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["PictureBigger5", "Presentation"], FontSize -> 18], Cell[ StyleData["PictureBigger5", "Printout"], CellMargins -> {{2, Inherited}, {4, 4}}, Magnification -> 0.8], Cell[ StyleData["PictureBigger5", "EnhancedPrintout"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.8], Cell[ StyleData["PictureBigger5", "EnhancedPrintoutNonGray"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.8]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PictureBigger6"], CellMargins -> {{10, Inherited}, {4, 4}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["PictureBigger6", "Presentation"], FontSize -> 18], Cell[ StyleData["PictureBigger6", "Printout"], CellMargins -> {{2, Inherited}, {4, 4}}, Magnification -> 0.83], Cell[ StyleData["PictureBigger6", "EnhancedPrintout"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.83], Cell[ StyleData["PictureBigger6", "EnhancedPrintoutNonGray"], CellMargins -> {{2, Inherited}, {4, 2}}, Magnification -> 0.83]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemPictureBigger1"], CellMargins -> {{41, Inherited}, {4, 2}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["ItemPictureBigger1", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemPictureBigger1", "Printout"], CellMargins -> {{50, Inherited}, {9, -3}}, Magnification -> 0.68], Cell[ StyleData["ItemPictureBigger1", "EnhancedPrintout"], CellMargins -> {{57, Inherited}, {10, -3}}, Magnification -> 0.68], Cell[ StyleData["ItemPictureBigger1", "EnhancedPrintoutNonGray"], CellMargins -> {{57, Inherited}, {10, -3}}, Magnification -> 0.68]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemPictureBigger2"], CellMargins -> {{41, Inherited}, {4, 2}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["ItemPictureBigger2", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemPictureBigger2", "Printout"], CellMargins -> {{48, Inherited}, {8, -4}}, Magnification -> 0.71], Cell[ StyleData["ItemPictureBigger2", "EnhancedPrintout"], CellMargins -> {{54, Inherited}, {10, -3}}, Magnification -> 0.71], Cell[ StyleData["ItemPictureBigger2", "EnhancedPrintoutNonGray"], CellMargins -> {{54, Inherited}, {10, -3}}, Magnification -> 0.71]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemPictureBigger3"], CellMargins -> {{41, Inherited}, {4, 2}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["ItemPictureBigger3", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemPictureBigger3", "Printout"], CellMargins -> {{46, Inherited}, {10, -2}}, Magnification -> 0.74], Cell[ StyleData["ItemPictureBigger3", "EnhancedPrintout"], CellMargins -> {{52, Inherited}, {10, -3}}, Magnification -> 0.74], Cell[ StyleData["ItemPictureBigger3", "EnhancedPrintoutNonGray"], CellMargins -> {{52, Inherited}, {10, -3}}, Magnification -> 0.74]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemPictureBigger4"], CellMargins -> {{41, Inherited}, {4, 2}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["ItemPictureBigger4", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemPictureBigger4", "Printout"], CellMargins -> {{45, Inherited}, {10, -2}}, Magnification -> 0.77], Cell[ StyleData["ItemPictureBigger4", "EnhancedPrintout"], CellMargins -> {{50, Inherited}, {10, -3}}, Magnification -> 0.77], Cell[ StyleData["ItemPictureBigger4", "EnhancedPrintoutNonGray"], CellMargins -> {{50, Inherited}, {10, -3}}, Magnification -> 0.77]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemPictureBigger5"], CellMargins -> {{41, Inherited}, {4, 2}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["ItemPictureBigger5", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemPictureBigger5", "Printout"], CellMargins -> {{43, Inherited}, {11, -2}}, Magnification -> 0.8], Cell[ StyleData["ItemPictureBigger5", "EnhancedPrintout"], CellMargins -> {{49, Inherited}, {10, -3}}, Magnification -> 0.8], Cell[ StyleData["ItemPictureBigger5", "EnhancedPrintoutNonGray"], CellMargins -> {{49, Inherited}, {10, -3}}, Magnification -> 0.8]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ItemPictureBigger6"], CellMargins -> {{41, Inherited}, {4, 2}}, CellGroupingRules -> "GraphicsGrouping", CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["ItemPictureBigger6", "Presentation"], FontSize -> 18], Cell[ StyleData["ItemPictureBigger6", "Printout"], CellMargins -> {{43, Inherited}, {12, -2}}, Magnification -> 0.83], Cell[ StyleData["ItemPictureBigger6", "EnhancedPrintout"], CellMargins -> {{46, Inherited}, {8, -2}}, Magnification -> 0.83], Cell[ StyleData["ItemPictureBigger6", "EnhancedPrintoutNonGray"], CellMargins -> {{46, Inherited}, {8, -2}}, Magnification -> 0.83]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ScreenGraphic"], CellMargins -> {{12, Inherited}, {0, 8}}, CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["ScreenGraphic", "Presentation"], FontSize -> 18], Cell[ StyleData["ScreenGraphic", "Printout"], CellMargins -> {{2, Inherited}, {0, 8}}], Cell[ StyleData["ScreenGraphic", "EnhancedPrintout"], CellMargins -> {{2, Inherited}, {0, 8}}, CellElementSpacings -> { "CellMinHeight" -> 2, "ClosedCellHeight" -> 2}, CellOpen -> False], Cell[ StyleData["ScreenGraphic", "EnhancedPrintoutNonGray"], CellMargins -> {{2, Inherited}, {0, 8}}, CellElementSpacings -> { "CellMinHeight" -> 2, "ClosedCellHeight" -> 2}, CellOpen -> False]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PrintGraphic"], CellMargins -> {{12, Inherited}, {0, 8}}, CellElementSpacings -> { "CellMinHeight" -> 2, "ClosedCellHeight" -> 2}, CellOpen -> False, CellHorizontalScrolling -> True, StyleMenuListing -> None], Cell[ StyleData["PrintGraphic", "Presentation"], FontSize -> 18], Cell[ StyleData["PrintGraphic", "Printout"], CellMargins -> {{2, Inherited}, {0, 8}}, CellElementSpacings -> { "CellMinHeight" -> 2, "ClosedCellHeight" -> 2}, CellOpen -> False], Cell[ StyleData["PrintGraphic", "EnhancedPrintout"], CellMargins -> {{2, Inherited}, {0, 8}}, CellElementSpacings -> {"CellMinHeight" -> 12}, CellOpen -> True], Cell[ StyleData["PrintGraphic", "EnhancedPrintoutNonGray"], CellMargins -> {{2, Inherited}, {0, 8}}, CellElementSpacings -> {"CellMinHeight" -> 12}, CellOpen -> True]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SmallTextSans"], CellMargins -> {{10, 4}, {8, 8}}, TextJustification -> 1, LineSpacing -> {1, 2}, FontFamily -> "Helvetica", FontSize -> 9], Cell[ StyleData["SmallTextSans", "Presentation"], FontSize -> 14], Cell[ StyleData["SmallTextSans", "Printout"], CellMargins -> {{2, 0}, {0, 8}}, Hyphenation -> True, FontSize -> 7], Cell[ StyleData["SmallTextSans", "EnhancedPrintout"], CellMargins -> {{2, 0}, {0, 8}}, Hyphenation -> True, LineSpacing -> {1, 1}, ParagraphSpacing -> {0, -2}, FontFamily -> "Frutiger-Roman", FontSize -> 7]}, Closed]]}, Closed]]}, Closed]]}, Closed]], Cell[ CellGroupData[{ Cell["AuthorTools", "Section"], Cell[ CellGroupData[{ Cell[ StyleData["BilateralCell"], CellMargins -> {{27, 4}, {0, 8}}, StyleMenuListing -> None, FontSize -> 12, GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Top}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> { Scaled[0.33], { Scaled[0.6]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}}], Cell[ StyleData["BilateralCell", "Presentation"], FontSize -> 18], Cell[ StyleData["BilateralCell", "SlideShow"], CellMargins -> {{36, 24}, {4, 4}}, Background -> GrayLevel[0.900008]], Cell[ StyleData["BilateralCell", "Printout"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, FontSize -> 10], Cell[ StyleData["BilateralCell", "EnhancedPrintout"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, FontFamily -> "Palatino", FontSize -> 10], Cell[ StyleData["BilateralCell", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 2}, {6, 6}}, TextJustification -> 1, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["RuledPageBreak"], CellFrame -> {{0, 0}, {0.25, 0}}, CellMargins -> {{27, 4}, {12, 0}}, CellFrameMargins -> {{0, 0}, {1, 0}}, FontSize -> 8], Cell[ StyleData["RuledPageBreak", "Presentation"], FontSize -> 12], Cell[ StyleData["RuledPageBreak", "SlideShow"], CellMargins -> {{36, 24}, {4, 4}}], Cell[ StyleData["RuledPageBreak", "Printout"], CellMargins -> {{2, 2}, {6, 6}}, PageBreakBelow -> True, FontSize -> 1], Cell[ StyleData["RuledPageBreak", "EnhancedPrintout"], CellMargins -> {{2, 2}, {6, 6}}, PageBreakBelow -> True], Cell[ StyleData["RuledPageBreak", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 2}, {6, 6}}, PageBreakBelow -> True]}, Closed]], Cell[ StyleData["PaletteTitle"], CellFrame -> {{0, 0}, {1, 0}}, CellMargins -> {{4, 0}, {Inherited, 0}}, StyleMenuListing -> None, ButtonStyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 14, FontWeight -> "Bold", FontColor -> GrayLevel[1], Background -> RGBColor[0, 0.32549, 0.537255], ButtonBoxOptions -> { BaseStyle -> "PaletteButton", ButtonFunction :> (FrontEndExecute[{ FrontEnd`HelpBrowserLookup["AddOns", #2]}]& ), ButtonMargins -> 3, Evaluator -> None}], Cell[ StyleData["PaletteButton"], StyleMenuListing -> None, ButtonStyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 12, FontWeight -> "Bold", FontColor -> GrayLevel[1], ButtonBoxOptions -> { Active -> True, Background -> RGBColor[0.329412, 0.584314, 0.694118], ButtonMargins -> 6, Evaluator -> "Local"}], Cell[ StyleData["PaletteButton2"], StyleMenuListing -> None, ButtonStyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 12, FontWeight -> "Bold", FontColor -> GrayLevel[1], ButtonBoxOptions -> { Active -> True, Background -> RGBColor[0.537255, 0.72549, 0.843137], ButtonMargins -> 4, Evaluator -> "Local"}]}, Closed]], Cell[ CellGroupData[{ Cell["Outline Styles", "Section"], Cell[ CellGroupData[{ Cell[ StyleData["Outline1"], CellMargins -> {{27, 10}, {7, 7}}, CellGroupingRules -> {"SectionGrouping", 50}, ParagraphIndent -> -38, CounterIncrements -> "Outline1", CounterAssignments -> {{"Outline2", 0}, {"Outline3", 0}, { "Outline4", 0}}, FontSize -> 18, FontWeight -> "Bold", CounterBoxOptions -> {CounterFunction :> CapitalRomanNumeral}], Cell[ StyleData["Outline1", "Presentation"], FontSize -> 27], Cell[ StyleData["Outline1", "Printout"], CounterBoxOptions -> {CounterFunction :> CapitalRomanNumeral}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Outline2"], CellMargins -> {{57, 10}, {6, 6}}, CellGroupingRules -> {"SectionGrouping", 60}, ParagraphIndent -> -27, CounterIncrements -> "Outline2", CounterAssignments -> {{"Outline3", 0}, {"Outline4", 0}}, FontSize -> 15, FontWeight -> "Bold", CounterBoxOptions -> {CounterFunction :> (Part[ CharacterRange["A", "Z"], #]& )}], Cell[ StyleData["Outline2", "Presentation"], FontSize -> 23], Cell[ StyleData["Outline2", "Printout"], CounterBoxOptions -> {CounterFunction :> (Part[ CharacterRange["A", "Z"], #]& )}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Outline3"], CellMargins -> {{87, 10}, {5, 5}}, CellGroupingRules -> {"SectionGrouping", 70}, ParagraphIndent -> -21, CounterIncrements -> "Outline3", CounterAssignments -> {{"Outline4", 0}}, FontSize -> 12, CounterBoxOptions -> {CounterFunction :> Identity}], Cell[ StyleData["Outline3", "Presentation"], FontSize -> 18], Cell[ StyleData["Outline3", "Printout"], CounterBoxOptions -> {CounterFunction :> Identity}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Outline4"], CellMargins -> {{117, 10}, {4, 4}}, CellGroupingRules -> {"SectionGrouping", 80}, ParagraphIndent -> -18, CounterIncrements -> "Outline4", FontSize -> 10, CounterBoxOptions -> {CounterFunction :> (Part[ CharacterRange["a", "z"], #]& )}], Cell[ StyleData["Outline4", "Presentation"], FontSize -> 15], Cell[ StyleData["Outline4", "Printout"]]}, Closed]]}, Closed]], Cell[ CellGroupData[{ Cell["Slide Show Styles", "Section"], Cell[ CellGroupData[{ Cell[ StyleData["SlideShowNavigationBar"], Editable -> False, CellFrame -> True, CellMargins -> {{0, 0}, {3, 3}}, CellElementSpacings -> {"CellMinHeight" -> 0.8125}, CellGroupingRules -> {"SectionGrouping", -5}, CellFrameMargins -> False, CellFrameColor -> GrayLevel[1], CellFrameLabelMargins -> False, TextAlignment -> Center, CounterIncrements -> "SlideShowNavigationBar", StyleMenuListing -> None, FontSize -> 10, Magnification -> 1, Background -> GrayLevel[0.8], GridBoxOptions -> { BaselinePosition -> Center, GridBoxAlignment -> { "Columns" -> { Center, Center, Center, Center, Center, Center, Right, { Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> { "Columns" -> {3.5, 3.5, 3.5, 3.5, 13, 5, {4}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings -> {"Columns" -> { Offset[0.27999999999999997`], { Offset[0.]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.]}, Offset[0.2]}, "RowsIndexed" -> {}}}], Cell[ StyleData["SlideShowNavigationBar", "SlideShow"], Deletable -> False, ShowCellBracket -> False, CellMargins -> {{-1, -1}, {-1, -1}}, PageBreakAbove -> True, CellFrameMargins -> {{1, 1}, {0, 0}}], Cell[ StyleData["SlideShowNavigationBar", "Printout"], CellMargins -> {{18, 4}, {4, 4}}, LineSpacing -> {1, 3}, FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SlideShowSection"], CellFrame -> {{0, 0}, {0, 0.5}}, CellMargins -> {{0, 0}, {10, 0}}, CellGroupingRules -> {"SectionGrouping", 40}, PageBreakBelow -> False, CellFrameMargins -> {{12, 4}, {6, 12}}, InputAutoReplacements -> {"TeX" -> StyleBox[ RowBox[{"T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "LaTeX" -> StyleBox[ RowBox[{"L", StyleBox[ AdjustmentBox[ "A", BoxMargins -> {{-0.36, -0.1}, {0, 0}}, BoxBaselineShift -> -0.2], FontSize -> Smaller], "T", AdjustmentBox[ "E", BoxMargins -> {{-0.075, -0.085}, {0, 0}}, BoxBaselineShift -> 0.5], "X"}]], "mma" -> "Mathematica", "Mma" -> "Mathematica", "MMA" -> "Mathematica", "gridMathematica" -> FormBox[ RowBox[{"grid", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], "webMathematica" -> FormBox[ RowBox[{"web", AdjustmentBox[ StyleBox["Mathematica", FontSlant -> "Italic"], BoxMargins -> {{-0.175, 0}, {0, 0}}]}], TextForm], Inherited}, CounterIncrements -> "Section", CounterAssignments -> {{"Subsection", 0}, {"Subsubsection", 0}}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 18, FontWeight -> "Plain", FontColor -> GrayLevel[1], Background -> RGBColor[0.408011, 0.440726, 0.8]], Cell[ StyleData["SlideShowSection", "Presentation"], FontSize -> 27], Cell[ StyleData["SlideShowSection", "SlideShow"], ShowCellBracket -> False, PageBreakAbove -> True], Cell[ StyleData["SlideShowSection", "Printout"], CellMargins -> {{18, 30}, {0, 30}}, CellFrameMargins -> 5, FontSize -> 14]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SlideHyperlink"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, FontSize -> 26, FontColor -> GrayLevel[0.400015], ButtonBoxOptions -> { Active -> True, ButtonFunction :> (FrontEndExecute[{ FrontEnd`NotebookLocate[#2]}]& ), ButtonMargins -> 0.5, ButtonMinHeight -> 0.85, ButtonNote -> None}], Cell[ StyleData["SlideHyperlink", "SlideShow"]], Cell[ StyleData["SlideHyperlink", "Printout"], FontSize -> 10, FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SlideTOCLink"], CellMargins -> {{24, Inherited}, {Inherited, Inherited}}, StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, FontFamily -> "Helvetica", ButtonBoxOptions -> { Active -> True, ButtonFunction :> (FrontEndExecute[{ FrontEnd`NotebookLocate[#2]}]& ), ButtonMargins -> 1.5, ButtonNote -> ButtonData}], Cell[ StyleData["SlideTOCLink", "SlideShow"]], Cell[ StyleData["SlideTOCLink", "Printout"], FontVariations -> {"Underline" -> False}, FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["SlideTOC"], CellDingbat -> "\[Bullet]", CellMargins -> {{18, Inherited}, {Inherited, Inherited}}, StyleMenuListing -> None, FontFamily -> "Helvetica"], Cell[ StyleData["SlideTOC", "SlideShow"], FontSize -> 14], Cell[ StyleData["SlideTOC", "Printout"], FontSize -> 10, FontColor -> GrayLevel[0]]}, Closed]]}, Closed]], Cell[ CellGroupData[{ Cell["Title Page, Contents, and Index", "Section"], Cell[ CellGroupData[{ Cell[ StyleData["ContentsTitle"], CellMargins -> {{21, 4}, {12, 24}}, FontFamily -> "Helvetica", FontSize -> 24, FontWeight -> "Bold", FontColor -> RGBColor[0.592157, 0.313726, 0.313726]], Cell[ StyleData["ContentsTitle", "Presentation"], FontSize -> 36], Cell[ StyleData["ContentsTitle", "Printout"], CellMargins -> {{12, 0}, {102, 89}}, PageBreakBelow -> False, FontSize -> 30.5, FontColor -> GrayLevel[0]], Cell[ StyleData["ContentsTitle", "EnhancedPrintout"], CellMargins -> {{2, Inherited}, {15, 30}}, PageBreakBelow -> False, FontFamily -> "Frutiger-Bold", FontSize -> 30.5, FontWeight -> "Plain", FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["ContentsSection"], ShowGroupOpener -> True, CellMargins -> {{35, 4}, {3, 18}}, CellGroupingRules -> {"SectionGrouping", 70}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 12, FontWeight -> "Bold"], Cell[ StyleData["ContentsSection", "Presentation"], FontSize -> 18], Cell[ StyleData["ContentsSection", "Printout"], CellMargins -> {{20, 0}, {3, 18}}, PageBreakBelow -> False, FontSize -> 11], Cell[ StyleData["ContentsSection", "EnhancedPrintout"], CellMargins -> {{20, 0}, {3, 18}}, PageBreakBelow -> False, FontFamily -> "Frutiger-Bold", FontSize -> 11, FontWeight -> "Plain"], Cell[ StyleData["ContentsSection", "EnhancedPrintoutNonGray"], CellMargins -> {{20, 0}, {3, 18}}, PageBreakBelow -> False, FontFamily -> "Frutiger-Bold", FontSize -> 11, FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["IndexSection"], CellDingbat -> "\[FilledSquare]", CellMargins -> {{20, 4}, {5, 20}}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 12, FontWeight -> "Bold"], Cell[ StyleData["IndexSection", "Presentation"], FontSize -> 18], Cell[ StyleData["IndexSection", "Printout"], CellMargins -> {{12, 0}, {5, 20}}, PageBreakBelow -> False, FontSize -> 12]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Contents"], ShowGroupOpener -> False, CellMargins -> {{50, 4}, {0, 5}}, CellGroupingRules -> {"SectionGrouping", 90}, StyleMenuListing -> None], Cell[ StyleData["Contents", "Presentation"], FontSize -> 18], Cell[ StyleData["Contents", "Printout"], CellMargins -> {{40, 4}, {0, 5}}, FontSize -> 11], Cell[ StyleData["Contents", "EnhancedPrintout"], CellMargins -> {{40, 5}, {0, 5}}, FontFamily -> "Palatino", FontSize -> 11], Cell[ StyleData["Contents", "EnhancedPrintoutNonGray"], CellMargins -> {{40, 5}, {0, 5}}, FontFamily -> "Palatino", FontSize -> 11]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Index"], CellMargins -> {{21, 4}, {0, 0}}, ParagraphIndent -> -48, StyleMenuListing -> None], Cell[ StyleData["Index", "Presentation"], FontSize -> 18], Cell[ StyleData["Index", "Printout"], CellMargins -> {{13, 0}, {0, 0}}, FontSize -> 9], Cell[ StyleData["Index", "EnhancedPrintout"], CellMargins -> {{13, 0}, {0, 0}}, FontFamily -> "Palatino", FontSize -> 9], Cell[ StyleData["Index", "EnhancedPrintoutNonGray"], CellMargins -> {{13, 0}, {0, 0}}, FontFamily -> "Palatino", FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["IndexSubentry"], CellMargins -> {{36, 4}, {0, 0}}, ParagraphIndent -> -48], Cell[ StyleData["IndexSubentry", "Presentation"], FontSize -> 18], Cell[ StyleData["IndexSubentry", "Printout"], CellMargins -> {{24, 0}, {0, 0}}, FontSize -> 9], Cell[ StyleData["IndexSubentry", "EnhancedPrintout"], CellMargins -> {{24, 0}, {0, 0}}, FontFamily -> "Palatino", FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Index2Column"], CellMargins -> {{21, 4}, {0, 8}}, ParagraphIndent -> -20, TabSpacings -> 1, StyleMenuListing -> None, FontSize -> 10, GridBoxOptions -> { GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize -> {"Columns" -> {{ Scaled[0.5]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}}], Cell[ StyleData["Index2Column", "Presentation"], FontSize -> 15], Cell[ StyleData["Index2Column", "Printout"], CellMargins -> {{2, 2}, {6, 6}}, FontSize -> 8], Cell[ StyleData["Index2Column", "EnhancedPrintout"], CellMargins -> {{2, 2}, {1, 1}}, LineSpacing -> {1, 0.2}, FontFamily -> "Palatino", FontSize -> 8], Cell[ StyleData["Index2Column", "EnhancedPrintoutNonGray"], CellMargins -> {{2, 2}, {1, 1}}, LineSpacing -> {1, 0.2}, FontFamily -> "Palatino", FontSize -> 8]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Leader"], TabFilling -> ".", StyleMenuListing -> None, FontFamily -> "Times", FontSize -> 12, FontWeight -> "Plain"], Cell[ StyleData["Leader", "Printout"], FontSize -> 10], Cell[ StyleData["Leader", "EnhancedPrintout"], FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["LeaderNoDots"], TabFilling -> " ", StyleMenuListing -> None, FontFamily -> "Times", FontSize -> 12, FontWeight -> "Plain"], Cell[ StyleData["LeaderNoDots", "Printout"], FontSize -> 10], Cell[ StyleData["LeaderNoDots", "EnhancedPrintout"], FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PageLink"], StyleMenuListing -> None, ButtonStyleMenuListing -> Automatic, FontColor -> RGBColor[0.269993, 0.308507, 0.6], ButtonBoxOptions -> { Active -> True, Appearance -> {Automatic, None}, ButtonFunction :> (FrontEndExecute[{ FrontEnd`NotebookLocate[#2]}]& )}], Cell[ StyleData["PageLink", "Printout"], FontColor -> GrayLevel[0]], Cell[ StyleData["PageLink", "EnhancedPrintout"], FontColor -> GrayLevel[0]]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TOCPage"], CellSize -> {22, Inherited}, TextAlignment -> Right, StyleMenuListing -> None, FontSize -> 12, FontWeight -> "Plain"], Cell[ StyleData["TOCPage", "Presentation"], FontSize -> 18], Cell[ StyleData["TOCPage", "Printout"], FontSize -> 10], Cell[ StyleData["TOCPage", "EnhancedPrintout"], FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TOCTitle"], CellMargins -> {{20, 0}, {1, 8}}, CellGroupingRules -> {"SectionGrouping", 70}, TabSpacings -> 46, CounterIncrements -> "TOCTitle", CounterAssignments -> {{"TOCSection", 0}}, FontFamily -> "Helvetica", FontSize -> 12, FontWeight -> "Bold"], Cell[ StyleData["TOCTitle", "Presentation"], FontSize -> 18], Cell[ StyleData["TOCTitle", "Printout"], CellMargins -> {{12, 0}, {1, 8}}, PageBreakBelow -> False, TabSpacings -> 47.4, FontSize -> 11], Cell[ StyleData["TOCTitle", "EnhancedPrintout"], CellMargins -> {{2, 0}, {2, 10}}, PageBreakBelow -> False, TabSpacings -> 49.3, FontFamily -> "Frutiger-Bold", FontSize -> 10, FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TOCSection"], CellMargins -> {{48, 0}, {1, 1}}, CellGroupingRules -> {"SectionGrouping", 75}, TabSpacings -> 42.9, CounterIncrements -> "TOCSection", CounterAssignments -> {{"TOCSubsection", 0}}, FontFamily -> "Helvetica", FontSize -> 12], Cell[ StyleData["TOCSection", "Presentation"], FontSize -> 18], Cell[ StyleData["TOCSection", "Printout"], CellMargins -> {{30, 0}, {1, 1}}, PageBreakBelow -> False, FontSize -> 12], Cell[ StyleData["TOCSection", "EnhancedPrintout"], CellMargins -> {{26, 0}, {1, 3}}, PageBreakBelow -> False, TabSpacings -> 46.45, FontFamily -> "Frutiger-Roman", FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TOCSubsection"], CellMargins -> {{76, 0}, {1, 1}}, CellGroupingRules -> {"SectionGrouping", 80}, TabSpacings -> 39.8, CounterIncrements -> "TOCSubsection", CounterAssignments -> {{"TOCSubsubsection", 0}}, FontSize -> 12], Cell[ StyleData["TOCSubsection", "Presentation"], FontSize -> 18], Cell[ StyleData["TOCSubsection", "Printout"], CellMargins -> {{70, 0}, {1, 1}}, PageBreakBelow -> False, FontSize -> 10], Cell[ StyleData["TOCSubsection", "EnhancedPrintout"], CellMargins -> {{38, 0}, {1, 1}}, PageBreakBelow -> False, TabSpacings -> 45.15, FontFamily -> "Palatino", FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TOCSubsubsection"], CellMargins -> {{104, 0}, {1, 1}}, CellGroupingRules -> {"SectionGrouping", 85}, TabSpacings -> 36.7, CounterIncrements -> "TOCSubsubsection", FontSize -> 12], Cell[ StyleData["TOCSubsubsection", "Presentation"], FontSize -> 18], Cell[ StyleData["TOCSubsubsection", "Printout"], CellMargins -> {{96, 0}, {1, 1}}, PageBreakBelow -> False, FontSize -> 9], Cell[ StyleData["TOCSubsubsection", "EnhancedPrintout"], CellMargins -> {{96, 0}, {1, 1}}, PageBreakBelow -> False, FontFamily -> "Palatino", FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TOCTitleDingbat"], CellSize -> {34, Inherited}, TextAlignment -> Right], Cell[ StyleData["TOCTitleDingbat", "EnhancedPrintout"], FontFamily -> "Frutiger-Roman", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TOCSectionDingbat"], CellSize -> {38, Inherited}, TextAlignment -> Right], Cell[ StyleData["TOCSectionDingbat", "EnhancedPrintout"], FontFamily -> "Frutiger-Roman", FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TOCSubsectionDingbat"], CellSize -> {54, Inherited}, TextAlignment -> Right], Cell[ StyleData["TOCSubsectionDingbat", "EnhancedPrintout"], FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TOCTitleCondensed"], CellMargins -> {{20, 0}, {1, 8}}, CellGroupingRules -> {"SectionGrouping", 70}, TabSpacings -> 50.4, CounterIncrements -> "TOCTitleCondensed", CounterAssignments -> {{"TOCSectionCondensed", 0}, { "TOCSubsectionCondensed", 0}}, FontFamily -> "Helvetica", FontSize -> 12, FontWeight -> "Bold"], Cell[ StyleData["TOCTitleCondensed", "Presentation"], FontSize -> 18], Cell[ StyleData["TOCTitleCondensed", "Printout"], CellMargins -> {{12, 0}, {1, 8}}, PageBreakBelow -> False, FontSize -> 11], Cell[ StyleData["TOCTitleCondensed", "EnhancedPrintout"], CellMargins -> {{12, 0}, {1, 8}}, PageBreakBelow -> False, FontFamily -> "Frutiger-Bold", FontSize -> 11, FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TOCSectionCondensed"], CellMargins -> {{48, 0}, {1, 1}}, CellGroupingRules -> {"SectionGrouping", 75}, TabSpacings -> 47.4, CounterIncrements -> "TOCSectionCondensed", CounterAssignments -> {{"TOCSubsection", 0}}, FontFamily -> "Helvetica", FontSize -> 10, FontWeight -> "Bold", FontColor -> GrayLevel[0.2]], Cell[ StyleData["TOCSectionCondensed", "Presentation"], FontSize -> 15], Cell[ StyleData["TOCSectionCondensed", "Printout"], CellMargins -> {{36, 0}, {1, 1}}, PageBreakBelow -> False, FontSize -> 11], Cell[ StyleData["TOCSectionCondensed", "EnhancedPrintout"], CellMargins -> {{36, 0}, {1, 1}}, PageBreakBelow -> False, FontFamily -> "Palatino", FontSize -> 11]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TOCSubsectionCondensed"], PageWidth -> 470, CellMargins -> {{76, 0}, {1, 1}}, CellGroupingRules -> {"SectionGrouping", 80}, TextJustification -> 1, FontSize -> 12], Cell[ StyleData["TOCSubsectionCondensed", "Presentation"], FontSize -> 18], Cell[ StyleData["TOCSubsectionCondensed", "Printout"], CellMargins -> {{72, 0}, {1, 1}}, PageBreakBelow -> False, Hyphenation -> True, FontSize -> 10], Cell[ StyleData["TOCSubsectionCondensed", "EnhancedPrintout"], CellMargins -> {{72, 0}, {1, 1}}, PageBreakBelow -> False, Hyphenation -> True, FontFamily -> "Palatino", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TOCSubsubsectionCondensed"], CellMargins -> {{104, 0}, {1, 1}}, CellGroupingRules -> {"SectionGrouping", 85}, TabSpacings -> 39.3, CounterIncrements -> "TOCSubsubsectionCondensed", FontSize -> 12], Cell[ StyleData["TOCSubsubsectionCondensed", "Presentation"], FontSize -> 18], Cell[ StyleData["TOCSubsubsectionCondensed", "Printout"], CellMargins -> {{96, 0}, {1, 1}}, PageBreakBelow -> False, FontSize -> 9], Cell[ StyleData["TOCSubsubsectionCondensed", "EnhancedPrintout"], CellMargins -> {{96, 0}, {1, 1}}, PageBreakBelow -> False, FontFamily -> "Palatino", FontSize -> 9]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TitlePageGraphic"], CellMargins -> {{0, 0}, {100, 20}}, Evaluatable -> False, PageBreakBelow -> False, TextAlignment -> Center], Cell[ StyleData["TitlePageGraphic", "Presentation"], FontSize -> 18], Cell[ StyleData["TitlePageGraphic", "Printout"], CellMargins -> {{0, 0}, {230, 88}}], Cell[ StyleData["TitlePageGraphic", "EnhancedPrintout"], CellMargins -> {{0, 0}, {230, 88}}]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["TitlePageLogo"], CellMargins -> {{0, 0}, {0, 0}}], Cell[ StyleData["TitlePageLogo", "Presentation"], FontSize -> 18], Cell[ StyleData["TitlePageLogo", "Printout"]], Cell[ StyleData["TitlePageLogo", "EnhancedPrintout"]]}, Closed]]}, Closed]], Cell[ CellGroupData[{ Cell["Horizontal Lines", "Section"], Cell[ CellGroupData[{ Cell[ StyleData["Line1"], CellFrame -> {{0, 0}, {0, 0.5}}, CellMargins -> {{10, 4}, {-16, 9}}, StyleMenuListing -> None, FontSize -> 2], Cell[ StyleData["Line1", "Presentation"], FontSize -> 3], Cell[ StyleData["Line1", "Printout"], CellMargins -> {{2, 0}, {-16, 9}}]}, Closed]], Cell["\nThe item above is horizontal 0.5 pt line", "Text"], Cell[ CellGroupData[{ Cell[ StyleData["ProgramTop"], CellFrame -> {{0.5, 0.5}, {0, 0.5}}, CellMargins -> {{27, 4}, {-18, 18}}, LineSpacing -> {1, -4}, StyleMenuListing -> None, FontSize -> 4], Cell[ StyleData["ProgramTop", "Presentation"], FontSize -> 6], Cell[ StyleData["ProgramTop", "Printout"], CellMargins -> {{2, 0}, {-18, 18}}]}, Closed]], Cell["\nThe item above is a ProgramTop line\n", "Text"], Cell[ CellGroupData[{ Cell[ StyleData["ProgramBottom"], CellFrame -> {{0.5, 0.5}, {0.5, 0}}, CellMargins -> {{27, 4}, {-10, -2}}, LineSpacing -> {1, -4}, StyleMenuListing -> None, FontSize -> 4], Cell[ StyleData["ProgramBottom", "Presentation"], FontSize -> 6], Cell[ StyleData["ProgramBottom", "Printout"], CellMargins -> {{2, 0}, {-10, -2}}]}, Closed]], Cell["\nThe item above is a ProgramBottom line\n", "Text"], Cell[ CellGroupData[{ Cell[ StyleData["SessionLabel"], CellFrame -> {{0.5, 0}, {0, 0.5}}, CellMargins -> {{27, 4}, {-4, 18}}, LineSpacing -> {1, 0}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 9], Cell[ StyleData["SessionLabel", "Presentation"], FontSize -> 14], Cell[ StyleData["SessionLabel", "Printout"], CellMargins -> {{2, 0}, {-4, 18}}, FontSize -> 7]}, Closed]]}, Closed]], Cell[ CellGroupData[{ Cell["Page Headers and Footers", "Section"], Cell[ CellGroupData[{ Cell[ StyleData["PageHeader"], CellMargins -> {{0, 0}, {2, 0}}, StyleMenuListing -> None, FontSize -> 8, FontSlant -> "Italic"], Cell[ StyleData["PageHeader", "Printout"]], Cell[ StyleData["PageHeader", "EnhancedPrintout"], FontFamily -> "Frutiger-Roman"], Cell[ StyleData["PageHeader", "EnhancedPrintoutNonGray"], FontFamily -> "Frutiger-Roman"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PageNumber"], CellMargins -> {{0, 0}, {2, 0}}, StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 8, FontWeight -> "Bold"], Cell[ StyleData["PageNumber", "Printout"]], Cell[ StyleData["PageNumber", "EnhancedPrintout"], FontFamily -> "Frutiger-Bold", FontWeight -> "Plain"], Cell[ StyleData["PageNumber", "EnhancedPrintoutNonGray"], FontFamily -> "Frutiger-Bold", FontWeight -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["PageFooter"], StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 6], Cell[ StyleData["PageFooter", "Printout"]], Cell[ StyleData["PageFooter", "EnhancedPrintout"], FontFamily -> "Frutiger-Roman"], Cell[ StyleData["PageFooter", "EnhancedPrintoutNonGray"], FontFamily -> "Frutiger-Roman"]}, Closed]], Cell[ CellGroupData[{ Cell["For compatibility", "Subsection"], Cell[ CellGroupData[{ Cell[ StyleData["Header"], CellMargins -> {{0, 0}, {2, 0}}, StyleMenuListing -> None, FontSize -> 8, FontSlant -> "Italic"], Cell[ StyleData["Header", "Printout"]], Cell[ StyleData["Header", "EnhancedPrintout"], FontFamily -> "Frutiger-Roman", FontSlant -> "Plain"], Cell[ StyleData["Header", "EnhancedPrintoutNonGray"], FontFamily -> "Frutiger-Roman", FontSlant -> "Plain"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["Footer"], StyleMenuListing -> None, FontFamily -> "Helvetica", FontSize -> 6], Cell[ StyleData["Footer", "Printout"]], Cell[ StyleData["Footer", "EnhancedPrintout"], FontFamily -> "Frutiger-Roman"], Cell[ StyleData["Footer", "EnhancedPrintoutNonGray"], FontFamily -> "Frutiger-Roman"]}, Closed]]}, Closed]]}, Closed]], Cell[ CellGroupData[{ Cell["FormatType Styles", "Section"], Cell[ "The cells below define styles that are mixed in with the styles of \ most cells. If a cell's FormatType matches the name of one of the styles \ defined below, then that style is applied between the cell's style and its \ own options. This is particularly true of Input and Output.", "Text"], Cell[ CellGroupData[{ Cell[ StyleData["CellExpression"], PageWidth -> Infinity, CellMargins -> {{6, Inherited}, {Inherited, Inherited}}, ShowCellLabel -> False, ShowSpecialCharacters -> False, AllowInlineCells -> False, Hyphenation -> False, AutoItalicWords -> {}, StyleMenuListing -> None, FontFamily -> "Courier", FontSize -> 12, Background -> GrayLevel[1]], Cell[ StyleData["CellExpression", "EnhancedPrintout"], FontFamily -> "Courier Std", FontSize -> 10], Cell[ StyleData["CellExpression", "EnhancedPrintoutNonGray"], FontFamily -> "Courier Std", FontSize -> 10]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["InputForm"], InputAutoReplacements -> {}, AllowInlineCells -> False, Hyphenation -> False, StyleMenuListing -> None, FontFamily -> "Courier"], Cell[ StyleData["InputForm", "EnhancedPrintout"], FontFamily -> "Courier Std"], Cell[ StyleData["InputForm", "EnhancedPrintoutNonGray"], FontFamily -> "Courier Std"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["OutputForm"], PageWidth -> Infinity, TextAlignment -> Left, LineSpacing -> {0.6, 1}, StyleMenuListing -> None, FontFamily -> "Courier"], Cell[ StyleData["OutputForm", "EnhancedPrintout"], FontFamily -> "Courier Std"], Cell[ StyleData["OutputForm", "EnhancedPrintoutNonGray"], FontFamily -> "Courier Std"]}, Closed]], Cell[ CellGroupData[{ Cell[ StyleData["StandardForm"], InputAutoReplacements -> { "->" -> "\[Rule]", ":>" -> "\[RuleDelayed]", "<=" -> "\[LessEqual]", ">=" -> "\[GreaterEqual]", "!=" -> "\[NotEqual]", "==" -> "\[Equal]", Inherited}, "TwoByteSyntaxCharacterAutoReplacement" -> True, LineSpacing -> {1.25, 0}, StyleMenuListing -> None, FontFamily -> "Courier"], Cell[ StyleData["StandardForm", "EnhancedPrintout"], FontFamily -> "Courier Std"], Cell[ StyleData["StandardForm", "EnhancedPrintoutNonGray"], FontFamily -> "Courier Std"]}, Closed]]}, Closed]], Cell[ CellGroupData[{ Cell["Automatic Styles", "Section"], Cell[ "The cells below define styles that are used to affect the display \ of certain types of objects in typeset expressions. For example, \ \"UnmatchedBracket\" style defines how unmatched bracket, curly bracket, and \ parenthesis characters are displayed (typically by coloring them to make them \ stand out).", "Text"], Cell[ StyleData["UnmatchedBracket"], StyleMenuListing -> None]}, Closed]]}, Open]]}, Visible -> False, FrontEndVersion -> "8.0 for Microsoft Windows (64-bit) (November 13, 2010)", StyleDefinitions -> "Default.nb"] ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{ "SlideShowHeader"->{ Cell[567, 22, 1321, 38, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[4020, 121, 1321, 38, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[8167, 279, 1321, 38, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[27029, 801, 1321, 38, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[29803, 902, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[60514, 1714, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[72707, 1986, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[102978, 2692, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[145141, 3755, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[161911, 4181, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[165643, 4291, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[214662, 5467, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[219522, 5649, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[223637, 5781, 1321, 38, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[229496, 5954, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[244982, 6300, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[249657, 6453, 1321, 38, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"]}, "LastSlide"->{ Cell[28375, 843, 77, 1, 49, "Section", CellTags->"LastSlide"]} } *) (*CellTagsIndex CellTagsIndex->{ {"SlideShowHeader", 611318, 13847}, {"LastSlide", 612916, 13882} } *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[567, 22, 1321, 38, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[1913, 64, 600, 11, 101, "Section"], Cell[2516, 77, 84, 1, 24, "Text"], Cell[2603, 80, 329, 6, 35, "Text"], Cell[2935, 88, 346, 5, 35, "Text"], Cell[3284, 95, 286, 5, 35, "Text"], Cell[3573, 102, 300, 5, 35, "Text"], Cell[3876, 109, 95, 6, 99, "Text"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[4020, 121, 1321, 38, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[5366, 163, 153, 4, 49, "Section"], Cell[5522, 169, 670, 15, 125, "Text"], Cell[6195, 186, 315, 7, 66, "Text"], Cell[6513, 195, 66, 3, 49, "Text"], Cell[CellGroupData[{ Cell[6604, 202, 105, 3, 34, "Input"], Cell[6712, 207, 96, 2, 33, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[6845, 214, 103, 3, 34, "Input"], Cell[6951, 219, 95, 2, 33, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[7083, 226, 220, 7, 34, "Input"], Cell[7306, 235, 143, 4, 53, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[7486, 244, 199, 6, 34, "Input"], Cell[7688, 252, 242, 7, 33, "Output"] }, Open ]], Cell[7945, 262, 95, 4, 49, "Text"], Cell[CellGroupData[{ Cell[8065, 270, 22, 0, 31, "Subsection"], Cell[8090, 272, 16, 0, 24, "Text"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[8167, 279, 1321, 38, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[9513, 321, 65, 1, 49, "Section"], Cell[9581, 324, 306, 5, 41, "Text"], Cell[9890, 331, 16, 0, 24, "Text"], Cell[CellGroupData[{ Cell[9931, 335, 16213, 438, 1272, "Input"], Cell[26147, 775, 648, 13, 43, "Message"], Cell[26798, 790, 141, 2, 27, "Print"] }, Open ]], Cell[26954, 795, 26, 0, 34, "Input"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[27029, 801, 1321, 38, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[28375, 843, 77, 1, 49, "Section", CellTags->"LastSlide"], Cell[28455, 846, 313, 9, 41, "Text"], Cell[28771, 857, 133, 3, 34, "Input"], Cell[28907, 862, 38, 0, 24, "Text"], Cell[CellGroupData[{ Cell[28970, 866, 132, 4, 34, "Input"], Cell[29105, 872, 151, 3, 33, "Output"] }, Open ]], Cell[29271, 878, 96, 2, 24, "Text"], Cell[CellGroupData[{ Cell[29392, 884, 126, 4, 34, "Input"], Cell[29521, 890, 150, 3, 33, "Output"] }, Open ]], Cell[29686, 896, 68, 0, 24, "Text"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[29803, 902, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[31118, 943, 48, 0, 49, "Section"], Cell[31169, 945, 74, 0, 24, "Text"], Cell[CellGroupData[{ Cell[31268, 949, 89, 2, 34, "Input"], Cell[31360, 953, 14440, 371, 119, "Output"] }, Open ]], Cell[45815, 1327, 75, 0, 24, "Text"], Cell[CellGroupData[{ Cell[45915, 1331, 89, 2, 34, "Input"], Cell[46007, 1335, 14446, 372, 119, "Output"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[60514, 1714, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[61829, 1755, 52, 0, 49, "Section"], Cell[61884, 1757, 186, 4, 41, "Text"], Cell[CellGroupData[{ Cell[62095, 1765, 121, 3, 34, "Input"], Cell[62219, 1770, 9895, 197, 236, "Output"] }, Open ]], Cell[72129, 1970, 529, 10, 76, "Text"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[72707, 1986, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[74022, 2027, 52, 0, 49, "Section"], Cell[74077, 2029, 118, 3, 24, "Text"], Cell[CellGroupData[{ Cell[74220, 2036, 109, 2, 34, "Input"], Cell[74332, 2040, 14386, 370, 119, "Output"] }, Open ]], Cell[88733, 2413, 164, 3, 24, "Text"], Cell[CellGroupData[{ Cell[88922, 2420, 109, 2, 34, "Input"], Cell[89034, 2424, 13883, 261, 236, 10023, 195, "CachedBoxData", "BoxData", \ "Output"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[102978, 2692, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[104293, 2733, 90, 2, 49, "Section"], Cell[104386, 2737, 43, 0, 24, "Text"], Cell[CellGroupData[{ Cell[104454, 2741, 128, 3, 34, "Input"], Cell[104585, 2746, 145, 2, 33, "Output"] }, Open ]], Cell[104745, 2751, 160, 4, 38, "Text"], Cell[CellGroupData[{ Cell[104930, 2759, 109, 2, 34, "Input"], Cell[105042, 2763, 10127, 197, 236, "Output"] }, Open ]], Cell[115184, 2963, 280, 11, 25, "Text"], Cell[CellGroupData[{ Cell[115489, 2978, 89, 2, 34, "Input"], Cell[115581, 2982, 14648, 374, 119, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[130266, 3361, 109, 2, 34, "Input"], Cell[130378, 3365, 14388, 370, 119, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[144803, 3740, 127, 4, 34, "Input"], Cell[144933, 3746, 147, 2, 33, "Output"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[145141, 3755, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[146456, 3796, 169, 7, 49, "Section"], Cell[146628, 3805, 581, 17, 41, "Text"], Cell[CellGroupData[{ Cell[147234, 3826, 128, 3, 34, "Input"], Cell[147365, 3831, 145, 2, 33, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[147547, 3838, 204, 5, 55, "Input"], Cell[147754, 3845, 97, 2, 33, "Output"], Cell[147854, 3849, 155, 3, 33, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[148046, 3857, 121, 3, 34, "Input"], Cell[148170, 3862, 10863, 215, 236, "Output"] }, Open ]], Cell[159048, 4080, 504, 19, 29, "Text"], Cell[CellGroupData[{ Cell[159577, 4103, 116, 3, 34, "Input"], Cell[159696, 4108, 145, 2, 33, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[159878, 4115, 177, 5, 23, "SubsubsectionIcon"], Cell[160058, 4122, 960, 31, 86, "Text"], Cell[CellGroupData[{ Cell[161043, 4157, 120, 3, 34, "Input"], Cell[161166, 4162, 672, 11, 33, "Output"] }, Open ]] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[161911, 4181, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[163226, 4222, 251, 8, 49, "Section"], Cell[163480, 4232, 421, 11, 41, "Text"], Cell[163904, 4245, 935, 19, 195, "Input"], Cell[CellGroupData[{ Cell[164864, 4268, 140, 4, 34, "Input"], Cell[165007, 4274, 556, 8, 110, "Output"] }, Open ]], Cell[165578, 4285, 16, 0, 24, "Text"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[165643, 4291, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[166958, 4332, 256, 9, 49, "Section"], Cell[167217, 4343, 101, 2, 24, "Text"], Cell[167321, 4347, 788, 15, 155, "Input"], Cell[168112, 4364, 47, 0, 24, "Text"], Cell[CellGroupData[{ Cell[168184, 4368, 89, 2, 34, "Input"], Cell[168276, 4372, 16677, 421, 145, "Output"] }, Open ]], Cell[184968, 4796, 58, 0, 24, "Text"], Cell[CellGroupData[{ Cell[185051, 4800, 109, 2, 34, "Input"], Cell[185163, 4804, 14460, 371, 119, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[199660, 5180, 110, 2, 34, "Input"], Cell[199773, 5184, 14828, 276, 236, 10780, 207, "CachedBoxData", "BoxData", \ "Output"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[214662, 5467, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[215977, 5508, 259, 9, 49, "Section"], Cell[216239, 5519, 465, 12, 58, "Text"], Cell[216707, 5533, 1000, 37, 116, "Text"], Cell[217710, 5572, 514, 22, 49, "Text"], Cell[218227, 5596, 1111, 42, 109, "Text"], Cell[219341, 5640, 132, 3, 24, "Text"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[219522, 5649, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[220837, 5690, 263, 9, 49, "Section"], Cell[221103, 5701, 305, 11, 24, "Text"], Cell[CellGroupData[{ Cell[221433, 5716, 946, 26, 55, "Input"], Cell[222382, 5744, 194, 4, 33, "Output"], Cell[222579, 5750, 195, 4, 33, "Output"] }, Open ]], Cell[222789, 5757, 55, 0, 24, "Text"], Cell[CellGroupData[{ Cell[222869, 5761, 123, 3, 34, "Input"], Cell[222995, 5766, 581, 8, 110, "Output"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[223637, 5781, 1321, 38, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[224983, 5823, 53, 1, 49, "Section"], Cell[225039, 5826, 2489, 59, 226, "Text"], Cell[CellGroupData[{ Cell[227553, 5889, 256, 7, 55, "Input"], Cell[227812, 5898, 124, 2, 33, "Output"] }, Open ]], Cell[227951, 5903, 254, 6, 42, "Text"], Cell[CellGroupData[{ Cell[228230, 5913, 224, 7, 34, "Input"], Cell[228457, 5922, 978, 25, 75, "Output"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[229496, 5954, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[230811, 5995, 34, 0, 49, "Section"], Cell[230848, 5997, 112, 3, 24, "Text"], Cell[CellGroupData[{ Cell[230985, 6004, 138, 4, 34, "Input"], Cell[231126, 6010, 126, 2, 33, "Output"] }, Open ]], Cell[231267, 6015, 276, 7, 42, "Text"], Cell[CellGroupData[{ Cell[231568, 6026, 84, 1, 55, "Input"], Cell[231655, 6029, 128, 2, 33, "Output"], Cell[231786, 6033, 128, 2, 33, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[231951, 6040, 122, 3, 34, "Input"], Cell[232076, 6045, 12845, 248, 236, 9743, 195, "CachedBoxData", "BoxData", \ "Output"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[244982, 6300, 1290, 37, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[246297, 6341, 44, 0, 49, "Section"], Cell[246344, 6343, 728, 17, 75, "Text"], Cell[CellGroupData[{ Cell[247097, 6364, 143, 3, 34, "Input"], Cell[247243, 6369, 126, 2, 33, "Output"] }, Open ]], Cell[247384, 6374, 133, 3, 24, "Text"], Cell[CellGroupData[{ Cell[247542, 6381, 345, 10, 34, "Input"], Cell[247890, 6393, 244, 10, 36, "Output"] }, Open ]], Cell[248149, 6406, 237, 4, 41, "Text"], Cell[248389, 6412, 537, 8, 75, "Text"], Cell[248929, 6422, 133, 3, 24, "Text"], Cell[249065, 6427, 167, 5, 25, "Text"], Cell[CellGroupData[{ Cell[249257, 6436, 208, 6, 34, "Input"], Cell[249468, 6444, 128, 2, 33, "Output"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[249657, 6453, 1321, 38, 31, "SlideShowNavigationBar", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[251003, 6495, 126, 3, 49, "Section"], Cell[251132, 6500, 225, 4, 41, "Text"], Cell[CellGroupData[{ Cell[251382, 6508, 156, 3, 34, "Input"], Cell[251541, 6513, 134, 2, 33, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[251712, 6520, 233, 7, 34, "Input"], Cell[251948, 6529, 1131, 26, 60, "Output"] }, Open ]], Cell[CellGroupData[{ Cell[253116, 6560, 182, 4, 34, "Input"], Cell[253301, 6566, 162, 2, 33, "Output"] }, Open ]], Cell[253478, 6571, 74, 0, 24, "Text"], Cell[CellGroupData[{ Cell[253577, 6575, 286, 5, 34, "Input"], Cell[253866, 6582, 240, 4, 33, "Output"] }, Open ]], Cell[254121, 6589, 207, 4, 41, "Text"], Cell[CellGroupData[{ Cell[254353, 6597, 311, 9, 34, "Input"], Cell[254667, 6608, 347, 12, 36, "Output"] }, Open ]], Cell[255029, 6623, 293, 5, 24, "Text"], Cell[CellGroupData[{ Cell[255347, 6632, 157, 4, 34, "Input"], Cell[255507, 6638, 140, 2, 33, "Output"] }, Open ]] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)