(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 13.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 225439, 5165] NotebookOptionsPosition[ 217342, 4972] NotebookOutlinePosition[ 219097, 5024] CellTagsIndexPosition[ 219054, 5021] WindowTitle->BlendLine | Example Notebook WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell[TextData[{ "Basic Examples", "\[NonBreakingSpace]", Cell["(2)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->462042388], Cell["Interpolate halfway between two lines:", "Text", TaggingRules->{}, CellChangeTimes->{{3.776181019389318*^9, 3.77618104181343*^9}, 3.7819860181629877`*^9}, CellID->1403466913], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/BlendLine"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "BlendLine"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["BlendLine"], BoxID -> "BlendLine", Selectable->False], "[", RowBox[{"{", RowBox[{ RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"x1", ",", "y1"}], "}"}], ",", RowBox[{"{", RowBox[{"x2", ",", "y2"}], "}"}]}], "}"}], "]"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"x3", ",", "y3"}], "}"}], ",", RowBox[{"{", RowBox[{"x4", ",", "y4"}], "}"}]}], "}"}], "]"}]}], "}"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.776180886065319*^9, 3.77618091708311*^9}, { 3.7761809581984997`*^9, 3.776181010615596*^9}, {3.7761829878214283`*^9, 3.7761831443632183`*^9}, {3.77670739170308*^9, 3.776707405579771*^9}, { 3.7767075330811453`*^9, 3.776707544535454*^9}, {3.7767083368137417`*^9, 3.7767083427704153`*^9}}, CellLabel->"In[587]:=", CellID->108028143], Cell[BoxData[ RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ FractionBox["x1", "2"], "+", FractionBox["x3", "2"]}], ",", RowBox[{ FractionBox["y1", "2"], "+", FractionBox["y3", "2"]}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{ FractionBox["x2", "2"], "+", FractionBox["x4", "2"]}], ",", RowBox[{ FractionBox["y2", "2"], "+", FractionBox["y4", "2"]}]}], "}"}]}], "}"}], "]"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.776707401515658*^9, 3.776707433617484*^9}, 3.776707544910202*^9, 3.77670809637044*^9, {3.776708338712338*^9, 3.776708343545855*^9}, 3.776709937002678*^9, 3.7767101922579927`*^9, 3.776710305483953*^9}, CellLabel->"Out[587]=", CellID->1361815456] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->4852139], Cell["Interpolate a fraction of the way between two lines:", "Text", TaggingRules->{}, CellChangeTimes->{{3.776181019389318*^9, 3.77618104181343*^9}, { 3.776181860722847*^9, 3.776181914702034*^9}, {3.776182815636384*^9, 3.7761828223033657`*^9}, {3.77731361406639*^9, 3.777313635060489*^9}}, CellID->570792979], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"a", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "0.5"}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"b", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "1"}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{"a", ",", "b", ",", "Red", ",", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/BlendLine"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "BlendLine"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["BlendLine"], BoxID -> "BlendLine", Selectable->False], "[", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], ",", "0.2"}], "]"}]}], "}"}], "]"}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.776180886065319*^9, 3.77618091708311*^9}, { 3.7761809581984997`*^9, 3.776181010615596*^9}, {3.776181856352785*^9, 3.776181856980659*^9}, 3.776183045848651*^9, {3.776183135503805*^9, 3.776183150801738*^9}, {3.7767075677438707`*^9, 3.776707568930542*^9}}, CellLabel->"In[588]:=", CellID->508146904], Cell[BoxData[ GraphicsBox[{LineBox[{{0, 0}, {1, 0}, {3, 0.5}}], LineBox[{{-1, 2}, {1, 2}, {3, 1}}], {RGBColor[1, 0, 0], LineBox[{{-0.2, 0.4}, {1., 0.4}, {3.0000000000000004`, 0.6000000000000001}}]}}, ImageSize->{236.80859375, Automatic}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.7761818573967743`*^9, {3.776181904807683*^9, 3.776181915639435*^9}, 3.776182825787434*^9, 3.776183046181629*^9, {3.7761831357879057`*^9, 3.776183151066695*^9}, 3.7761838050224*^9, 3.776707569654139*^9, 3.776708102563385*^9, 3.776708353283252*^9, 3.776709938235922*^9, 3.776710194107748*^9, 3.776710306254925*^9}, CellLabel->"Out[590]=", CellID->136617030] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Scope", "\[NonBreakingSpace]", Cell["(4)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->964056545], Cell["Interpolate two lines at multiple fractions:", "Text", TaggingRules->{}, CellChangeTimes->{{3.776181937679468*^9, 3.776181945197282*^9}, { 3.7767070022756248`*^9, 3.776707006146012*^9}, {3.776709772272862*^9, 3.7767097801965027`*^9}}, CellID->649685796], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"a", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "0.5"}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"b", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "1"}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{"a", ",", "b", ",", "Red", ",", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/BlendLine"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "BlendLine"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["BlendLine"], BoxID -> "BlendLine", Selectable->False], "[", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"0.2", ",", "0.4", ",", "0.6", ",", "0.8"}], "}"}]}], "]"}]}], "}"}], "]"}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.77618192274585*^9, 3.776181934435102*^9}, 3.7761831535819817`*^9, {3.776708108372128*^9, 3.776708109422817*^9}}, CellLabel->"In[591]:=", CellID->836153427], Cell[BoxData[ GraphicsBox[{LineBox[{{0, 0}, {1, 0}, {3, 0.5}}], LineBox[{{-1, 2}, {1, 2}, {3, 1}}], {RGBColor[1, 0, 0], LineBox[{{-0.2, 0.4}, {1., 0.4}, {3.0000000000000004`, 0.6000000000000001}}], LineBox[{{-0.4, 0.8}, {1., 0.8}, {3., 0.7}}], LineBox[{{-0.6, 1.2}, {1., 1.2}, {3., 0.8}}], LineBox[{{-0.8, 1.6}, {1., 1.6}, {3., 0.9}}]}}, ImageSize->{231.7890625, Automatic}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.776181927189089*^9, 3.7761819464452763`*^9}, 3.776182827253397*^9, 3.776183154184094*^9, 3.776183813686101*^9, { 3.776708105527534*^9, 3.77670811021469*^9}, 3.776708354730163*^9, 3.776709939701413*^9, 3.776710199991994*^9, 3.776710307387169*^9}, CellLabel->"Out[593]=", CellID->641072068] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->322761262], Cell["Blend between three lines:", "Text", TaggingRules->{}, CellChangeTimes->{{3.77670978452241*^9, 3.776709790362896*^9}, { 3.781986005341633*^9, 3.7819860061571507`*^9}}, CellID->299607060], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"a", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0.4"}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"b", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "1"}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"c", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"4", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "4.5"}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Graphics", "[", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "Red", ",", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/BlendLine"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "BlendLine"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["BlendLine"], BoxID -> "BlendLine", Selectable->False], "[", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b", ",", "c"}], "}"}], ",", RowBox[{"Range", "[", RowBox[{"0.025", ",", "0.975", ",", "0.05"}], "]"}]}], "]"}]}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.776709796077224*^9, 3.776709833792541*^9}, { 3.77670994743814*^9, 3.776710018823168*^9}}, CellLabel->"In[594]:=", CellID->627002662], Cell[BoxData[ GraphicsBox[{LineBox[{{0, 0}, {1, 0.4}}], LineBox[{{1, 2}, {3, 1}}], LineBox[{{4, 4}, {5, 4.5}}], {RGBColor[1, 0, 0], LineBox[{{0.05, 0.1}, {1.1, 0.43}}], LineBox[{{0.15000000000000002`, 0.30000000000000004`}, {1.3, 0.49000000000000005`}}], LineBox[{{0.25, 0.5}, {1.5, 0.55}}], LineBox[{{0.35000000000000003`, 0.7000000000000001}, {1.7, 0.61}}], LineBox[{{0.45, 0.9}, {1.9000000000000001`, 0.67}}], LineBox[{{0.55, 1.1}, {2.1, 0.73}}], LineBox[{{0.6500000000000001, 1.3000000000000003`}, {2.3000000000000003`, 0.79}}], LineBox[{{0.7500000000000001, 1.5000000000000002`}, { 2.5000000000000004`, 0.8500000000000001}}], LineBox[{{0.8500000000000001, 1.7000000000000002`}, {2.7, 0.91}}], LineBox[{{0.9500000000000001, 1.9000000000000001`}, {2.9, 0.9700000000000001}}], LineBox[{{1.1500000000000001`, 2.1}, {3.0999999999999996`, 1.1750000000000003`}}], LineBox[{{1.4500000000000004`, 2.3000000000000003`}, {3.3000000000000007`, 1.5250000000000004`}}], LineBox[{{1.7500000000000007`, 2.5000000000000004`}, {3.5, 1.8750000000000007`}}], LineBox[{{2.0500000000000003`, 2.7}, {3.7, 2.2250000000000005`}}], LineBox[{{2.3500000000000005`, 2.9000000000000004`}, {3.9000000000000004`, 2.5750000000000006`}}], LineBox[{{2.6500000000000004`, 3.1}, {4.1, 2.925}}], LineBox[{{2.95, 3.3000000000000003`}, {4.300000000000001, 3.2750000000000004`}}], LineBox[{{3.250000000000001, 3.5000000000000004`}, {4.5, 3.625000000000001}}], LineBox[{{3.5500000000000003`, 3.7}, {4.699999999999999, 3.975}}], LineBox[{{3.8499999999999996`, 3.9}, {4.9, 4.324999999999999}}]}}, PlotRange->All]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7767097924744368`*^9, 3.776709834116466*^9}, { 3.776709940636413*^9, 3.776710019146689*^9}, 3.776710049997023*^9, 3.776710202894062*^9, 3.776710308715149*^9}, CellLabel->"Out[597]=", CellID->923716091] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->1031739812], Cell["Interpolate between two lines in 3D:", "Text", TaggingRules->{}, CellChangeTimes->{{3.776181937679468*^9, 3.776181945197282*^9}, { 3.7767070022756248`*^9, 3.776707006146012*^9}, {3.7767076261967916`*^9, 3.776707633316311*^9}, {3.7773136559855814`*^9, 3.7773136572007027`*^9}}, CellID->1413163596], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"a", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "0.5", ",", RowBox[{"-", "1"}]}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"b", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "2", ",", RowBox[{"-", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "1", ",", "2"}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{"a", ",", "b", ",", "Red", ",", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/BlendLine"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "BlendLine"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["BlendLine"], BoxID -> "BlendLine", Selectable->False], "[", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], ",", RowBox[{"Range", "[", RowBox[{ RowBox[{"1", "/", "10"}], ",", RowBox[{"9", "/", "10"}], ",", RowBox[{"1", "/", "10"}]}], "]"}]}], "]"}]}], "}"}], "]"}]}], "Input",\ TaggingRules->{}, CellChangeTimes->{{3.77618192274585*^9, 3.776181934435102*^9}, 3.7761831535819817`*^9, {3.776707593660063*^9, 3.7767076652359*^9}}, CellLabel->"In[598]:=", CellID->2018905799], Cell[BoxData[ Graphics3DBox[{Line3DBox[{{0, 0, 0}, {1, 0, 1}, {3, 0.5, -1}}], Line3DBox[{{-1, 2, -2}, {1, 2, -1}, {3, 1, 2}}], {RGBColor[1, 0, 0], Line3DBox[ NCache[{{Rational[-1, 10], Rational[1, 5], Rational[-1, 5]}, { 1, Rational[1, 5], Rational[4, 5]}, { 3, 0.55, Rational[-7, 10]}}, {{-0.1, 0.2, -0.2}, {1, 0.2, 0.8}, { 3, 0.55, -0.7}}]], Line3DBox[ NCache[{{Rational[-1, 5], Rational[2, 5], Rational[-2, 5]}, { 1, Rational[2, 5], Rational[3, 5]}, { 3, 0.6000000000000001, Rational[-2, 5]}}, {{-0.2, 0.4, -0.4}, { 1, 0.4, 0.6}, {3, 0.6000000000000001, -0.4}}]], Line3DBox[ NCache[{{Rational[-3, 10], Rational[3, 5], Rational[-3, 5]}, { 1, Rational[3, 5], Rational[2, 5]}, { 3, 0.6499999999999999, Rational[-1, 10]}}, {{-0.3, 0.6, -0.6}, { 1, 0.6, 0.4}, {3, 0.6499999999999999, -0.1}}]], Line3DBox[ NCache[{{Rational[-2, 5], Rational[4, 5], Rational[-4, 5]}, { 1, Rational[4, 5], Rational[1, 5]}, {3, 0.7, Rational[1, 5]}}, {{-0.4, 0.8, -0.8}, {1, 0.8, 0.2}, {3, 0.7, 0.2}}]], Line3DBox[ NCache[{{Rational[-1, 2], 1, -1}, {1, 1, 0}, { 3, 0.75, Rational[1, 2]}}, {{-0.5, 1, -1}, {1, 1, 0}, { 3, 0.75, 0.5}}]], Line3DBox[ NCache[{{Rational[-3, 5], Rational[6, 5], Rational[-6, 5]}, { 1, Rational[6, 5], Rational[-1, 5]}, {3, 0.8, Rational[4, 5]}}, {{-0.6, 1.2, -1.2}, {1, 1.2, -0.2}, {3, 0.8, 0.8}}]], Line3DBox[ NCache[{{Rational[-7, 10], Rational[7, 5], Rational[-7, 5]}, { 1, Rational[7, 5], Rational[-2, 5]}, { 3, 0.85, Rational[11, 10]}}, {{-0.7, 1.4, -1.4}, {1, 1.4, -0.4}, { 3, 0.85, 1.1}}]], Line3DBox[ NCache[{{Rational[-4, 5], Rational[8, 5], Rational[-8, 5]}, { 1, Rational[8, 5], Rational[-3, 5]}, {3, 0.9, Rational[7, 5]}}, {{-0.8, 1.6, -1.6}, {1, 1.6, -0.6}, {3, 0.9, 1.4}}]], Line3DBox[ NCache[{{Rational[-9, 10], Rational[9, 5], Rational[-9, 5]}, { 1, Rational[9, 5], Rational[-4, 5]}, { 3, 0.9500000000000001, Rational[17, 10]}}, {{-0.9, 1.8, -1.8}, { 1, 1.8, -0.8}, {3, 0.9500000000000001, 1.7}}]]}}]], "Output", TaggingRules->{}, CellChangeTimes->{3.776710219261642*^9, 3.7767103100516*^9}, CellLabel->"Out[600]=", CellID->851298048] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->1937857956], Cell["Interpolate a line in 4D:", "Text", TaggingRules->{}, CellChangeTimes->{{3.77670852898746*^9, 3.77670853480406*^9}}, CellID->1143929620], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"a", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "2", ",", "0"}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"b", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "2", ",", "2", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "3", ",", "4", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "3", ",", "1"}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/BlendLine"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "BlendLine"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["BlendLine"], BoxID -> "BlendLine", Selectable->False], "[", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], ",", "0.2"}], "]"}]}], "Input", TaggingRules->{}, CellLabel->"In[601]:=", CellID->454382893], Cell[BoxData[ RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "0.2`"}], ",", "0.4`", ",", "0.4`", ",", "0.6000000000000001`"}], "}"}], ",", RowBox[{"{", RowBox[{ "0.6000000000000001`", ",", "1.4000000000000001`", ",", "1.6`", ",", "0.4`"}], "}"}], ",", RowBox[{"{", RowBox[{"1.`", ",", "1.6`", ",", "2.2`", ",", "0.2`"}], "}"}]}], "}"}], "]"}]], "Output", TaggingRules->{}, CellChangeTimes->{3.776708536934091*^9, 3.776710055223072*^9, 3.776710220943383*^9, 3.7767103111702967`*^9}, CellLabel->"Out[603]=", CellID->331876628] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Applications", "\[NonBreakingSpace]", Cell["(2)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->568056528], Cell["Create a grid:", "Text", TaggingRules->{}, CellChangeTimes->{{3.776182045135973*^9, 3.776182047992437*^9}}, CellID->1702192050], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/BlendLine"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "BlendLine"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["BlendLine"], BoxID -> "BlendLine", Selectable->False], "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "10"}], "}"}]}], "}"}], "]"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "10"}], "}"}]}], "}"}], "]"}]}], "}"}], ",", RowBox[{"Subdivide", "[", "5", "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/BlendLine"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "BlendLine"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["BlendLine"], BoxID -> "BlendLine", Selectable->False], "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "0"}], "}"}]}], "}"}], "]"}], ",", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "10"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "10"}], "}"}]}], "}"}], "]"}]}], "}"}], ",", RowBox[{"Subdivide", "[", "8", "]"}]}], "]"}]}], "}"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.776181968121015*^9, 3.776182041161274*^9}, { 3.776708121468255*^9, 3.776708127499214*^9}}, CellLabel->"In[604]:=", CellID->695765799], Cell[BoxData[ GraphicsBox[{{LineBox[{{0, 0}, {0, 10}}], LineBox[{{1, 0}, {1, 10}}], LineBox[{{2, 0}, {2, 10}}], LineBox[{{3, 0}, {3, 10}}], LineBox[{{4, 0}, {4, 10}}], LineBox[{{5, 0}, {5, 10}}]}, { LineBox[{{0, 0}, {5, 0}}], LineBox[NCache[{{0, Rational[5, 4]}, {5, Rational[5, 4]}}, {{0, 1.25}, { 5, 1.25}}]], LineBox[NCache[{{0, Rational[5, 2]}, {5, Rational[5, 2]}}, {{0, 2.5}, { 5, 2.5}}]], LineBox[NCache[{{0, Rational[15, 4]}, {5, Rational[15, 4]}}, {{0, 3.75}, { 5, 3.75}}]], LineBox[{{0, 5}, {5, 5}}], LineBox[NCache[{{0, Rational[25, 4]}, {5, Rational[25, 4]}}, {{0, 6.25}, { 5, 6.25}}]], LineBox[NCache[{{0, Rational[15, 2]}, {5, Rational[15, 2]}}, {{0, 7.5}, { 5, 7.5}}]], LineBox[NCache[{{0, Rational[35, 4]}, {5, Rational[35, 4]}}, {{0, 8.75}, { 5, 8.75}}]], LineBox[{{0, 10}, {5, 10}}]}}, ImageSize->{129.417458129085, Automatic}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.776182041498322*^9, 3.776183158506435*^9, 3.776183818668386*^9, { 3.776708117392171*^9, 3.776708128305304*^9}, 3.776708357655266*^9, 3.776710056192031*^9, 3.7767102225086*^9, 3.776710312351117*^9}, CellLabel->"Out[604]=", CellID->599198123] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->60655773], Cell["Design a fancy curved rooftop design using straight beams:", "Text", TaggingRules->{}, CellChangeTimes->{{3.776181937679468*^9, 3.776181945197282*^9}, { 3.7767070022756248`*^9, 3.776707006146012*^9}, {3.7767076261967916`*^9, 3.776707633316311*^9}, {3.7767078702488527`*^9, 3.7767078788564587`*^9}, { 3.7767081367680893`*^9, 3.776708142229076*^9}, {3.776710228654111*^9, 3.776710238127701*^9}, {3.781986034060509*^9, 3.7819860350649137`*^9}}, CellID->1534328133], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"a", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"b", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"c", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0", ",", "0"}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"d", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Graphics3D", "[", RowBox[{"{", RowBox[{"Blue", ",", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/BlendLine"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "BlendLine"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["BlendLine"], BoxID -> "BlendLine", Selectable->False], "[", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], ",", RowBox[{"Subdivide", "[", "15", "]"}]}], "]"}], ",", "Red", ",", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/BlendLine"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "BlendLine"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["BlendLine"], BoxID -> "BlendLine", Selectable->False], "[", RowBox[{ RowBox[{"{", RowBox[{"c", ",", "d"}], "}"}], ",", RowBox[{"Subdivide", "[", "15", "]"}]}], "]"}]}], "}"}], "]"}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.77618192274585*^9, 3.776181934435102*^9}, 3.7761831535819817`*^9, {3.776707593660063*^9, 3.776707857279088*^9}}, CellLabel->"In[605]:=", CellID->469298155], Cell[BoxData[ Graphics3DBox[{ {RGBColor[0, 0, 1], Line3DBox[{{0, 0, 1}, {0, 1, 0}}], Line3DBox[ NCache[{{Rational[1, 15], 0, Rational[14, 15]}, { Rational[1, 15], 1, Rational[1, 15]}}, {{ 0.06666666666666667, 0, 0.9333333333333333}, { 0.06666666666666667, 1, 0.06666666666666667}}]], Line3DBox[ NCache[{{Rational[2, 15], 0, Rational[13, 15]}, { Rational[2, 15], 1, Rational[2, 15]}}, {{ 0.13333333333333333`, 0, 0.8666666666666667}, { 0.13333333333333333`, 1, 0.13333333333333333`}}]], Line3DBox[ NCache[{{Rational[1, 5], 0, Rational[4, 5]}, { Rational[1, 5], 1, Rational[1, 5]}}, {{0.2, 0, 0.8}, {0.2, 1, 0.2}}]], Line3DBox[ NCache[{{Rational[4, 15], 0, Rational[11, 15]}, { Rational[4, 15], 1, Rational[4, 15]}}, {{ 0.26666666666666666`, 0, 0.7333333333333333}, { 0.26666666666666666`, 1, 0.26666666666666666`}}]], Line3DBox[ NCache[{{Rational[1, 3], 0, Rational[2, 3]}, { Rational[1, 3], 1, Rational[1, 3]}}, {{ 0.3333333333333333, 0, 0.6666666666666666}, { 0.3333333333333333, 1, 0.3333333333333333}}]], Line3DBox[ NCache[{{Rational[2, 5], 0, Rational[3, 5]}, { Rational[2, 5], 1, Rational[2, 5]}}, {{0.4, 0, 0.6}, {0.4, 1, 0.4}}]], Line3DBox[ NCache[{{Rational[7, 15], 0, Rational[8, 15]}, { Rational[7, 15], 1, Rational[7, 15]}}, {{ 0.4666666666666667, 0, 0.5333333333333333}, { 0.4666666666666667, 1, 0.4666666666666667}}]], Line3DBox[ NCache[{{Rational[8, 15], 0, Rational[7, 15]}, { Rational[8, 15], 1, Rational[8, 15]}}, {{ 0.5333333333333333, 0, 0.4666666666666667}, { 0.5333333333333333, 1, 0.5333333333333333}}]], Line3DBox[ NCache[{{Rational[3, 5], 0, Rational[2, 5]}, { Rational[3, 5], 1, Rational[3, 5]}}, {{0.6, 0, 0.4}, {0.6, 1, 0.6}}]], Line3DBox[ NCache[{{Rational[2, 3], 0, Rational[1, 3]}, { Rational[2, 3], 1, Rational[2, 3]}}, {{ 0.6666666666666666, 0, 0.3333333333333333}, { 0.6666666666666666, 1, 0.6666666666666666}}]], Line3DBox[ NCache[{{Rational[11, 15], 0, Rational[4, 15]}, { Rational[11, 15], 1, Rational[11, 15]}}, {{ 0.7333333333333333, 0, 0.26666666666666666`}, { 0.7333333333333333, 1, 0.7333333333333333}}]], Line3DBox[ NCache[{{Rational[4, 5], 0, Rational[1, 5]}, { Rational[4, 5], 1, Rational[4, 5]}}, {{0.8, 0, 0.2}, {0.8, 1, 0.8}}]], Line3DBox[ NCache[{{Rational[13, 15], 0, Rational[2, 15]}, { Rational[13, 15], 1, Rational[13, 15]}}, {{ 0.8666666666666667, 0, 0.13333333333333333`}, { 0.8666666666666667, 1, 0.8666666666666667}}]], Line3DBox[ NCache[{{Rational[14, 15], 0, Rational[1, 15]}, { Rational[14, 15], 1, Rational[14, 15]}}, {{ 0.9333333333333333, 0, 0.06666666666666667}, { 0.9333333333333333, 1, 0.9333333333333333}}]], Line3DBox[{{1, 0, 0}, {1, 1, 1}}]}, {RGBColor[1, 0, 0], Line3DBox[{{0, 0, 1}, {1, 0, 0}}], Line3DBox[ NCache[{{0, Rational[1, 15], Rational[14, 15]}, { 1, Rational[1, 15], Rational[1, 15]}}, {{ 0, 0.06666666666666667, 0.9333333333333333}, { 1, 0.06666666666666667, 0.06666666666666667}}]], Line3DBox[ NCache[{{0, Rational[2, 15], Rational[13, 15]}, { 1, Rational[2, 15], Rational[2, 15]}}, {{ 0, 0.13333333333333333`, 0.8666666666666667}, { 1, 0.13333333333333333`, 0.13333333333333333`}}]], Line3DBox[ NCache[{{0, Rational[1, 5], Rational[4, 5]}, { 1, Rational[1, 5], Rational[1, 5]}}, {{0, 0.2, 0.8}, {1, 0.2, 0.2}}]], Line3DBox[ NCache[{{0, Rational[4, 15], Rational[11, 15]}, { 1, Rational[4, 15], Rational[4, 15]}}, {{ 0, 0.26666666666666666`, 0.7333333333333333}, { 1, 0.26666666666666666`, 0.26666666666666666`}}]], Line3DBox[ NCache[{{0, Rational[1, 3], Rational[2, 3]}, { 1, Rational[1, 3], Rational[1, 3]}}, {{ 0, 0.3333333333333333, 0.6666666666666666}, { 1, 0.3333333333333333, 0.3333333333333333}}]], Line3DBox[ NCache[{{0, Rational[2, 5], Rational[3, 5]}, { 1, Rational[2, 5], Rational[2, 5]}}, {{0, 0.4, 0.6}, {1, 0.4, 0.4}}]], Line3DBox[ NCache[{{0, Rational[7, 15], Rational[8, 15]}, { 1, Rational[7, 15], Rational[7, 15]}}, {{ 0, 0.4666666666666667, 0.5333333333333333}, { 1, 0.4666666666666667, 0.4666666666666667}}]], Line3DBox[ NCache[{{0, Rational[8, 15], Rational[7, 15]}, { 1, Rational[8, 15], Rational[8, 15]}}, {{ 0, 0.5333333333333333, 0.4666666666666667}, { 1, 0.5333333333333333, 0.5333333333333333}}]], Line3DBox[ NCache[{{0, Rational[3, 5], Rational[2, 5]}, { 1, Rational[3, 5], Rational[3, 5]}}, {{0, 0.6, 0.4}, {1, 0.6, 0.6}}]], Line3DBox[ NCache[{{0, Rational[2, 3], Rational[1, 3]}, { 1, Rational[2, 3], Rational[2, 3]}}, {{ 0, 0.6666666666666666, 0.3333333333333333}, { 1, 0.6666666666666666, 0.6666666666666666}}]], Line3DBox[ NCache[{{0, Rational[11, 15], Rational[4, 15]}, { 1, Rational[11, 15], Rational[11, 15]}}, {{ 0, 0.7333333333333333, 0.26666666666666666`}, { 1, 0.7333333333333333, 0.7333333333333333}}]], Line3DBox[ NCache[{{0, Rational[4, 5], Rational[1, 5]}, { 1, Rational[4, 5], Rational[4, 5]}}, {{0, 0.8, 0.2}, {1, 0.8, 0.8}}]], Line3DBox[ NCache[{{0, Rational[13, 15], Rational[2, 15]}, { 1, Rational[13, 15], Rational[13, 15]}}, {{ 0, 0.8666666666666667, 0.13333333333333333`}, { 1, 0.8666666666666667, 0.8666666666666667}}]], Line3DBox[ NCache[{{0, Rational[14, 15], Rational[1, 15]}, { 1, Rational[14, 15], Rational[14, 15]}}, {{ 0, 0.9333333333333333, 0.06666666666666667}, { 1, 0.9333333333333333, 0.9333333333333333}}]], Line3DBox[{{0, 1, 0}, {1, 1, 1}}]}}, ImageSize->{367.96281594047036`, 372.1962849498112}, ImageSizeRaw->Automatic, ViewPoint->{1.3248214031021301`, -2.85702803076914, 1.2378364517503575`}, ViewVertical->{0.09444366106709774, -0.13643747693872754`, 0.9861365066616474}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.776181927189089*^9, 3.7761819464452763`*^9}, 3.776182827253397*^9, 3.776183154184094*^9, 3.776183813686101*^9, { 3.776707609700058*^9, 3.776707665652646*^9}, 3.776707735589055*^9, { 3.776707793026496*^9, 3.776707806254157*^9}, {3.776707839397018*^9, 3.776707880613859*^9}, {3.776708129947269*^9, 3.776708143628389*^9}, 3.77670835908422*^9, 3.776710057640564*^9, {3.776710224097865*^9, 3.776710240164275*^9}, 3.7767103134760227`*^9}, CellLabel->"Out[609]=", CellID->588289905] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Properties and Relations", "\[NonBreakingSpace]", Cell["(2)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->754506620], Cell["\<\ Lines do not need the same number of data points. The resulting line can have \ more points than the original ones:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.7761828547468977`*^9, 3.776182875325713*^9}, { 3.77618369194051*^9, 3.776183700898366*^9}, {3.776707019376335*^9, 3.7767070251819153`*^9}, {3.776708163330203*^9, 3.776708175250614*^9}}, CellID->2141516072], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"p1", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "1"}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"p2", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", RowBox[{"-", "1"}]}], "}"}], ",", RowBox[{"{", RowBox[{"1.5", ",", "0.2"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", RowBox[{"-", "0.1"}]}], "}"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{ RowBox[{"Line", "[", "p1", "]"}], ",", RowBox[{"Line", "[", "p2", "]"}], ",", RowBox[{"PointSize", "[", "Large", "]"}], ",", RowBox[{"Point", "[", "p1", "]"}], ",", RowBox[{"Point", "[", "p2", "]"}], ",", "Red", ",", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/BlendLine"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "BlendLine"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["BlendLine"], BoxID -> "BlendLine", Selectable->False], "[", RowBox[{"{", RowBox[{ RowBox[{"Line", "[", "p1", "]"}], ",", RowBox[{"Line", "[", "p2", "]"}]}], "}"}], "]"}], ",", RowBox[{"Point", "@@", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/BlendLine"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "BlendLine"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["BlendLine"], BoxID -> "BlendLine", Selectable->False], "[", RowBox[{"{", RowBox[{ RowBox[{"Line", "[", "p1", "]"}], ",", RowBox[{"Line", "[", "p2", "]"}]}], "}"}], "]"}]}]}], "}"}], "]"}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.776182882620368*^9, 3.776182973956641*^9}, { 3.77618363554585*^9, 3.776183682356204*^9}, {3.7767079023028297`*^9, 3.7767079041860123`*^9}, {3.776708376305183*^9, 3.776708392618664*^9}}, CellLabel->"In[610]:=", CellID->594986841], Cell[BoxData[ GraphicsBox[{LineBox[{{-1, 1}, {0, 2}, {2, 1}}], LineBox[{{-1, 0}, {0, -1}, {1.5, 0.2}, {2, -0.1}}], {PointSize[Large], PointBox[{{-1, 1}, {0, 2}, {2, 1}}], PointBox[{{-1, 0}, {0, -1}, {1.5, 0.2}, {2, -0.1}}], {RGBColor[1, 0, 0], LineBox[NCache[{{-1, Rational[1, 2]}, { Rational[-1, 6], Rational[1, 3]}, {0.375, 0.8}, {1.0833333333333333`, 0.9333333333333333}, {2, 0.45}}, {{-1, 0.5}, {-0.16666666666666666`, 0.3333333333333333}, {0.375, 0.8}, {1.0833333333333333`, 0.9333333333333333}, {2, 0.45}}]], PointBox[NCache[{{-1, Rational[1, 2]}, { Rational[-1, 6], Rational[1, 3]}, {0.375, 0.8}, {1.0833333333333333`, 0.9333333333333333}, {2, 0.45}}, {{-1, 0.5}, {-0.16666666666666666`, 0.3333333333333333}, {0.375, 0.8}, {1.0833333333333333`, 0.9333333333333333}, {2, 0.45}}]]}}}, ImageSize->{197.859375, Automatic}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7761828841390123`*^9, 3.7761828983572483`*^9}, { 3.776182950622889*^9, 3.776182974418188*^9}, 3.77618316068195*^9, { 3.776183647952291*^9, 3.7761837022860117`*^9}, 3.7761838200222607`*^9, { 3.776707898650364*^9, 3.776707904848276*^9}, {3.776708152594851*^9, 3.776708178912427*^9}, {3.776708360541013*^9, 3.7767083931113873`*^9}, 3.776710059120899*^9, 3.7767102426960583`*^9, 3.776710314816683*^9}, CellLabel->"Out[612]=", CellID->1184331362] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->567153852], Cell[TextData[{ "Extrapolate beyond the original lines by using numbers outside the range ", Cell[BoxData[ RowBox[{"(", RowBox[{"0", ",", "1"}], ")"}]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.776181937679468*^9, 3.776181945197282*^9}, { 3.7767070022756248`*^9, 3.776707006146012*^9}, {3.7767075168268337`*^9, 3.776707523094164*^9}, {3.7773137161385965`*^9, 3.7773137406430464`*^9}, 3.8589540546284237`*^9}, CellID->1499672610], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"a", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "0.5"}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"b", "=", RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "1"}], ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "1"}], "}"}]}], "}"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{"a", ",", "b", ",", "Red", ",", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/BlendLine"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "BlendLine"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["BlendLine"], BoxID -> "BlendLine", Selectable->False], "[", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"-", "0.4"}], ",", RowBox[{"-", "0.2"}], ",", "0.2", ",", "0.4", ",", "0.6", ",", "0.8", ",", "1.2", ",", "1.4"}], "}"}]}], "]"}]}], "}"}], "]"}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.77618192274585*^9, 3.776181934435102*^9}, 3.7761831535819817`*^9, {3.776707493461429*^9, 3.7767075058037767`*^9}, { 3.7767084102505627`*^9, 3.776708414155396*^9}}, CellLabel->"In[613]:=", CellID->2129475078], Cell[BoxData[ GraphicsBox[{LineBox[{{0, 0}, {1, 0}, {3, 0.5}}], LineBox[{{-1, 2}, {1, 2}, {3, 1}}], {RGBColor[1, 0, 0], LineBox[{{0.4, -0.8}, {0.9999999999999999, -0.8}, {2.999999999999999, 0.29999999999999993`}}], LineBox[{{0.2, -0.4}, {1., -0.4}, {2.9999999999999996`, 0.39999999999999997`}}], LineBox[{{-0.2, 0.4}, {1., 0.4}, {3.0000000000000004`, 0.6000000000000001}}], LineBox[{{-0.4, 0.8}, {1., 0.8}, {3., 0.7}}], LineBox[{{-0.6, 1.2}, {1., 1.2}, {3., 0.8}}], LineBox[{{-0.8, 1.6}, {1., 1.6}, {3., 0.9}}], LineBox[{{-1.2, 2.4}, {1., 2.4}, {3., 1.1}}], LineBox[{{-1.4, 2.8}, {1., 2.8}, {2.9999999999999996`, 1.2}}]}}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7767075104729567`*^9, 3.776707512696741*^9}, 3.7767079082399387`*^9, 3.776708182568169*^9, 3.7767083620261517`*^9, { 3.776708402141693*^9, 3.7767084146750813`*^9}, 3.776710060549073*^9, 3.776710243933004*^9, 3.7767103159663067`*^9}, CellLabel->"Out[615]=", CellID->2006219939] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Neat Examples", "\[NonBreakingSpace]", Cell["(2)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->540091361], Cell["Interpolate between an octagon and a hexagon:", "Text", TaggingRules->{}, CellChangeTimes->{{3.776182202055979*^9, 3.776182211167921*^9}, 3.7819860502438583`*^9}, CellID->685375064], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Graphics", "@", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/BlendLine"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "BlendLine"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["BlendLine"], BoxID -> "BlendLine", Selectable->False], "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Line", "[", RowBox[{ RowBox[{ RowBox[{"Append", "[", RowBox[{"#", ",", RowBox[{"First", "[", "#", "]"}]}], "]"}], "&"}], "@", RowBox[{"CirclePoints", "[", "8", "]"}]}], "]"}], ",", RowBox[{"Line", "[", RowBox[{ RowBox[{ RowBox[{"Append", "[", RowBox[{"#", ",", RowBox[{"First", "[", "#", "]"}]}], "]"}], "&"}], "@", RowBox[{"CirclePoints", "[", RowBox[{"0.2", ",", "6"}], "]"}]}], "]"}]}], "}"}], ",", RowBox[{"Subdivide", "[", "15", "]"}]}], "]"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.776182075496907*^9, 3.776182191809639*^9}, { 3.7761827323413982`*^9, 3.776182732646984*^9}, {3.7767079136684303`*^9, 3.776707920523885*^9}}, CellLabel->"In[616]:=", CellID->1860376824], Cell[BoxData[ GraphicsBox[{ LineBox[{{0.3826834323650898, -0.9238795325112867}, { 0.9238795325112867, -0.3826834323650898}, { 0.9238795325112867, -0.12756114412169658`}, {0.9238795325112867, 0.3826834323650898}, {0.563082132413822, 0.7434808324625544}, { 0.3826834323650898, 0.9238795325112867}, {-0.3826834323650898, 0.9238795325112867}, {-0.9238795325112867, 0.3826834323650898}, {-0.9238795325112867, 0.12756114412169658`}, {-0.9238795325112867, -0.3826834323650898}, \ {-0.563082132413822, -0.7434808324625544}, {-0.3826834323650898, \ -0.9238795325112867}, {0.3826834323650898, -0.9238795325112867}}], LineBox[{{0.36383787020741715`, -0.8738345690609934}, { 0.8739542303438677, -0.3600579548866986}, { 0.8756208970105342, -0.11905706784691682`}, {0.872287563677201, 0.36294470623264674`}, {0.5322099902529006, 0.7054624490155099}, { 0.36050453687408385`, 0.8738345690609934}, {-0.36383787020741715`, 0.8738345690609934}, {-0.8739542303438677, 0.3600579548866986}, {-0.8756208970105342, 0.11905706784691682`}, {-0.872287563677201, -0.36294470623264674`}, \ {-0.5322099902529006, -0.7054624490155099}, {-0.36050453687408385`, \ -0.8738345690609934}, {0.36383787020741715`, -0.8738345690609934}}], LineBox[{{0.3449923080497445, -0.8237896056107002}, { 0.8240289281764486, -0.3374324774083074}, { 0.8273622615097819, -0.11055299157213704`}, {0.8206955948431153, 0.34320598010020364`}, {0.5013378480919791, 0.6674440655684655}, { 0.3383256413830778, 0.8237896056107002}, {-0.3449923080497445, 0.8237896056107002}, {-0.8240289281764486, 0.3374324774083074}, {-0.8273622615097819, 0.11055299157213704`}, {-0.8206955948431153, -0.34320598010020364`}, \ {-0.5013378480919791, -0.6674440655684655}, {-0.3383256413830778, \ -0.8237896056107002}, {0.3449923080497445, -0.8237896056107002}}], LineBox[{{0.3261467458920719, -0.7737446421604071}, { 0.7741036260090295, -0.31480699992991623`}, { 0.7791036260090295, -0.10204891529735727`}, {0.7691036260090295, 0.32346725396776066`}, {0.47046570593105763`, 0.629425682121421}, { 0.31614674589207187`, 0.7737446421604071}, {-0.3261467458920719, 0.7737446421604071}, {-0.7741036260090295, 0.31480699992991623`}, {-0.7791036260090295, 0.10204891529735727`}, {-0.7691036260090295, -0.3234672539677606}, \ {-0.47046570593105763`, -0.629425682121421}, {-0.31614674589207187`, \ -0.773744642160407}, {0.3261467458920719, -0.7737446421604071}}], LineBox[{{0.3073011837343992, -0.7236996787101136}, { 0.7241783238416102, -0.292181522451525}, { 0.7308449905082769, -0.0935448390225775}, {0.7175116571749436, 0.30372852783531756`}, {0.4395935637701361, 0.5914072986743766}, { 0.2939678504010659, 0.7236996787101136}, {-0.3073011837343992, 0.7236996787101136}, {-0.7241783238416102, 0.292181522451525}, {-0.7308449905082769, 0.0935448390225775}, {-0.7175116571749436, -0.3037285278353175}, \ {-0.4395935637701361, -0.5914072986743766}, {-0.2939678504010659, \ -0.7236996787101135}, {0.3073011837343992, -0.7236996787101136}}], LineBox[{{0.2884556215767265, -0.6736547152598203}, { 0.6742530216741911, -0.2695560449731338}, { 0.6825863550075244, -0.08504076274779772}, {0.6659196883408578, 0.28398980170287447`}, {0.40872142160921465`, 0.5533889152273321}, { 0.27178895491005983`, 0.6736547152598203}, {-0.2884556215767265, 0.6736547152598203}, {-0.6742530216741911, 0.26955604497313385`}, {-0.6825863550075244, 0.08504076274779773}, {-0.6659196883408578, -0.28398980170287447`}, \ {-0.4087214216092147, -0.5533889152273321}, {-0.27178895491005983`, \ -0.6736547152598203}, {0.2884556215767265, -0.6736547152598203}}], LineBox[{{0.26961005941905386`, -0.6236097518095272}, { 0.6243277195067721, -0.24693056749474263`}, { 0.634327719506772, -0.07653668647301796}, {0.6143277195067721, 0.26425107557043137`}, {0.3778492794482932, 0.5153705317802877}, { 0.24961005941905387`, 0.6236097518095272}, {-0.26961005941905386`, 0.6236097518095272}, {-0.6243277195067721, 0.24693056749474263`}, {-0.634327719506772, 0.07653668647301798}, {-0.6143277195067721, -0.26425107557043137`}, \ {-0.3778492794482932, -0.5153705317802877}, {-0.24961005941905387`, \ -0.6236097518095272}, {0.26961005941905386`, -0.6236097518095272}}], LineBox[{{0.2507644972613812, -0.5735647883592339}, { 0.5744024173393529, -0.22430509001635143`}, { 0.5860690840060196, -0.06803261019823818}, {0.5627357506726862, 0.24451234943798833`}, {0.34697713728737173`, 0.47735214833324324`}, { 0.22743116392804788`, 0.5735647883592339}, {-0.2507644972613812, 0.5735647883592339}, {-0.5744024173393529, 0.22430509001635146`}, {-0.5860690840060196, 0.0680326101982382}, {-0.5627357506726863, -0.24451234943798833`}, \ {-0.34697713728737173`, -0.47735214833324324`}, {-0.2274311639280479, \ -0.5735647883592339}, {0.2507644972613812, -0.5735647883592339}}], LineBox[{{0.2319189351037086, -0.5235198249089406}, { 0.5244771151719338, -0.20167961253796027`}, { 0.5378104485052672, -0.05952853392345841}, {0.5111437818386004, 0.22477362330554532`}, {0.3161049951264503, 0.43933376488619885`}, { 0.20525226843704192`, 0.5235198249089406}, {-0.2319189351037086, 0.5235198249089406}, {-0.5244771151719338, 0.2016796125379603}, {-0.5378104485052672, 0.05952853392345842}, {-0.5111437818386005, -0.2247736233055453}, \ {-0.31610499512645035`, -0.4393337648861988}, {-0.20525226843704195`, \ -0.5235198249089406}, {0.2319189351037086, -0.5235198249089406}}], LineBox[{{0.21307337294603595`, -0.47347486145864737`}, { 0.47455181300451477`, -0.17905413505956908`}, { 0.4895518130045147, -0.051024457648678634`}, {0.45955181300451475`, 0.20503489717310225`}, {0.2852328529655288, 0.4013153814391544}, { 0.18307337294603593`, 0.47347486145864737`}, {-0.21307337294603595`, 0.47347486145864737`}, {-0.47455181300451477`, 0.1790541350595691}, {-0.4895518130045147, 0.05102445764867865}, {-0.45955181300451475`, -0.20503489717310222`}, \ {-0.28523285296552886`, -0.40131538143915435`}, {-0.18307337294603596`, \ -0.4734748614586473}, {0.21307337294603595`, -0.47347486145864737`}}], LineBox[{{0.19422781078836326`, -0.423429898008354}, { 0.42462651083709557`, -0.15642865758117788`}, { 0.4412931775037622, -0.04252038137389886}, {0.40795984417042885`, 0.18529617104065915`}, {0.2543607108046073, 0.3632969979921099}, { 0.16089447745502994`, 0.423429898008354}, {-0.19422781078836326`, 0.423429898008354}, {-0.42462651083709557`, 0.15642865758117788`}, {-0.4412931775037622, 0.04252038137389887}, {-0.4079598441704289, -0.18529617104065912`}, \ {-0.25436071080460737`, -0.3632969979921099}, {-0.16089447745502994`, \ -0.42342989800835396`}, {0.19422781078836326`, -0.423429898008354}}], LineBox[{{0.17538224863069063`, -0.37338493455806077`}, { 0.3747012086696765, -0.1338031801027867}, { 0.3930345420030098, -0.03401630509911909}, {0.3563678753363432, 0.1655574449082161}, {0.22348856864368588`, 0.32527861454506546`}, { 0.13871558196402395`, 0.37338493455806077`}, {-0.17538224863069063`, 0.37338493455806077`}, {-0.3747012086696765, 0.1338031801027867}, {-0.3930345420030098, 0.03401630509911911}, {-0.3563678753363432, -0.16555744490821606`}, \ {-0.2234885686436859, -0.32527861454506546`}, {-0.13871558196402398`, \ -0.37338493455806077`}, {0.17538224863069063`, -0.37338493455806077`}}], LineBox[{{0.156536686473018, -0.3233399711077676}, { 0.3247759065022574, -0.11117770262439551`}, { 0.3447759065022574, -0.025512228824339317`}, {0.3047759065022574, 0.14581871877577307`}, {0.19261642648276445`, 0.28726023109802107`}, { 0.11653668647301799`, 0.3233399711077676}, {-0.156536686473018, 0.3233399711077676}, {-0.3247759065022574, 0.11117770262439552`}, {-0.3447759065022574, 0.025512228824339338`}, {-0.3047759065022574, -0.14581871877577302`}, \ {-0.19261642648276447`, -0.287260231098021}, {-0.11653668647301801`, \ -0.3233399711077675}, {0.156536686473018, -0.3233399711077676}}], LineBox[{{0.13769112431534533`, -0.2732950076574743}, { 0.27485060433483827`, -0.0885522251460043}, { 0.29651727100150493`, -0.017008152549559546`}, {0.2531839376681716, 0.12607999264332997`}, {0.16174428432184296`, 0.24924184765097662`}, { 0.09435779098201198, 0.2732950076574743}, {-0.13769112431534533`, 0.2732950076574743}, {-0.27485060433483827`, 0.08855222514600433}, {-0.29651727100150493`, 0.017008152549559567`}, {-0.2531839376681716, -0.12607999264332995`}, \ {-0.161744284321843, -0.24924184765097657`}, {-0.09435779098201202, \ -0.2732950076574742}, {0.13769112431534533`, -0.2732950076574743}}], LineBox[{{0.11884556215767268`, -0.22325004420718098`}, { 0.22492530216741918`, -0.06592674766761311}, { 0.24825863550075244`, -0.008504076274779773}, {0.2015919688340858, 0.10634126651088692`}, {0.1308721421609215, 0.21122346420393218`}, { 0.072178895491006, 0.22325004420718098`}, {-0.11884556215767268`, 0.22325004420718098`}, {-0.22492530216741918`, 0.06592674766761314}, {-0.24825863550075244`, 0.008504076274779795}, {-0.2015919688340858, -0.10634126651088689`}, \ {-0.13087214216092155`, -0.21122346420393212`}, {-0.07217889549100603, \ -0.22325004420718098`}, {0.11884556215767268`, -0.22325004420718098`}}], LineBox[{{0.10000000000000003`, -0.17320508075688773`}, { 0.17500000000000004`, -0.04330127018922193}, {0.2, 0.}, { 0.15000000000000002`, 0.08660254037844387}, {0.10000000000000003`, 0.17320508075688773`}, {0.05000000000000002, 0.17320508075688773`}, {-0.10000000000000003`, 0.17320508075688773`}, {-0.17500000000000004`, 0.04330127018922195}, {-0.2, 2.4492935982947065`*^-17}, {-0.15000000000000005`, -0.08660254037844382}, \ {-0.10000000000000009`, -0.17320508075688767`}, {-0.05000000000000006, \ -0.17320508075688767`}, {0.10000000000000003`, -0.17320508075688773`}}]}, ImageSize->{214.59375, Automatic}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.776182076492981*^9, 3.776182113751314*^9}, { 3.776182149504649*^9, 3.776182192218048*^9}, 3.776182732882845*^9, 3.776183162151174*^9, 3.77618382643569*^9, 3.776707921258135*^9, 3.776708187054677*^9, 3.776708427860628*^9, 3.776710063016535*^9, 3.77671024565127*^9, 3.776710317502699*^9}, CellLabel->"Out[616]=", CellID->1975614023] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->1582567349], Cell["Interpolate between a circle and a square:", "Text", TaggingRules->{}, CellChangeTimes->{{3.776183201584529*^9, 3.776183213411809*^9}, { 3.776707934773759*^9, 3.77670793606802*^9}}, CellID->1363142646], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"a", "=", RowBox[{"Line", "[", RowBox[{ RowBox[{ RowBox[{"Append", "[", RowBox[{"#", ",", RowBox[{"First", "[", "#", "]"}]}], "]"}], "&"}], "[", RowBox[{"CirclePoints", "[", RowBox[{ RowBox[{"{", RowBox[{"3", ",", RowBox[{"Pi", "/", "4"}]}], "}"}], ",", "100"}], "]"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"b", "=", RowBox[{"Line", "[", RowBox[{ RowBox[{ RowBox[{"Append", "[", RowBox[{"#", ",", RowBox[{"First", "[", "#", "]"}]}], "]"}], "&"}], "[", RowBox[{"CirclePoints", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", RowBox[{"Pi", "/", "4"}]}], "}"}], ",", "4"}], "]"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Graphics", "[", RowBox[{"{", RowBox[{"a", ",", "b", ",", RowBox[{ InterpretationBox[ TagBox[ DynamicModuleBox[{Typeset`open = False}, FrameBox[ PaneSelectorBox[{False->GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"], ImageSizeCache->{11., {1., 10.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {1., 10.}}]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}], True-> GridBox[{ {GridBox[{ { PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.6538461538461539 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["BlendLine", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->Rational[12, 13] Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{ LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], ItemBox[ PaneBox[ TogglerBox[Dynamic[Typeset`open], {True-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeCloser"]], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"]]}, Appearance->None, BaselinePosition->Baseline, ContentPadding->False, FrameMargins->0], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{1, 1}, {0, 0}}], Frame->{{ RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627, 0.5], False}, {False, False}}]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{ "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings->{"Columns" -> {{0}}, "Rows" -> {{0}}}]}, { StyleBox[ PaneBox[GridBox[{ { RowBox[{ TagBox["\<\"Version (latest): \"\>", "IconizedLabel"], " ", TagBox["\<\"1.0.0\"\>", "IconizedItem"]}]}, { TagBox[ TemplateBox[{ "\"Documentation \[RightGuillemet]\"", "https://resources.wolframcloud.com/FunctionRepository/\ resources/BlendLine"}, "HyperlinkURL"], "IconizedItem"]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], Alignment->Left, BaselinePosition->Baseline, FrameMargins->{{5, 4}, {0, 4}}], "DialogStyle", FontFamily->"Roboto", FontSize->11]} }, BaselinePosition->{1, 1}, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{"Columns" -> {{None}}, "Rows" -> {False, { GrayLevel[0.8]}, False}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}]}, Dynamic[ Typeset`open], BaselinePosition->Baseline, ImageSize->Automatic], Background->RGBColor[ 0.9686274509803922, 0.9764705882352941, 0.984313725490196], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 0}}, FrameStyle->RGBColor[ 0.8313725490196079, 0.8470588235294118, 0.8509803921568627], RoundingRadius->4]], {"FunctionResourceBox", RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "BlendLine"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["BlendLine"], BoxID -> "BlendLine", Selectable->False], "[", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], ",", "i"}], "]"}]}], "}"}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"i", ",", "0.5"}], "}"}], ",", "0", ",", "1"}], "}"}], ",", " ", RowBox[{"SaveDefinitions", " ", "\[Rule]", "True"}]}], "]"}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.776183215326481*^9, 3.7761832927163267`*^9}, { 3.7761833370648737`*^9, 3.776183437892035*^9}, {3.776183739301385*^9, 3.776183762694291*^9}, {3.7767079500333138`*^9, 3.77670796648239*^9}, { 3.7773137601049924`*^9, 3.7773137669406757`*^9}}, CellLabel->"In[94]:=", CellID->816554113], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzs3Qd4FeW69nGT0JsgTWSLYAEVpYlgAdSDolKk2UWKoFK2IJatIsVCsyKC IIhYQJAOKigKVg6CINIVkUDokENJOOFQQtZ3h8m3iDG0kMwza+b/u669L0VY 3Jl35nnvZK01q8JD3Vo8En3WWWc9mU//16LdMzc98US751oW1b/c1fXJTo92 fbjD7V2fevjRh5+45qEY/eJA/d+l+l/qP4cAAAAAAAAAXzt48OC+ffv+BwAA AFmiKqVCddLGteeohISE/wUAAECWqEo5nep47SspKUn/NTExMemo/wMAAECW OG1KtUrlSv+QaelSPdu/f791UgAAAD9QrVK5ylC9nKcXKV0AAADZK1y9wk84 7t6923l60ToaAACA3zhPOKpuqXQdOHDA+fGXdSgAAAB/cl7QpdKlApaQkMAz jAAAADlERUt1S6Xrf/7nf/73f//XOg4AAICfqW45t/aidwEAAOQoehcAAIA7 6F0AAADuoHcBAAC4g94FAADgDnoXAACAO+hdAAAA7qB3AQAAuIPeBQAA4A56 FwAAgDvoXQAAAO6gdwEAABxP7FG/HPV1Os6vOP/11B+N3gUAAHA89C4AAICc tuqoL06B8ztP5THpXQAAAP9E7wIAAMhpzrOH/+xXe9P55389lecc6V0AAADp 0bsAAADc4bxm/nR7l/OnTvzI9C4AAID06F0AAADucO4U8c+udTzO73T+1Ikf md4FAACQHr0LAADAHfQuAAAAd9C7AAAA3MHr6gEAANxB7wIAAHAH900FAABw B70LAADATXwuNgAAgDvoXQAAAG5ynj10XjP/dTrOr5zKc4vp0bsAAACOh94F AAAQiehdAAAA7qB3AQAAuIPeBQAA4A56FwAAgDvoXQAAAO6gdwEAALiD3gUA AOAOehcAAIA76F0AAADuoHcBAAC4g94FAADgDnoXAACAO+hdAAAA7qB3AQAA uIPeBQAA4A56FyLU/hOyTgcAQCboXYgs6ctV0nFQwAAA3kTvQqTIULd0xiYe lZCO8yv6TxkKmHV2AABS0bsQEcKNy6lbe/fujY+P37Fjx7Zt27Zs2bLpKP2D /lW/qP+k3xAuYFQvAIBH0Lvgfekb1+7du9WsNm/evHXrVp23+pUDBw4cOUr/ oH/VL+o/6Tfot+k3p29f1l8HACDo6F3wuHDp2rt3r6qUOlV8fLx+MXRC+g36 bfrN+iP6g1QvAIAX0LvgZU7p2rdv3549e1Sitm/frn89ceNKT79Zf0R/UH9c D0L1AgDYonfBs8Kla9euXVu2bImPjz/1xpWe/qD+uB6E6gUAsEXvgjeFS9fu 3bs3b96sUzRrpcuhP64H0UNRvQAAhuhd8CDnHYjOa7rO5Cdd//ypl/NaL97h CAAwke29a9SoUQ8++KA2uGx5NAST88OuxMTE7du3b9u27cxLl0MPpQfUw/Ij L5yhL07BzKOskwLwlmzvXRdeeOFZZ501bty4bHk0BJDzwyjnZV2bN2/WP2RX 79JD6QGdF3rxIy+cCXoXgKzJ9t6lOdOnTx9tbdnyaAig9D/s2rFjR3aVLoce kB954cz9s2U5n5jwz1+3TgrAW3h9F7zGeWXXnj17Nm3apH/I3t6lB9TD6sGd V3lZf62IVPQuAFmT7b3rySefvOyyy07w+i5tdtu3b9+wYUPs/7cO+P/+OurP P/9ctmzZ6tWrs7d0OfSwenD9Fc7fZf0Vw0PCQ0kDSmPqBM08fbOadRS9C8Cp yPbedc8995x11lmaWsf7DZpmsX9nPWvhISpCa9eu/eOPP5YsWbJ+/fqc6F16 WD24/gr9RfQupJdhNO3YseN4c4zeBSBr3O9d6X/SRe9CBs4Pu37//fdffvll 586dOdG79LB6cP0Vzo+8rL9ieEiG0XSCOZb+ucXjoXcB+Cd6FzzF6V2rV6/+ +eefT+sjgU6dHlYPrr+C3oUM6F0AchrPM8JTwr1r/vz5ycnJOdG79LB6cHoX /ilrzzPyunoAp8793sXr6nECTu9atWrVf//3f+dc79KD66+gdyGDrL2unt4F 4NS537uAE3BuIrF7925tgvrnnOhdelg9uP4KbiWBLKN3Acgaehc8JfyxjOvX r9+1a1dO9C49rB48/EGN1l8xIhK9C0DW0LvgKeHetWnTpi1btuRE79LD6sHp XTgT/+xXx2OdFIC3ZHvvuu+++9S74uLisuXREDTOhwQlJCRs3bo1NjY2J3qX HlYPrr+CjwpCltG7AGQNnxMEr1EXSkxMjI+P//PPP9WOsrd06QH1sHpw/RWU LgCAy+hd8BrVoX379u3evXv9+vVxcXHZ27v0gHpYPbj+CnoXAMBl9C54Tfip xu3bt//xxx/qSNlVuvRQekA9LE8yAgBM0LvgQeEfecXGxv7111/Z1bv0UHpA ftgFALBC74IHpf+R1+rVq7PlA7L1IHooftgFADBE74I3OT/y2rNnz9atW9WX zvCFXvrjehA9lB6QH3YBAKzQu+BZ4WcbN23atGrVqnXr1mWtdOkP6o/rQXiG EQBgi94FL9NpmZiYuGvXLrWm5cuXr169+rRuYq/frD+iP6g/rn/WQ3GeAwAM 0bvgcU712r1799atW3///felS5euWbPmpG9y1G/Qb9Nv1h/RH9S/UroAAObo XfA+nZzOE447duxYv379qlWrFi1atGzZsrVr127fvl2FKvko/YP+Vb+o/6Tf oN+m36w/4jy9yBkOADBH70JESEpK0imakJCwa9culau4uLg1a9asWLFC/Wr+ /Pn/fZT+Qf+qX9R/0m/Qb9Nv1h/RH9Qft/4KAACgdyFiOB+Z7bSvPXv2xMfH q1lt3bp106ZNG4/SP+hf9Yv6T/oNTuPiw68BAN5B70JkCbevxMRENau9R+05 yvln/aLzUi4aFwDAa+hdiFDOM4+Z4llFAIA30bsAAADcQe8CAABwB70LAADA HfQuAAAAd9C7AAAA3EHvAgAAcAe9CwAAwB30LgAAAHfQuwAAANxB7wIAAHAH vQsAAMAd9C4AAAB30LsAAADcQe8CAABwB70LAADAHfQuAAAAd5x67/pvAAAA nBC9CwAAwB3Z27tCAAAA+Ad6FwAAgDvoXQAAAO6gdwEAALiD3gUAAOAOehcA AIA76F0AAADuoHcBAAC4g94FAADgDnoXAACAO+hdAAAA7qB3AQAAuIPeBQAA 4A56FwAAgDvoXQAAAO6gdwEAALiD3gUAAOAOehcAAIA76F0AAADuoHcBAAC4 g94FAADgDnoXAACAO+hdAAAA7qB3AQAAuIPeBQAA4A56FwAAgDvoXQAAAO6g dwEAALiD3gUAAOAOehcAAIA76F0AAADuoHcBAAC4g94FAADgDnoXAACAO+hd AAAA7qB3AQAAuIPeBQAA4A56FwAAgDvoXQAAAO6gdwEAALiD3gUAAOAOehcA AIA76F0AAADuoHcBiEQaR5s3b165cuXCM7ZixYpNmzbt27fP+msC4H/0LgBe kJSUtGXLllWrVmmGzJw585NPPnnnnXf69ev31FNPdejQ4c4777z55ptr1qx5 8cUXlyhRIleuXGflAD1s8eLF9VfoL9Jfp79Uf7UC9O3bd+jQoYqkYIqnkIqq wNbHDEDkoXcBcEdKSsq2bdvmz58/bty4/v37P/LII7fcckulSpVKliyZO3fu 0+1IBQsWLFu2bOXKlWvVqlX7hGqdjB5ED6UHPN0MefLkUXh9CQ0aNNCXoy9q /PjxP//8s75MfbHWxxuAF9G7AGS7HTt2LFy4cMKECQMHDuzYseNtt9126aWX 5suX7wQdpkCBAuedd97ll19+3XXXNWzY8P777+/cuXOPHj1effXVkSNHTpw4 8euvv/7ll1/+/PPPnTt3Hjp0KCdiHz58OD4+fu3atYsWLfrmm2/0l+qvVgDF UBhFUjDFu+yyy8qUKZM/f/4TfDn6YvUl6wvv1KnTK6+8okOh8EqeE7EBRBB6 F4AsS0xMXLx48aRJk1577bUuXbqolqg4qUEdr42ULFny6quvvuuuu55++ulh w4bNmjVr9erVKmkHDx60/lKyQrEVftWqVfpC3nnnHX1R+tJq1qxZokSJ4x2B ggUL6hA1atRIh0sHbfLkyTqACQkJ1l8KAJfQuwCcuu3bt3/55ZcDBgy4++67 L7nkkqioqEzbxTnnnFOjRo2WLVs++eSTQ4YM+eKLL1auXKkBYh3fPfpiV6xY 8fnnn+vLf+KJJ1q0aKEDosOS6eHSYbz44ovV2fr376/Dq4NsHR9ATqF3ATie lJSUtWvXTpo0qUePHg0bNjz33HMzFIa8efNWrVq1WbNmjz/++ODBg2fMmLFs 2bLExETr4N6VkJCgQ6QD9dZbb+mg6dDpAP7zGVgd6ttvv12HXQdfS8CrxQDf oHcBCDt06NDSpUs/+OCDrl271q1bt0iRIhn6QNGiRW+44QYVhg8//FD94fDh w9aR/UCHcfny5R999JEOrA6vDnKGw66F0HJoUbQ0WqAcenkbABfQu4Ag27dv 308//TRkyJCHHnqoevXqefLkybDjly1btlGjRj179pwyZcq6deus8wZFbGys DrgOuw6+liDDomiZtFhaMi3cvHnzuPMYEEHoXUDQ7N+//5tvvnnuueeuueaa DDfCio6OrlSp0j333DNw4MDZs2fz/juP0EJoObQoWhotkJYp/arFxMTUrl1b C/r1119rca3DAjgRehcQBAcPHvzxxx9feOGFevXqpf+hVu7cua+66qoOHToM HTpUF2+gXvoeubRMWiwtWfv27WvUqJH+7mdaXC2xFvqHH36I0HeJAv5G7wL8 Kjk5eeHChQMGDLjlllvS39shOjq6Zs2a//nPf7788kuKlg9oEb/66istqJY1 JiYmvNBadC29ToAFCxboZLCOCSAVvQvwk5SUlN9+++3NN99s3Lhx+lfFR0VF XXnlld26dZs+ffqePXusYyKn7N27d8aMGVpoLXf6u3zoZNApoRNDpwfvjgQM 0bsAH1i9evXQoUNbtmxZvHjx9K/8qVixYseOHSdOnMgrtQJIi66l1wmg0yD9 WaGTRKfKO++8o9PGOiMQOPQuIELt379/6tSprVq1ynBbrfLly7dr127MmDGb N2+2zgiv0MmgU0InxgUXXJD+bClTpoxOoSlTpvCCfMAd9C4gsiQmJo4fP/7O O+9M/znO2j0feOCBUaNGxcbGWgeE1+kk0aly//3367RJ/2IwnVQ6tbjtLZCj 6F1ARNi9e/dHH33UpEmTvHnzhl+yVbt27VdfffX333+3TodIpZPntddeu+aa a8IvBtMJptNMJ5tOOet0gA/RuwAv27lz58iRI2+99dbwvQKio6Pr1as3ePDg TZs2WaeDf+h00kmlUyt8czCdcjrxdPrx4kAgG9G7AA/asmXL0KFDb7zxxvBt AXLlynXzzTcPHz6cD01GjtIJ9u67795yyy3he+rqJNSpqBNSp6V1OiDi0bsA 71i/fv0bb7xx3XXXhZ/0yZMnT6NGjUaPHr1r1y7rdAgWnXI68XT6hW+0q9NS J6dO0Q0bNlinAyIVvQswt2bNmv79+1911VXhFznnz5+/RYsWn3zySUJCgnU6 BJ1OQp2KzZs312kZPkVr1qw5YMCAP//80zodEGHoXYCVxMTEESNGaP8K72WF Cxe+9957J02alJSUZJ0OyEhbgE5OnaI6UcMnrb5f0GnMuyCBU0TvAty3cOHC Dh06FCpUyNm5ihUr1qZNm88+++zAgQPW0YCT04mq07V169ZFixZ1zuGCBQu2 b99eJ7Z1NMDr6F2Aa/bs2TN06NCqVauGf1Zwww03fPLJJ9QtRCidujqBb7zx xvApXaVKFZ3kfBYVcDz0LsAF8+bNa9OmTfjlMaVKlXr66afXrFljnQvIHn/+ +adOaZ3Y4Rcotm7dWqe9dS7Ac+hdQM7RVTNo0KDLL788/HawW265ZeLEiYcO HbKOBmQ/ndiTJk3SSR5+Q+5ll1325ptv6kKwjgZ4Bb0LyHYpKSnffvvtfffd F763fJkyZXr06MGH+CAgdKrrhA9/DpEuBF0O3333nXUuwB69C8hGO3bseOWV Vy655JLwveUbNmw4ffr0w4cPW0cD3KbTXie/LoHwPfB1aegC0WViHQ0wQ+8C zlxKSsrs2bPvvPPO8Kf5nH/++S+88MLGjRutowH2dCHoctBFEf4EIl0sumR0 4VhHA9xG7wLOxMGDB0eOHBn+AVeuXLmaNWs2c+bMI0eOWEcDvEUXhS6Npk2b hj+BSBfOe++9p4vIOhrgHnoXkDWJiYmvvfbaeeed5+wgFSpU6Nev39atW61z AV6ny0QXiy4Z59rRRfT6669z51UEBL0LOF07d+7s2bNnsWLFnF2jWrVq48eP T05Ots4FRBJdMrpwdPmE7x7cq1ev+Ph461xAzqJ3AacuLi7uscceK1CggLNT 1K1bd9asWdahgMimi6hevXrONaWLq2vXrrrQrEMBOYXeBZyKVatWtW7d2nld SlRUVJMmTebPn28dCvAPXVC6rJwbf+lCa9OmjS4661BA9qN3ASf2888/N23a NLwdtGrVauXKldahAH/SxaVLLPwNji69BQsWWIcCshO9Czier776KvzBc/nz 5+/SpcuGDRusQwH+pwtNl1v4c7V0Gc6ePds6FJA96F1ABkeOHJkwYUL16tWd mV+0aNEePXrs3LnTOhcQLLrodOnpAnSuRF2SEydO5A4tiHT0LiDswIEDI0eO vPjii8Mf7vPqq6/y9nbAkC5AXYbhjxy65JJLdJFyyy9ELnoXEDr6gSbDhg0L z3ZVrxEjRqiGWecCkEoXoy7Jiy66KHzLr3feeYeP30IkoncB06ZNq1SpUvhm XJ9++ik34wI8SBemLs/wLb8qVqyoi9c6FHB66F0IsgULFtSpUyc8w6dOnWqd CMDJpf9eSZfwzz//bJ0IOFX0LgTTX3/9dddddzlzu1SpUjxnAUQWXbC6bHXx OlexLmdd1NahgJOjdyFodCZ369Ytd+7czs2xn3/+eV45D0QoXbw9e/Z0PkJC F7UubV3g1qGAE6F3ITh0ig4cOPDss8/WiI6Ojn7ooYe2bNliHQrAmdKFrMtZ F7UubV3gusx1sVuHAjJH70IQHDly5KOPPjr//POdpyRuv/32FStWWIcCkJ10 UevSdq5xXewff/xxSkqKdSggI3oXfO+bb74JvwGqevXqc+bMsU4EIKfoAg/f 9FgXvi5/60TA39C74GPLly+/7bbbnAlcrly5MWPG8P0v4Hu6zD/++GNd8s61 ryGgUWAdCkhD74Ivbd68uV27ds7rPYoWLfrKK6/8H6/3AIJEl7wufOdjhjQK NBA0FqxDAfQu+M2+fft69OjhfKJunjx5Hn/8cd7fBASW8/5ljQLn0+2ff/55 jQjrUAg0ehf85Isvvgg/uXD33XevW7fOOhEAexoFGgjhlxxoUFgnQnDRu+AP 27dvv+eee5y5evXVVy9cuNA6EQBvWbBgQa1atcLfl2loWCdCENG7EOlSUlJG jRpVrFgxzdJChQoNGjToyJEj1qEAeJGGg0aEBoXGhYaGRgfvtYHL6F2IaGvW rLnhhhucb2AbNmwYFxdnnQiA12lQNGrUyJkbGiAaI9aJECD0LkSoQ4cOvfzy y3nz5tXkLF269Pjx460TAYgkn376qUaHBojGiIaJRop1IgQCvQuRaP78+ZUr V9bAjIqKat++/e7du60TAYg8Gh0aIBojGiYaKRos1ongf/QuRJaEhITOnTs7 N+aqWLHi999/b50IQGTTGNEwcb6P69Kli4aMdSL4Gb0LEWTatGlly5bVeMyd O3fPnj0PHDhgnQiAH2iYaKRosGi8aMho1Fgngm/RuxARtmzZ0qJFC+d1sNde e+3KlSutEwHwGw0WjRdnzmjgaOxYJ4IP0bvgcSkpKcOGDStSpIgmof5/6NCh 3CYCQA7ReNGQcQbO2WefPXz4cG40gexF74KXrVq16rrrrnO+/WzWrBkfrwbA BRo1TZs2dSbP9ddfr0FknQj+Qe+CNyUnJ7/00kvOp6qdd955U6ZMsU4EIFg0 djR8nE961TjSULJOBD+gd8GDNm3aVK9ePeftRZ06deLtRQBM7N27t2PHjs6N JjSUNm7caJ0IEY/eBa+ZNm3aOeec4/yYa+7cudZxAATdt99+6/zgS6Np6tSp 1nEQ2ehd8A6dQp06dXJeU9GkSZP4+HjrRACQSuNIQ8mZThpTGlbWiRCp6F3w iJUrV15xxRXOZ3a8/fbb1nEAICONJuezyTSsuJsNsobeBS8YPnx4/vz5Nc0u vfTSpUuXWscBgMxpQF122WUaVhpZGlzWcRB56F2wtXv37ubNmzs/ve/QoUNS UpJ1IgA4EY0pDStnaml88fmwOC30Lhj68ccfzz//fM2uokWLTpw40ToOAJwq jSwNLo0vDTGNMus4iBj0LphITk7u06dPTEyMptZ11123YcMG60QAcHo0uJwb O2uUaaBxgy+cCnoX3BcXF1enTh0Nq+jo6J49ezKsAEQojS8NMY0yDTSNNW7w hZOid8FlkydPLlasmGZU2bJlv/vuO+s4AHCmNMo00DTWNNz4cA2cGL0Lrtm/ f/+jjz7qvBi1adOmOqOsEwFA9tBAu+OOO5z5pkGncWedCB5F74I7li9ffvnl l2si5cuXb+jQodZxACD7abhpxGnQadxp6FnHgRfRu+CCMWPGMIsABEH67zE/ /vhj6zjwHHoXctSRI0eeeeYZ52fvDz/8MD97B+B7GnQad87c+89//qMxaJ0I HkLvQs5JTEx0PtEsd+7c3NgZQKC8++67Gn0agI0bN9YwtI4Dr6B3IYfExsY6 n7dYvHhx3rcIIIA0+jQANQYrV66skWgdB55A70JO+OGHH0qUKOG8oGvdunXW cQDAhgagSpeGoUbi999/bx0H9uhdyHYjR450frreqFGjhIQE6zgAYCkxMbFx 48bOKy5GjBhhHQfG6F3IRsnJyV27dnVeTfr000/zalIACB19h5FGojMbH3vs MT6kI8joXcgue/bsueWWWzRV8ubN+9FHH1nHAQBv0WDUeNSQ1KjUwLSOAxv0 LmSLP/74o2LFiponpUuXnj9/vnUcAPAijUcNSY1KDUyNTes4MEDvwpmbPXt2 0aJFNUmqV6/Ox8ICwAloSGpUamBqbGp4WseB2+hdOENvvfVWTEyMZsidd96Z lJRkHQcAvE6jsmXLlhqbGp4aodZx4Cp6F7Ls0KFDHTp00OiIiorq3bt3SkqK dSIAiAwamBqbGp4aoRqkGqfWieASeheyJj4+vm7dupoYBQoUmDhxonUcAIg8 EyZM0AjVIK1Xr56GqnUcuIHehSxYvnx5+fLlNSv+9a9//frrr9ZxACBSaYRq kGqcVqhQYcWKFdZxkOPoXThdP/zwQ5EiRTQlrrnmmm3btlnHAYDIpkFau3Zt DVWNVg1Y6zjIWfQunJaZM2fmz59f8+Hee+89cOCAdRwA8ANtoBqqGq0asBqz 1nGQg+hdOHUTJkxwPgCoY8eO3IseALKRhqpGq/NxQp9++ql1HOQUehdO0Xvv vRcdHa2Z8Mwzz1hnAQB/0oDVmNWwHTlypHUW5Ah6F07F66+/7nyyWP/+/a2z AICfDRgwwJm3r732mnUWZD96F06qV69ezk26hg0bZp0FAPxPw9a5tVfPnj2t syCb0btwAikpKY899piu/Vy5co0dO9Y6DgAEhUauBq/Gr4Ywd6X2E3oXjic5 OblNmza66vPmzTtjxgzrOAAQLBq8Gr8awq1bt9ZAto6D7EHvQqYOHjzYvHlz Xe+FChWaO3eudRwACCKNXw1hjWINZG7d4w/0LvyTFvqWW27RlV6sWLEFCxZY xwGA4NIQ1ijWQNZY1nC2joMzRe9CBnv27Ln22mt1jZ977rnLly+3jgMAQadR rIGssazhrBFtHQdnhN6F9Hbs2FG1alVd3eXLl1+7dq11HABAKg3kCy64QMNZ I1qD2joOso7ehbC4uLiKFSvqur700ks3bdpkHQcAcIzGsoazRrQGtca1dRxk Eb0LjjVr1px//vm6omvUqLFz507rOACAjDScq1evrkGtca2hbR0HWUHvgixd urRUqVK6luvUqZOQkGAdBwCQub1792pQO282/+STT6zj4LTRu7Bq1aoSJUro Kr7tttv2799vHQcAcCJJSUnOC3GjoqJ++eUX6zg4PfSugIuNjT3vvPN0/TZp 0uTQoUPWcQAAJ6fqVaZMGY1uDXCNces4OA30riDbunXrhRdeqCv3pptu0vJZ xwEAnCoNbY1uDXCNcQ1z6zg4VfSuwNq1a1flypV1zdaqVWvfvn3WcQAAp0ej WwNcY1zDXHu0dRycEnpXMCUmJl599dW6Wq+44goVMOs4AICs0ADXGNcw10jX YLeOg5OjdwWQVurGG2/UdXrRRRfx02kAiGga4xrmGuka7P/HK0Y8j94VNIcP H27cuLGu0LJly65fv946DgDgTGmYa6RrsGu88w4pj6N3BcqRI0fuu+8+XZsl SpRYvXq1dRwAQPbQSHfuCKQhr1FvHQfHRe8KlEcffVRXZZEiRRYvXmydBQCQ nTTYNd415B955BHrLDgueldw/Oc//9H1mD9//h9//NE6CwAg+2m8a8hr1D/9 9NPWWZA5eldA9OvXT1di7ty5Z82aZZ0FAJBTNOQ16jXwNfatsyAT9K4gGDp0 qK7B6OjoiRMnWmcBAOSsCRMmaOBr7Gv4W2dBRvQu3xszZkxUVJQuwFGjRlln AQC4QQPf+QDHjz/+2DoL/obe5W/Tp0/PlSuXrr433njDOgsAwD0a+xr+2gK0 EVhnwTH0Lh+bM2dO3rx5dd317t3bOgsAwG29evXSFqCNQNuBdRakoXf51YIF CwoWLKgrrlu3btZZAAA2unbt6ry+d8SIEdZZkIre5UsbN24sXbq0rrW2bdum pKRYxwEA2NAWULVqVecJx7i4OOs4oHf5UFJSUrVq1XSVNWjQIDk52ToOAMDS wYMHL7jgAm0K2hq0j1vHCTp6l8/oW5uWLVvq+qpYseKePXus4wAA7Gk70Kag raFFixY8CWKL3uUzzqsoixYtumbNGussAACv0KagrUEbhLYJ6yyBRu/ykwkT JuiaiomJ+frrr62zAAC8RVuDNghtE59++ql1luCid/nG4sWLnY/lGjx4sHUW AIAXaYNwPqhXW4Z1loCid/nD1q1by5Ytq6vp4Ycfts4CAPAubRPaLLRlaOOw zhJE9C4f0JGvXbu2rqN69eodOnTIOg4AwLu0TWiz0JZRq1YtbR/WcQKH3uUD DzzwgK6gChUqxMfHW2cBAHidNgttGdo4tH1YZwkcelekGzBggK6dwoULr1ix wjoLACAyaMvQxqHto3///tZZgoXeFdFmzJgRfdRnn31mnQUAEEm0cTg7iLYS 6ywBQu+KXMuXLy9UqJC+Wxk4cKB1FgBA5NH2oU1EW4k2FOssQUHvilDx8fHl y5fX9dKqVSvrLACASKVNRFuJNhReIewOelckOnToUN26dXWlXHPNNQcOHLCO AwCIVNpEeEe8m+hdkahDhw66Rv71r39t27bNOgvgnoMHD+7atSsuLm7lypUL FiyYM2fOtGnTxowZM3z48FdffbV3797PnrJevXrpjwwbNkx/XA/yzTff6AH1 sBs2bNBfob/I+msF3KOtRBuKthVtLtZZ/I/eFXHeeustXR0FChT49ddfrbMA 2SYpKWndunXz5s2bNGnSkCFDevTo0a5du9tuu61q1arlypU755xzcufOfZaL 8uTJo79Uf7UCKIbCPPfcc2+//bbiKaSiKrD1MQOyjTYUbSs687XFWGfxOXpX ZNE3+DExMVFRURMnTrTOApy2Q4cOrVmz5vPPP3/zzTe7d+9+33333XjjjZUq VSpSpMhpdaHLL7+8du3a9evXb9q0aatWrTp27Pj000+/+OKLAzMzIDMvvfSS /oj+oP54s2bN9FB6wMqVKzsdT3/RqeRRbIXXl6Av5IknntAX9cUXX+gL5Mka RKIJEyZoc9EWo43GOouf0bsiyM6dO8uUKaNp37t3b+sswEkcOXIkNjZ29uzZ Q4cO7dq16+23337RRRc5n8mbqXz58pUvX/7aa69t0aJF586dX3755VGjRs2c OXPJkiVxcXHuP/fnPKe5YcMGBVAMhVGkLl26KJ5CKqoCH+9ryZUr18UXX6wv uVu3bvrydRDWr1+vA+JmfiALevXqpRP43HPP1XZjncW36F2RIiUlpWHDhroi 9M01Axxec/jw4WXLlo0ePfqpp55q2rTpZZddlumPjNS7KlSo0KBBg3//+9+v v/762LFj586du3r16j179lh/BVmh2AqvL0FfyGuvvaYvSl+avsDo6Oh/fu15 8+bVYdHB0SHSgVq6dCk/FoPXaHO56aabdLpqu9GmYx3Hn+hdkWLQoEG6FooX L75582brLEDqe6AWLVo0YsSIRx999Oqrr1apyFAzoqKiypYtqxn+yCOPqGLN mDFDFSUgr1fXl6kvVl+yypi+fH2vpEOhA/LPJlazZk0dQB1GHUzemwwv0Baj jUbn55tvvmmdxZ/oXRFhyZIlzk8PuKswrCQlJc2fP3/o0KEPPfRQ1apVM7zK XaXikksuueeee/r37z9p0qRly5bxsvMMdECWLl2qg9OvX797771XhytDE9Mh 1YHV4dVB1qHmAMKKNpqzjr6cUluPdRYfond5nw57xYoVdRX8+9//ts6CYNm4 ceOYMWM6dOhw+eWXZ3juLCYmRr/YqlWrQYMG/fDDD4mJidZhI48Omg6dDuCD Dz5YuXLlDC9+c46wDr6WQAthHRbBou1GJ6G2Hm1A1ln8ht7lfe3atdP5X6VK FR1h6yzwv/Xr13/44Yc66y688MIMP42pVq0aP43JOel/oqhDneEniloOLYqW RgtknRT+d+DAAW06OvF01lln8Rt6l8eNHz/+rKN361q9erV1FvjWX3/99f77 7z/44IPlypVLv9cXLVq0SZMmr7/++i+//MKrj1ymA67DroPfuHFjLUT6ddEy tW7dWkumhbOOCd/SpuPc0UvbkHUWX6F3eVlsbKxzX6ORI0daZ4HfbNmy5b33 3rv//vvLli2bfk8vXrx4s2bNBg0atGTJEt456xFaCC2HFkVLc84556RfLy2f FlFLqQW1jgm/0dZz1tH71Gkzss7iH/Quzzp8+LDzmVl33nmndRb4REpKyuLF i/v06XPVVVelf1F3yZIlW7ZsOWTIkOXLl/PmcY/TAi1btuztt9/Wkmnh0new GjVqaHG1xCwisos2oLOOfhawtiTrLD5B7/Ks5557Tmf7BRdcEKG3NoJ3JCUl zZgx4+GHH3buu+soWLBgs2bNhg0btmrVKuuAyCL1Ky3fO++8o6XUgoYXVwut 5dai8zI8nCFtQM7LD7QlWWfxCXqXN82dOzc6OjomJmbevHnWWRCpNm3aNHz4 8EaNGqW/s7pGaOfOnWfNmsXrtXxGC/rll19qcdO/SE9LrxNAp4FOBuuAiFTa hrQZaUvSxmSdxQ/oXR4UHx/v/FzipZdess6CyLNixYpevXpVq1YtvPlqYNau Xbtv377Lli2zTgc3aKG13Fr09Hf/qF69uk6M5cuXW6dD5NFmpFPovPPO0/Zk nSXi0bs8qHHjxjrDb7jhBl7VjFO3YcOGAQMGXHnlleF9tlChQi1atBg9evSO HTus08GGll4ngE4DnQzhE+OKK67QqaITxjodIoY2I21JOnm0PVlniXj0Lq8Z PHiwzu1zzjmH5wVwKnRhDhs2rE6dOuHXyRcvXrxjx46zZ88OyIfy4FQcOHDg q6++0onhfATMWUc/YkCnjU4enULW6RABtCU576XVJmWdJbLRuzzlt99+cz7n bvr06dZZ4Gm6GMeNG9eoUaPw3TULFChw3333ff7553zaMk5Ap8cXX3yhUyX8 OnydQjqRdDpxZ3Kc2LRp0846+rmiS5cutc4Swehd3pGUlHTppZfqrO7cubN1 FnjU4cOHZ86cef/994c3zVy5cjVs2HDs2LFsmjgtOmF02ujk0SkUfovrAw88 oBOMOwbgeLQ96VTRVsVbZbOM3uUd7du31/l85ZVX/h+fB4R/WLNmTffu3UuU KBF+kuj6669/5513eJkrzpBOIZ1IOp3CT1XrNNPJplPOOho8R9vTFVdcoZNE G5Z1lkhF7/KIzz//XGdy/vz5uZkS0jt8+PDkyZPr168f3hM19Pr378+H9CHb 6aTSqVW5cuVwt9eJp9OPH38hvZUrV2qr0hny2WefWWeJSPQuL9i3b9/555/P 6xWR3qZNm3r16hW+02nBggU7dOjw66+/WueC/+k0e/jhh8PPZesk1KnIO30Q 5rz/S9uWNi/rLJGH3uUFXbt21Tlcq1YtbhyBlJSUr776qmnTpjExMc6uV7ly 5SFDhiQkJFhHQ7DolNOJF/7xl05InZY6OfkQImir0oals+Kxxx6zzhJ56F3m Fi5cGB0dnStXLu5pGXDx8fGvvPLKhRde6GxzefLkue+++3744QfrXAi6H3/8 UaeiTkjnzNQpqhOVFxYGnDYsbVvavLSFWWeJMPQuW4cPH65SpYpG2bPPPmud BWaWLFnywAMPOLcQkQoVKgwYMGDnzp3WuYBjdELqtNTJ6ZylOl110urUtc4F M86HCGsL4xWAp4XeZUtzTOftRRddtH//fussMPDtt982aNAg/DxOkyZNZs2a xdPN8CydnDpFdaKGP4FIJ7BOY+tcMKBt6+KLL9Y50L9/f+sskYTeZWjt2rXO u0LmzJljnQWu0uY1depU5wUSUrhw4SeffDIuLs46F3CqdLo+9dRTOnWdc1gn s05pvmUIGm1ezjvxtZ1ZZ4kY9C5D9evX1xnbtm1b6yBwz8GDB99///1KlSo5 u1XJkiX79u27Z88e61xAVujU1QlcqlQp53zWia3Tmw+oChRtYVp6bWfWQSIG vcvKBx984Gy7fDhaQOzbt++NN94oW7ass0OVL19+6NChPL8MH9BprJNZp7Rz busk16nOHQYCQluYNjKtuzY16yyRgd5lYufOnc6n044dO9Y6C3KclrtXr17F ihVzdqUqVapo3XklKnxGp7RObOeNQqITXqc9b3sMAq27VlybGu8GOhX0LhP3 33+/ztJbb73VOghyljad7t27O6/ik7p1686cOdM6FJCzdJLrVHfO+QIFCugS oH35nrYzLbe2NusgEYDe5b6vvvrKGUexsbHWWZBTEhMTX3jhBedVx1FRUU2a NOHSQKDohNdp73y+lS4EXQ66KKxDIadoO9OmprXWBmedxevoXS5LSkpyXgXx +uuvW2dBjjhw4MCgQYOcFzxIo0aNuCMuAksnvy6B8LtIdGnoArEOhRyhTc25 /aC2OessnkbvctmTTz6pM7NGjRrJycnWWZDNtKYffPBBuXLlnF2mTp06P/30 k3UowJ4uBF0OznWhC0SXCQPQf7Sm1atX1xJrm7PO4mn0Ljf9+uuvMUfx6cb+ M3Xq1Msuuyz8yvkvvvjCOhHgLbooqlat6lwjulh0yVgnQjZjjzsV9C7X6HuB GjVq8L2A/8ydOzd8B9SLLrrok08+4YODgUzp0tAFosskfLdVXT7WoZCdeE7n pOhdrnGe+y5fvjzPffvGkiVLbrnlFmcHKVOmzLBhww4dOmQdCvA6XSa6WM49 91zn2tFFxOc8+gavYT4pepc71q9fz3s9/GTXrl2dOnVyPqKuaNGi/fv3p04D p0WXjC4cXT66iHQpdezYUZeVdShkgy+//NJ5z742PussXkTvcofzjh7ubeID R44cGTFihHPb29y5cz/55JO7d++2DgVEKl0+uoh0KTk33tTFxYc8+oBzj0pt fNZBvIje5YK5c+fqDDz77LO5l2+kW7BgQc2aNZ0nR+rXr7969WrrRIAf6FJy Pq9WdInpQrNOhDOyY8cObXlazTlz5lhn8Rx6V05LSUlxXk4/YMAA6yzIOnXm 9u3bOzeBPP/88ydOnGidCPCbSZMm6eJybjWsy41vVCPawIEDtZTVq1fnfUYZ 0Lty2pgxY5ydWsfHOguyIjk5eciQIc6rUPLkydOjRw9eygXkEF1cusR0oTmv nNSlx9viIpS2PKdFaxO0zuIt9K4cdeDAgQsuuEAn3kcffWSdBVnx008/he84 dPvtt//555/WiQD/04Wmy8257nQBcv/hCKWNz7lTLj92SI/elaNeffVVnXXV qlXjlaIRZ+fOna1atXImf4UKFWbMmGGdCAiW6dOn69JzrsEHH3yQpx0jjjY+ bX9avldeecU6i4fQu3LOrl27nCenvv76a+ssOD0TJ050PmAxX758L7zwAt+s ASZ06ekC1GXofLwjr6uMON98843zlDE3CQmjd+Wcxx9/XOfbrbfeah0Ep0Hf U995553Ot9g333xzbGysdSIg6HQZhm9Q3LJlyx07dlgnwmnQJqiF04ZoHcQr 6F05ZN26dXny5ImOjl62bJl1FpyqCRMmlChRQiOicOHCI0aMsI4D4Bhdkrow dXnqIv3000+t4+BUaRPUVqgNUduidRZPoHflkHvuuUfzoV27dtZBcEr0HbS+ jw5/aklcXJx1IgAZ6cJs0KCBc522aNGCH3xFCm2FWjJti9ZBPIHelRMWLlwY FRWVP3/+zZs3W2fByY0fP975MVeRIkVGjhxpHQfAiegi1aXq3N9eF691HJyc tkJtiNoWtTlaZ7FH78oJ9erV00zo0aOHdRCcxPbt25s3b+58+6zvozdu3Gid CMDJ6VJ1XjUkuoR1IVsnwkloQ9RiaXO0DmKP3pXtpk+f7rz1JiEhwToLTmTc uHHOxyzqe+f33nvPOg6A0zNq1KjwD76ef/75w4cPWyfCcWlDdN4kzj156F3Z Sxf+pZdeqlNr6NCh1llwIn379nW+WdZ3zfyYC4hQ6X/wVaNGDes4OJEhQ4Zo mbRFBrwh07uy1/Dhw3VeXXLJJYcOHbLOguNatmxZ7ty5o6KieNMi4ANPP/20 Bm9MTAzvH/cybYvaHLVS2iits1iid2Wjffv2lS5dWifVlClTrLPguPStVvXq 1bVMXbp0sc4CIHu0b9/e+RTmgP8sxeO0OWqZtFFqu7TOYobelY169eqlM+q6 666zDoITeemll5yP/tH5bJ0FQPbQ5ex8qJAucOssOBFtkVqm3r17WwcxQ+/K Llu3bi1QoIBOp/nz51tnwXEtX748T548UVFR3333nXUWANlJF7UubV3gusyt s+C4tEVqoyxYsKA2TessNuhd2aVDhw7OZ1hYB8FxHT58uEaNGlqmzp07W2cB kP10aTsvsOfZRi9zblKtTdM6iA16V7b4/fffY2JicufOvXbtWussOK6XX37Z eYYxyC8tAHxMl7bzbKMudussOK4///xT26U2TW2d1lkM0LuyRZs2bXSld+rU yToIjmvFihXOM4zffvutdRYAOUUXuPNsoy556yw4Lm2X2jS1dVoHMUDvOnMb N250qntsbKx1FmTu8OHDV111Fd0YCAJnT9clz7ONnrV+/fpcuXJp6wzg7RPp XWeuW7duusYfeOAB6yA4rn79+mmNypcvzzOMgO/pMtfFrkteF751FhxXq1at tEZdu3a1DuI2etcZ0mEpUKBAVFQU76DxrJUrVzrPMM6dO9c6CwA36GLXJZ87 d+45c+ZYZ0HmtGlqjbSBahu1zuIqetcZ6t27txp748aNrYMgc0eOHLn66qu1 Rh07drTOAsA99957ry58bet8eohnaesM4L286F1nYt++feecc45Om3nz5lln QebeffddLVC5cuV4hhEIlO3bt8fExOjy79+/v3UWZE5bpxZI22ig5jO960y8 8cYbOmfq1q1rHQSZ27VrV/HixbVGkydPts4CwG2DBw/W5a8hELRnsiKINlCt kTZT6yDuoXdl2cGDB8uWLasTZubMmdZZkLlHH31UC3TzzTdbBwFgQ5e/hoBG gXUQZE4bqBZIm6m2VOssLqF3ZdmoUaN0tlSpUsU6CDK3ePHi6Ojo3LlzB/PW fABCR29qrSGgUaCBYJ0FmdM2qs1UW6p1EJfQu7LmyJEjFStW1Kkybtw46yzI REpKyjXXXKMFevrpp62zALCkIaBRoIGgsWCdBZnQNqoF0paqjdU6ixvoXVkz adIknScXXnhhcnKydRZkYvTo0Vqg8847L1Av1wTwTxoCGgUaCBoL1lmQCW2j 2ky1QNpYrbO4gd6VNc7Nz4cPH24dBJnYs2dPqVKl+GkkAIfzExWNBQ0H6yzI hDZT5yMGrIO4gd6VBV9//bXOkNKlS+tLts6CTDz22GNaoBtuuME6CACv0EDQ WNBwsA6CTGgz1ZaqBfrmm2+ss+Q4elcW/Nd//ZdOj4EDB1oHQSaWLVsWExOT K1cuPhUXQJgGgsaChoNGhHUWZEJbqjZWba/WQXIcvet0LVy4UOfG2WefnZCQ YJ0FmXDuBtOtWzfrIAC8xfksXe646E3aUrWxaoF++eUX6yw5i951upo3b64T 47nnnrMOgkyMHTvWeQp479691lkAeIvGgvNklgaFdRZk4tlnn9XqaJO1DpKz 6F2n5ffff4+KisqXL9/27dutsyCj/fv3O3ey/fDDD62zAPAiDQfnLp0aF9ZZ kJE2Vm2v2mT9fdNFetdpadu2ra7Zzp07WwdBJl599VXnHTHcpQdApjQcnHej a1xYZ0EmOnXqpNVp166ddZAcRO86dRs3bsydO3dMTExsbKx1FmS0d+9e5zPK Z8+ebZ0FgHc5b0jXuODVCB6k7VWbrLbaTZs2WWfJKfSuU/fMM8/oar3//vut gyATzz//vFbnpptusg4CwOs0KDQuNDSsgyAT2mS1OtpwrYPkFHrXKTp06JDz gsyff/7ZOgsy2r59e8GCBbU6CxYssM4CwOs0KDQuNDR4pa4HaZN13h6lbdc6 S46gd52iKVOm6Ey44oorrIMgE126dAnCu2AAZBfnnekaHdZBkIkrr7xSqzN5 8mTrIDmC3nWKbr31Vp0GgwcPtg6CjGJjY3Pnzh0dHb1q1SrrLAAig8aFhoZG B6/X9aC3335bG662XesgOYLedSo2bNigKzRfvny7d++2zoKMWrVqpSu0bdu2 1kEARBLn/ekaINZBkJG2Wm242na1+VpnyX70rlPRq1cvLk9vWr58ua7NvHnz +vLyBJBzNDQ0OjRANEassyCjBx98UNtuz549rYNkP3rXSSUnJzt34/zxxx+t syCjJk2a8KlAALLG+eQgjRHrIMhIG65zh1ttwdZZshm966Q+++wzrf6ll15q HQQZ6WTT0hQqVGjnzp3WWQBEHo0ODRCNEf/tXD6gbVdLoy3YOkg2o3edVOPG jbX0r7/+unUQZOR8BHafPn2sgwCIVL1799YYqVevnnUQZPTGG29oabQFWwfJ ZvSuE9u8eXNMTEyePHni4+Ots+BvvvnmG12SJUqUSExMtM4CIFJpgGiMaJho pFhnwd9o29Xmqy1YG7F1luxE7zqxl156SdfjPffcYx0EGdWvX19LM2DAAOsg ACKbxoiGiUaKdRBkpM1XS6ON2DpIdqJ3ncCRI0cuuOACLfqcOXOss+BvFi1a pHUpUqQIn7AG4AxpjGiYaKRosFhnwd/MnTtX66KNWNuxdZZsQ+86gS+//FIr ftFFF6WkpFhnwd+0bNnS3x/gBcBNzsfvarBYB8HfaPPVFqyl0XZsnSXb0LtO oEWLFjyT5UFr1qxx7tm1bds26ywA/EDDxLmXl8aLdRb8jfMssLZj6yDZht51 PLoMcx3FB6d6Tfv27XUZPvroo9ZBAPiHRooGi8aLdRD8jbZgn+3F9K7j8V/H 9octW7Y473BZu3atdRYA/qGR4rx7XUPGOgv+xmfPPdG7MuXL55T94amnntK6 3H333dZBAPiNBovGi4aMdRD8jc9ea03vytScOXP89x4KH9izZ0/hwoW1NEuW LLHOAsBvNFg0XjRkNGqss+CY8L0F5s6da50lG9C7MuXLe4b4QN++fbUuDRo0 sA4CwJ80XjRkNGqsg+Bv/HQvTXrXP/n1HrmRbv/+/SVLltSl9+2331pnAeBP Gi8aMqVKldLAsc6CY/z02TH0rn8aPHgwn1DvQUOHDtW61KpVyzoIAD/TkNGo 0cCxDoK/cT4r+a233rIOcqboXf/kfNryp59+ah0ExyQnJ5cvX17rMnXqVOss APxsypQpGjUVKlTQ2LHOgmMmTJigdalTp451kDNF78pg27Zt0dHR+fLl27dv n3UWHDNjxgxdcZdccok/3s8CwLOOHDmiUaOBo7FjnQXHaFPW1qwNOtLvmE3v ymDYsGG63Jo2bWodBH9z2223aV3efPNN6yAA/E+jRgNHY8c6CP5GW7PWRdu0 dZAzQu/KoH79+lrWjz/+2DoIjomNjXV+CLlr1y7rLAD8b/fu3c6PVjR8rLPg GG3N2qC1TVsHOSP0rvT0NebKlSt37tzcvMVTnI+sbdOmjXUQAEHRtm1bjR0N H+sgOEZbszZobdParK2zZB29K73333+fny17zcGDB53bRyxYsMA6C4Cg0MDR 2NHw0QiyzoJjbr/9dq2LNmvrIFlH70qvYcOGWtD33nvPOgiO+eSTT7Qo1atX tw4CIFg0djR8NIKsg+CYUaNGaVHUvqyDZB29K2zv3r3O7VJ9cFs2P6lTp46u spEjR1oHARAsGjv+uHGBn2iDdm6gqi3bOksW0bvCxowZo0vsv/7rv6yD4JgV K1ZoUYoUKaJzzzoLgGDR2NHw0QjSILLOgmO0TWtRtGVbB8kieldYs2bNtJTv vPOOdRAc06VLFy2K/t86CIAgYgR5kLZpLYq2bOsgWUTvcuhLy58/f1RU1Nat W62zIE34m82VK1daZwEQRBo+/Mjda7RNa7PWlh2hi0LvckycOFEX1/XXX28d BMeMGDFCi1K3bl3rIACCy/nkOI0j6yA4Rpu1FkUbt3WQrKB3Oe655x4t4qBB g6yD4Jhq1appUcaNG2cdBEBwaQTxlmqvcT5QQBu3dZCsoHeJkhcqVEiLGBcX Z50FaX755RdungPAXPgWghpK1lmQRpu1VkQbt7Zv6yynjd4l06dP1wpeffXV 1kFwTNeuXbUoTzzxhHUQAEGnQaRxpKFkHQTHaMvWomj7tg5y2uhd8uCDD2r5 Bg4caB0EaZKTk0uXLq1F+fXXX62zAAg6DSKNIw0ljSbrLEijLVuLou3bOshp o3cdOnSoaNGiWr61a9daZ0Ga2bNna0UqVapkHQQAUmkcaShpNFkHQRpt2VoR bd/axK2znB5615dffqm1q1q1qnUQHNOmTRstyksvvWQdBABSaRxpKLVu3do6 CI6pUqWKFkWbuHWQ00Pvat++PVu8p+hEKly4MD+BBOAdf/31l4aSRtP+/fut syDNiy++qEXp0KGDdZDTE/DelZycXKJECS3cqlWrrLMgjXMvtdq1a1sHAYBj NJQi955RvuTc1VabeGS97i7gvevnn3/WqlWsWNE6CI5p2rSpFmXw4MHWQQDg GA0ljSYNKOsgOEbbtxZl/vz51kFOQ8B7V79+/bRknTp1sg6CNLt3786TJ09M TMz27dutswDAMRpKGk0aUBpT1lmQpnPnztrEtZVbBzkNAe9dN998s5Zs0qRJ 1kGQZuTIkVqRBg0aWAcBgIw0mjSg3nvvPesgSDN58mStSP369a2DnIYg964D Bw44n4UdHx9vnQVpbrzxRl1EH374oXUQAMhIo0kDSmPKOgjSqJk4n5GtDd06 y6kKcu/6/vvvuYOEp2zevDk6OlpXUGJionUWAMhIoylfvnwaUxpW1lmQRpu4 tnJt6NZBTlWQe1fv3r21WI8//rh1EKR57bXXtCJ33XWXdRAAyJwGlMaUhpV1 EKTp3r27VkQbunWQUxXk3lW3bl0t1meffWYdBGlq1KgRoZ+3BSAgpk2bpjGl YWUdBGk+//xzrUidOnWsg5yqwPaupKQk531ze/futc6CVJs2bXI+Xz6CnqYH EDQaUBpTGlYaWdZZkCohIcF5n6m2desspySwvcv5BMBatWpZB0Ga4cOHa0Va tGhhHQQATkRjSsNKI8s6CNJoK4+gT88MbO965plntEz6f+sgSNOoUSOtyOjR o62DAMCJfPDBBxpWDRs2tA6CNM8++2wEbeiB7V2RVY99LykpyXmX0I4dO6yz AMCJaExpWGlkRcoTW74XWU9gBbN37d27N7KeDva9GTNm8JmMACLFNddco5Gl wWUdBKnCL9hOSEiwznJywexdn332mS6ZunXrWgdBmocfflgr0rdvX+sgAHBy GlYaWRpc1kGQJoJuUBDM3vX4449H1u0+/C0lJaVMmTJakWXLlllnAYCT07DS yNLg0viyzoJUzg05u3fvbh3k5ILZuyLu9rb+tmjRIi1HuXLlrIP43Lx58yoh MLTc1mecz2lkaXAtXrzYOghSRdAH0ASwd8XHx0fcxzn5W58+fXS9dO7c2TqI z3399ddnITC03NZnnM9pZOk4a3xZB0Gq8Acuq6tYZzmJAPauSZMm6WK5+eab rYMgjXOb+i+//NI6iM85vev666//A76mJaZ3uWDWrFlnceN6L6lfv75WRFu8 dZCTCGDv6tSpk5amX79+1kGQasuWLfoOpWDBgvz4Mac5veuWW26xDoKcpSWm d7lAI0uDS+NLQ8w6C1JpWz8rEp46CWDvuvTSS7U0P//8s3UQpBoxYoSWo1mz ZtZB/I/eFRD0LtdocOlQa4hZB0EqbetaDm3x1kFOImi9a+vWrVqXwoULHz58 2DoLUjVu3FgrMmrUKOsg/kfvCgh6l2s0uHSomzRpYh0EqbSta3PXimijt85y IkHrXWPHjtWiNGrUyDoIUukycT5h1uOXiT/QuwKC3uUa5xt5DTG+kfeIhg0b akU++eQT6yAnErTe5bwD5dVXX7UOglQLFiyIiB8L+wO9KyDoXW6qVKmSjvbC hQutgyCVNnfvv8QraL3ruuuu06LMmTPHOghSvfLKK1qORx991DpIINC7AoLe 5aZHHnmE7+W9Y+7cuVqOa6+91jrIiQSqdx05csR5Vsv79/cICOdnwuPGjbMO Egj0roCgd7lJ40tHW6PMOghS7dq1S8tRsGBBbffWWY4rUL3rjz/+OIv7ontG cnJykSJFtCK8C9sd9K6AoHe5SeNLR1ujTAPNOgtSXXDBBVoRbffWQY4rUL1r /PjxWo6mTZtaB0GqxYsXazkuvvhi6yBBQe8KCHqXyzTEzuIDgzxDW7yWQ9u9 dZDjClTv+s9//qPleOGFF6yDINXrr7+u5Wjfvr11kKCgdwUEvctlGmI64G+8 8YZ1EKTSFq/l0HZvHeS4AtW7GjRooOWYMWOGdRCkatKkiZZjzJgx1kGCgt4V EPQul3388cc64HfccYd1EKTSFu/xQReo3lWyZEktR1xcnHUQpL7HoWjRolqO jRs3WmcJCnpXQNC7XKY9RQe8WLFiXn4td3BoT9FyaLu3DnJcweldmzdv1lqc c8451kGQ6rffftNyVKhQwTpIgNC7AoLe5T6NMh1zjTXrIEiljV7LoU3fOkjm gtO7Pv/8cy1E/fr1rYMg1VtvvaXlaNu2rXWQAKF3BQS9y30aZTrmGmvWQZBK G72WQ5u+dZDMBad3vfTSS1qIp556yjoIUjVv3lzL8cEHH1gHCRB6V0DQu9yn UaZjrrFmHQSptNFrObTpWwfJXHB6V4sWLbz/sU0BkZKSUrx4cS3H+vXrrbME CL0rIOhd7ouNjdUx11jTcLPOgpA2ei2HNn3rIJkLTu9ynn9ftWqVdRCEVq5c yQ1s3UfvCgh6l4nzzz9fh13DzToIQtrovfz64YD0rj179mgV8ufPzy2FveDD Dz/Uctx1113WQYKF3hUQ9C4Td999tw67hpt1EKR+GIq2ey2Htn7rLJkISO/6 7rvvtAS1a9e2DoJUXbt21XIMGDDAOkiw0LsCgt5lYuDAgTrsGm7WQZBK272W Q1u/dZBMBKR3vfnmm1qCjh07WgdBqjp16rAvuI/eFRD0LhPO9aXhZh0EqbTd azkGDRpkHSQTAeldrVu31hKMGDHCOghS75haqFAhLUd8fLx1lmChdwUEvcuE tkgddg037p7qBe+++66WQ1u/dZBMBKR3XXnllVqChQsXWgdB6I8//uBF9Sbo XQFB77KisaYj//vvv1sHQUjbvdZCW791kEwEoXcdOHAgV65cMTEx+/fvt86C tHf4NmvWzDpI4NC7AoLeZUVjjbsVeYS2e2362vpVAKyzZBSE3rVo0SJdC5Ur V7YOglRPPvmkl+9o52P0roCgd1lx7s6tEWcdBKm06Ws5Fi9ebB0koyD0rpEj R+rgt2rVyjoIUt10001ajpkzZ1oHCRx6V0DQu6xorOnIa8RZB0GqBx54QMvx 3nvvWQfJKAi967HHHtPBf/31162DIFXRokW1HNu2bbMOEjj0roCgd1nRWNOR 14izDoJUr732mpZDBcA6SEZB6F2NGjXSwZ8+fbp1EITWrVuntShTpox1kCCi dwUEvcuQhpsOvgaddRCEpk2bprVo3LixdZCMgtC7nCd5ly5dah0EoYkTJ2ot 1IStgwQRvSsg6F2GnG/zJ02aZB0EIW36WosrrrjCOkhGQehdzt2i9u7dax0E oWeffVZr0atXL+sgQUTvCgh6lyENNx18DTrrIAhp03fuqGYdJCPf966dO3fq yBcrVsw6CFI1aNBAyzFt2jTrIEFE7woIepch57ktDTrrIEjlvJzYa/fo9n3v +uWXX3TYq1evbh0EqUqXLq3liIuLsw4SRPSugKB3GdqwYYMOvgaddRCk0tav 5Vi0aJF1kL/xfe9yXlDUokUL6yAIJSQkaC0KFCiQkpJinSWI6F0BQe8ypOGm Eafjr3FnnQWh5s2bay1UA6yD/I3ve9err76qw/7EE09YB0Fo8eLFWosqVapY BwkoeldA0LtsacR583adAdS9e3ethWqAdZC/8X3v6tSpkw7722+/bR0EoXHj xmkt7rzzTusgAUXvCgh6l62WLVvq+I8fP946CELa+rUWnTt3tg7yN77vXbff frsO+2effWYdBKEXX3xRa/Hcc89ZBwkoeldA0LtsacTp+GvcWQdBSFu/1qJh w4bWQf7G973rsssu02FfsWKFdRCkfWrD6NGjrYMEFL0rIOhdtjTi+GQ6j1i+ fLnWQjXAOsjf+L535c+fX4d937591kEQqlWrltZi3rx51kECit4VEPQuWz/9 9JOOv8addRCEEhMTnTdzWQf5G3/3ru3bt+uYFy9e3DoIUhUrVkzLsWPHDusg AUXvCgh6ly2NOG4a6R0qAF7bd/zduxYsWKADXrNmTesgCMXHx2stihQpYh0k uOhdAUHvMqdBpyXQpmkdBKGrrrpKa6EyYB3kGH/3rvHjx/MGOo+YP38+HdgW vSsg6F3mnL1eQ886CEIqAFqLTz/91DrIMf7uXQMGDNABf+qpp6yDIPTRRx9p Le677z7rIMFF7woIepc5DTotgYaedRCEVAC0FgMHDrQOcoy/e9ejjz6qA/7O O+9YB0Ho+eef11r06dPHOkhw0bsCgt5lrnfv3lqCnj17WgdBaOjQoVoLlQHr IMf4u3c5n8I8c+ZM6yAI3X333VqLsWPHWgcJLnpXQNC7zGnQaQk09KyDIPTF F19oLW699VbrIMf4u3dVrFhRB3zVqlXWQRCqVq2a1mLhwoXWQYKL3hUQ9C5z GnRagurVq1sHQUgFQGtRqVIl6yDH+Lh3paSk5M2bVwc8KSnJOgtCZ599ttZi 165d1kGCi94VEPQucxp0WgINPesgCKkAaC3y5cunSmCdJY2Pe9eWLVt0tEuV KmUdBKH9+/drLVSDrYMEGr0rIOhdXqCNXqug0WcdBKGSJUtqLbZu3WodJI2P e5eScNNgj1i3bp3Wonz58tZBAo3eFRD0Li/QuNMqaPRZB0HaR6V457YePu5d 06ZN06Fu2rSpdRCE5s2bp7W49tprrYMEGr0rIOhdXqBxx8eieUSzZs20FlOn TrUOksbHveuDDz7QoW7Tpo11EIQmTZqktWjRooV1kECjdwUEvcsLNO60Chp9 1kEQatu2rdZi9OjR1kHS+Lh3DRo0SIe6W7du1kEQGjJkiNaic+fO1kECjd4V EPQuL+jSpYtW4e2337YOgtDjjz+utXjzzTetg6Txce/q06ePDvULL7xgHQSh Hj16aC1efvll6yCBRu8KCHqXF2jcaRU0+qyDIKQaoLXo3bu3dZA0Pu5d3bp1 06F+6623rIMg1K5dO63FqFGjrIMEGr0rIOhdXqBxp1XQ6LMOgpBqgNaia9eu 1kHS+Lh3tWnTRof6ww8/tA6C0G233cYHB5ijdwUEvcsLNO60Chp91kEQUg3Q WrRu3do6SBof966mTZvqUE+fPt06CEJVq1bVWixZssQ6SKDRuwKC3uUFGnda BY0+6yAIqQZoLe644w7rIGl83Lvq1aunQ/39999bB0GoVKlSnrptXTDRuwKC 3uUFGndahdKlS1sHQUg1QGuhSmAdJI2Pe1eVKlV0qJcuXWodJOgOHz4cfVRy crJ1lkCjdwUEvcsLNO6Yex6hGqArQpXAOkgaH/eucuXK6VBv2LDBOkjQOR/Y dO6551oHCTp6V0DQuzxCQ08LoQFoHSTo4uLitBCqBNZB0vi4dxUpUkSHeu/e vdZBgm7x4sVaiOrVq1sHCTp6V0DQuzxCQ08LoQFoHSToEhIStBCqBNZB0vi1 dx05ciQqKio6Oto7H0EeWLNmzdI5f+utt1oHCTp6V0DQuzzCeR+3BqB1kKBT DVAZUCVQMbDOksqvvWv37t064YsVK2YdBKGJEydqLe666y7rIEFH7woIepdH aOhpISZMmGAdBCGVAa2FioF1kFR+7V2xsbE6yBUqVLAOgtD777/P/QO9gN4V EPQuj3jooYe0EBqA1kEQUhnQWqgYWAdJ5dfe5dw7hdcUecHgwYM9da/gwKJ3 BQS9yyM09LQQGoDWQZD2WjuP3EPSr71r7ty5Osg33XSTdRCE+vXrx+eUeQG9 KyDoXR7hfC5t3759rYMgpDKgtfj222+tg6Tya++aMmWKDnLz5s2tgyD07LPP ai369+9vHSTo6F0BQe/yiAEDBmghNACtgyCkMqC1UDGwDpLKr72L1xR5x7// /W+txZAhQ6yDBB29KyDoXR6hoaeF0AC0DoKQyoB3Xmvn1971xhtv6CB3797d OghCbdu21Vp88MEH1kGCjt4VEPQuj9DQ00K0adPGOghCKgNaCxUD6yCp/Nq7 evXqpYP80ksvWQdBqGXLllqLSZMmWQcJOnpXQNC7PGLy5MlaCA1A6yAIvfji i1oLFQPrIKn82rsee+wxHeS3337bOghCt956q9biq6++sg4SdPSugKB3eYSG HreM9gjnbfUqBtZBUvm1d7Vu3VoH+aOPPrIOgtB1112ntZg3b551kKCjdwUE vcsjNPS0ENdff711EIQ+/PBD7zzn69fe1apVKx3ksWPHWgdBqEqVKlqLZcuW WQcJOnpXQNC7PGLp0qVaCA1A6yAIqQxoLVQMrIOkonchp1144YVai3Xr1lkH CTp6V0DQuzxCQ08LoQFoHQT0LjfQu7yjZMmSWosdO3ZYBwk6eldA0Ls8QkNP C1GqVCnrIKB3uYHe5R0FCxbUWujksQ4SdPSugKB3ecS+ffu0EIUKFbIOAnqX G+hd3kHv8gh6V0DQuzxCQ08LoQFoHQT0LjfQu7yD3uUR9K6AoHd5BL3LO+hd LqB3eQe9yyPoXQFB7/IIepd30LtcQO/yDnqXR9C7AoLe5RH0Lu+gd7mA3uUd 9C6PoHcFBL3LI+hd3kHvcgG9yzvoXR5B7woIepdH0Lu8g97lAnqXd9C7PILe FRD0Lo+gd3kHvcsF9C7voHd5BL0rIOhdHkHv8g56lwvoXd5B7/IIeldA0Ls8 gt7lHfQuF9C7vIPe5RH0roCgd3kEvcs76F0uoHd5B73LI+hdAUHv8gh6l3fQ u1xA7/IOepdH0LsCgt7lEfQu76B3uYDe5R30Lo+gdwUEvcsj6F3eQe9yAb3L OwoXLqy1SExMtA4SdPSugKB3eYSGnhZCA9A6COhdbqB3ece5556rtdi2bZt1 kKCjdwUEvcsjNPS0EBqA1kFA73IDvcs7Lr74Yq3Fn3/+aR0k6OhdAUHv8oi1 a9dqITQArYOA3uUGepd3VK9eXWuxZMkS6yBBR+8KCHqXR2joaSGqVatmHQT0 Lje0bdtWB3n06NHWQRCqW7eu1uLHH3+0DhJ09K6AoHd5hIaeFkID0DoIQh98 8IHWQsXAOkgqv/auxx9/XAf5zTfftA6C0O233661mDlzpnWQoKN3BQS9yyNm zZqlhdAAtA6C0KBBg7QW3bp1sw6Syq+964UXXtBB7t27t3UQhO6++26txYQJ E6yDBB29KyDoXR6hoaeFuOuuu6yDINSnTx+thf7fOkgqv/aut956Swe5a9eu 1kEQeuihh7QW77//vnWQoKN3BQS9yyM09LQQGoDWQRDq1q2b1kLFwDpIKr/2 rg8//FAHuXXr1tZBEFL79c4JH2T0roCgd3kE3/57R5s2bbQWKgbWQVL5tXdN nz5dB/mOO+6wDoLQ888/r7Xo27evdZCgo3cFBL3LIzT0tBAagNZBEGratKnW QsXAOkgqv/au77//Xge5Xr161kEQGjBggNbi2WeftQ4SdPSugKB3eYSGnhZC A9A6CEI33HCD1kLFwDpIKr/2rqVLl+ogV6lSxToIQkOGDNFadOnSxTpI0NG7 AoLe5REaeloIDUDrIAipDGgtVAysg6Tya+/asGGDDnK5cuWsgyDttXZt2rSx DhJ09K6AoHd5hKdeUxRwKgNaCxUD6yCp/Nq7EhISdJCLFCliHQShyZMnay1a tmxpHSTo6F0BQe/yCA09LYQGoHUQhFQGtBZ79+61DpLKr70rJSUlOjo6Kirq yJEj1lmCbvbs2Trhb775ZusgQUfvCgh6l0do6LEQXqAaoDKgSqBiYJ0llV97 lxQrVkzn/O7du62DBN2yZcu0EFdccYV1kKCjdwUEvcsjrrzySu+8pijIVAO0 EKoE1kHS+Lh3VahQQYc6NjbWOkjQ7dixQwtRvHhx6yBBR+8KCHqXR5QoUUIL oQFoHSToVAO0EKoE1kHS+Lh3Va9eXYd6yZIl1kGCLiUlJVeuXFFRUYcOHbLO Emj0roCgd3mBxp2GnkYfr3UxpxqgK0KVwDpIGh/3rptuukmH+ttvv7UOglDZ smW1Fhs3brQOEmj0roCgd3mBxp1WQaPPOghCqgFaC1UC6yBpfNy7mjdvrkM9 depU6yAI1axZU2uxcOFC6yCBRu8KCHqXF2jcaRU0+qyDIDRlyhSthSqBdZA0 Pu5d7dq106EePXq0dRCEGjdu7J3PaAgseldA0Lu8YMaMGVoFjT7rIEj7gHJV AusgaXzcu7p3765D/cYbb1gHQejhhx/WWrz77rvWQQKN3hUQ9C4v0LjTKmj0 WQdBSDVAa6FKYB0kjY9714svvqhD3atXL+sgCPXu3Vtr0adPH+sggUbvCgh6 lxdo3GkVNPqsgyCkGqC1UCWwDpLGx71r8ODBOtSPPfaYdRCEhg8frrV45JFH rIMEGr0rIOhdXqBxp1XQ6LMOgpBqgNbi7bfftg6Sxse966OPPtKhfvDBB62D IDRt2jStRZMmTayDBBq9KyDoXV6gcceLWj1CNUBr8fHHH1sHSePj3uW8rJG9 3gsWLFigtbj66qutgwQavSsg6F1e4LyJW6PPOgjS3tj12WefWQdJ4+PetWjR Ik/dKi3I4uLitBb/+te/rIMEGr0rIOhdXqBxp1XQ6LMOglC1atW0FqoE1kHS +Lh3xcfHe+ojmYLs4MGDWovcuXN75GNJg4neFRD0LnMadBp3WgWNPussCBUt WlRroUpgHSSNj3uXFCxYUEd779691kEQKl68uNZi+/bt1kGCi94VEPQuc9u2 bdMSlChRwjoIQioAWotChQpZBznG373riiuu4OPgPaJWrVpai59++sk6SHDR uwKC3mVOg05LULt2besgCP32229aC5UB6yDH+Lt3cZt072jVqhUfH2CL3hUQ 9C5zGnRaAg096yBIeze9pz44wN+969///n/t3XmczfX///9mhsHYGWRNIWu0 UFlaLGUpUVkqEkLvlCWUrSJrlktIe9Ii2mQpSpYoLpIte9aiEPkifM1vzOZ3 n16+B9MYY5w5j9c5r9v1j8+l9/vzjvu8ns/n4/E4Z855vZ7WBR83bpx1EJy5 jW3//v2tg3gXc5dHMHeZ69evn5ZgyJAh1kFwWgOA2+7kGdpz19ixY3XBe/To YR0Epz/55BOtxYMPPmgdxLuYuzyCucucCp2WQEXPOghOd+/e3W1PDAztuct5 CnmzZs2sg+D06tWrtRZVq1a1DuJdzF0ewdxlToVOS6CiZx0Ep++77z6thYYB 6yBnhfbctWbNGnq9Sxw7dkxrERUVxa0krDB3eQRzly2VOBU6LYGKnnUWnJmB 165dax3krNCeuw4fPqwLnidPHusgSFakSBEtx59//mkdxKOYuzyCucuWSpyu v8qddRAk0wCg5Thy5Ih1kLNCe+467cpr7ll16tTRWnz//ffWQTyKucsjmLts LVq0SNdf5c46CFz63kvIz13Oe4xr1qyxDoLTHTp00Fq89dZb1kE8irnLI5i7 bKnE6fp37NjROgjOfNaoWrVq1kHOE/Jzlws/U+dZI0eO1Fr07t3bOohHMXd5 BHOXLZU4XX+VO+sgcOl360J+7urRo4fbvkPqWdOnT9daaBK2DuJRzF0ewdxl q2nTprzYdwl33ksq5OcuF94zzbM2bNigtahQoYJ1EI9i7vII5i5bKnG6/ip3 1kHg0nunh/zc5cJnBHhWTExMWFhYZGRkQkKCdRYvYu7yCOYuQypuKnEqdCp3 1lng0mcFhvzctW7dOrc9E9PLSpUqpeXYtm2bdRAvYu7yCOYuQypuuvgqdNZB kKxy5cpaDo0B1kHOE/Jz1z///KPLnitXLusgSOZ8zYHHZ5hg7vII5i5Dn376 KZ9idY+cOXNqOTQGWAc5T8jPXZIvXz5d+UOHDlkHwenBgwdrLZ599lnrIF7E 3OURzF2GnnvuOV18FTrrIDitpq+1yJ8/v3WQlLwwd91www26+KtWrbIOgtNf ffWV1qJ+/frWQbyIucsjmLsMqbjp4qvQWQfB6ZUrV2otNABYB0nJC3PX/fff r4v/xRdfWAfB6X379mktChQoYB3Ei5i7PIK5y5CKmy7+3r17rYPg9Oeff661 0ABgHSQlL8xdffr00cUfPny4dRAkc57S+Pvvv1sH8RzmLo9g7rKisqYrX7hw YesgSDZs2DAthwYA6yApeWHumjJlii5+ixYtrIMgWePGjbmpoAnmLo9g7rLi 3B1dJc46CJKp6Ws5NABYB0nJC3PXpk2bdPHLlCljHQTJBg4cqOXQ/7UO4jnM XR7B3GWF4uYqavpajo0bN1oHSckLc1dCQkL27NnDwsKOHTtmnQVnXhI2atTI OojnMHd5BHOXFZU13sx3CbV7NX21/vj4eOssKXlh7pKbb75Zx+HHH3+0DgI+ AmGGucsjmLusqKzx4VWX+OGHH7QWNWrUsA6SCo/MXV26dNESTJgwwToIkvGV HxPMXR7B3GVCBY0va7vH+PHjtRxq/dZBUuGRuevNN9/UErRv3946CJJxixsT zF0ewdxlwrk5YYMGDayDIJnavZZDrd86SCo8MnetWLFCS1CtWjXrIEjGLZ1N MHd5BHOXCedhHCpu1kGQTO1ey6HWbx0kFR6Zu06ePBkeHp41a9ZTp05ZZwGP MLPB3OURzF0mmjZtqsuu4mYdBKfV6NXu1fTV+q2zpMIjc5dUrFhRh2Lt2rXW QXB6165dWotChQpZB/EW5i6PYO4yoYKmy67iZh0Ep9esWaO1UNO3DpI678xd jzzyiBbivffesw6CZMWLF9dybN682TqIhzB3eQRzV+A5d4lUWbMOgmSTJk3S cqjpWwdJnXfmrjFjxmghnn76aesgSOaMwW+88YZ1EA9h7vII5q7Ae/31193c 6L1GjV7LoaZvHSR13pm7Fi5cqIWoXbu2dRAke+edd7QcrVq1sg7iIcxdHsHc FXgqZbrmb7/9tnUQJFOj13Ko6VsHSZ135i7l10LkypUrKSnJOgtOb9u2Tctx 5ZVXWgfxEOYuj2DuCjyVMl1zlTXrIDitFq9Gr+VQ07fOkjrvzF1SsmRJrcX2 7dutgyCZU6m2bt1qHcQrmLs8grkrwFTEeBXpHs6LerV76yAX5Km567777tNy fPbZZ9ZBkKx169a8Mx9IzF0ewdwVYG+99ZYuuAqadRAkc/99ijw1dw0aNEjL 0a9fP+sgSPbGG2/wSdRAYu7yCOauAHv44Yf5lpB79O3bV8uhdm8d5II8NXfN nDlTy9GwYUPrIEi2ZcsWvnkdSMxdHsHcFWDFihXTBVdBsw6CZGrxWo5Zs2ZZ B7kgT81du3fv1nIULlzYOgjO0FpoRXbs2GEdxBOYuzyCuSuQVL5oK67itBW1 e+sgF+SpuUvy58+vFdm/f791ECRr0aKFlmPSpEnWQTyBucsjmLsCyblFp0qZ dRAk27dvn5ajQIEC1kHS4rW5q169elqUuXPnWgdBsokTJ2o5Hn30UesgnsDc 5RHMXYHUtm1bXW2VMusgSDZnzhwthxq9dZC0eG3u6tWrlxblpZdesg6CZBs2 bNBylCpVyjqIJzB3eQRzVyA5tyfauHGjdRAkU3PXcvTu3ds6SFq8Nnc5H62/ 8847rYMgWVJSUsGCBbUiO3futM4S+pi7PIK5K2BUuHSpVcS4HbdL1K1bVysy Y8YM6yBp8drcdeTIkfDw8GzZsimtdRYkc76CPX78eOsgoY+5yyOYuwJmwoQJ utQPPfSQdRAkU1vPnj27WrwavXWWtHht7pIbb7xRJ2XRokXWQZBs6tSpWo4G DRpYBwl9zF0ewdwVMCpcutQqYtZBkExtXcuhFm8d5CI8OHf16dNHSzNw4EDr IEimFyYRERFZs2Y9duyYdZYQx9zlEcxdgXH8+PHIyEiVr8OHD1tnQbLnn3/e /R/uOu3Jueubb77R0tSsWdM6CM64/fbbtSJffPGFdZAQ58xd119//VcIaVpi 5q4AUMnSdVb5sg6CM2rVqhUU9yvw4Nx14sSJLP/SP1hnQbIxY8bosLRr1846 SIhz5i54BHNXZlPJ0nVW+bIOgmS+zn78+HHrLBfhwblLatasqfPyzTffWAdB sl9//VXLER0dnZiYaJ0llP3yyy9N4RlabusdF8pUrFSyVLhUvqyzIFkQ/SbL m3PXwIEDtUB9+vSxDoIzypYtqxUJis0DACpWKlkqXNZBcMazzz6rFRkwYIB1 kIvz5ty1cOFCLdBNN91kHQRn9OzZUyvSr18/6yAAcHEqVipZKlzWQXCGGrpW RM3dOsjFeXPuiomJyZYtm/vv8uEdzvd/q1SpYh0EAC5OxeoK7kfkGkePHnXu zKnmbp3l4rw5d8mdd96pUzNz5kzrIEgWFxeXN29ercjvv/9unQUA0qIypWKl kqXCZZ0FyYLrSTSenbucpzh1797dOgjOaNWq1RU8XhaA67366qsqVipZ1kFw hlr5FcHz5GXPzl1Lly7lF1uuMmXKFK3I3XffbR0EANKiMqVipZJlHQRnOL/2 VVu3DpIunp274uLioqKiwsLCDh48aJ0FybTBIiIiIiMj3X/3FQCe5btNvUqW dRYkUxNXK8+ZM2ew/NrXs3PX6f/3muWzzz6zDoIz7rjjDq3Ihx9+aB0EAFKn AqUypWJlHQRnfPrpp1qRhg0bWgdJLy/PXS+//LIW64knnrAOgjPeeeed4Do+ ALxGBUpl6u2337YOgjPUxLUiaujWQdLLy3PXypUrtVjlypWzDoIzDh8+7LyB zy9/AbiQSpPzcQiehe0eauJq5Wro1kHSy8tzV0JCgnPvgj///NM6C8647777 tCKvvvqqdRAASMn5JqPKlHUQnKH27dzTQw3dOkt6eXnukqZNm2rJPvroI+sg OOOzzz7Titx6663WQQAgJZUmPhXsKs7H7YJrEvb43DVu3DgtWfv27a2D4IyY mJjcuXNrUXbt2mWdBQDOUlFSacqVK1dQ3BTdI9S+tShq5dZBLoHH567169dr yYoXL56UlGSdBWc8+uijWpShQ4daBwGAs1SUVJpUoKyD4Aw1brVvLYpauXWW S+DxuUtKlSqlVfvpp5+sg+CMefPmaUUqVqxoHQQAzlJRUmlSgbIOgjNWrFih FVETtw5yaZi7nnnmGS1cnz59rIPgjISEhMKFC2tR1q5da50FAJKpHKkoqTQF 0ee3Q96zzz6rRenZs6d1kEvD3LVs2TIt3DXXXGMdBGd169aNYRiAe6gcqSip NFkHwVlq3EH0eCAf5q6kpKSiRYvy7oqr/PTTT1qREiVKJCYmWmcB4HUqRM7n iPhEinv88ssvWhG176BrE8xd0rVrVy3fwIEDrYPgLOeFzOLFi62DAPA6FSJ+ LeI2atlaFLVv6yCXjLlLFi1apOWrUKGCdRCc9fzzz2tROnXqZB0EgNepEKkc qShZB8FZatlaFLVv6yCXjLnr9L8f5I6OjtYKbt682ToLzti6datzq5zjx49b ZwHgXSpBKkQqRypK1llwhpq1VkSNOxi/5sDc5XBezgwZMsQ6CM6qW7euFuX1 11+3DgLAu9544w0VojvvvNM6CM5Ss9aiPP7449ZBMoK5y/Htt99qEatWrWod BGd9/vnnWpTrrrvOOggA71IJ4tlAblOtWjUtihq3dZCMYO5yxMXF5cuXT+u4 Y8cO6yw4Q4ty5ZVXalGWLVtmnQWAFzk3GipSpIjKkXUWnKE2rUVRyw7SRWHu 8nEeT/Pyyy9bB8FZzjdW2rRpYx0EgBep+PBtd7dRmw7qBzYxd/nMmjVLS1mj Rg3rIDhrz5494eHh2bJlO3TokHUWAN6isqPioxKkQmSdBWepTatZq2VbB8kg 5i4f5Xe+tMIRc5WmTZtqUUaPHm0dBIC3qOyo+KgEWQfBWWrQzlfd1bKts2QQ c9e5WrVqpQUdN26cdRCcNXfuXC1KmTJlkpKSrLMA8AoVHJUdFR+VIOssOEsN WovSunVr6yAZx9x1rs8++0wLWqdOHesgOCsxMbF06dJal3nz5llnAeAVKjgq Oyo+QfcYmtBWu3Ztrcvnn39uHSTjmLvOpR8we/bs4eHhf/31l3UWnDVy5Egd tGbNmlkHAeAVKjgqOyo+1kFw1v79+9Wgc+TIoWZtnSXjmLtSaN68OffqdJuD Bw9GRkZGRET8+eef1lkAhD6VGhUclR0VH+ssOEutWQ1abdo6yGVh7kphypQp WtZ69epZB8F5HnroIa3Liy++aB0EQOhTqVHBefjhh62D4DxqzVoXtWnrIJeF uSuFf/75x3lrhRsXuMoPP/yg41a0aNFTp05ZZwEQylRkVGpUcFR2rLPgLDVl 501ItWnrLJeFueu/GjdurBM3adIk6yA4j/NgiHfffdc6CIBQpuKvUqOCYx0E 51Hx17o0adLEOsjlYu76r8mTJ2txb7vtNusgOM+0adO0Ltdeey1fLwKQSVRe VGRUalRwrLPgPGrKWhc1aOsgl4u567/0Y+bOnVvr++uvv1pnwVkJCQnXXHON 1mX69OnWWQCEJpUXFZmrr75aBcc6C87aunWr1kWt+cSJE9ZZLhdzV6qeeOIJ LXGvXr2sg+A8b7zxhtalevXq1kEAhCaVFxUZlRrrIDhP7969tS5dunSxDuIH zF2pWr16tZY4OjqaT3G7ivZY4cKFtTQLFy60zgIg1KiwqLyoyPx/QfsMmpCk Rqx2rKVZtWqVdRY/YO66kBtuuEGr/Omnn1oHwXlGjBihdWnQoIF1EAChRoVF 5UVFxjoIzqNGrHVRU7YO4h/MXRfy5ptvciMvFzp69Kjz6bvVq1dbZwEQOpxf c6i8qMhYZ8F56tevH0q//GXuupBjx45FRUWFhYXt3LnTOgvO8+yzz+oMtmzZ 0joIgNChkqLCovJiHQTnUQtWI1Y7VlO2zuIfzF1p6NChg45hv379rIPgPPv3 78+WLVt4ePj27dutswAIBSomKikqLCov1llwHrVgNWK1Y+sgfsPclYbly5dr uYsUKRIfH2+dBefp3Lmzlkb/1zoIgFBASXEnNd8rr7xSS6N2bJ3Fb5i70lal ShWt+JdffmkdBOfhxSkAf+EtdNdS81ULViO2DuJPzF1pmzBhgha9UaNG1kGQ UosWLfgwBoDLx0dGXUvNV0ujRmwdxJ+Yu9J25MiR7Nmz63XQ7t27rbPgPM6X j6Kiov766y/rLACClQqIyoiKyZo1a6yz4Dxqu2q+asFqxNZZ/Im566Latm2r I/nCCy9YB0FKDzzwgJama9eu1kEABCsVEJURFRPrIEhJbVdLoxZsHcTPmLsu 6ocfftDSFy9enMd1uc2WLVsiIiKyZs26a9cu6ywAgo9KhwqIyoiKiXUWnEcN V21XzVct2DqLnzF3pUf58uW1+l9//bV1EKTk3OujTZs21kEABB+VjhC7R0HI +Oqrr7Q0ar7WQfyPuSs9xo4dqw3QtGlT6yBIac+ePc4XkdavX2+dBUAwUdFw vhatMmKdBSmp4artqvlaB/E/5q70OHToUGRkZERExN69e62zIKWePXvqeN57 773WQQAEExUNlQ4VEOsgSEmtVg1XbVfN1zqL/zF3pVOrVq10QocOHWodBCnp YDpPbFy2bJl1FgDBQeXCeRpjSHb2YDdkyBCtTuvWra2DZArmrnRauHChtsFV V12VmJhonQUpDR48WKtz2223WQcBEBzq1KmjoqHSYR0EKanJqtVqddR2rbNk CuaudEpKSrrmmmu0E+bNm2edBSkdP348OjpaqzN37lzrLADcToVC5aJQoUIq HdZZkNK3336r1SlTpozarnWWTMHclX4jR47UZmjYsKF1EKRi3LhxWp1q1aqF 6lEF4BcqESoUKhcqGtZZkAo1Wa2OGq51kMzC3JV+R44cyZUrl/bD2rVrrbMg pdjY2FKlSml1pk6dap0FgHupRKhQqFyoaFhnQUq//PKLVketNsTuUX8u5q5L 0rt3b22JVq1aWQdBKiZPnuy8Ox0XF2edBYAbqTioRKhQqFxYZ0EqWrdurdVR q7UOkomYuy7J3r17nRtK7NixwzoLUkpISKhUqZLO7KhRo6yzAHAjFQeVCBUK nj/iQmqszu0j9u3bZ50lEzF3XarHH39cx7Zz587WQZCKBQsWOO9Rc6c1ACmo mzufFVGhsM6CVHTp0kWr06lTJ+sgmYu561Jt27bNucXx/v37rbMgFQ8++KBO 7kMPPWQdBIC7PPzwwyoOLVq0sA6CVKilOg8f2b59u3WWzMXclQE6tjq8zz77 rHUQpGLPnj1RUVFaoCVLllhnAeAWKggqCyoOPBXIndRStUAtW7a0DpLpmLsy YPXq1c6Njo8ePWqdBakYNmyYFqhKlSrx8fHWWQDYUylQQVBZUHGwzoJUqJk6 jx1Zs2aNdZZMx9yVMXfddRdH2LViY2PLli3L/XkAOJz7+6kscO8Id3JeLN99 993WQQKBuStjvv/+e+d2xzExMdZZkArnftR58uQ5cOCAdRYAllQEVAp4noVr qY2qmWqB1FitswQCc1eG3XzzzdonEydOtA6C1DVt2lQL1K5dO+sgACypCKgU qCBYB0Hq1Ea1QGqp1kEChLkrw2bOnOk8KZsPEbnTrl27smfPHhYW5p09CSAF HX8VAZUCFQTrLEiFGqjzFGy1VOssAcLclWFJSUkVK1bUbvnoo4+ssyB1L774 ohbohhtuSExMtM4CINB08K+//noVAZUC6yxInRqoFkjN1DuP1mXuuhzvv/++ NkzlypW9s2GCS0xMTOnSpbVGr7/+unUWAIGmg6/jryLAB3HdSa1TDVRr9MEH H1hnCRzmrssRFxdXsmRJ7ZmvvvrKOgtSN2PGDC1Q/vz5//rrL+ssAAJHR14H 31O/wAo6s2fP1gKpjXrqobrMXZdp/Pjx2jY1a9a0DoILuueee7RGzZo1sw4C IHB05HXwdfytg+CC1Dq1RhMmTLAOElDMXZfp5MmT0dHR2jk//PCDdRakbu/e vfny5dMaffzxx9ZZAASCDruOfN68eXlUq2s5TxBQA1Ubtc4SUMxdl++ll17S 5mnUqJF1EFyQ80m8AgUK8NtGIOQdOHBAh11HfvLkydZZcEFqmlqjIUOGWAcJ NOauy3f48GHnGfe//PKLdRZcUOPGjbVGzZs3tw4CIHPpmOuw68hbB8EFqV1q jdQ6jxw5Yp0l0Ji7/KJXr14eeaBn8Nq7d2/evHm1TFOnTrXOAiCzTJs2zfkN 459//mmdBRekdqll6t27t3UQA8xdfrFv374cOXKEhYX9/PPP1llwQZMnT9ZJ L1iwIA8PAkKSjrYOuI75e++9Z50FF7Ry5Uq1SzVNtU7rLAaYu/xlwIABOuy3 3367dRCkxflEwf33328dBID/6WjzaVv3U6PUMvXv3986iA3mLn85duyY82TP 2bNnW2fBBf3555/OE3KnTZtmnQWAP33yySc62jrg/IbRzZx7dkVHR6tpWmex wdzlR87DPStUqJCQkGCdBRc0adIk57eNBw8etM4CwD90nJ3fMOqAW2fBBak5 Os/XU7u0zmKGucuP4uLiypUrpx311ltvWWdBWho2bKhleuCBB6yDAPAPHWcd ah1t6yBIi5qjlkmN0lM3qE+Bucu/pk+frk1VpEiREydOWGfBBf3xxx/Obxt7 9+4dGxtrHQdAxukI6yA7v2HU0baOgwtSW1Rz1EqpUVpnscTc5Xe1atXSvnrx xRetgyAtH374YUREhFaqYsWKK1assI4DICN0eJ3fW+k4f/TRR9ZxkBa1RR6r d5q5KxPoCmhr5cyZc//+/dZZkJaff/7ZV7Gfe+45bWDrRADSSwdWx9b36ol7 +LicGqLaohaLIYG5KzM8+OCD2l2dO3e2DoKLiI2N7du3r1O6K1So8NNPP1kn AnBxOqo6sM6LJh1hPi3gfmqIfKrWwdyVGbZv3541a1YVhM2bN1tnwcXplXKl SpVUE8LDw/v06cMbX4Br6XjqkOqo6sDq2K5cudI6ES5OrVANUW1RzdE6iz3m rkzy9NNPqyzcc8891kGQLnq93K9fP+eNr/Llyy9fvtw6EYCUdDB1PJ23ufr3 78/bXMFCrVCrprZoHcQVmLsyyd9//+18Y27x4sXWWZBeeu1cuXJl542v3r17 88YX4BI6jDqSzttcOqSrVq2yToT0UhN0vm2qtmidxRWYuzLP8OHDtdmqV6+e lJRknQXppVfQeh2dJUsW542vJUuWWCcCvE7H8Nprr9WR1MEcMGDAqVOnrBMh vdT+brrpJq2dGqJ1Frdg7so8MTExxYsX136bOnWqdRZcGr2arlKlyhX/euSR R7z58FbAnI6eDqBzEnUkV69ebZ0Il0btT2tXokQJNUTrLG7B3JWp3n//fW25 0qVL8zmEoKPX1EOHDs2RI4dWMFeuXKNHj/byDZaBANNxGzNmjI6eDqCOoQ4j b3MFHTU+tT+toFqhdRYXYe7KVImJiVWrVtWuGzt2rHUWZMTu3bud5484N5pY sGCBdSIg9OmgObeJcO48oGNonQgZocanFVQTVCu0zuIizF2Zbd68edp4+fPn P3LkiHUWZNB3333nfItKWrRowbNIgEyiw6Uj5pw1HTodPetEyCC1PDU+raOa oHUWd2HuCoC77rrLeRSgdRBkXFxc3KhRo5zfekRFRQ0fPpzfHQN+pAOlY6XD 5fxmX8eN3+wHtV69emkp1f6sg7gOc1cA/PLLL+Hh4dmyZeOWccFu7969Dz30 kPNivGzZst988411IiAUzJ07VwfKOVk6Yjpo1olwWXbs2BEZGanGt27dOuss rsPcFRgdO3ZUPalXr551EPjB4sWLndt8SdOmTXkqAZBhW7Zs0SFyTpOOFTc8 DA1qdlpQNT7rIG7E3BUYhw8fLlSokPbh5MmTrbPAD+Lj41955RXn1rgRERHt 27ffs2ePdSggmOjI6OA4D4nQURo3bpyOlXUo+IHzRX61PI0N1lnciLkrYJzb mBQoUIB79oaMAwcOPPXUU1mzZtXKZsuWrUePHiwucFE6Jj179tSR0cHR8dEh 0lGyDgX/0OKqzXHjyjQwdwVSw4YNnftwWgeBP/32229t27Z1nmCSO3fuQYMG HT9+3DoU4EY6GjogOibO07jatGmza9cu61DwJ+c+t2p21kHci7krkH7//Xfn 2zrffvutdRb42YYNG+69917nYyrR0dGvvPIKX3gEfHQcdCh0NJwzosOiI2Md Cn7m3DdJbU7NzjqLezF3BZhzH7nSpUufPHnSOgv8b9myZbfddpvTWUqVKjV5 8uSEhATrUIAlHYH33nuvZMmSzrnQAdExsQ4F/1NTc+5Oz33C08bcFWAqQTfe eKN2Zq9evayzILPMnTu3WrVqTpepWLHi9OnTeTY6PEjbXpvfd+f566+/XkfD OhQyS+/evbXKanC82Ewbc1fgrVmzJuJf+gfrLMgs6jjTpk0rU6aMb/p6//33 uQ8kPEJbXRte2953szsdB159hDD6Wvoxd5no06cPrwu8QN3nzTffvOqqq5zu U6JEiXHjxukcWecCMou2tza577eK2vw6AtwgIrT5fo+j1madJQgwd5nw/R58 zJgx1lmQ6dR0pkyZUqVKFacTFShQ4MUXX+TONggx2tKDBg1y7iEg2vDa9kxc XqBGxueW04+5ywrf+/CapKSkr7/+unbt2k5X0tJ3796du60iBGgbazM7X9YW bXJtdX6r6BG//fabs/Q8/zqdmLsMtWnThvuceNDSpUvvueeesLAwrX6WLFna tWu3adMm61BARmjragNrG2sza0trY2t7W4dCQDn3pVQ7sw4SNJi7DP39998F CxbUjv3444+tsyDQNm7c2LZtW1/Duu+++77//nvrUEB6abs2bdrU9/JBm1lb 2joUAk3NSxtAjYxHdaQfc5ctnmPlcbt373766adz5Mjh/IKmQoUK48ePP3r0 qHUuIHXanNqivltDaOtqA2sbW+eCAbUt57nDH3zwgXWWYMLcZc55bvtjjz1m HQRm9FLxpZdeKlGihK+XdejQYeXKlda5gLNWrVrVsWNH32uE4sWLa9PyLoeX qW1pJ9SvX986SJBh7jK3Y8eO7Nmza/cuXLjQOgssJSQkzJw58+6773Z+dyM3 3XTTpEmT+IoQDGn7aRNqKzp7UptTW3TGjBncA8fj1LCcF4lqYdZZggxzlxuM HDnSubWgrqF1FtjbuXNnnz59nM/+Sd68ebt3775lyxbrXPAWbTltPG0/Zx9q Q2pbanNa54K9mJgY56bQal7WWYIPc5cbxMfHV61aVXu4b9++1lngFrGxsVOm TKlVq9YV/88dd9zxySefMJwjU2mDaZtps/k2njahtiLPeYfPc889p42htsX9 2TKAucslfv7554iIiPDw8MWLF1tngbusX7/+f//7X+7cuZ0mmCdPnvbt2y9Y sIBf9MCPtJ20qTp06KAN5uw0bTltPG0/62hwFzUptSo1LLUt6yxBibnLPQYN GuR8WpXvNuK/jh8//uabb9aoUcP3LsSVV17Zo0cPPn6Py6QtpI2k7eTbWtpm 2mwnTpywjgbXUXtSk9ImUcOyzhKsmLvcQ68369Spo/3crFkz6yxwr+3btw8e PPjaa6/1dcly5cqpBm7bts06GoKJNoy2jTaPbyNpU2lraYNZR4N7qT1pq6hV 8X57hjF3ucqePXvy58+vXf3aa69ZZ4HbrVq16plnnilatKivb1avXv2VV17Z v3+/dTS4l7aHNom2im/baAtpI2k7WUeD26kxacOoSfGAs8vB3OU2X375pTZ2 9uzZN2zYYJ0FQSAxMXHhwoUdOnTwfe8sPDy8Xr16EydO5NGf8NFm0JbQxtD2 8H1PVttGm0dbyDodgoBaknPLo+nTp1tnCW7MXS70xBNPaG9XqlQpJibGOguC RmxsrIb2Bx54IFu2bL63MqpUqdKvXz+dSnqrB2nRtfT9+/fXNvBtCW0PbRJt Fb6fiPRTM1JL0v5Re7LOEvSYu1zIt8O7dOlinQXB559//pkyZUqrVq1874BJ dHR0u3btvvjii2PHjlkHRObSEmuhtdxadN8G0GbQltDG0PawDojgo2bEuwH+ wtzlTryji8sXFxe3aNGinj17li1b1td/s2bN2qBBgwkTJuzatcs6IPxJC6pl 1eJqiX3LraXXBtA20GawDohgpTbEp1/8iLnLtV5//XU+wQh/+fXXX8eMGXP7 7bdHRET4mrJevaopz5w58/Dhw9YBkRFaOC2fFtF5h9yhJdZCa7m16NYBEfR8 3/ZSS7LOEiKYu9yMb+zC744cOTJ16tSHHnooX758vk4dFhZWtWrVbt266YUt Tzp2OS2QlkmLpSXzPcpTtKBaVi2ultg6I0IEdzfKDMxdbqYXs84d6l588UXr LAg18fHxP/zww+DBg+vWrZsjR45zZ7BKlSp17dr1s88+O3DggHVMJPvrr7+0 HE8++eS572td8e9TibV8WkQtJU9sgd+p9WiblShRgrfE/Yi5y+WWLFniPJFB ddU6C0LWqVOnli5dOnTo0AYNGkRFRZ3b2cuXL//EE098/PHHW7du5UuRAaNL rQuuy96lSxctwbkrogXSMmmxfvzxRy2cdVKELDUd5+l1akPWWUIKc5f7vfDC C7ziQMDExcUtX758xIgRDRs2zJUr17kdX/+xTp063bt3/+CDDzZu3Mivv/1I F1OX9MMPP9Tl1UX+75XXcmhRtDR8Qh4BoHajpqO9pwZknSXUMHe5nwpyrVq1 tP/vv/9+6yzwlvj4+J9//nnUqFHNmzcvVarUFefLkSPHLbfc8uSTT7777rtr 1qzhvZdLosuli6ZLpwuoy3jur3odJUuW1GUfPXq0loDfISLAtPe0CWvXrs3L K79j7goKu3fvdj4F/cYbb1hngXepCMyfP3/kyJEtW7YsU6bMuR/qlsjIyBtv vLF9+/YjRoz44osv1q1bd/LkSevIbqHiqQuiyzJ8+HBdIl0oXa5zr54upi6p Lqwu73fffXfo0CHryPAuNRrnmxpqPdZZQhBzV7D4/PPPnXcYNm7caJ0FSPbP P/8sXrx47NixjzzySIUKFXwPoDl3lihevHjdunW7dOkyZsyY2bNnb9myJeTf FouNjdWPOWvWLP3I+sHvvPNOXYQUM+oV/z7OSRdNl04XUJeR25nCJdRinLtH 6mWCdZbQxNwVRDp16nTFv09+4Y7BcCHVh2XLlr3zzjt9+vRp1qxZxYoVz31i 0bnzxtVXX3333XdrJhk0aNCbb76pEeXnn3/+448/gmgki4uLU2DF1jD51ltv 6QfRj6MfqnTp0v+dP6/49+k8lSpV0mXRxdEl0oXS5bL+IYCU1FwqV66sHdu5 c2frLCGLuSuInDx5Ur1MJ+Kxxx6zzgJcXGJi4u+///7dd9+99tprPXr0aNy4 cdmyZbNkyfLfscT3/ljBggX1yuKuu+5q165d3759x48f/+mnny5YsOCnn37S y/Ddu3erEGXqeKY//PDhw/qLNm3atGLFCv3VCjBu3DiFUSQFU7zo6Oj/vn/l ox9QP2aTJk30I+sHnz9/vi4CXwVFUFBz0R5Wo+FDApmHuSu4bNiwIWfOnDoX o0ePts4CZERcXNy2bdvmzJnz5ptvvvjii3pZ3bRp0+rVqxcvXjyNkSyFrFmz 5s+fv1SpUpUqVbr55pvr16/frFmztm3bdkhNx9S0adNG/4r+Rf3r+kP0R+kP PPcJO2lTVAW+6aab7r33Xv0I+kH04+iH0o/G9w0RpMaMGaO9rRbD84AyFXNX 0JkxY4Zea4eHh6vIW2cB/CkpKengwYPr16+fN2/e+++/P2LEiG7durVs2bJB gwa33npr5cqVr7rqqgIFCqT4RLp/6Q/XX6ExTH/dLbfcosFMARRDYRRJwdat W6eQimp9tQB/mjt3rtqKmotajHWWEMfcFYyGDRumBpEnT57NmzdbZwEMxMXF HT58eM+ePToCK1asWLhw4cyZM6dMmTI53fQ/njVrlv5F/ev6Q/RH6Q/krSp4 05YtW9RQ1FaGDh1qnSX0MXcFqYceekhnpEyZMloX6ywAgGClVxxqJWooaivW WTyBuStIxcTEVK9eXSelbt263FMRAJABah9qImolaih8Uz4wmLuC1759+4oV K6bz8r///c86CwAg+Dz55JNqIkWLFlVDsc7iFcxdQW3lypXODe5ee+016ywA gGDy+uuvq32oiaiVWGfxEOauYDdt2jTnW+0LFy60zgIACA6LFi1y7twydepU 6yzewtwVAgYMGKCzU6BAgR07dlhnAQC4nZqFWoYah9qHdRbPYe4KAUlJSc6z 4ytUqMBT3gAAaVCbULNQy1Dj4E50gcfcFRpOnDhRtWpVnaPGjRsnJCRYxwEA uJEahNqEmoVahhqHdRwvYu4KGbt37y5UqJBOU69evayzAADcSA1CbULNQi3D OotHMXeFkqVLlzqPUJk8ebJ1FgCAu6g1OA/DUrOwzuJdzF0h5r333nOO1bJl y6yzAADcQk3BeWGuNmGdxdOYu0LPM888o5NVuHBh3kYGAJz+94MoagpqDWoQ 1lm8jrkr9CQkJDRs2FDnq1q1anxsEgA8zvfFq0aNGvHFK3PMXSHJ9zXhevXq xcbGWscBANhQC6hfvz43GnIP5q5QtWvXLufpjffddx8PzgYAD1Lxb9asmfME RjUF6zhIxtwVwjZt2lSwYEGduDZt2nBzPADwFJX9tm3bOk8zUTuwjoMzmLtC 26pVq3Lnzq1z17VrV+ssAIDAUdlX8VcL4LHXrsLcFfKWLFmSPXt2nb5+/fpZ ZwEABEL//v1V9lX8Fy9ebJ0F52Hu8oI5c+ZkzZpVZ3DUqFHWWQAAmUulXgU/ S5YsX3/9tXUWpMTc5RGffPJJeHi4TuJbb71lnQUAkFlU5FXqVfCnTZtmnQWp YO7yjrfffpvDCAAhTOXdeYmtgm+dBalj7vKU0aNH8+YzAIQkFXaVdxV5lXrr LLgg5i6vGThwIB+2BIAQo5LufIVqwIAB1lmQFuYuD3rqqaf4cjEAhAwVc+eW QSrv1llwEcxdHpSUlPToo49yMz0ACAEbN25UMVdJV2HnFtnux9zlTTw8AgBC wM6dO1XGVcybN2/OI+GCAnOXZ/kelnr11Vfv3bvXOg4A4NKodJcuXVplXMVc Jd06DtKFucvLtKC33nqrzmzFihUPHTpkHQcAkF4q2irdKuAq4yrm1nGQXsxd HnfkyJGqVavq5N500036Z+s4AICLU7lW0VbpVgGndAcX5i4cOHCgXLlyOr/X XXfdX3/9ZR0HAJAWFW3n9bJKt/7ZOg4uDXMXZN++fZUqVdIpLlu27O7du63j AABSpxKtQq1yraKt0m0dB5eMuQsOrW/16tV1lkuUKPHrr79axwEApLR161aV aOeTISra1nGQEcxd8Dl+/Pgdd9yhE12oUKG1a9daxwEAnKWyrOKsEn377bcf O3bMOg4yiLkL54qJibnnnnt0rvPmzbt06VLrOACAZMuWLVNZVnFu0qSJCrV1 HGQccxdSiIuLa926tU53VFTUvHnzrOMAgNepFKsgqyyrOKtEW8fBZWHuwn8l JiZ27txZZzwyMvKLL76wjgMA3qUirFKsgqyyrOJsHQeXi7kLF9KnTx+d9IiI iMmTJ1tnAQAvUvlVEVYpVkG2zgL/YO5CGoYOHarzHhYWNm7cOOssAOAtKrwq vyrCKsXWWeA3zF1I28SJE52DP3jwYOssAOAVKrnOy14VYess8CfmLlzUhx9+ 6LzR3bNnz6SkJOs4ABDKVGZVbJ2Peaj8WseBnzF3IT1mzJiRLVs21YGOHTsm JCRYxwGA0KQC26FDBxVblVwVXus48D/mLqTT/Pnzc+bMqWrQokWLU6dOWccB gFCj0qoCqzKrYrtgwQLrOMgUzF1Iv+XLl+fLl081oVGjRidPnrSOAwChQ0W1 YcOGKrAqsyq21nGQWZi7cEnWrVtXuHBhVYZatWr9/fff1nEAIBSonKqoqrQW KVJEZdY6DjIRcxcu1bZt20qVKqX6cNVVV61fv946DgAENxVSlVMVVZXW7du3 W8dB5mLuQgYcOHCgZs2azocQZs6caR0HAILVrFmzcuXKpXKqoqrSah0HmY65 CxkTGxvbrl075/Yyw4cPt44DAMFnxIgRzg0SVU5VVK3jIBCYu3A5Ro8eHR4e rqLx8MMPawNYxwGA4KCC+cgjj6h4qoSOGjXKOg4Ch7kLl2nOnDl58uRR9ahR o8a+ffus4wCA26lUqmCqbObOnfvrr7+2joOAYu7C5du8efM111yjGlKsWLFV q1ZZxwEA91KRVKlUwVTZ3LRpk3UcBBpzF/xC2+POO+9UJcmRI8cnn3xiHQcA 3EjlUUVSpVIFU2XTOg4MMHfBX+Li4p544okr/jVw4ECe5AgAPiqJzz//vFMh VSpVMK0TwQZzF/xr4sSJWbJkUWG5//77tWGs4wCAPRVDlUQVRpVHFUnrOLDE 3AW/W7BgQf78+VVhqlWrtmfPHus4AGBp9+7dKoYqiSqMPHURzF3IDNu3b69Q oYLqTOHChZctW2YdBwBsqAA6z1ZTSeRe9DjN3IVM888//zjPeI2MjJw8ebJ1 HAAINJU+FUCVwUaNGqkkWseBKzB3IfMkJCT07NnT+Rxpr169EhMTrRMBQCCo +qnoOdXvmWee0X+0TgS3YO5CZps0aZLziq9evXrcWBVAyNu/f7/KnfNu/3vv vWcdB+7C3IUA+PHHH6+88kpVoejoaG7ODCCEqcSp0KncFSlSZOnSpdZx4DrM XQiMgwcPNmrUyHnXvXv37jwBFkCIUVnr0aOHU+VU7lT0rBPBjZi7EDBJSUlj x451fudYrVq1X3/91ToRAPiHCtr111/v/G5RhY4bR+NCmLsQYGvWrClXrpyq U1RU1KRJk6zjAMDlUilTQVNZU3FbvXq1dRy4GnMXAu/EiRPt2rVz3o1v1aoV X68GEKRUvlTEnGqmsqbiZp0IbsfcBStTp07NkyePilXp0qWXL19uHQcALo0K l8qXiphKmQqadRwEB+YuGNq1a9fNN9/sPLNs2LBh3OALQFBQsVLJcp5FqyKm UmadCEGDuQu24uLinnvuubCwMJWvunXr7t271zoRAKRFZerOO+9UyVLh6tu3 r4qYdSIEE+YuuMGCBQucG3wVLFjwq6++so4DAKmbPXu2ypSKlUoWD7lGBjB3 wSX+/vvvJk2aOB9Pffrpp7nBFwBXUY9TaXJqlIqVSpZ1IgQl5i64R1JS0iuv vOLc4Ktq1apbtmyxTgQAyVSOVJSc23ONGzeO23Mhw5i74DZr16699tprnRt8 vf3229ZxAHidCpFze67y5curQFnHQXBj7oILaae1b9/eeT+/fv36O3futE4E wItUfFSCnFrUoUMHlSbrRAh6zF1wrU8//bRQoUIqdzly5Bg5cmR8fLx1IgBe oYLz8ssvq/ioBEVHR6scWSdCiGDugptp1/nubF+tWrWVK1daJwIQ+lRqVHB8 d6FXIbJOhNDB3AX3W7hwYZkyZVQAw8PDe/TowZM4AGQSlRcVGZUaFRyVHe4U Ab9j7kJQiImJ6du3r3N36FKlSs2ZM8c6EYBQo8Ki8uI8QUMFR2XHOhFCEHMX gsi6detq1Kjhe6D2gQMHrBMBCAUqJr7HW6vIqNRYJ0LIYu5CcElMTBw/fnyu XLlUHvPnz//uu+9yIx0AGaYCojKSL18+lRQVlnHjxvGgWGQq5i4Eoz179txz zz3Oi9M77rhj69at1okABB+VDhUQp5KopKiwWCdC6GPuQvD69NNPixQpooKZ LVu2oUOH8nRaAOmkcjFkyBCVDhUQlRFuE4GAYe5CUDty5Mjjjz8eFham4lm5 cuXly5dbJwLgdupTKhcqGiodnTp1UhmxTgQPYe5CCFiyZInzaCFV0a5dux47 dsw6EQA3UnF48sknnVdq5cuXV+mwTgTPYe5CaIiNjX3++eezZs2qclq8ePEp U6bweXsAPioIH3/8cbFixVQiVCheeOEFFQ3rUPAi5i6Ekk2bNtWsWdP5lOyN N964aNEi60QA7KkUqCA4laFWrVoqFNaJ4F3MXQgxiYmJH374YcmSJZ0a27hx 440bN1qHAmBDI1aTJk2calCiRIkPPviAd8Jhi7kLIUm7ceTIkXnz5lWxjYiI ePzxx/ft22cdCkDg6Mh36tRJx19FIE+ePCoI3H8ebsDchRB26NChbt26OR/6 ioqKeuGFF44fP24dCkDmOnHihA67jrzzUS4VAZUC61DAGcxdCHk7duxo0aKF 84uGwoULv/HGG/Hx8dahAPifjrYOuI65c9518HX8rUMB52Hugkf89NNPtWvX dqpx+fLlZ82aZZ0IgD/pUOtoO2dch11H3joRkArmLnjKjBkznDt9yW233bZi xQrrRAAulw6yjrNzrnXAdcytEwEXxNwFr4mPj3/ttdcKFSrkVOlWrVrt2rXL OhSAjNi5c6eOsHOWdah1tPkUAVyOuQvedPz48YEDB+bIkUPlOjIyskePHtrh 1qEApJcOrI6tDq/zrRkdZ741g6DA3AUv27t3b4cOHcLDw1W68+bNO2rUqJMn T1qHApAWHdKXX37ZuUuMDm/Hjh11kK1DAenF3AVs2LChUaNGzq8qoqOjhw4d ynNyARfSwdTx1CF1TquOrQ6vdSjg0jB3AY4FCxb4njGUK1eu3r17c6tVwCV0 GHUkdTCdE6qjunDhQutQQEYwdwHnWrx4ccOGDZ3aHhkZ2blz5+3bt1uHArxL B1DH0Pkcl9x99906pNahgIxj7gL+a+3ata1atXI+96X/27JlyzVr1liHArxF h+7cY6h/1sG0DgVcLuYu4EJ27NihF9rZsmXjhTYQSDpoOm7OudMB1DHktvMI GcxdQNr279/fp0+f3LlzO13glltumTVrVlJSknUuINToWM2cOVNHzDlrOnQ6 ejqA1rkAf2LuAtLj6NGjQ4cO9d1ttVKlSh9++GFcXJx1LiAU6Ch98MEHFStW 9N0BVcdNh846F+B/zF1A+sXExEycOPGqq65yukOpUqUmTJjALb+ADNPx0SHS UXLOlA6XjpgOmnUuILMwdwGXKj4+/qOPPqpcubLvll9Dhgzhll/AJdGR0cHx 3YxLB0rHiqf8IOQxdwEZk5SUNHv27FtvvdXpGjly5HjssceWLVtmnQtwO7WJ 9u3bR0VF+W7GpaPEZybhEcxdwGVasmRJ48aNw8LCfB/9GjduHE97BFI4fPiw joYOiHNSdGR0cHR8rHMBAcXcBfjFb7/9NmDAgKJFi/q+/P7II49w3wng9L/3 hdBx8N2SRcekf//+u3btss4FGGDuAvwoPj5+5syZTZo0cW72KOXKlRs9evTB gwetowGBpm2vza8j4JwFHYrGjRvrgPAhLngZcxeQGf74449BgwaVLFnS6ThZ s2Zt2bLl/Pnz+RALQp42uba6Nry2vbP/dRB0HHQorKMB9pi7gMyTmJg4Z86c Zs2aZcmSxWlAV1999fDhw7kVJEKSNra2tza5s9u17bX5dQR0EKyjAW7B3AUE gPrRsGHDUvSjuXPn0o8QArSNtZlTvL7Qhuf1BfBfzF1AwCQlJX333XctWrQ4 9/cvgwcP3rNnj3U0ICO0dVP8Pl3bm9+nA2lg7gIC7+DBg6NGjfJ93jgsLKxm zZpjx4797bffrKMBF/f7779ru2rT+m6fwvdHgHRi7gKsJCUlLV68+OGHH/bd QFJuvPHG4cOHb9261TodkNK2bdtGjBhx0003+barti73SwEuCXMXYO7kyZPT p0/XAJYnTx5fR6tSpcqgQYM2bNhgnQ5ep02oragN6ducuXPn1nbVpuXhpMCl Yu4C3CM2Nvbrr79u3759gQIFfD2uXLly/fv3X716tXU6eIu2nDae77fhkj9/ /scee+yrr77SRrVOBwQr5i7AheLj47/77rsuXboULlzY1/WuuuqqXr166Yjx oWVkEm0tbTBtM20238bTJtRW1IbkfqfA5WPuAtwsMTFxyZIl3bp1K168uK8P FitW7Omnn168eHFCQoJ1QIQCbaTvv//+qaee0tbybTNtOW08bT/udgL4EXMX EBSSkpKWL1/eu3fv0qVL+zpjoUKFOnfuPHv27KNHj1oHRPD5559/tHm0hbSR fJvq6quv1jbTZuNtVSAzMHcBQWfNmjX9+/e/9tprfb0yPDy8evXqzz333Lx5 83ROrQPCvbQ9tEm0VWrUqBEREeHbQuXLlx8wYIC2lnVAIMQxdwHBa+PGjUOG DLn99tsjIyN9DTRr1qy1a9d+4YUXFi9ezOefcfrf72toM2hL1KlTx3fPXtG2 ue2227SFNm3aZJ0R8ArmLiAExMTELFiwoH///rfccsu5b2Jkz569Xr16w4YN W758OR+K9hQttxZdS68NoG3g2xLaHtok/fr1mz9/PneBAAKPuQsIMcePH58z Z06vXr2uv/563+3EJVeuXI0bNx4zZsyaNWv4pHRI0rKuXr1aS6yF1nL7ll7b QJtBW+Lrr78+duyYdUzA05i7gBB2+PDhL7/88qmnnqpYseIV58ifP3/z5s1f ffXVTZs28fHpoKbl27hx44QJE7SgWtZzV1mLrqXXBtA2sI4J4AzmLsAj/vrr r2nTpnXq1Omaa645tzvnyZPn9ttv79GjxwcffLB+/fq4uDjrpEiLFmjdunXv v/++lkwLd+4zDkSLqyXWQmu5rZMCSAVzF+BBu3fvVuN+9NFHS5YsecX5IiMj b7zxxscff/y1117TcT5x4oR1WK/TEixbtmzixIlaFC3Nud+hcGgRtZRa0D17 9liHBXARzF2Axx08eHDevHkjR45s1arVtddeGx4efm5P13/Uf9m6deuXX375 u+++0//YOm/oc1ZEF1yXXRf/3A/pOR/WKleunBZLS/btt9+yIkBwYe4CcC7f uysdO3ZM9d2VYsWK3XPPPc8///yXX37522+/WecNeklJSbt27Zo+fbouqS7s uXeM970DecMNN2g5tChaGt6BBIIacxeANPg+TdS9e/fbbrstxaeJJCoqqnLl yhoYnnrqqbFjx2p+WL16NR/kTpWqqC7OF198MWbMGF0uXbRKlSrpAqa4pM4n 7nTBddl18fnEHRBKmLsApF9SUtLOnTs1OQwYMKBx48ZFixa94gJy58593XXX 3XfffZofXnnllRkzZvzyyy8eeZ7RkSNH1q5dqx9ZP3i3bt2aNm2qS6ELcqFr pcvYpEmTgQMH6sLq8vINUyCEMXcBuBzHjx9fv379rFmzxo8f37Nnz+bNm1er Vi1v3rwXmjH0/7r++uv1P9P/eMKECfoXly5dunHjxj///DOIfoOmYrh3795N mzYtW7Yswz/77Nmzdel0Aa1/GgCBw9wFIDMcPXr0kt7zcWTJkiU6Orps2bLV q1dv0KBBixYtOnXq1KdPn+HDh7/++utTp06dO3euiszmzZv37dvnx9ut64/S H6g/Vn+4/gr9Rfrr9Jc+++yzCqAYCqNICqZ4Cpn2T+Hl9/oApI25C0AgpfiM k+ax2rVrV65cuXjx4jlz5kx7nvmvyMjIfBeTP036H5z7yMJ0ioqKUmDFVnj9 CHy2DUA6MXcBcI/4+PhDhw7t2LFj1apV8+fP//zzz995553Ro0cPGDCga9eu jzzySJMmTWrWrFmxYsWiRYvmyJHjUuelC9EfVaxYsUqVKtWqVUt/hf4i/XX6 S/VXK4BiKMzKlSu3b9/+999/80F3ABnG3AUgeJ06deroZdMfYv1zAPAK5i4A AIDAYO4CAAAIDOYuAACAwGDuAgAACAzmLgAAgMBg7gIAAAgM5i4AAIDAYO4C AAAIDOYuAACAwGDuAgAACAzmLgAAgMBg7gIAAAgM5i4AAIDAYO4CAAAIDOYu AACAwGDuAgAACAzmLgAAgMBg7gIAAAgM5i4AAIDAYO4CAAAIDOYuAACAwGDu AgAACAzmLgAAgMBg7gIAAAgM5i4AAIDAYO4CAAAIDOYuAACAwGDuAgAACAzm LgAAgMBg7gIAAAgM5i4AAIDAYO4CAAAIDOYuAACAwGDuAgAACAzmLgAAgMBg 7gIAAAgM5i4AAIDAYO4CAAAIjMyYuwAAAHAhzF0AAACB4a+5CwAAAJeDuQsA ACAwnLnr+PHjx44di4mJsY4DAAAQmjRoadzS0BUbG3v06NGTJ09aJwIAAAhN GrQ0bmnoOn369JEjRzSAMXoBAAD4nUYsDVoat5KSkjR3nTp1SjMYn/ICAADw O41YGrQ0bvnu9+W8/aX/ng96AQAA+IXmK2fo0j+kuNWq8987v3Bk+gIAAMgw jVLOrxed97VSvcu98wtHOXbs2P8FAABAhmiUcmaqc3+9mKrY2FiNZ/8HAAAA GeLcMuKyHvoIAAAAAAAAAAAAAAAAAAig/x8sMyhl "], {{0, 452.}, {404., 0}}, {0, 255}, ColorFunction->RGBColor, ImageResolution->144.], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSizeRaw->{404., 452.}, PlotRange->{{0, 404.}, {0, 452.}}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.776183285556773*^9, 3.7761832930230093`*^9}, { 3.776183337664554*^9, 3.776183438200733*^9}, {3.776183747473864*^9, 3.7761837630897818`*^9}, 3.776183828400853*^9, {3.7767079454265757`*^9, 3.776707974339549*^9}, {3.776708188774995*^9, 3.776708194921089*^9}, 3.7767084304266*^9, 3.776710064084918*^9, 3.776710247466906*^9, { 3.776710319325035*^9, 3.776710328827832*^9}, {3.777313768240806*^9, 3.77731377838282*^9}}, CellLabel->"Out[96]=", CellID->45052843] }, Open ]] }, Open ]] }, Closed]] }, ClosingSaveDialog->False, WindowSize->Automatic, WindowMargins->Automatic, WindowTitle->"BlendLine | Example Notebook", Visible->False, FrontEndVersion->"13.0 for Mac OS X x86 (64-bit) (December 9, 2021)", StyleDefinitions->Notebook[{ Cell[ StyleData[ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb", CharacterEncoding -> "UTF-8"]]], Cell[ StyleData[All, "Working"], Editable -> True, DockedCells -> {}], Cell[ StyleData["Notebook"], Editable -> True, DockedCells -> {}, ScrollingOptions -> {"VerticalScrollRange" -> Automatic}], Cell[ StyleData[ "Section", StyleDefinitions -> StyleData["PrimaryExamplesSection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData["Subsection", StyleDefinitions -> StyleData["ExampleSection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData[ "Subsubsection", StyleDefinitions -> StyleData["ExampleSubsection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData[ "Subsubsubsection", StyleDefinitions -> StyleData["ExampleSubsubsection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData["Text", StyleDefinitions -> StyleData["ExampleText"]], Editable -> True]}, Visible -> False, FrontEndVersion -> "13.0 for Mac OS X x86 (64-bit) (December 9, 2021)", StyleDefinitions -> "PrivateStylesheetFormatting.nb"] ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[622, 23, 168, 7, 70, "Subsection",ExpressionUUID->"471727ee-e422-40b2-a309-dd509259d122", CellID->462042388], Cell[793, 32, 187, 4, 70, "Text",ExpressionUUID->"dc6feac0-86b9-45e4-81be-a5d98fc400b0", CellID->1403466913], Cell[CellGroupData[{ Cell[1005, 40, 7821, 200, 70, "Input",ExpressionUUID->"6aab043b-3852-47e4-96a0-f7c60b5d179f", CellID->108028143], Cell[8829, 242, 831, 26, 70, "Output",ExpressionUUID->"ee825db4-0f43-480a-b91f-496fc6e33349", CellID->1361815456] }, Open ]], Cell[CellGroupData[{ Cell[9697, 273, 142, 4, 70, "ExampleDelimiter",ExpressionUUID->"0771958b-67ca-4149-bf26-15d8822fd898", CellID->4852139], Cell[9842, 279, 317, 5, 70, "Text",ExpressionUUID->"b8f933e7-fd8f-4279-a93e-87fd1aa238cd", CellID->570792979], Cell[CellGroupData[{ Cell[10184, 288, 8804, 221, 70, "Input",ExpressionUUID->"ff24b8f2-70af-430c-ad55-71e9cf8600dd", CellID->508146904], Cell[18991, 511, 688, 15, 70, "Output",ExpressionUUID->"46e2d0b4-3f5a-4041-bd53-e03f2c555381", CellID->136617030] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[19740, 533, 159, 7, 70, "Subsection",ExpressionUUID->"dde3b849-5e8d-4207-97cd-1783c8b66bce", CellID->964056545], Cell[19902, 542, 267, 5, 70, "Text",ExpressionUUID->"c1315314-b7ab-4d60-9e38-b967d3a84cce", CellID->649685796], Cell[CellGroupData[{ Cell[20194, 551, 8738, 221, 70, "Input",ExpressionUUID->"822af764-52fb-44cf-9c8a-51b65915187f", CellID->836153427], Cell[28935, 774, 761, 15, 70, "Output",ExpressionUUID->"cf187516-7f49-4e30-87d8-8be0eecaafc4", CellID->641072068] }, Open ]], Cell[CellGroupData[{ Cell[29733, 794, 144, 4, 70, "ExampleDelimiter",ExpressionUUID->"5112a775-1364-499e-98bb-072481d4c558", CellID->322761262], Cell[29880, 800, 197, 4, 70, "Text",ExpressionUUID->"51a7aee3-2f7e-4e4d-ae13-d08c2d73fdaa", CellID->299607060], Cell[CellGroupData[{ Cell[30102, 808, 9102, 232, 70, "Input",ExpressionUUID->"8a44b61b-3ff0-462d-a639-f5599f2c2fb2", CellID->627002662], Cell[39207, 1042, 1992, 37, 70, "Output",ExpressionUUID->"a59c148f-d640-4422-93d8-e9c58ced706f", CellID->923716091] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[41248, 1085, 145, 4, 70, "ExampleDelimiter",ExpressionUUID->"a5a0af7a-1fc8-4372-b71a-087783525dc1", CellID->1031739812], Cell[41396, 1091, 310, 5, 70, "Text",ExpressionUUID->"3105463f-0d75-48a2-9b52-567cc8709cd1", CellID->1413163596], Cell[CellGroupData[{ Cell[41731, 1100, 8914, 225, 70, "Input",ExpressionUUID->"5055f7ce-37af-450a-b35c-f9402c28dbee", CellID->2018905799], Cell[50648, 1327, 2321, 48, 70, "Output",ExpressionUUID->"e8e9b7ee-27cc-43f2-8ef9-783aeef58d11", CellID->851298048] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[53018, 1381, 145, 4, 70, "ExampleDelimiter",ExpressionUUID->"a61d02e5-09f1-47d1-b555-9024077ee80a", CellID->1937857956], Cell[53166, 1387, 145, 3, 70, "Text",ExpressionUUID->"1c790243-4e38-47d1-aaf0-a5b7da95192a", CellID->1143929620], Cell[CellGroupData[{ Cell[53336, 1394, 7855, 205, 70, "Input",ExpressionUUID->"352fc98b-1f0f-4fdf-89b4-2cc5b7aa61e5", CellID->454382893], Cell[61194, 1601, 630, 19, 70, "Output",ExpressionUUID->"a14db2ba-068b-42ee-96eb-3e1e31bf3c88", CellID->331876628] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[61885, 1627, 166, 7, 70, "Subsection",ExpressionUUID->"64749e82-9a92-42ea-a3c3-46372c886185", CellID->568056528], Cell[62054, 1636, 136, 3, 70, "Text",ExpressionUUID->"66188291-9e1a-436d-970a-de019d0d3bde", CellID->1702192050], Cell[CellGroupData[{ Cell[62215, 1643, 16575, 409, 70, "Input",ExpressionUUID->"09d529a1-a830-405b-9ace-d02b38b747dd", CellID->695765799], Cell[78793, 2054, 1239, 24, 70, "Output",ExpressionUUID->"55b7cda8-c353-4752-80ec-e830447cd8c4", CellID->599198123] }, Open ]], Cell[CellGroupData[{ Cell[80069, 2083, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"cffe813f-0ac2-4e95-9ade-144d4ad87bf2", CellID->60655773], Cell[80215, 2089, 480, 7, 70, "Text",ExpressionUUID->"47970ce9-0029-4e9c-9e3f-d3c944bc59fd", CellID->1534328133], Cell[CellGroupData[{ Cell[80720, 2100, 16825, 421, 70, "Input",ExpressionUUID->"b729304c-be4f-462d-8019-6f4e9272a0d3", CellID->469298155], Cell[97548, 2523, 6763, 144, 70, "Output",ExpressionUUID->"07cebbc0-be11-4e0a-87ce-b2b210d7a179", CellID->588289905] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[104372, 2674, 178, 7, 70, "Subsection",ExpressionUUID->"47856472-e3d9-4a98-a4ab-ac6f7474e147", CellID->754506620], Cell[104553, 2683, 392, 8, 70, "Text",ExpressionUUID->"b00bd8da-db17-4bc2-b48c-6faeed2dd38d", CellID->2141516072], Cell[CellGroupData[{ Cell[104970, 2695, 16942, 418, 70, "Input",ExpressionUUID->"a8ab1958-9df7-4589-a044-6c5cd4f046f7", CellID->594986841], Cell[121915, 3115, 1442, 25, 70, "Output",ExpressionUUID->"89b381d4-4b34-496d-9754-1063db94dc36", CellID->1184331362] }, Open ]], Cell[CellGroupData[{ Cell[123394, 3145, 144, 4, 70, "ExampleDelimiter",ExpressionUUID->"9b6bdaef-7d35-4f3b-a659-23919325b332", CellID->567153852], Cell[123541, 3151, 516, 13, 70, "Text",ExpressionUUID->"ed7ed2db-f2b6-4278-80d6-ba34239f7629", CellID->1499672610], Cell[CellGroupData[{ Cell[124082, 3168, 8894, 224, 70, "Input",ExpressionUUID->"4fcc9d36-28b9-4a75-9029-b9a397d86278", CellID->2129475078], Cell[132979, 3394, 1033, 21, 70, "Output",ExpressionUUID->"892cb943-77fd-4333-865a-edfb4af7cdfb", CellID->2006219939] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[134073, 3422, 167, 7, 70, "Subsection",ExpressionUUID->"0f507792-2497-4a7c-bb3c-b6161d953cf5", CellID->540091361], Cell[134243, 3431, 194, 4, 70, "Text",ExpressionUUID->"15e4d5c4-5109-4cc5-8379-2ba0cf52f2a3", CellID->685375064], Cell[CellGroupData[{ Cell[134462, 3439, 8092, 204, 70, "Input",ExpressionUUID->"484dd988-81f7-433b-ab58-d430ba5aba0e", CellID->1860376824], Cell[142557, 3645, 10565, 170, 70, "Output",ExpressionUUID->"bf3b1892-5ce4-4c04-8bce-72060917c9ab", CellID->1975614023] }, Open ]], Cell[CellGroupData[{ Cell[153159, 3820, 145, 4, 70, "ExampleDelimiter",ExpressionUUID->"5f1befc2-a28f-4867-87e6-ddbe7e33a140", CellID->1582567349], Cell[153307, 3826, 212, 4, 70, "Text",ExpressionUUID->"085d2379-ff9e-4724-be66-7f963c756156", CellID->1363142646], Cell[CellGroupData[{ Cell[153544, 3834, 9501, 235, 70, "Input",ExpressionUUID->"e37e2b2a-1b1f-425a-b1f5-636717e140ef", CellID->816554113], Cell[163048, 4071, 54254, 896, 70, "Output",ExpressionUUID->"f44ff4a2-7597-478e-924b-d2507083d112", CellID->45052843] }, Open ]] }, Open ]] }, Closed]] } ] *) (* End of internal cache information *)