(* 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[ 49724, 1302] NotebookOptionsPosition[ 45443, 1193] NotebookOutlinePosition[ 47208, 1245] CellTagsIndexPosition[ 47165, 1242] WindowTitle->SymbolNameTranslate | 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["Get the Spanish translation for a symbol using strings:", "Text", TaggingRules->{}, CellChangeTimes->{{3.8039543792961082`*^9, 3.803954407262349*^9}, { 3.803954498782672*^9, 3.803954508748385*^9}, {3.803954539221546*^9, 3.803954542993846*^9}, {3.8039547145538588`*^9, 3.803954715748933*^9}, { 3.803954747525076*^9, 3.803954751407803*^9}, {3.8039552779463577`*^9, 3.80395528013762*^9}, {3.803955329459406*^9, 3.803955357698867*^9}, { 3.803955400621763*^9, 3.803955400912345*^9}, {3.804343595137006*^9, 3.804343621820814*^9}}, CellID->13078159], 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["SymbolNameTranslate", "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["SymbolNameTranslate", "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/SymbolNameTranslate"}, "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], "SymbolNameTranslate"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["SymbolNameTranslate"], BoxID -> "SymbolNameTranslate", Selectable->False], "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.803954551921846*^9, 3.80395457010776*^9}, { 3.803954770468794*^9, 3.803954806678349*^9}, {3.803954838516264*^9, 3.8039548397298317`*^9}, {3.803954933324271*^9, 3.803954955703123*^9}, { 3.803955012322918*^9, 3.803955101189567*^9}, {3.803955228129945*^9, 3.803955234622929*^9}, {3.8039552967966557`*^9, 3.8039553029015217`*^9}, { 3.8043436160679502`*^9, 3.804343617906268*^9}}, CellLabel->"In[30]:=", CellID->1393483526], Cell[BoxData["\<\"aplica a trav\[EAcute]s\"\>"], "Output", TaggingRules->{}, CellChangeTimes->{ 3.8039545738303347`*^9, {3.8039546567238283`*^9, 3.8039546687780037`*^9}, 3.803954717052558*^9, 3.803954807930822*^9, {3.803954935391758*^9, 3.803955023660067*^9}, 3.803955102169589*^9, {3.803955229172772*^9, 3.803955235275071*^9}, 3.8039553054373713`*^9, 3.803956384583777*^9, 3.803956477706333*^9, 3.803956541522601*^9, 3.80434361830807*^9}, CellLabel->"Out[30]=", CellID->1555030521] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->1370891049], Cell["Get the Portuguese translation for some symbols:", "Text", TaggingRules->{}, CellChangeTimes->{{3.803955246755546*^9, 3.803955263895159*^9}, { 3.8039553878532887`*^9, 3.803955415721118*^9}, {3.804343631632909*^9, 3.804343631856979*^9}}, CellID->2065263430], Cell[CellGroupData[{ Cell[BoxData[ 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["SymbolNameTranslate", "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["SymbolNameTranslate", "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/SymbolNameTranslate"}, "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], "SymbolNameTranslate"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["SymbolNameTranslate"], BoxID -> "SymbolNameTranslate", Selectable->False], "[", RowBox[{"#", ",", "\"\\""}], "]"}], "&"}], "/@", RowBox[{"{", RowBox[{"Real", ",", "Graph", ",", "Sin", ",", "ListPlot"}], "}"}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.803955427709364*^9, 3.8039554463006477`*^9}, { 3.803956503046061*^9, 3.8039565117042093`*^9}, {3.804343642052483*^9, 3.804343644817066*^9}}, CellLabel->"In[31]:=", CellID->973302308], Cell[BoxData[ RowBox[{"{", RowBox[{"\<\"real\"\>", ",", "\<\"grafo\"\>", ",", "\<\"seno\"\>", ",", "\<\"gr\[AAcute]fico de uma lista de valores\"\>"}], "}"}]], "Output",\ TaggingRules->{}, CellChangeTimes->{ 3.8039554500045347`*^9, 3.8039563861896057`*^9, 3.803956481872991*^9, { 3.803956513492076*^9, 3.8039565469148083`*^9}, 3.804343646184072*^9}, CellLabel->"Out[31]=", CellID->328432407] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Scope", "\[NonBreakingSpace]", Cell["(1)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->964056545], Cell[TextData[{ "For symbols that evaluate, use ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Unevaluated", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, {"Link"}]], ButtonData->"paclet:ref/Unevaluated", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " and ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["SymbolName", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, {"Link"}]], ButtonData->"paclet:ref/SymbolName", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " to retrieve translations. Get the German translation of ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["$PublisherID", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/$PublisherID", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.8039566567751827`*^9, 3.803956697101138*^9}, { 3.803956898256179*^9, 3.8039569229104033`*^9}, 3.803959407470895*^9, 3.803959451266444*^9, {3.8043436764529*^9, 3.80434374289575*^9}, { 3.856531389936489*^9, 3.856531404621786*^9}, {3.856531561944725*^9, 3.8565315633564034`*^9}}, CellID->649685796], 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["SymbolNameTranslate", "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["SymbolNameTranslate", "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/SymbolNameTranslate"}, "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], "SymbolNameTranslate"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["SymbolNameTranslate"], BoxID -> "SymbolNameTranslate", Selectable->False], "[", RowBox[{ RowBox[{"SymbolName", "@", RowBox[{"Unevaluated", "[", "$PublisherID", "]"}]}], ",", "\"\\""}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8039568531994247`*^9, 3.803956880539771*^9}}, CellLabel->"In[882]:=", CellID->2041306743], Cell[BoxData["\<\"Ver\[ODoubleDot]ffentlicher-ID\"\>"], "Output", TaggingRules->{}, CellChangeTimes->{{3.803956872524597*^9, 3.8039568851928167`*^9}}, CellLabel->"Out[882]=", CellID->83658249] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Possible Issues", "\[NonBreakingSpace]", Cell["(1)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->92483860], Cell["\<\ The set of possible results is not complete for all symbols and languages. \ The following code for a symbol returns the available translations:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.803956950936767*^9, 3.8039569577495527`*^9}, { 3.803957032355628*^9, 3.803957152419869*^9}, 3.803959442673115*^9, { 3.80434377266453*^9, 3.804343799034132*^9}}, CellID->205693419], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"symbolName", "=", "\"\\""}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{ RowBox[{"WolframLanguageData", "[", "symbolName", "]"}], "[", "\"\\"", "]"}], "\[LeftDoubleBracket]", RowBox[{"All", ",", "1"}], "\[RightDoubleBracket]"}], "//", "Sort"}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.803957154649453*^9, 3.803957254143489*^9}}, CellLabel->"In[891]:=", CellID->350570144], Cell[BoxData[ RowBox[{"{", RowBox[{ TemplateBox[{"\"French\"", RowBox[{"Entity", "[", RowBox[{"\"Language\"", ",", "\"French\""}], "]"}], "\"Entity[\\\"Language\\\", \\\"French\\\"]\"", "\"language\""}, "Entity"], ",", TemplateBox[{"\"German\"", RowBox[{"Entity", "[", RowBox[{"\"Language\"", ",", "\"German\""}], "]"}], "\"Entity[\\\"Language\\\", \\\"German\\\"]\"", "\"language\""}, "Entity"], ",", TemplateBox[{"\"Modern Greek\"", RowBox[{"Entity", "[", RowBox[{"\"Language\"", ",", "\"Greek\""}], "]"}], "\"Entity[\\\"Language\\\", \\\"Greek\\\"]\"", "\"language\""}, "Entity"], ",", TemplateBox[{"\"Japanese\"", RowBox[{"Entity", "[", RowBox[{"\"Language\"", ",", "\"Japanese\""}], "]"}], "\"Entity[\\\"Language\\\", \\\"Japanese\\\"]\"", "\"language\""}, "Entity"], ",", TemplateBox[{"\"Korean\"", RowBox[{"Entity", "[", RowBox[{"\"Language\"", ",", "\"Korean\""}], "]"}], "\"Entity[\\\"Language\\\", \\\"Korean\\\"]\"", "\"language\""}, "Entity"], ",", TemplateBox[{"\"Lithuanian\"", RowBox[{"Entity", "[", RowBox[{"\"Language\"", ",", "\"Lithuanian\""}], "]"}], "\"Entity[\\\"Language\\\", \\\"Lithuanian\\\"]\"", "\"language\""}, "Entity"], ",", TemplateBox[{"\"Polish\"", RowBox[{"Entity", "[", RowBox[{"\"Language\"", ",", "\"Polish\""}], "]"}], "\"Entity[\\\"Language\\\", \\\"Polish\\\"]\"", "\"language\""}, "Entity"], ",", TemplateBox[{"\"Portuguese\"", RowBox[{"Entity", "[", RowBox[{"\"Language\"", ",", "\"Portuguese\""}], "]"}], "\"Entity[\\\"Language\\\", \\\"Portuguese\\\"]\"", "\"language\""}, "Entity"], ",", TemplateBox[{"\"Russian\"", RowBox[{"Entity", "[", RowBox[{"\"Language\"", ",", "\"Russian\""}], "]"}], "\"Entity[\\\"Language\\\", \\\"Russian\\\"]\"", "\"language\""}, "Entity"], ",", TemplateBox[{"\"Spanish\"", RowBox[{"Entity", "[", RowBox[{"\"Language\"", ",", "\"Spanish\""}], "]"}], "\"Entity[\\\"Language\\\", \\\"Spanish\\\"]\"", "\"language\""}, "Entity"], ",", TemplateBox[{"\"Ukrainian\"", RowBox[{"Entity", "[", RowBox[{"\"Language\"", ",", "\"Ukrainian\""}], "]"}], "\"Entity[\\\"Language\\\", \\\"Ukrainian\\\"]\"", "\"language\""}, "Entity"], ",", TemplateBox[{"\"Vietnamese\"", RowBox[{"Entity", "[", RowBox[{"\"Language\"", ",", "\"Vietnamese\""}], "]"}], "\"Entity[\\\"Language\\\", \\\"Vietnamese\\\"]\"", "\"language\""}, "Entity"], ",", TemplateBox[{"\"Simplified Chinese\"", RowBox[{"Entity", "[", RowBox[{"\"WritingScript\"", ",", "\"SimplifiedChinese::zzc7y\""}], "]"}], "\"Entity[\\\"WritingScript\\\", \\\"SimplifiedChinese::zzc7y\\\ \"]\"", "\"writing script\""}, "Entity"], ",", TemplateBox[{"\"Traditional Chinese\"", RowBox[{"Entity", "[", RowBox[{"\"WritingScript\"", ",", "\"TraditionalChinese::bjw79\""}], "]"}], "\"Entity[\\\"WritingScript\\\", \ \\\"TraditionalChinese::bjw79\\\"]\"", "\"writing script\""}, "Entity"]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.803957197133401*^9, 3.803957254525469*^9}}, CellLabel->"Out[892]=", CellID->1671661385] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Neat Examples", "\[NonBreakingSpace]", Cell["(1)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->540091361], Cell["Create a table of translations:", "Text", TaggingRules->{}, CellChangeTimes->{{3.804343809947901*^9, 3.8043438162480297`*^9}}, CellID->520761314], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"languages", "=", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"someSymbols", "=", RowBox[{"{", RowBox[{ "Language", ",", "N", ",", "Pi", ",", "Sin", ",", "Cos", ",", "TableForm", ",", RowBox[{"Unevaluated", "[", "$Aborted", "]"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"translations", "=", RowBox[{ RowBox[{"Function", "[", RowBox[{"lang", ",", RowBox[{"Prepend", "[", RowBox[{ 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["SymbolNameTranslate", "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["SymbolNameTranslate", "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/SymbolNameTranslate"}, "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], "SymbolNameTranslate"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["SymbolNameTranslate"], BoxID -> "SymbolNameTranslate", Selectable->False], "[", RowBox[{"#", ",", "lang"}], "]"}], "&"}], "/@", "someSymbols"}], ",", RowBox[{"Style", "[", RowBox[{"lang", ",", "Bold"}], "]"}]}], "]"}]}], "]"}], "/@", "languages"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Grid", "[", RowBox[{ RowBox[{"Prepend", "[", RowBox[{"translations", ",", RowBox[{ RowBox[{ RowBox[{"Style", "[", RowBox[{"#", ",", "Bold"}], "]"}], "&"}], "/@", RowBox[{"Prepend", "[", RowBox[{ RowBox[{"SymbolName", "/@", "someSymbols"}], ",", "\"\< \>\""}], "]"}]}]}], "]"}], ",", RowBox[{"Frame", "\[Rule]", "All"}]}], "]"}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.80395743955055*^9, 3.803957740382307*^9}, { 3.803957771578195*^9, 3.803957848767374*^9}, {3.803957899737297*^9, 3.803957933895965*^9}, {3.803957967858427*^9, 3.803957968126582*^9}, { 3.8039580241306963`*^9, 3.8039580535898323`*^9}, {3.803958180635644*^9, 3.803958263751498*^9}, {3.803958315061144*^9, 3.8039584322223797`*^9}, { 3.8039584713026543`*^9, 3.803958483051403*^9}, {3.803958516034772*^9, 3.803958541265489*^9}, {3.803958577276425*^9, 3.803958631880628*^9}}, CellLabel->"In[976]:=", CellID->1275206387], Cell[BoxData[ TagBox[GridBox[{ { StyleBox["\<\" \"\>", StripOnInput->False, FontWeight->Bold], StyleBox["\<\"Language\"\>", StripOnInput->False, FontWeight->Bold], StyleBox["\<\"N\"\>", StripOnInput->False, FontWeight->Bold], StyleBox["\<\"Pi\"\>", StripOnInput->False, FontWeight->Bold], StyleBox["\<\"Sin\"\>", StripOnInput->False, FontWeight->Bold], StyleBox["\<\"Cos\"\>", StripOnInput->False, FontWeight->Bold], StyleBox["\<\"TableForm\"\>", StripOnInput->False, FontWeight->Bold], StyleBox["\<\"$Aborted\"\>", StripOnInput->False, FontWeight->Bold]}, { StyleBox["\<\"Portuguese\"\>", StripOnInput->False, FontWeight-> Bold], "\<\"idioma\"\>", "\<\"valor num\[EAcute]rico\"\>", "\<\"n\ \[UAcute]mero pi\"\>", "\<\"seno\"\>", "\<\"cosseno\"\>", "\<\"forma de \ tabela\"\>", "\<\"opera\[CCedilla]\[ATilde]o interrompida\"\>"}, { StyleBox["\<\"Spanish\"\>", StripOnInput->False, FontWeight-> Bold], "\<\"lenguaje\"\>", "\<\"valor num\[EAcute]rico\"\>", "\<\"n\ \[UAcute]mero pi\"\>", "\<\"seno\"\>", "\<\"coseno\"\>", "\<\"forma de \ tabla\"\>", "\<\"operaci\[OAcute]n abortada\"\>"}, { StyleBox["\<\"German\"\>", StripOnInput->False, FontWeight-> Bold], "\<\"Sprache\"\>", "\<\"numerischer Wert\"\>", "\<\"Kreiszahl \ \[Pi]\"\>", "\<\"Sinus\"\>", "\<\"Kosinus\"\>", \ "\<\"Tabellendarstellung\"\>", "\<\"abgebrochen\"\>"}, { StyleBox["\<\"Japanese\"\>", StripOnInput->False, FontWeight-> Bold], "\<\"\:8a00\:8a9e\"\>", "\<\"\:6570\:5024\"\>", "\<\"\:5186\ \:5468\:7387\"\>", "\<\"\:6b63\:5f26\"\>", "\<\"\:4f59\:5f26\"\>", \ "\<\"\:8868\:5f62\:5f0f\"\>", "\<\"\:7834\:68c4\:3055\:308c\:305f\:8a08\:7b97\ \:7d50\:679c\"\>"} }, AutoDelete->False, GridBoxFrame->{"Columns" -> {{True}}, "Rows" -> {{True}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.803958568687131*^9, {3.803958606848686*^9, 3.8039586323280363`*^9}}, CellLabel->"Out[979]=", CellID->1838471244] }, Open ]] }, Closed]] }, ClosingSaveDialog->False, WindowSize->Automatic, WindowMargins->Automatic, WindowTitle->"SymbolNameTranslate | 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[632, 23, 168, 7, 70, "Subsection",ExpressionUUID->"7b67d369-c920-4aca-b4d0-a698e5bc4534", CellID->462042388], Cell[803, 32, 566, 9, 70, "Text",ExpressionUUID->"e0f67aa9-01ef-42a1-b912-2ee1515cbf84", CellID->13078159], Cell[CellGroupData[{ Cell[1394, 45, 7622, 188, 70, "Input",ExpressionUUID->"2d03fe3c-b449-40bf-9624-177c7ec1b99a", CellID->1393483526], Cell[9019, 235, 504, 9, 70, "Output",ExpressionUUID->"c48f4462-6a92-46f6-9253-0729bf2902d3", CellID->1555030521] }, Open ]], Cell[CellGroupData[{ Cell[9560, 249, 145, 4, 70, "ExampleDelimiter",ExpressionUUID->"358b12b0-c970-47fb-8cb1-3a7f6c49e601", CellID->1370891049], Cell[9708, 255, 270, 5, 70, "Text",ExpressionUUID->"fd80627f-68c5-48be-8ad5-eb5ba15112bb", CellID->2065263430], Cell[CellGroupData[{ Cell[10003, 264, 7874, 193, 70, "Input",ExpressionUUID->"9a149a51-459c-4d86-9ddc-a8474cb16dff", CellID->973302308], Cell[17880, 459, 409, 10, 70, "Output",ExpressionUUID->"e461b417-5959-4927-9d05-0d74f68b4460", CellID->328432407] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[18350, 476, 159, 7, 70, "Subsection",ExpressionUUID->"0a50ad62-a285-47f3-a0be-b4c194799de0", CellID->964056545], Cell[18512, 485, 1912, 55, 70, "Text",ExpressionUUID->"c62ca1aa-8bc4-4abb-8ca5-fb79c9f8986a", CellID->649685796], Cell[CellGroupData[{ Cell[20449, 544, 7352, 186, 70, "Input",ExpressionUUID->"ad5191b5-54c5-4739-9e04-c943a637e47f", CellID->2041306743], Cell[27804, 732, 196, 4, 70, "Output",ExpressionUUID->"ece1b2f7-51a9-44d2-957b-401bddb0955d", CellID->83658249] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[28049, 742, 168, 7, 70, "Subsection",ExpressionUUID->"1eac3c0b-11f3-4683-be92-3e11d058e381", CellID->92483860], Cell[28220, 751, 396, 8, 70, "Text",ExpressionUUID->"80b2f99d-5e41-45f9-a524-ae62adff88c4", CellID->205693419], Cell[CellGroupData[{ Cell[28641, 763, 486, 14, 70, "Input",ExpressionUUID->"fcc41674-5ff5-412d-b7c3-641b9bc5ebfe", CellID->350570144], Cell[29130, 779, 3338, 78, 70, "Output",ExpressionUUID->"bdec65f0-a327-401b-afe8-9fb039999bbf", CellID->1671661385] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[32517, 863, 167, 7, 70, "Subsection",ExpressionUUID->"71e6394d-6c4d-42f2-8190-83fc34c93d1b", CellID->540091361], Cell[32687, 872, 154, 3, 70, "Text",ExpressionUUID->"815ac9a2-ca59-40f9-a465-cd73e6dbb7a2", CellID->520761314], Cell[CellGroupData[{ Cell[32866, 879, 10315, 243, 70, "Input",ExpressionUUID->"75072fbc-5cd5-4d53-a9f9-be3a181a9a01", CellID->1275206387], Cell[43184, 1124, 2231, 65, 70, "Output",ExpressionUUID->"523f8096-c39d-4a0f-b391-844de09dc630", CellID->1838471244] }, Open ]] }, Closed]] } ] *) (* End of internal cache information *)