(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 11.2' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 48950, 1120] NotebookOptionsPosition[ 40907, 968] NotebookOutlinePosition[ 42834, 1010] CellTagsIndexPosition[ 42756, 1005] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell[BoxData[ TogglerBox[2, {1-> OverlayBox[{ TagBox[GridBox[{ { GraphicsBox[RasterBox[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAKiEGSLED8//9/gvjRo0fsN27cELp69arY+fPnpZExPn137tzhBqrRBGJ/ ID4CxMfRMTZ9L168YL5w4YIaUD4AiC8C8Qcg/gvE/9AxFreC7PQD4gtA/BGq 7j8ujKz3+fPnLFC9b6H24dSHTf/FixfVofYSpRdZPzSsAqBuJkovsn5oOF8k 5F9s+h88eMBBjt0w/devXxcGso+S4m9k/ZcuXRKHpgeS3A7TD0wrkpToPw9J ywOmn1L3Uxp+lMYfpemH0vRLjfwDjQey8y9a+fGOWDPwlF+gsPhEKDywlZ8g d0D9EniexPITGd++fZv3PBnlN6764zxa3QHCAIDESDs= "], {{0, 26}, {16, 0}}, {0, 255}, ColorFunction->RGBColor], BaseStyle->"ImageGraphics", ImageSize->Magnification[1], ImageSizeRaw->{16, 26}, PlotRange->{{0, 16}, {0, 26}}], GraphicsBox[RasterBox[CompressedData[" 1:eJzt2V1vVFUUBuBGTfTSSygthYYKNHyVinrrpbcYfwBEJN5gUkyMfw9KKaVw KCkQKCW1RNIQKg1gEE3QtdN10pMRZCaBzNQ+kzxt5nzstfeZfbPOu/vkD8e/ e6+vr+/sR/Hn+ImfvpyYOPHz1x/Hl2/OnP3+9JlT33515sdTp09NfHHy/TjY H6592Nf3QfyvqmpHBwbCYNr5GoMNAw2d1AEAADa3/obtLba1aJ7rb4xR9x1D YVfYHYbDnjASPgn7wv4wGg6Eg+FQOByOhLEwnj4Nx8Jn6fM21dcfyzHq8cay xuGseTDnMJpz2pdzHMk5D+caduWa6v6p+czafU71s6p1+/cGAADYqt52/9va ++6tXt331j3v0TTeoj5e966v6lv3Vv/uWfWr9LJm9tzMpN+UW3eaVV9s00yY CzfC7bAQFhvuhjt57maYD9er9c+VcDlcCtMd1AQAADafqXQhTabz6VyL+vhk Xl/uLX1D6UFmw9VwrVrvL0o/cqta7ztKD3Iv/BLuh1/DSngYHoXfwlp4Ep6F 38Pz8Ed4Ef5Mf71Gff5F3vM8x3iWY65ljUdZcyXncD/ndC/neDvnfCPXcC3X NJtrnG48r3afU/2s6uc11QO/OwAAwFbzLvrfksWVjK30kSV3KxncUlgOD6qN vnc1PK42+t7iaaq/r+U1q9VG3/ogx1rKse9krfmsrV+l15R9WDLmkjWXzLl8 yvuVsmdLJl3eu5R9XN7BNLPrhTxX3seUvT3TQc2Xbfr7LWq3JgAAwH95m33K u9Dt5wMAAMDmp2dlK+vGnu/2+yQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAYPN42aZu 1AQAAAAAAICtrNsZIXRTN/b8xTbNhLlwI9wOC2Gx4W64k+duhvlwvVr/XAmX w6Uw3UFNAAAAAAAA6EVT6UKaTOfTuRb18cm8vtxbcrOSwc2Gq9V6FlcytlvV eu5WMrilsBwehJXwMKyGx2EtPElPU/19La9ZzXtWcozlHHMxa9zKmnM5h9mc 03Rjfe2uq15bvb6pHvid2NzKPiwZc8maS+ZcPiWDLnu2ZNIlmy77uGTVzex6 Ic+VbLvs7ZkOau7owEAYTDtfY7BhoKGTOgAAAAAAANDr+hu2t9jWonmuvzFG nbsNhd1hOOwJI2Fv2B9Gw4FwMBwKR8JYOJrGW9THx/LaQ3nvgRxrf449krWG s/ZQtZH3NdfY7rrqtdW6/fvw/9LMnpuZ9Jty646y6n8AhCP7tg== "], {{0, 26}, { 2000, 0}}, {0, 255}, ColorFunction->RGBColor], BaseStyle->"ImageGraphics", ImageSize->Magnification[1], ImageSizeRaw->{2000, 26}, PlotRange->{{0, 2000}, {0, 26}}], GraphicsBox[RasterBox[CompressedData[" 1:eJy9lktLQkEUxyVdCBIELaxctYq+QduWbcKMPoCSRRsDC6JPp+Lj4vuq+EBc iBtFfIYrpU7nPzQiN++9vmrgp/dx5j8z55w5c099z56HPYvF8mLnH4/37TIY 9L7fHvDNXeDl6THgv78KvPof/cELn5UfnjBHjI3J5/OudVBV9bhUKjmbzaad iCxmcB9lAxKMmzmv1+v7JvpfG/DJjJkic8NrOut0OlYdfdoCjPXBqMx1q9Vy 7FhfgvX0MUa73bYZ6edyuTnrvPsZQ4Wv9PTRL5vNroTOGIiJu9FoOLT6UjuT yVAqlaJkMin+0+m0YPEZbHTGQDwKyKtl+ugHjdFoRIVCgeLxOCUSCQGua7Ua 9Xo9YQNbozXI/aHVZ//RcDik2WxG5XKZwuGwANdo0JfrNIhDvFqtHi7zD+YW i8VoMBgIvWKxKEDrdrtiHbAxiAF8pHAf5zJ9+Bca0WiUxuMxydbv98U64CvY wNZgTyioI9r8QR/EEvrQUhRlrh8Kheb6sDHTZ1xG84ePMP/pdPpr/tvoL/of Mcb9Jv7X+mcxP2X+QCMSiYh5VyoVMQbXMbP81I2vzM/JZCLyX+a+BPmPvbFN fmr36pr713B/rVp7THy/tD6Y1cjF5zrahvVtB5jW5y21B/kVzpc1kecjfK53 Pu7kfNfO+x+/T/70++ob7NUEtQ== "], {{0, 26}, {24, 0}}, {0, 255}, ColorFunction->RGBColor], BaseStyle->"ImageGraphics", ImageSize->Magnification[1], ImageSizeRaw->{24, 26}, PlotRange->{{0, 24}, {0, 26}}]} }, AutoDelete->False, GridBoxItemSize->{"Columns" -> {Automatic, Scaled[0.6], Automatic}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], "Grid"], PaneBox[ StyleBox[ RowBox[{ "Background", " ", "images", " ", "and", " ", "text", " ", "colors", " ", "have", " ", "been", " ", "adjusted", " ", "for", " ", "editing", " ", RowBox[{"purposes", "."}]}], LineBreakWithin->False, FontFamily->"Helvetica", FontSize->12, FontColor->GrayLevel[0.4]], Alignment->Center, ImageSize->Scaled[0.5], ScrollPosition->{0., 0.}]}, Alignment->{Center, Center}], 2->""}, "1"]], "SlideShowNavigationBar", \ "FirstSlide", CellMargins->{{0, 0}, {0, 0}}, CellFrameLabelMargins->2, CellSize->{Inherited, 30}, TextAlignment->Center, CellTags-> "SlideShowHeader",ExpressionUUID->"2bf1b32a-14c4-414a-8408-773c19515b64"], Cell["\<\ What\[CloseCurlyQuote]s New in the World of Cloud Notebooks\ \>", "Title", CellChangeTimes->{{3.7377019248786182`*^9, 3.7377019363662567`*^9}, { 3.737870563769154*^9, 3.737870566984675*^9}}, TextAlignment->Center,ExpressionUUID->"151c457d-0edd-45f8-b772-ac54ec683d21"], Cell["\<\ Jan Poeschko Wolfram Research\ \>", "Subtitle", TextAlignment->Center,ExpressionUUID->"189f82f1-8822-4cfc-85a3-1a13b0704cc5"] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags-> "SlideShowHeader",ExpressionUUID->"a2e367ab-c9da-48c3-8075-c05b3f6f6aa1"], Cell[CellGroupData[{ Cell["Introduction", "Section", CellChangeTimes->{{3.737738986246719*^9, 3.737738989844099*^9}},ExpressionUUID->"551b3093-2db4-43a2-9e95-\ 376a95593bd1"], Cell[BoxData[ RowBox[{"Numerator", "[", RowBox[{"Integrate", "[", RowBox[{ RowBox[{"2018", "/", RowBox[{"(", RowBox[{"6", "-", RowBox[{"x", "^", "14"}]}], ")"}]}], ",", "x"}], "]"}], "]"}]], "Input",\ CellChangeTimes->{{3.6854524849143353`*^9, 3.685452484968378*^9}, { 3.7377380431939363`*^9, 3.737738046184527*^9}, 3.737874572049521*^9},ExpressionUUID->"cfc277bb-b1a5-4bf3-9026-\ 16706bfd6c46"], Cell[BoxData[ RowBox[{"Plot3D", "[", RowBox[{ RowBox[{"Im", "[", RowBox[{"ArcSin", "[", RowBox[{ RowBox[{"(", RowBox[{"x", "+", RowBox[{"I", " ", "y"}]}], ")"}], "^", "4"}], "]"}], "]"}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"y", ",", RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", RowBox[{"Mesh", "\[Rule]", "None"}], ",", RowBox[{"PlotStyle", "\[Rule]", RowBox[{"Directive", "[", RowBox[{"Yellow", ",", RowBox[{"Specularity", "[", RowBox[{"White", ",", "20"}], "]"}], ",", RowBox[{"Opacity", "[", "0.8", "]"}]}], "]"}]}], ",", RowBox[{"ExclusionsStyle", "\[Rule]", RowBox[{"{", RowBox[{"None", ",", "Red"}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{3.737738152135754*^9}, CellLabel->"In[6]:=",ExpressionUUID->"59aed63f-c922-43ba-a955-72d41e7021bc"], Cell[BoxData[ RowBox[{"Button", "[", RowBox[{"\"\\"", ",", RowBox[{"Print", "[", RowBox[{"200", "!"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.737738162663663*^9, 3.737738171921261*^9}, { 3.737738223565748*^9, 3.737738239399458*^9}, {3.73773832263675*^9, 3.7377383258110228`*^9}, {3.737738939046681*^9, 3.7377389643507843`*^9}, { 3.737922873042973*^9, 3.737922921699684*^9}}, CellLabel->"In[18]:=",ExpressionUUID->"2df14344-d335-465e-b721-5b4eed3d43b3"], Cell[BoxData[ RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"ParametricPlot", "[", RowBox[{ RowBox[{"Evaluate", "[", RowBox[{ RowBox[{ RowBox[{"MatrixExp", "[", RowBox[{ RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d"}], "}"}]}], "}"}], " ", "t"}], ",", "#"}], "]"}], "&"}], "/@", "pt"}], "]"}], ",", RowBox[{"{", RowBox[{"t", ",", "0", ",", "10"}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", "5"}]}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"pt", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "3"}], ",", "0"}], "}"}]}], "}"}]}], "}"}], ",", "Locator"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"a", ",", RowBox[{"-", "1.1"}]}], "}"}], ",", RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"b", ",", "0.9"}], "}"}], ",", RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"c", ",", RowBox[{"-", "1.4"}]}], "}"}], ",", RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"d", ",", "0.3"}], "}"}], ",", RowBox[{"-", "2"}], ",", "2"}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.737737514581176*^9, 3.737737582185211*^9}, { 3.737737627261174*^9, 3.737737647441317*^9}}, CellLabel->"In[2]:=", CellID->421605396,ExpressionUUID->"744e3657-6e0a-40b6-99e4-f9f7c6d62715"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags-> "SlideShowHeader",ExpressionUUID->"c3688bfa-6359-41a4-8438-4e2f8d355be9"], Cell[CellGroupData[{ Cell["Stability", "Section", CellChangeTimes->{{3.737743790125853*^9, 3.7377437916658382`*^9}},ExpressionUUID->"15fcede6-0d51-402d-8363-\ 0049091b0e5d"], Cell[CellGroupData[{ Cell["\<\ No more \[OpenCurlyDoubleQuote]session expired\[CloseCurlyDoubleQuote] \ warning that requires a full page refresh\ \>", "Subsection", CellChangeTimes->{{3.7377453590550137`*^9, 3.7377453593339577`*^9}},ExpressionUUID->"edd32d3c-f8b0-44e4-b550-\ 9be261ca6d2b"], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzt3VmP5Vi5JmDU3Rd92X+h/0Xf9mXfnlb/gHNEUYzVUHUYGpAAIQQSQiAV YiiBAKFkSqhknkmGZCzmOZmnZEwSSCCBYoquN45W6MuV9t6OyB1hR/j5pIek Yg/2tpftdy8ve//3f/u///KI//Swhz3snv/60P/8y78++X/effe//r///d8e +o//c9c9j7rzrjse/r/u+vc77rzj7v/xb//5oT9eecjHHnr+f3no3z2llFJK KaWUUkoppZRSSimllFJKKaWUUkoppZRSSimllFJKKaWUUkoppZRSSimllFJK KaWUUkoppZRSSimllFJKKaWUUme6/vGPfwAAsGJrqbmXMwAAy3bWaugz/u1v fwMAgDOZhzdl3wcffPAmf/7znwEAWIE+B27KxKexhvJvn3lv3Lhx4A9/+AMA ACtQM2CfjYfy8GmqPgPX/Nsy7/Xr1/f99re/BQBghVoebNm4z8OnLQsPZeA+ /+ZzX7t2be/q1av7fvnLXwIAsCItByYTtkzc5+HTlIXHMnDNv/m8Fy9e3Dt/ /vzeuXPn9l73utcBALBCyYLJhMmGyYg1D5+2LLwpAyfr5zPOvbwBAFimZMVk xk1ZeIm1LQNfuHBh9mULAMCyJTOetizc5+CM7ZCBAQA4rJqFkymXnIPH+oIz xsNYCAAADisZMlly6X3CY33BGe889zIEAOB0SpZcep9wzcH6ggEA2IW+T3ip ObiOiWjjgnMfjLmXHwAAp1OyZBsn3I+NWEJtGhPh/sAAABxVsuSSx0YM5eD2 exlzLzsAAE639vsapykH5/fy5l5uAACcbsmUpyEH12vk5GAAAG5Xy8FLvFZO DgYA4LjIwQAArJEcDADAGsnBAACskRwMAMAaycEAAKyRHAwAwBrJwQAArJEc DADAGsnBAACskRwMAMAaycEAAKyRHAwAwBrJwQAArJEcDADAGsnBAACskRwM AMAaycEAAKyRHAwAwBrJwQAArJEcDADAGsnBAACskRwMAMAaycEAAKyRHAwA wBrJwQAArJEcDADAGsnBAACskRwMAMAaycEAAKyRHAwAwBrJwQAArJEcDADA GsnBAACskRwMAMAaycEAAKyRHAwAwBrJwQAArJEcDADAGsnBAACskRwMAMAa ycEAAKyRHAwAwBrJwQAArJEcDADAGsnBAACskRwMAMAaycEAAKyRHAwAbHLp 0qW9y5cv7125cmXvpz/9KSuQdZ11nnU/d/s7TnIwADDk/vvv389Cc2cy5pU2 kLYwd3s8DnIwADBEBqZJW5i7PR4HORgA6OV8+NzZi2U5i2Mk5GAAoKcvmN5Z 7BOWgwGAnmvi6KVNzN0ud00OBgB6c2culmnudrlrcjAA0Js7b7FMc7fLXZOD AYDe3HmLZZq7Xe6aHAwA9ObOWyzT3O1y1+RgAKA3d95imeZul7smBwMAvbnz Fss0d7vcNTkYAOjNnbdYprnb5a7JwQBAb+68xTLN3S53TQ4GAHpz5y2Wae52 uWtyMADQmztvsUxzt8tdk4MBgN7ceYtlmrtd7pocDAD05s5bLNPc7XLX5GAA oDd33mKZ5m6XuyYHw9mS/VS2k5///Od758+fn31+jtu3v/3t/c/7m9/8Zu9D H/rQ7PMDZ8XceYtlmrtd7pocvDzJLj/72c/2/vKXv+z9/e9/35dlcP369b3L ly/PPn9TJYf985//3P8c73//+2efn6k+/vGP7z344IP78/7jH/949vk5bNv5 61//erD9vOtd75p9no5b9gmtPve5z80+P3M4rdvamF1sg/fff//e73//+/33 +N3vfreK74S7NnfeYpnmbpe7JgcvS/q2st/eVH/605/23vGOd8w+r5vkmJN1 1up73/ve7PNUffCDH9z7zne+s+8jH/nITY9985vfPJjvZMq3vvWts8/vYZZ7 8kMq283S2smnP/3pve9+97t73/rWt3a2XK9du3awvj772c/O/hmbTW1s1+t8 ydvaUdrCLrbBD3zgAwf70vz7yU9+8sTXzWk3d946KV/+8pf3XvCCF+zdc889 e095ylP27r333r2f/OQns8/Xj370o71Xv/rVey972cv2Ll68OPv8yMEnX2vL wZ/4xCduycDpA/7Vr361n31r3bhxY/H5LOur1ZLySeT42yr7u/rYV77ylZuW /9zzehg1B+c8wtJy8HH03S41B29qY7u25G3tKG1hF9tg+sXbcaz/TniS6+Y0 O+l89dGPfnTvhS984X4O7eXvr3/96/fbxi6nme9ED3/4w2/ymMc8Zv88xNx5 M/1id9555/48Pf/5z599fuTgk6+15eDk3VbJvf057Wz/NSdnG5l7nrdJn88S z9OmD6rVD37wg1sez77xM5/5zOzzeVhLz8E1s6Zt7Po9l5QBt7WxXVvqtnbU trCLbTDbQ96jHxNx0uvmtDrpfHXffffdkkmHPPe5z937/ve/f9vTy3egxz72 sQfv+4QnPOEgdy+hPzjndh75yEfuz9uLXvSi2edHDj75WlMOrvklNdZXduXK lYPnDC2H97znPfvbzi9+8Yt9Oa+y6diY6SZPt+dnnOEXvvCFjfP6ta99bX/8 cntNzmEOPS/nIfPcL33pS6Nj877+9a8fvFemnaw/9Lx3v/vd++8Vea9cD5X9 VF6X7w/p35ky/u/SpUv758AyrVY5HmceH3jggYNlkvnItD72sY/d9Nr2efLf eU5bBvkM/XLLWO72ePYd9bzskIyJTB9Ee822z5Txj1m/7fk5LtRz5IfNwVnG mWZ7v7S1sXluyyLLcmgek0fz+Oc///n9/057zvKp/ZbJH1/96lcPdV66ttWs /3xXzHbQquXgsXVYP2umHWPbxxe/+MWb2nnea8o8TmljY+s9bfmHP/zhofPs 2LaWZfCNb3xjf4xA/l73DVl+m9pHnp82PGX7rLJM62v65TalLQytvyy7uv31 su/L/iTPacuvtcO2P922bpLH8/zMy9D5tjqNoXZ11px0vnrVq151kEkf9ahH 7T3rWc/ae/rTn77v0Y9+9E1Z+MlPfvJtZ9W0wzvuuGP//Z7xjGcsIvvKwSdP Dl6GPgfnGDz0vGTOLJP0C+c4Ux/LNjw2tjgZqX+vZJ6x56c/+sMf/vBNz88x pV2D1VcyV3982nTes32OqdOu5zHTFobmO/PWv65X56mvP/7xj/vPqeNTcp3N 0GvreMxaOYeb5TD22XL8HVr3udfBUGW5Dn0n6s8N1OfX/z81B2ffNlbJCX3W 3bRu89xss6ksh/e+970H/z1UU85LZ73mGrC++mXQcvDYOhxqT/11WJnW2PrN eKRt1x5OaWOR7zGbnnuY68OG1kfydVsGaQtj2+7Q99hN+4ash6HtLJlibD1n 35Z1UtvGULW20K+/fv849F29nk/LsuvbYbaFbesm22+rZPl+Gtnntso2u6v9 /1LNmYPz3a1/PPuSllvjdsfMZhtp7/XmN7959nwpB89DDl6Oep5wLP+MyX5/ W+XY1p6f40hfNUOlctxpfSL5t28T/fP7a1HGzlfXsX+t+mNjplWPtekHHKr+ WF1zxpCrV68Ovk+qjUNMn9RQhqqfZ2z6Ux7v+9QyjW3vUZdrlmX/vv26aH+b koNzvO+n179f8l/NwpvGIvTX6qUPbSjDtkqf9qb5S9vr52ds/9TmZWwdDrWn Ov23v/3tg8uyVt0ujtrGovaHts/Ur9f+u+6UfcfQMqjV/y3TzTpq75XvzP3z ++2zXwY1c7ca2qZzHmdKWxhaf3Uf1x8D8p2i5fy8Ln21Q9eMbls3tV1kPmub z/+v8z6lb/y0mzMH55zN0HPe8pa3HDznxS9+8eBzPvWpT+298Y1v3HvDG96w n29zXqM+nraU/oo83t7rta997f7fctxtz8v5rGxPaRd5j/aeef/DTrOX981n yfPzuqH3rDm4fdYcF/OaeOc73zlLH/bc7XLX5ODlGMo3+czZnjYdd/tjUOtH yn679pHU667rcfPXv/71wd+zb6/rvt2nrR4f0l/b7tOaade+sxxn2nwNHZvr 8SqVfJXv/e3z12NnzQx9Dk47aOc+63G7z4xjNl0nMyUHJyvl3Gn+ngxR+5H6 x9NnUa9zrJ8r16vXeW/nkNPvkUxfP297Tf17lmUbQ5lzunX5TcnBeU1tO2kv 7djf37uk5sWpObifh9rvvW38TdPn9IztbMu9/w5xuzm4fq58hrTv/D3Hxrps p9yTYVMb67Nm/Y5ax3kMLd8hU3JwttM2Djfnm+pjbfr1vnupeg/q/hxEO2eV x7Md1+m077CZXs2O2ddMaQtD66/+rb+HRD5zq8zLtnY4tm7yPaju/+q+pPZR L/FeLMdhiTk47bD1Cfd9pGkHj3vc4wbHFL/mNa85eF6uxxsbe5z3zn64XqPW /t7+f71mbeo0m4yryZiOoednfHKy+FAOzmNPetKTbnnNIx7xiP3tTA4+Ojl4 WXKOcqyPMfkn21D/mpoThs6719zU+pjrcbMd64ferx3va27oryvJeLtWNa8N HZuzf2k11K9Wj3X5N/urfvpDuabm0Cn96GM5qJ+HsRzcr4f++Nn3FdW8Wd+z 5of+NfU9cxzP+fj6nSf/5lqi+prkj/qabcfqbed563LK+mqZ6Kg5+LDXtOV7 Uz0f3t8/O9Oq3zFuJwfX5Z1/+zG69RzK0HtObWP9PA9d71qXU/7/tmlty8HZ h/bjOWr/apu/zFv2s22f22+fNaO319R8mPVd+5b7x5OJp7SFsfVX+9Drdl7b cdtnbWqHm7b/Ol/1mF+XV/2+f5YtMQfXsQy5h0T7e45DNasOecUrXrH/3PS9 jj0n2TfftWsG7bXpHmaake9cfWa+++67B6ff5+AqY6f7+1ukHcvBRyMHL0/6 AsfGi6ZyDG3Hmv7eoclSOd4lD0XfJ9z2+fX98/rk73oOMO9fj2e1/yTHlP5a nkyzP/4NHefq38b61Oq8tX6qTTl8bFqb3G4O3pb9+swx9J5ZP+1vbRxI+tnr uqvrNtOs/cf1O8fYfGy7Dqo9d6wfvebQ+pyTysE194/dR7ae676dHFzvWZvv J/nsbV2kT7/Oy5T+wLE2tqlfs6nZcds4jLHlWqczdO+xTdtAk8+d8xrtmsh6 fVl7TX2foX1z2kPmL9/Ht50v2rYN1vbfptW347ZfOmoOruO26tiI+p116rmM 027OHJz12D+eHPnUpz714Dm5j1r+nmt6699f/vKXH4wXSFtq/bo1Y7bH2msy xqBOq8+gT3va0/b3f+mvTZs5yjRznWZ7/rOf/ez9Y1n+nvaYawLrGI2heci1 fG28RbbHeu1g9lNy8NHIwcvVrtfOZ+77iLN/z369v35kW7V9fn9etFWWc/qD 21iFJvukoets8rccz4YyzbYcPDZ+od7TaOhYO3TMXlIOHspIQ+85NKZyU7Vx aq2Gvg8cNQdvynX1cw+dTzjOHLwty42951Fy8NgY9KHaVQ4e+0zbvlcd1zJo 8p1g0zjeseV2mHuQHSUH1z779h2inmupy/OoObgfu5X9VP1NjtP22zq3Y84c nN+OyLrNfjLe9KY33XSPs+TL5MS8Lt9L6j3V+vd929veNtjPXHNp3/9cM2h+ X6O/n/BRplmn118HmGNy/exT5iHvu63/XA7eTg4+HbJPr30xqey/D5uD61i4 HHv63+fo37/OQ/p78/ukY9WfV9+Wg4fGeMS2jLL0HDyUP7eNd5xSyaB1vtPP P9ROjtofPHavrm3r8aRycN5z6vwddw6e8pvVU/uDt62bKZl7lzl46Jrbdr+J ofHiU/qVp87ztm0w6j0fko+yT2tVx80cNQdHHWeR5VG/mw+NPTur5szBm2RM bNpMe136T9tj+R6Tv2UMfmT91nEQdUzx1Bw8dD3eUaZZxyXfdddde+973/tu Gs+Qtlb/e9s8bJp/OXg6OXgZcv4x5wyjXjPTq/cPTibts0zuFZp8mX+HDGWd bEvZ3ob6nYeyara3HG+Sw/o+4nqM2Jafxn5HoY7BWEsOzmtznmtsvbX7Js/R H1zHqZx0f3DtMz/J/uB85pz/HFsfY/ewndLGpvQH1z7Jk+wP7se559xQ3WfU sSNz9AdHvcYg89fGK/TL6XZycO1jzvvX7/9L+q2W47bEHJx+4IzLO0p+PmoO Hrpn2VGmmbb2xCc+8ZbHc91c3i/H28PMgxy8G3LwMtTst+neX/UYMHRfzSm/ 0ZXXtN+g6DN3Hqv9La3/uP2+QnJ4fy/ZbNt1ntrft+XgsfvG1mth2rVjZz0H T73+vOaQLKehdXuUHJwaumf12LVjm77P7DIH1zHUY3lw2/jgoay5Lc8l99zu Nj0lB499pnpNXrv/wSa7ysE1/2Wf279m25ilsTHr2XfksbrNHzUH5zvC0L3t +vNRt5OD+7H5rfp7qZ11c+bg3Hss/aPpX8322sbC5rq0bB9HzaT1Xg8nlYPr NNPeXvrSl45eX1evq5ODT4YcvAz9WNH+uvimHjvaMadew51xDv1+Otkl+++x 67v7rFTPM+Y1Oe7Ue0b1uSf37Wq1LTfWa1CybvtxyDXn1/uaHmcO7vuwTioH 98faoXvFZnmlXzB9xfnvbfelqPluyv0i6r1B+nsE94/X3D10LWOTY9RY+zrK 7yrX65P6fXBycs1Ebb1su76u3l+ktac6BjQ19PsS+R5Y7wt21DZWP1O/3vv7 kE057uwqB9ftr97bIbIfqGOGh5bb0PWW9Z5mNVtvagvb5r1e+9uq76OfmoPH +rCHxodM+c2Xs2TOHJx9f30s44Pr9WJjr8t15jlvlTY1pF4nt6scfJhpNmlf GTtx7ty5W/qI2296yMEnQw5ejv63jtInleNScma2o3psTLUMVPvMUtn357Fk gWxHdV1mW+2vA0l2zvPzPnl+zRXtng419+Tx/D3Pz7XkdYzxtvum9feMynvl s+W9clytn6Ou513n4Nr/nmN7Pn/7DeCTysFR+9faOs97Z53X8eB5bes37H/P I/vTvH/tlx+bj16+I9X2kXWTNpK200+njpGp43Myb1meeV1yc12Hm+4fnLaS 7JLvZZvmsR+3m3vQJmtlfvp+wbZe+u8LWeZ5LGMa6n0EU7U99b+zkIya+ctn q+fGt/1ey7Y2VvNmKsslnynTqdvHpnHb29r/UXJwvy/JZ87z8ni/rGt+rNPP 63Nfh7Thfv9Tf6NtU1vYNu81W6eGvutMvX9wv26Gttn2uWrGz360rascow77 W9inwZw5uM91+Q5Sr5Or90fYdp+JMbvKwVOn2X4DI9fQ9Y8l97f3a/dlk4NP hhy8HNlv98foserPP9b9+li1cRR5/tjv8tbKsaUdO/p+t7Ea+z25eq/PKe/V 37v0MDl4yv2Dh+7V0K59mpKDh35LeNP1/XV6/XF9029ctar7niyXsd/IrTVl XGnUPuSx6q/J63Pm1Hmo971qNSVT9r9TMlZ1vfS/vzFWtT3VbLOpWv/8UdtY Hq/XYo3V2HmhKe3/qNfJbfrt4Vp1HELa5LbrdbOe6/mGTW1h27z3v+029nvl Y9vktnXT1DFaaRf1sfSD930Mx3FcmNOScnBk/bTHc/+Edp+yfC9qf8+9dPvx w5HrzF75ylfuLAcfdprpO8g8t7Ed/e/NZT/cjyeWg0+GHLw86WcZO6bk72PH xmyXQ2Pasr8fOuee89dDz0/lGNcfE3LuZyyPpK+6P7fZ8t3QudLkjaH3ynOT ufq+nZrVhs5j1vOkU8+39+c9W59R7ROrx/pNn6eOcajfH5r6nkNjT/M9Zui7 Qdp+8kL//P735lplmba2MzQfY7LMhtpC5mnsvHHO6Q210+SWOiahzkM//rw9 f8o8Dp0LTxZqvyk3tF6Gsmb2KTXfDH2+5Kqh74mtv3zqtjzWxtrjyaJD6z3r Ysq1eJvaZm1zQ+N2N21T/W/atXnPMXDoNzHauk1ffV95ft6vH3OzqS2MbYND yzbPG9rma1Ye6i/etm4iOaTV0P3VWvtPm2q/+XOWLC0HJ0vmd9Xacy5cuHDw WO7v2/6escS5F3vWX85LPPOZzzx4LOt4Fzn4KNO87777Dv6Wz5Hr4zP+OfuU 5zznOQePDd03TQ4+PnLwcmWbyrGwmTImMdLXkednW2y/ubtJfpOsTSPnBrdd B5LHs92219zO+cA67bznSV+DUqc/dfkep3yXyTrIstg2XiCSRTPvGZ+SPrTb nX5rOzHl96nbPLd5mDLPdb7zWZPpD7u+Mq0HHnhg0mtyfKjb0dQ2lufl+ZlO riE8avuY0sbaMlxKO4x8D27zNGU/MrS8p2zTR20Lu7Bt3bTv6vW3LXtp82f1 2rml5eDIcXGoHzb9Q/nvTderpT82uXNXOfiw08y/j3/84zc+P/eEG/o9OTn4 +MjBAHCzeu+MoXuzrMFJ5+BMc2j8by/XyQ2NzU2f/b333ntLtsw4hJe85CW3 /A5FvcdvP8Y3mbXdo6L1zw457DTb84fuF/G85z1v/zzN1HnYNP9y8HRyMAD8 h/TxZWx5PQZOHad91px0Dt6VjPNJH38yZa5JbeOIlzbNPK+dj6i/n7F0c7fL XZODAeDme0q2mnL/5rNq7rzFMs3dLndNDgaAW+8bl+v2pl5rehbNnbdYprnb 5a7JwQDwH3J9YPqFT/qavSWaO2+xTHO3y12TgwGA3tx5i2Wau13umhwMAPTm zlss09ztctfkYACgN3feYpnmbpe7JgcDAL258xbLNHe73DU5GADozZ23WKa5 2+WuycEAQG/uvMUyzd0ud00OBgB6c+ctlmnudrlrcjAA0Js7b7FMc7fLXZOD AYDe3HmLZZq7Xe6aHAwA9ObOWyzT3O1y1+RgAKA3d95imeZul7smBwMAvbnz Fss0d7vcNTkYAOjNnbdYprnb5a7JwQBAb+68xTLN3S53TQ4GAHpXrlyZPXOx LGkTc7fLXZODAYDe5cuXZ89dLEvaxNztctfkYACgd+nSpdlzF8uSNjF3u9w1 ORgAGKJPmOYs9gWHHAwADLn//vtlYfbbQNrC3O3xOMjBAMAmOR+eLOTaufXI us46P4tjISo5GACANZKDAQBYIzkYAIA1koMBAFgjORgAgDWSgwEAWCM5GACA NZKDAQBYIzkYAIA1koMBAFgjORgAgDWSgwEAWCM5GACANZKDAQBYIzkYAIA1 koMBAFgjORgAgDWSgwEAWCM5GACANZKDAQBYIzkYAIA1koMBAFgjORgAgDWS gwEAWCM5GACANZKDAQBYIzkYAIA1koMBAFgjORgAgDWSgwEAWCM5GACANZKD AQBYIzkYAIA1koMBAFgjORgAgDWSgwEAWCM5GACANZKDAQBYIzkYAIA1koMB AFgjORgAgDWSgwEAWCM5GACANZKDAQBYIzkYAIA1koMBAFgjORgAgDU6LTn4 wQcf3Ltx44YcDADATrQcnIyZrHkacvDVq1dnX24AAJxuyZSnKQdfv359f57P nTs3+7IDAOB0SpZMpky2XGIOTtUcnHEbmddr167tnT9/fvblBwDA6ZQsmUyZ bJmMWXPwUmrsWrmLFy/OvvwAADidkiWXeo1cq01jI+ZefgAAnE5LHxOR6nOw PmEAAG5H3xe81BycGusTzpiOCxcuzL4sAQA4HZId27jgJfcFtxrrE5aFAQCY qmbg09AX3GpbFjZGAgCAMcmKpzEDp9r8jWXh9vsa+Yy5D4b7CwMArFeyYDJh smH7vYxNGXjJOTg1loUztqPm4WT9fN7I7+UBALAeLQcmE9b8m8x4GjNwq6Es PJSHWyYGAGB9Wh7s8+9pzcCt+izc5+GWiZt8fgAAzr6aAVsurPn3NGfgVnX+ ax6umbjPxgAAnG19DqwZsc+Pp736z9NnYgAA1msoK561GvqMAADQrKXmXs4A AMxLKaWUUkoppZRSSimllFJKKaWUUkoppZRSSimllFJKKaWUUkoppZRSSiml lFJKKaWUUkoppZRSSimllFJKKaWUUkoppZRSSimllFJKKaWUUkoppZRSSiml lFJKKaWUUkoppZRSSimllFJKKaWUUkoppZRSSimllFJKKaWUUkoppZRSSiml lFJKKaWUUkoppZRSSimllFJKHW/9f+oIF/o= "], {{0, 228}, {706, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{499.734375, Automatic}, ImageSizeRaw->{706, 228}, PlotRange->{{0, 706}, {0, 228}}]], "Input",ExpressionUUID->"95bb1025-8ae2-\ 4ee2-823b-65c2776b356a"] }, Open ]], Cell[CellGroupData[{ Cell["Manipulate more robust w.r.t. changing kernels [1.47]", "Subsection", CellChangeTimes->{{3.737744866295335*^9, 3.7377448911675787`*^9}, { 3.737745258153483*^9, 3.737745269311761*^9}, 3.737746753000639*^9},ExpressionUUID->"1f3e18fd-0f7f-4e56-b456-\ 02d7b5cea295"], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztnVtwHFV+h53LQx7zzhMPvPHGS3hMVbZCUrXZZF2ppFKVbO1WgNqqFLt4 N5Xa5MFgLou5X4wpbokBGwcINraEhS+yQDK2ucg2NrbLBoTukiXLulhCvp/1 rzf/5kyrezTTM62ZI39f1YfGfTmn+7SY35zTp0c3/+wXP77rD1esWPGrP7n+ nx//9D/+fNWqn/5m5Z9e/8ff3/Orn999z53/+lf3/PrOu+9c9Wc/+6PrC0ev O/MHK1b88fWfDgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAloT5+Xk3Pj7u+vv7XU9Pj/vmm28QERFxEZWZyk5lqLK0EajuRrcDIiLi clCZupQMDw/HdY+Ojrrp6Wk3NzfnvvvuO0RERFxEZaayUxlqeapsXQqsH97b 2xsdQ6PbAhERMWSVpcrUpeiXawzfPjeQ4YiIiPVRmWr5WuT9cuuLaxyg0eeM iIi4nLQx9iL75JpbR18cERGx/lqfXFlbFPZsGXPaEBER66uyVRmrrC0KG7tv 9LkiIiIuRy1nyXFERMTwJMcRERHDlRxHREQMV3IcERExXMlxRETEcCXHERER w5UcR0REDFdyHBERMVzJcURExHAlxxEREcOVHEdERAxXchwREbG+Tk1NucHB QXfq1Cl3+PBht3//frd37163a9euSL3WMq3TNtpW++SpixxHRESsj7Ozs1Ee j4yMuNOnT7sjR464gwcPus7OTrdnzx63c+fOSL3WMq3TNtpW+2hflVFNneQ4 IiJifVQODwwMuOPHj0f97fb2drd79+4ou9va2tyOHTsi9VrLtE7baFvto32r 7ZeT44iIiLVr/XDLcI2ft7a2Rn7wwQeuo6PDdXV1Req1ltl6bWtZbv3ySusl xxEREWtX97g1Pm4Zrn635bRy+8SJE66vry9Sr7XM1mtby3KVobIqrZccR0RE rF3NV9O9bo2TWz6b6oMrv9XPlnqtZcnttK/KUFmV1kuOIyIi1q7mnmvemu55 581x7asyVFal9ZLjiIiItasxcc1B1/y15P3wQ4cOuaGhoTjH9VrLkvfLta/K UFmV1kuOIyIi1q6eCdfzZJqLnrwfrtw+e/ZsnON6rWXJ++XaV2WorErrJccR ERFrV/PU1J/WnLXkOPpi2ji79lUZKqvSeslxRETE2iXHERERw5VxdURExHBl nhsiImK48twZIiJiuPI9MIiIiOHK97IiIiKGK38nBRERMWz5u6WIiIjhOjs7 G/fLNT6ue92at6Y56HqeTNkt9VrLtE7baFvrh6uMauokxxEREeur8lj3uDVf TXPP1d/WM+EaP5d6rWVap220bbX9cJMcR0REDFdyHBERMVzJcURExHAlxxER EcOVHEdERAxXchwRETFcyXFERMRwJccRERHDlRxHREQMV3IcERExXMlxRETE cCXHERERw5UcR0REDFdyHBERMVzJcURExHAlxxEREcOVHEdERAxXchwRETFc yXGsh3Nzc252dtbNzMy4c+fOuTNnzriBgQHX3d3tOjo6XFtbm2tpaUlV67SN ttU+2ldlqCyVqbIbfX6IiM0qOY71UHk7PT3tzp4964aGhqJMLpfd5TJd+6oM laUyVXajzw8RsVklx7FW1V9W31m5Ozg46Pbt2xfnsl739vZGWXzt2rUFvx9a pnXaJrmfylKZKps+OSJiuuQ41qLy9fz589E4uPrQfhYrm6tF+/hZrjJVtuog yxERF0qOYy3aeLruaWs83DJ4bGws9++M9rVyVKbKZnwdETFdchzzan3xiYmJ aH6a3Q/P0w9PYv1ylamyVQd9ckTEhZLjmFdlqvrJ6j9bX1xj4fXCxuhVtupQ XeQ4ImKp5DjmVePcU1NTbmRkJHpurF59ccP65CpbdaguxtYREUslxzGvytTJ ycloXrmNqWtZvVBZNrauOlQXOY6IWCo5jnm1eer9/f3xvLS0Z8vyorKsXNVh 89Ybfd6IiM0kOY559Oe49fX1xXlbb6xc1cFcN0TEhZLjmEc/x/1nvuuN/yw6 OY6IuFByHPNoOa7vW1uqHFdd5DgiYqnkOOaRHEdEbA7JccwjOY6I2ByS45hH chwRsTkkxzGP5DgiYnNIjmMeyXFExOYw1BzftGmTW7FihVu5cmX83SD6rq87 7rgjWr5hw4Zc5eo55a6uLrd3714sY3t7u9uzZ0/0XWvvvvtu4TmuOlSX6lTd jT5/RERTmaHsIMerU32z2267Lcrsbdu2Rcs2btwY/fuWW26J/qZGnnLJ8Mok xxERv1fZQY5X74EDB6Lcvvnmm6O/iaWf+rde5y2z0b8LoUiOIyKWSo7nc82a NVF2m2vXrq2pvEb/HoQiOY6IWCo5nk/97Yxbb701yvDbb78993i6ybh6ZZLj iIjfy7h6foeHh+PxdP08c+ZMTeUxz60yyXFExN/LPLf86vmju+66q2Rc/d57 721YW95I8twZImJzGHKOt7a2xvPT9VnI5q/v3r274e263CXHERGbw1Bz3B9P /+ijj6JlGm/Vv2+66aZofaPbdjlLjiMiNoeh5rjmpSuzV61aFb+v66fG1bV8 /fr1DW/b5Sw5jojYHIaa49hYyXFExOaQHMc8kuOIiM0hOY55JMcREZtDchzz SI4jIjaH5Djm0XJ8YmJiyXJcdZHjiIilkuOYRz/H9ex+0TmuOshxRMSFkuOY V2Wqvt++v78/zttr167V7XdHZVm5qkN12d+aR0TE30uOY15nZ2fd5OSkGxwc jL77XHmrZfVCZalMla06VJeWNfq8ERGbSXIc86pMnZqaciMjI66joyO+j10v 7L67ylYdqoscR0QslRzHvOo+tf5O7NjYmOvu7o4yd9++fXX73VFZKlNlqw7V xb1xRMRSyXHMqz/XbWBgIB5br0ef3PriKlNlM8cNETFdchxrUePc6ifr775b n1yq/5wX7WvlqEyVrToYU0dEXCg5jrVofXLNJR8aGorHwvP2y/1n0VWWyrR5 6vTFEREXSo5jrSpfZ2Zmou9b07xyP8v1WtmsvnTaM2lapnXaJrmfylKZKpsM R0RMlxzHemjj68pd9aE1Hm73y6tR+2hflaGyGE9HRCwvOY71UP1l5a36zhoH 1z1tzU9TJuu5sXKZrnXaRttqH+2rMlQWGY6IWF5yHBERMVzJcURExHAlxxER EcOVHEdERAxXchwRETFcyXFERMRwbbYcBwAAWM6Q4wAAAOFCjgMAAIQLOQ4A ABAu5DgAAEC4kOMAAADhQo4DAACECzkOAAAQLuQ4AABAuJDjAAAA4UKOAwAA hAs5DgAAEC7kOAAAQLiQ4wAAAOFCjgMAAIQLOQ4AABAu5DgAAEC4kOMAAADh Qo4DAACECzkOAAAQLuQ4AABAuJDjAAAA4UKOAwAAhAs5DgAAEC7kOAAAQLiQ 4wAAAOFCjgMAAIQLOQ4AABAu5DgAAEC4kOMAAADhQo4DAACECzkOAAAQLuQ4 AABAuJDjAAAA4UKOAwAAhAs5DgAAEC7kOAAAQLiQ4wAAAOFCjoPP5cuX3c6d O11bW5u7ePFiow8HauDatWvuwIEDrqWlxY2Pjzf6cACgIMjx4hkaGnJPPfWU 27hxo7t69WrV+587d8498MADbs2aNe78+fNlt1X569atc/fdd587depU1XXN zs5G9Wh/1Vtt/UVQ6zkVSaPbphzK8WeffdatXr3adXd3N/pwAKAgyPHi0fHq vfSxxx5zV65cqXr/vr6+aH9pOab3aPWzXn311ehzgnHp0qUoV7St1lfL/Px8 tL8yc3JyMrP+Irhw4UL0WWfTpk3Ra6PWc6oHIyMjUVu///77UdsbS9U2edBx rl+/Pjq2L774oiHHkHVNAaB+kOPF4+d4nv643v+2bdsWZYh9DvD7Wv57tJZ3 dXW5t99+201PT1ddV1qOp9VfBH7dNhYgaj2nepB1DZeqbfKgdnv++ecbmuNZ 1xQA6gc5XjxZGaBM0ji20P3Lr776KlLvfUl0r1r3roXOS/s988wzUbmdnZ1u bm4u7idqu6y+j7b79ttvo3r6+/tL+pYiLceT9Vs5Ov4s/W0N9WntHJNj0Dqf sbGxuO7e3t6oDqOWc7Lj13Fpncr6+uuvo+39sYwsdGzKQbX1ww8/HJXjH0uy bZTn1gaqT+dix+Zff+WatcfU1FRm/SrPLyPt/Gy7ZDu8/PLLVeV4JW2p3z9r yyRabtdtsWsKAPWBHC+etBy3ZXp/e+211+KxWfPTTz+N9/fvWStbrR+eVO/V 5frpGttM7vPQQw+5np6eeLu0HE/Wb9ukHYN55MiRuMzTp0+nbv/OO+9E7WHl J9dbfeXO6a233lqw39q1a0vy2d//lVdeWXAsWpf1GUF5lnZ+di2TbSM0T9CO X9v5+2lbtXfaNdc9g2Q2ap6aykme3/DwcMl2Ot/keT399NPxvovleJ62TJZp v9P6rKPPaeWuafoxOHfs+Ii7eCl9XOPChcvuxKkzLuNjDMANCzlePOVy3Hzw wQfdCy+8kPp+l8xWjS/rvdTeo7XuySefjPo7afdE/X6Z5ZafI3q/tbZKy/Hk Mt2vfvTRR6Nj1ucA/XziiSdKzsfq9u8fa/833njDPf744/GyXbt2RRn63HPP Redgyx955JFobpvqzrrPq7Jse5WpjPbrsvzx9/fbQHlj/96yZUvqtVMZKlvn a9vqXG3OYlp7WY6bavtkntsx6pr7Of3ll1/GdX/++efxctWhNvKvmY1pqA/s Z7jOVfMq065HFnnaMivHdR31+1TumqZxfvaC++uVr7gf/Ogl9+rrn7ix8dIx m+MnR91f/M2L7m//aYN7/4MTmXkPcKNBjhfPYjlu/VKh98tkHyotK/z30+PH j8d1pb3Pqs9oZe7fvz/eVuPcldSVNdbuMzMzE2eJ3rvtXrHuHa/+/z6a9Xl1 jJs3b47bxLa1+WyqR+WVO6eTJ0/G7adn5Azdn7Dj0D7a19///vvvL8mkN998 c8FxpKExZjs3f2y8XI5rmcYijA8//DA+5pdeeimuT+1inxP0Gc2umZ2HjtHq PHv2bLxcn4FEa2tran179uypKMfztmVWjvu/51nXNI35+cvuh//w31FWm7/+ rxZ39MuRqA8+MDhZsk55/8z6Tjc00pg5EwDNAjlePOVyXPnm31tNG7dcLMeT Y81p/XHdD9Z4rj9uq9d2j72WHPfLUU762ygLlBPJ/Sw7/Fy07Eqb55Y8J8vK ZK4Kjelbrqkcf3//c4ywcfO0cnyynjkol+OWyYb6zTbWnPx/xLLY9rH6tH1y zF/5bdmqY7a5bFu3bi3ZLu36ppG3LSvJ8axrmsXlK1ddR9fX7id3/29JZqsP 3tp2wvVfz/KW6z/Vb/fX/9u/b3WHvhhizB1uSMjx4imX48n3zrT3yVpz3Dhx 4oR78cUXF9xvrTXH33vvvbgcf1zY0Nwmzef2x7FNv02y6kmek/6t/uzqjPHw ZDn+/kePHl302qSRtV01OW7b6rNOsm+a3Gffvn1xG+k+t8aoTfssoGNR21qf OXm9K3nurJa2rCTHKxnLyaK3b8I9ta5zQR988/8djtYfPjrkfvmb7SXr//Lv XnadH/csUjLA8oIcL55yOZ7MhSJyXMv8+59S47j+vcu8OX7s2LG4jO3bty84 99HR0ZLPDXYvX/fVa8lx64Omfb9JrdlT6TXMOubFcjytHZP7JO+xp6nPRf79 jOTz65XmeJFtWUuOG+qj//aJvXFW//Odm92VK99fg4lzc1F/3dYr+wFuJMjx 4ml0jitL7b1f90xtHL/SurLei/Xa+oa6F5DMQZW/YcOG+HOD7scbNv8tb47b v9P6kMmx3JBzXO2rexN6fiupnlXT/Wcb58jbH8/blpWMbdSS4xojT+tz3/uf 26N1c3MXo/lu/5IYg9+w6bOq6gEIHXK8eBqd43YPOK0umztebY5rX433Wtak fSdpue8hsfuueXJcWM5p/+Sz6gcPHozWafxax1XPHK9mnlstOW7XLOu+sn1f un9umjvoo+O0efKV3B+vtC3tmn788ccl29qch1pzfHpm3r295ciCe+Ca83by 1Fg03v70+q6SdVE//PkuNzic/Rw+wHKFHC+eonLc3k/9uVvlclz7f/bZZ9E2 6mf5z5NXm+P+PfFDhw5Fy5QBpuaC+XP29FNjwFqm+fXWj8+a55Z8Zjl5Tlpv 9euegZWh+do2jq/7vnnmWJe7hsl5iUXluOa22Xi5xjIst9WuO3bsiJbv3r07 WubPg7ffBX8u/mI5nrctdU3te10GBwdT75VkXdM0Ll++6h56rD11TvqZsfNu anre/XzVlpL1P/rH/3FbW4657+YvlS0bYDlDjhdP2lzncjme7MOmfbdl2jPR yse0zFIm2HtsljammlZXcpn/TFSWlkd+xqTpz/nys2u118/PymF9b4pflp5j T+6b1aZp16ZcjvvPwVuGJZ8ft/aqJMeTfey0fQ4fPly27T755JNoO32uSJtD 6LvY8+OVtmUlx+X/nmdd0zTs+XF/frqfz/b8OPPTAUohx4tHz3utTvQ9LRfS 5qvbd7bY3G97/0++B6p/439nVvLesf9cufpz9gySqf6abav+VlZdyWX+54Ks PLfPBToe/zlmqX01J055Zt/Xaej7y2y7tHuy/jnZ9snvDVP7TUxMlG1TI+s6 JEn2by3309qrvb092ib5HJhlWvLZvHL76Hdd35/in5/2T56H+sX+98TI119/ Pd432W5pVNKW1hYaC0heU/vumGRbpl3TNNQff3JdZ2Y+q0+uOWyMnQOUQo6H jfo91keuBD3DXM329cKO03K5HMokbVfp38dSeVZ20X9TS+2n+WVp3x9fdL36 nKD5beXaz65v3r+hWk1b6nvlbdvF/v5PtdcUACqHHAcAAAgXchwAACBcyHEA AIBwIccBAADChRwHAAAIF3IcAAAgXMhxAACAcCHHAQAAwoUcBwAACBdyHAAA IFzIcQAAgHAhxwEAAMKFHAcAAAgXchwAACBcyHEAAIBwIccBAADChRwHAAAI F3IcAAAgXMhxAACAcCHHAQAAwoUcBwAACBdyHAAAIFzIcQAAgHAhxwEAAMKF HAcAAAgXchwAACBcyHEAAIBwIccBAADChRwHAAAIF3IcAAAgXMhxAACAcCHH AQAAwoUcBwAACJflnuOIiIhYueQ4IiJiuJLjiIiI4UqOIyIihis5joiIGK7k OCIiYrgWneM9PT1R+XNzcw0/V0RExOWkslUZq6wtiv7+/qiO6enphp8vIiLi clLZqoxV1hbF+Ph4VMfo6GjDzxcREXE5qWxVxipri2J+fj4eu6dPjoiIWB+t Ly6VtUViffLe3l6yHBERsUaVpcrUovviPsPDw/HnBo0D6BiY+4aIiFiZykxl p42lS2XrUmL9ckRERKzNpeqHJ9EYvurW3Dp7Jg0RERHLq8xUdipDi74fDgAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAANCM /A6U0uat "], {{0, 232}, {498, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{351.79296875, Automatic}, ImageSizeRaw->{498, 232}, PlotRange->{{0, 498}, {0, 232}}]], "Input",ExpressionUUID->"4b5aa477-4b26-\ 4b98-91a4-5586c8d1d838"] }, Open ]], Cell["\<\ Notebook rendering more robust w.r.t. large cells [after 1.47]\ \>", "Subsection", CellChangeTimes->{{3.737745275860902*^9, 3.73774535757337*^9}, { 3.737746754602592*^9, 3.737746755048806*^9}, {3.737747417492976*^9, 3.737747459626198*^9}},ExpressionUUID->"9374d09d-7a26-402a-851f-\ b7caa2671454"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags-> "SlideShowHeader",ExpressionUUID->"e7691d73-b71b-4725-bbd3-20ec45a4e210"], Cell[CellGroupData[{ Cell["Performance", "Section", CellChangeTimes->{{3.737745338558359*^9, 3.7377453396062183`*^9}},ExpressionUUID->"489aafce-45fb-4459-9a0b-\ ca8cf31eea3e"], Cell["Server-side (pre-) rendering of notebooks", "Subsection", CellChangeTimes->{{3.73774551054909*^9, 3.737745522002139*^9}},ExpressionUUID->"b54f3f19-afe7-4f56-9186-\ 6a4c7027279c"], Cell["Low-level JavaScript code optimizations", "Subsection", CellChangeTimes->{{3.737745952235408*^9, 3.737745959272797*^9}},ExpressionUUID->"2d0cbf52-7c1e-4153-b121-\ ad67ba2c1789"], Cell[CellGroupData[{ Cell["Batch multiple evaluations into one request [1.47]", "Subsection", CellChangeTimes->{{3.737745470900721*^9, 3.737745475735776*^9}, { 3.737745940202866*^9, 3.7377459409530582`*^9}, {3.737746747560986*^9, 3.737746748480507*^9}},ExpressionUUID->"26b6152e-e68a-47fe-8982-\ 7189f622b3e5"], Cell[BoxData[ RowBox[{"Table", "[", RowBox[{ RowBox[{"Dynamic", "[", "d", "]"}], ",", "50"}], "]"}]], "Input", CellChangeTimes->{{3.7378794903550653`*^9, 3.737879517413617*^9}}, CellLabel-> "In[105]:=",ExpressionUUID->"242e2fe2-7d04-443e-af86-2d03115622f5"], Cell[TextData[{ "Look at ", StyleBox["notebook devtools", FontSlant->"Italic"], " using \[CommandKey]+\[AltKey]+\[ShiftKey]+D (Mac) or \[ControlKey]+\ \[AltKey]+\[ShiftKey]+D (Windows) or append ", StyleBox["?devtools=true", FontFamily->"Source Code Pro", FontWeight->"Regular"], " to the notebook URL" }], "Text", CellChangeTimes->{{3.737894806195004*^9, 3.7378948183036633`*^9}, { 3.737894902007741*^9, 3.737894957101261*^9}, {3.737926415262816*^9, 3.7379264262279987`*^9}},ExpressionUUID->"59b7841a-daa2-422c-9bcc-\ c850826eb342"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags-> "SlideShowHeader",ExpressionUUID->"8e771a24-ee21-4b8d-9ce4-337481e8a144"], Cell[CellGroupData[{ Cell["Compiled Manipulate [end of year?]", "Section", CellChangeTimes->{{3.7377455914985237`*^9, 3.737745597586187*^9}, { 3.7377467665205593`*^9, 3.737746787136314*^9}, {3.7379266285779533`*^9, 3.737926629224444*^9}},ExpressionUUID->"e6ea1745-fa89-4b9d-a33e-\ 1019161aad6b"], Cell[CellGroupData[{ Cell["\<\ Idea: Compile plotted function into WebAssembly, so client can update \ Manipulate immediately\ \>", "Item", CellChangeTimes->{{3.737745656618123*^9, 3.737745660607744*^9}},ExpressionUUID->"ac6dba4d-face-41fb-a878-\ 941ffb192134"], Cell["Relies on the upcoming Wolfram Language compiler", "Item", CellChangeTimes->{{3.7377456616176*^9, 3.7377456788386717`*^9}, { 3.7379229929455*^9, 3.737922994024356*^9}},ExpressionUUID->"bcb40c8f-d016-4092-9a34-\ 0d46849989f8"] }, Open ]], Cell[BoxData[ RowBox[{ RowBox[{"CloudSystem`$EnableCompiledManipulate", "=", "True"}], ";"}]], "Input", CellChangeTimes->{{3.73774569173818*^9, 3.73774569732598*^9}, { 3.737745727533331*^9, 3.737745729032032*^9}},ExpressionUUID->"f00bd3dc-a9e2-481f-8eb7-\ 89e51b0acd47"], Cell[BoxData[ RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Plot", "[", RowBox[{ RowBox[{"Sin", "[", RowBox[{"a", " ", "x"}], "]"}], ",", RowBox[{"{", RowBox[{"x", ",", "0", ",", RowBox[{"2", "Pi"}]}], "}"}]}], "]"}], ",", RowBox[{"{", RowBox[{"a", ",", "1", ",", "3"}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.7377457360951242`*^9, 3.7377457360966883`*^9}},ExpressionUUID->"5e721c83-42ba-4da6-bc44-\ 580bff2b1abe"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags-> "SlideShowHeader",ExpressionUUID->"8ef7b8d7-6ad5-41f9-826d-4fcc5483dec3"], Cell[CellGroupData[{ Cell["Spell checking", "Section", CellChangeTimes->{{3.73774613136695*^9, 3.737746151250692*^9}},ExpressionUUID->"3f9a0178-e411-47a4-9e71-\ fb7481bf1a4f"], Cell["\<\ Lorem ipsum dolor sit amet, consectetur adipiscing elit, sed do eiusmod \ tempor incididunt ut labore et dolore magna aliqua. Ut enim ad minim veniam, \ quis nostrud exercitation ullamco laboris nisi ut aliquip ex ea commodo \ consequat. Duis aute irure dolor in reprehenderit in voluptate velit esse \ cillum dolore eu fugiat nulla pariatur. Excepteur sint occaecat cupidatat non \ proident, sunt in culpa qui officia deserunt mollit anim id est laborum.\ \>", "Text", ShowAutoSpellCheck-> True,ExpressionUUID->"72db2214-beb2-4afc-9d57-ba34eaa208e9"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags-> "SlideShowHeader",ExpressionUUID->"f8b8d6eb-ef94-4698-82dd-3f6682f81c34"], Cell[CellGroupData[{ Cell["Updated control design [1.47]", "Section", CellChangeTimes->{{3.737746159926573*^9, 3.737746164281177*^9}, { 3.7377466713721113`*^9, 3.7377466721342907`*^9}, {3.7377467427850847`*^9, 3.7377467441451*^9}},ExpressionUUID->"6d1938c2-25a2-4977-a350-9e658fd57fd4"], Cell[BoxData[ RowBox[{"Button", "[", RowBox[{"\"\\"", ",", RowBox[{ RowBox[{"Pause", "[", "3", "]"}], ";", RowBox[{"Print", "[", "\"\\"", "]"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.737746604245916*^9, 3.737746604247581*^9}},ExpressionUUID->"70ffcc30-b456-4ad6-a8d3-\ 2d4b0c8dca72"], Cell[BoxData[ RowBox[{"SetterBar", "[", RowBox[{"1", ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4"}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.7377466350689573`*^9, 3.7377466350704823`*^9}},ExpressionUUID->"cdde2e35-89ff-44df-817a-\ 32eeb570936e"], Cell[BoxData[ RowBox[{"PopupMenu", "[", RowBox[{ RowBox[{"Dynamic", "[", "x", "]"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4"}], "}"}]}], "]"}]], "Input", CellChangeTimes->{{3.737746655301867*^9, 3.7377466553036203`*^9}},ExpressionUUID->"7b614491-a330-482f-a986-\ e5e0b3812166"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags-> "SlideShowHeader",ExpressionUUID->"a001e63d-2057-4102-935b-9e34edf98f2a"], Cell[CellGroupData[{ Cell["TeX input [after 1.47]", "Section", CellChangeTimes->{{3.737747067539674*^9, 3.737747074354396*^9}, { 3.737837131518792*^9, 3.737837151743595*^9}},ExpressionUUID->"3991e4b3-d090-4b38-ba0f-\ a32c774c5c1e"], Cell["enter TeX code to typeset math using \[ControlKey]+$", "Item", CellChangeTimes->{{3.7377476008381577`*^9, 3.7377476275353127`*^9}, { 3.737837156666527*^9, 3.737837168581932*^9}, 3.7384816832434807`*^9},ExpressionUUID->"0c807924-a411-4618-b714-\ 655a5628913e"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags-> "SlideShowHeader",ExpressionUUID->"bfafbe8b-fab1-4c93-8b0f-83b82ca7e933"], Cell[CellGroupData[{ Cell["Product & URL simplification [after 1.47]", "Section", CellChangeTimes->{{3.737746729962536*^9, 3.737746739121297*^9}, { 3.737746825656872*^9, 3.7377468268313503`*^9}},ExpressionUUID->"088b93a9-7325-420e-b813-\ 8712489fc465"], Cell["a single Cloud product (with a few different tiers)", "Item", CellChangeTimes->{{3.7377468336201057`*^9, 3.7377468357350492`*^9}, { 3.737746896949874*^9, 3.7377469231268044`*^9}},ExpressionUUID->"ff119656-acfd-4022-9b34-\ f24fc868eb5b"], Cell[BoxData[ TagBox[GridBox[{ {Cell[ "/env: editor view", "Subsection",ExpressionUUID-> "569c9a5b-0ded-4604-a960-61e13a01c27f"], Cell[ "/obj: deployed view", "Subsection",ExpressionUUID-> "898a91c8-ae08-429b-b9f2-170fc986f35f"]}, {Cell["\<\ (currently: develop.wolframcloud.com, mathematica.wolframcloud.com, etc.)\ \>",ExpressionUUID->"c4359b15-7aeb-431d-9f52-cb08591240e0"], Cell[ "(currently: www.wolframcloud.com)",ExpressionUUID-> "c87f237e-bf2e-41c3-9f1f-cec8e6752c37"]}, {Cell[TextData[StyleBox["session kernel", FontWeight->"Bold"]],ExpressionUUID-> "01f5d1bc-8b2c-412f-9afb-62ced0d4c96a"], Cell[TextData[StyleBox[ "public kernel", FontWeight->"Bold"]],ExpressionUUID-> "4ad59c93-3c2e-437b-9048-f7e3584891e6"]}, {Cell[ "expires after a certain time of inactivity",ExpressionUUID-> "02a3e557-ca5a-4523-b591-2953f01ff1a1"], Cell[ "no (or only short-lived) session",ExpressionUUID-> "45e6154f-f19e-472c-8f07-b8d5cbaae385"]}, {Cell["\<\ tied to browser session (shared between notebooks in same session)\ \>",ExpressionUUID->"321cb145-097a-44ab-964a-1c2459d793ab"], Cell[ "consumes owner\[CloseCurlyQuote]s cloud credits",ExpressionUUID-> "bf700044-e556-4547-9aba-ef84fa5433f8"]}, {Cell[ "requires authentication and subscription",ExpressionUUID-> "272182e6-1208-40f4-bb01-0d5b8c39a91d"], Cell[ "does not necessarily require authentication",ExpressionUUID-> "16982748-a308-417a-b57b-57d3ea23788f"]} }, AutoDelete->False, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "TextGrid"]], "Text", CellChangeTimes->{{3.7377468717310667`*^9, 3.737746879394209*^9}, { 3.7377469494885178`*^9, 3.737746983872014*^9}, {3.737923028006928*^9, 3.73792303883339*^9}, 3.737923075837119*^9},ExpressionUUID->"0b372268-7fc9-47dc-8992-\ 7b1c7e9c7c42"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags-> "SlideShowHeader",ExpressionUUID->"9fdb4dce-5f61-4338-ba1e-30a0a313a73b"], Cell[CellGroupData[{ Cell["Related talks", "Section", CellChangeTimes->{{3.737747154249764*^9, 3.737747159275133*^9}},ExpressionUUID->"348a0f4b-bc82-47a7-afb2-\ 068a34722722"], Cell[CellGroupData[{ Cell["\[OpenCurlyDoubleQuote]Enhancing the Wolfram Language\ \[CloseCurlyDoubleQuote] by Tom Wickham-Jones", "Item", CellChangeTimes->{ 3.737747160581029*^9, {3.737747191080188*^9, 3.7377471973667507`*^9}, { 3.737747236160088*^9, 3.737747238888419*^9}},ExpressionUUID->"61564661-815f-47eb-b423-\ 249297a377df"], Cell["\[OpenCurlyDoubleQuote]The Native Wolfram Player for iOS\ \[CloseCurlyDoubleQuote] by Jason Harris", "Item", CellChangeTimes->{{3.737747260439808*^9, 3.737747267206015*^9}},ExpressionUUID->"618b7374-8ef4-45dc-ab35-\ 6a96559f9619"], Cell["\<\ \[OpenCurlyDoubleQuote]Introducing Wolfram CloudConnector for Excel\ \[CloseCurlyDoubleQuote] by Anthony Zupnik\ \>", "Item", CellChangeTimes->{{3.737747281755189*^9, 3.737747290893998*^9}},ExpressionUUID->"f1f1855a-50d8-4c98-a175-\ 7251971f916b"], Cell["\[OpenCurlyDoubleQuote]Developing a Cloud Application\ \[CloseCurlyDoubleQuote] by Jan Poeschko", "Item", CellChangeTimes->{ 3.737747160581029*^9, {3.737747191080188*^9, 3.737747197229496*^9}, { 3.737747240278726*^9, 3.737747248387907*^9}},ExpressionUUID->"0752a06a-45d8-441c-bfd0-\ 90d04e258210"] }, Open ]], Cell[CellGroupData[{ Cell["Get in touch", "Subsection", CellChangeTimes->{{3.737747382197198*^9, 3.737747384635837*^9}},ExpressionUUID->"e3870fcc-774b-43d6-89ec-\ 6023a5e9c3f1"], Cell[TextData[ButtonBox["jpoeschko@wolfram.com", BaseStyle->"Hyperlink", ButtonData->{ URL["mailto:jpoeschko@wolfram.com"], None}, ButtonNote->"mailto:jpoeschko@wolfram.com"]], "Text", FontFamily->"Courier New", FontWeight->"Regular",ExpressionUUID->"c1dcf97a-35c3-4c07-beee-112813741450"] }, Open ]] }, Open ]] }, Open ]] }, ScreenStyleEnvironment->"SlideShow", WindowSize->{1079, 677}, WindowMargins->{{549, Automatic}, {159, Automatic}}, TaggingRules->{"SlideShow" -> True}, FrontEndVersion->"11.3 for Mac OS X x86 (32-bit, 64-bit Kernel) (March 5, \ 2018)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{ "SlideShowHeader"->{ Cell[580, 22, 4399, 98, 2, "SlideShowNavigationBar",ExpressionUUID->"2bf1b32a-14c4-414a-8408-773c19515b64", CellTags->"SlideShowHeader"], Cell[5440, 140, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"a2e367ab-c9da-48c3-8075-c05b3f6f6aa1", CellTags->"SlideShowHeader"], Cell[9591, 270, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"c3688bfa-6359-41a4-8438-4e2f8d355be9", CellTags->"SlideShowHeader"], Cell[29620, 633, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"e7691d73-b71b-4725-bbd3-20ec45a4e210", CellTags->"SlideShowHeader"], Cell[31511, 691, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"8e771a24-ee21-4b8d-9ce4-337481e8a144", CellTags->"SlideShowHeader"], Cell[33275, 749, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"8ef7b8d7-6ad5-41f9-826d-4fcc5483dec3", CellTags->"SlideShowHeader"], Cell[34196, 775, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"f8b8d6eb-ef94-4698-82dd-3f6682f81c34", CellTags->"SlideShowHeader"], Cell[35597, 819, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"a001e63d-2057-4102-935b-9e34edf98f2a", CellTags->"SlideShowHeader"], Cell[36285, 841, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"bfafbe8b-fab1-4c93-8b0f-83b82ca7e933", CellTags->"SlideShowHeader"], Cell[38897, 906, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"9fdb4dce-5f61-4338-ba1e-30a0a313a73b", CellTags->"SlideShowHeader"]} } *) (*CellTagsIndex CellTagsIndex->{ {"SlideShowHeader", 41295, 981} } *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[580, 22, 4399, 98, 2, "SlideShowNavigationBar",ExpressionUUID->"2bf1b32a-14c4-414a-8408-773c19515b64", CellTags->"SlideShowHeader"], Cell[4982, 122, 282, 7, 373, "Title",ExpressionUUID->"151c457d-0edd-45f8-b772-ac54ec683d21"], Cell[5267, 131, 136, 4, 168, "Subtitle",ExpressionUUID->"189f82f1-8822-4cfc-85a3-1a13b0704cc5"] }, Open ]], Cell[CellGroupData[{ Cell[5440, 140, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"a2e367ab-c9da-48c3-8075-c05b3f6f6aa1", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[5587, 146, 157, 3, 109, "Section",ExpressionUUID->"551b3093-2db4-43a2-9e95-376a95593bd1"], Cell[5747, 151, 437, 12, 49, "Input",ExpressionUUID->"cfc277bb-b1a5-4bf3-9026-16706bfd6c46"], Cell[6187, 165, 945, 26, 114, "Input",ExpressionUUID->"59aed63f-c922-43ba-a955-72d41e7021bc"], Cell[7135, 193, 500, 9, 49, "Input",ExpressionUUID->"2df14344-d335-465e-b721-5b4eed3d43b3"], Cell[7638, 204, 1904, 60, 146, "Input",ExpressionUUID->"744e3657-6e0a-40b6-99e4-f9f7c6d62715", CellID->421605396] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[9591, 270, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"c3688bfa-6359-41a4-8438-4e2f8d355be9", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[9738, 276, 156, 3, 109, "Section",ExpressionUUID->"15fcede6-0d51-402d-8363-0049091b0e5d"], Cell[CellGroupData[{ Cell[9919, 283, 274, 6, 84, "Subsection",ExpressionUUID->"edd32d3c-f8b0-44e4-b550-9be261ca6d2b"], Cell[10196, 291, 10660, 179, 184, "Input",ExpressionUUID->"95bb1025-8ae2-4ee2-823b-65c2776b356a"] }, Open ]], Cell[CellGroupData[{ Cell[20893, 475, 276, 4, 84, "Subsection",ExpressionUUID->"1f3e18fd-0f7f-4e56-b456-02d7b5cea295"], Cell[21172, 481, 8072, 137, 187, "Input",ExpressionUUID->"4b5aa477-4b26-4b98-91a4-5586c8d1d838"] }, Open ]], Cell[29259, 621, 312, 6, 84, "Subsection",ExpressionUUID->"9374d09d-7a26-402a-851f-b7caa2671454"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[29620, 633, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"e7691d73-b71b-4725-bbd3-20ec45a4e210", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[29767, 639, 158, 3, 109, "Section",ExpressionUUID->"489aafce-45fb-4459-9a0b-ca8cf31eea3e"], Cell[29928, 644, 188, 3, 84, "Subsection",ExpressionUUID->"b54f3f19-afe7-4f56-9186-6a4c7027279c"], Cell[30119, 649, 187, 3, 57, "Subsection",ExpressionUUID->"2d0cbf52-7c1e-4153-b121-ad67ba2c1789"], Cell[CellGroupData[{ Cell[30331, 656, 295, 4, 57, "Subsection",ExpressionUUID->"26b6152e-e68a-47fe-8982-7189f622b3e5"], Cell[30629, 662, 268, 6, 49, "Input",ExpressionUUID->"242e2fe2-7d04-443e-af86-2d03115622f5"], Cell[30900, 670, 550, 14, 81, "Text",ExpressionUUID->"59b7841a-daa2-422c-9bcc-c850826eb342"] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[31511, 691, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"8e771a24-ee21-4b8d-9ce4-337481e8a144", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[31658, 697, 280, 4, 109, "Section",ExpressionUUID->"e6ea1745-fa89-4b9d-a33e-1019161aad6b"], Cell[CellGroupData[{ Cell[31963, 705, 244, 6, 79, "Item",ExpressionUUID->"ac6dba4d-face-41fb-a878-941ffb192134"], Cell[32210, 713, 237, 4, 49, "Item",ExpressionUUID->"bcb40c8f-d016-4092-9a34-0d46849989f8"] }, Open ]], Cell[32462, 720, 282, 7, 49, "Input",ExpressionUUID->"f00bd3dc-a9e2-481f-8eb7-89e51b0acd47"], Cell[32747, 729, 479, 14, 49, "Input",ExpressionUUID->"5e721c83-42ba-4da6-bc44-580bff2b1abe"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[33275, 749, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"8ef7b8d7-6ad5-41f9-826d-4fcc5483dec3", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[33422, 755, 158, 3, 109, "Section",ExpressionUUID->"3f9a0178-e411-47a4-9e71-fb7481bf1a4f"], Cell[33583, 760, 564, 9, 177, "Text",ExpressionUUID->"72db2214-beb2-4afc-9d57-ba34eaa208e9"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[34196, 775, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"f8b8d6eb-ef94-4698-82dd-3f6682f81c34", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[34343, 781, 271, 3, 109, "Section",ExpressionUUID->"6d1938c2-25a2-4977-a350-9e658fd57fd4"], Cell[34617, 786, 324, 8, 49, "Input",ExpressionUUID->"70ffcc30-b456-4ad6-a8d3-2d4b0c8dca72"], Cell[34944, 796, 284, 7, 49, "Input",ExpressionUUID->"cdde2e35-89ff-44df-817a-32eeb570936e"], Cell[35231, 805, 317, 8, 49, "Input",ExpressionUUID->"7b614491-a330-482f-a986-e5e0b3812166"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[35597, 819, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"a001e63d-2057-4102-935b-9e34edf98f2a", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[35744, 825, 216, 4, 109, "Section",ExpressionUUID->"3991e4b3-d090-4b38-ba0f-a32c774c5c1e"], Cell[35963, 831, 273, 4, 49, "Item",ExpressionUUID->"0c807924-a411-4618-b714-655a5628913e"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[36285, 841, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"bfafbe8b-fab1-4c93-8b0f-83b82ca7e933", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[36432, 847, 237, 4, 109, "Section",ExpressionUUID->"088b93a9-7325-420e-b813-8712489fc465"], Cell[36672, 853, 248, 4, 49, "Item",ExpressionUUID->"ff119656-acfd-4022-9b34-f24fc868eb5b"], Cell[36923, 859, 1925, 41, 298, "Text",ExpressionUUID->"0b372268-7fc9-47dc-8992-7b1c7e9c7c42"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[38897, 906, 122, 2, 1, "SlideShowNavigationBar",ExpressionUUID->"9fdb4dce-5f61-4338-ba1e-30a0a313a73b", CellTags->"SlideShowHeader"], Cell[CellGroupData[{ Cell[39044, 912, 158, 3, 109, "Section",ExpressionUUID->"348a0f4b-bc82-47a7-afb2-068a34722722"], Cell[CellGroupData[{ Cell[39227, 919, 320, 6, 49, "Item",ExpressionUUID->"61564661-815f-47eb-b423-249297a377df"], Cell[39550, 927, 240, 4, 49, "Item",ExpressionUUID->"618b7374-8ef4-45dc-ab35-6a96559f9619"], Cell[39793, 933, 261, 6, 49, "Item",ExpressionUUID->"f1f1855a-50d8-4c98-a175-7251971f916b"], Cell[40057, 941, 313, 6, 49, "Item",ExpressionUUID->"0752a06a-45d8-441c-bfd0-90d04e258210"] }, Open ]], Cell[CellGroupData[{ Cell[40407, 952, 160, 3, 84, "Subsection",ExpressionUUID->"e3870fcc-774b-43d6-89ec-6023a5e9c3f1"], Cell[40570, 957, 297, 6, 46, "Text",ExpressionUUID->"c1dcf97a-35c3-4c07-beee-112813741450"] }, Open ]] }, Open ]] }, Open ]] } ] *)