(* 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[ 241607, 6493] NotebookOptionsPosition[ 226726, 6158] NotebookOutlinePosition[ 228492, 6210] CellTagsIndexPosition[ 228449, 6207] WindowTitle->GeneralizedMapThread | Example Notebook WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell[TextData[{ "Basic Examples", "\[NonBreakingSpace]", Cell["(3)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->462042388], Cell["Have the second argument be a constant:", "Text", TaggingRules->{}, CellChangeTimes->{{3.773310207844962*^9, 3.7733102160353527`*^9}, { 3.7840062434220743`*^9, 3.784006243801084*^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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2", ",", "3", ",", "4"}], "}"}], ",", "9", ",", RowBox[{"{", RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "}"}]}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.773310185170177*^9, 3.7733102219033318`*^9}, { 3.773315521576871*^9, 3.773315526307023*^9}, 3.773315580130723*^9}, CellLabel->"In[1]:=", CellID->1361972870], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"1", ",", "9", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "9", ",", "b"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"3", ",", "9", ",", "c"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"4", ",", "9", ",", "d"}], "]"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.773310200296693*^9, 3.773310222236293*^9}, 3.7733112716803293`*^9, 3.773313383459549*^9, 3.773314161773087*^9, 3.77331489499807*^9, {3.773315516503016*^9, 3.773315526908103*^9}, 3.773315580765077*^9, 3.7737638795369587`*^9}, CellLabel->"Out[1]=", CellID->704733800] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->832336434], Cell["It works on expressions with unequal lengths (\"ragged\"):", "Text", TaggingRules->{}, CellChangeTimes->{{3.773310207844962*^9, 3.7733102160353527`*^9}, { 3.773310631686399*^9, 3.773310652214985*^9}, {3.7840062625543947`*^9, 3.7840062646604595`*^9}, {3.8594556087816563`*^9, 3.859455643476021*^9}}, CellID->461940098], 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Range", "[", "2", "]"}], ",", RowBox[{"Range", "[", "3", "]"}], ",", RowBox[{"Range", "[", "4", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "e"}], "}"}], ",", RowBox[{"{", RowBox[{"f", ",", "g", ",", "h", ",", "i"}], "}"}]}], "}"}]}], "}"}], ",", "2"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7733105544874973`*^9, 3.773310617233673*^9}}, CellLabel->"In[1]:=", CellID->1755019743], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"1", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "b"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"1", ",", "c"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "d"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"3", ",", "e"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"1", ",", "f"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "g"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"3", ",", "h"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"4", ",", "i"}], "]"}]}], "}"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7733105758830633`*^9, 3.773310579494356*^9}, { 3.7733106097962847`*^9, 3.7733106176005096`*^9}, 3.773310667091824*^9, 3.773311273526697*^9, 3.773314163194385*^9, 3.773314898091628*^9, { 3.7733155590756083`*^9, 3.773315583809245*^9}, 3.773763882111191*^9}, CellLabel->"Out[1]=", CellID->1148791732] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->174526116], Cell[TextData[{ "Apply ", Cell[BoxData[ StyleBox["f", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " to the corresponding values of associations, copying values where \ necessary:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.773310817388425*^9, 3.7733108446840477`*^9}}, CellID->65987167], 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"<|", RowBox[{"a", "\[Rule]", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "|>"}], ",", RowBox[{"<|", RowBox[{"a", "\[Rule]", "2"}], "|>"}], ",", RowBox[{"<|", RowBox[{"a", "\[Rule]", RowBox[{"{", RowBox[{"3", ",", "4"}], "}"}]}], "|>"}]}], "}"}], ",", "2"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.77331076165077*^9, 3.773310814344735*^9}}, CellLabel->"In[1]:=", CellID->2124793111], Cell[BoxData[ RowBox[{"\[LeftAssociation]", RowBox[{"a", "\[Rule]", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"1", ",", "2", ",", "3"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "2", ",", "4"}], "]"}]}], "}"}]}], "\[RightAssociation]"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.773310771165698*^9, 3.773310814728712*^9}, { 3.773313826021875*^9, 3.773313851398427*^9}, 3.773314164417089*^9, 3.7733149007157288`*^9, {3.773315560612557*^9, 3.773315585108201*^9}}, CellLabel->"Out[1]=", CellID->950912362] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Scope", "\[NonBreakingSpace]", Cell["(3)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->964056545], Cell["Apply to a list of lists with varying depths and lengths:", "Text", TaggingRules->{}, CellChangeTimes->{{3.773310944219625*^9, 3.773310947021353*^9}, { 3.773311297068178*^9, 3.7733113045434837`*^9}, {3.773311385849757*^9, 3.773311387990468*^9}}, CellID->649685796], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"mid", "=", RowBox[{"{", RowBox[{ RowBox[{"Range", "[", "3", "]"}], ",", RowBox[{"Range", "[", "4", "]"}], ",", RowBox[{"Range", "[", "5", "]"}], ",", RowBox[{"Range", "[", "2", "]"}]}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"out", "=", 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"Range", "[", "4", "]"}], ",", "mid", ",", "4"}], "}"}], ",", "2"}], "]"}]}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.773310917112417*^9, 3.773310934174502*^9}, { 3.7733113102557487`*^9, 3.77331131069217*^9}}, CellLabel->"In[1]:=", CellID->836153427], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"1", ",", "1", ",", "4"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"1", ",", "2", ",", "4"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"1", ",", "3", ",", "4"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"2", ",", "1", ",", "4"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "2", ",", "4"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "3", ",", "4"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "4", ",", "4"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"3", ",", "1", ",", "4"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"3", ",", "2", ",", "4"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"3", ",", "3", ",", "4"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"3", ",", "4", ",", "4"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"3", ",", "5", ",", "4"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"4", ",", "1", ",", "4"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"4", ",", "2", ",", "4"}], "]"}]}], "}"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.773310922459999*^9, 3.7733109346207533`*^9}, { 3.773311306972142*^9, 3.773311311550767*^9}, 3.773311390274106*^9, 3.773314167202223*^9, 3.7733149036935377`*^9, 3.773315589290694*^9}, CellLabel->"Out[1]=", CellID->113478405] }, Open ]], Cell["The final results are ragged:", "Text", TaggingRules->{}, CellChangeTimes->{{3.773311317488285*^9, 3.7733113687737513`*^9}, { 3.7840062911892405`*^9, 3.784006291621655*^9}}, CellID->1907554436], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Grid", "[", "out", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.773311313066853*^9, 3.7733113395700493`*^9}}, CellLabel->"In[2]:=", CellID->498726094], Cell[BoxData[ TagBox[GridBox[{ { RowBox[{"f", "[", RowBox[{"1", ",", "1", ",", "4"}], "]"}], RowBox[{"f", "[", RowBox[{"1", ",", "2", ",", "4"}], "]"}], RowBox[{"f", "[", RowBox[{"1", ",", "3", ",", "4"}], "]"}], "", ""}, { RowBox[{"f", "[", RowBox[{"2", ",", "1", ",", "4"}], "]"}], RowBox[{"f", "[", RowBox[{"2", ",", "2", ",", "4"}], "]"}], RowBox[{"f", "[", RowBox[{"2", ",", "3", ",", "4"}], "]"}], RowBox[{"f", "[", RowBox[{"2", ",", "4", ",", "4"}], "]"}], ""}, { RowBox[{"f", "[", RowBox[{"3", ",", "1", ",", "4"}], "]"}], RowBox[{"f", "[", RowBox[{"3", ",", "2", ",", "4"}], "]"}], RowBox[{"f", "[", RowBox[{"3", ",", "3", ",", "4"}], "]"}], RowBox[{"f", "[", RowBox[{"3", ",", "4", ",", "4"}], "]"}], RowBox[{"f", "[", RowBox[{"3", ",", "5", ",", "4"}], "]"}]}, { RowBox[{"f", "[", RowBox[{"4", ",", "1", ",", "4"}], "]"}], RowBox[{"f", "[", RowBox[{"4", ",", "2", ",", "4"}], "]"}], "", "", ""} }, AutoDelete->False, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7733113140932493`*^9, 3.773311340027108*^9}, { 3.77331137039867*^9, 3.773311391690672*^9}, 3.773314168385641*^9, 3.7733149048909817`*^9, 3.773315591153816*^9}, CellLabel->"Out[2]=", CellID->930199798] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->253249249], Cell[TextData[{ "Apply at level 1 means that ", Cell[BoxData[ RowBox[{"{", RowBox[{ StyleBox["a", "TI"], ",", StyleBox["b", "TI"]}], "}"}]], "InlineFormula", FontFamily->"Source Sans Pro"], " from the final list is considered a single value:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.773311425140696*^9, 3.773311457770816*^9}, { 3.773311490683578*^9, 3.773311496550358*^9}, {3.77331160917551*^9, 3.773311620221221*^9}, {3.773316394823889*^9, 3.773316395083373*^9}, 3.784006311315051*^9}, CellID->995067595], 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"11", ",", "12", ",", "13"}], "}"}], ",", "2", ",", RowBox[{"{", RowBox[{"7", ",", "8", ",", RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}]}], "}"}]}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.773311459603739*^9, 3.773311494673853*^9}, { 3.7733115387558117`*^9, 3.7733115389660063`*^9}, 3.773315692746367*^9}, CellLabel->"In[1]:=", CellID->1690783212], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"11", ",", "2", ",", "7"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"12", ",", "2", ",", "8"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"13", ",", "2", ",", RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}]}], "]"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.773311409138*^9, {3.7733114602606373`*^9, 3.773311497547694*^9}, 3.773311539539266*^9, 3.7733141710045147`*^9, 3.7733149087965937`*^9, 3.773315598551586*^9, 3.773315693090125*^9}, CellLabel->"Out[1]=", CellID->1062376210] }, Open ]], Cell[TextData[{ "Apply at level 2 means interpreting ", Cell[BoxData[ RowBox[{"{", RowBox[{ StyleBox["a", "TI"], ",", StyleBox["b", "TI"]}], "}"}]], "InlineFormula", FontFamily->"Source Sans Pro"], " as separate values, and copying all the other values:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.7733114692251577`*^9, 3.773311541665469*^9}, { 3.773311614633803*^9, 3.773311615316276*^9}, 3.7840063292967176`*^9}, CellID->2096873973], 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"11", ",", "12", ",", "13"}], "}"}], ",", "2", ",", RowBox[{"{", RowBox[{"7", ",", "8", ",", RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}]}], "}"}]}], "}"}], ",", "2"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{ 3.773311465284539*^9, {3.773311503369891*^9, 3.773311504286991*^9}, { 3.773311536134584*^9, 3.773311536435285*^9}, 3.7733156944656553`*^9}, CellLabel->"In[2]:=", CellID->1409930297], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"f", "[", RowBox[{"11", ",", "2", ",", "7"}], "]"}], "}"}], ",", RowBox[{"{", RowBox[{"f", "[", RowBox[{"12", ",", "2", ",", "8"}], "]"}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"13", ",", "2", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"13", ",", "2", ",", "b"}], "]"}]}], "}"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.773311465531625*^9, {3.7733115046376123`*^9, 3.773311543280713*^9}, 3.7733141721271753`*^9, 3.773314909911395*^9, 3.773315599657938*^9, 3.7733156948453207`*^9, 3.773316401655449*^9}, CellLabel->"Out[2]=", CellID->1172924820] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->1372625092], Cell[TextData[{ "Create an operator of ", Cell[BoxData[ StyleBox["GeneralizedMapThread", "InlineResourceFunction"]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.773315697971649*^9, 3.7733157082186604`*^9}, 3.7733158140150414`*^9}, CellID->1652496038], Cell[BoxData[ RowBox[{ RowBox[{"op", "=", 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", "f", "]"}]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.77331568738765*^9, 3.7733157124768343`*^9}}, CellLabel->"In[1]:=", CellID->596657193], Cell["Use the operator on some data:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7733157164979057`*^9, 3.773315724127132*^9}, { 3.77331582750784*^9, 3.7733158379237843`*^9}, {3.773315889476903*^9, 3.7733158909640207`*^9}}, CellID->190766715], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"op", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], ",", "5"}], "}"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.773315727553117*^9, 3.773315759407021*^9}, { 3.7733158224277983`*^9, 3.77331588251705*^9}}, CellLabel->"In[2]:=", CellID->208904671], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"1", ",", "5"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "5"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"3", ",", "5"}], "]"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.773315759917988*^9, {3.773315818822208*^9, 3.773315892013858*^9}, 3.77331597691812*^9, 3.773316405713539*^9}, CellLabel->"Out[2]=", CellID->1111199998] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Applications", "\[NonBreakingSpace]", Cell["(2)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->568056528], Cell[TextData[{ "Subtract the vector ", Cell[BoxData[ RowBox[{"{", RowBox[{ StyleBox["a", "TI"], ",", StyleBox["b", "TI"]}], "}"}]], "InlineFormula", FontFamily->"Source Sans Pro"], " from a list of vectors:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.773311691052731*^9, 3.773311702202471*^9}, 3.773764061109583*^9}, CellID->900293773], 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{ RowBox[{ RowBox[{"Subtract", "[", RowBox[{"#1", ",", RowBox[{"First", "@", "#2"}]}], "]"}], "&"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "5"}], "}"}]}], "}"}], ",", RowBox[{"c", "[", RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], "]"}]}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.773311714414043*^9, 3.773311714635041*^9}, { 3.7733160419285793`*^9, 3.7733160622099657`*^9}, {3.773316103918599*^9, 3.773316108497058*^9}, {3.77331624701022*^9, 3.773316254955656*^9}}, CellLabel->"In[1]:=", CellID->955132211], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"1", "-", "a"}], ",", RowBox[{"1", "-", "b"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"1", "-", "a"}], ",", RowBox[{"2", "-", "b"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"2", "-", "a"}], ",", RowBox[{"3", "-", "b"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"4", "-", "a"}], ",", RowBox[{"5", "-", "b"}]}], "}"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.773316063054358*^9, 3.7733161090759573`*^9}, 3.773316255888096*^9, 3.773316408395651*^9}, CellLabel->"Out[1]=", CellID->315396549] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->1313439539], Cell["\<\ Apply a list of functions to a single argument without pure functions:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.7733130726900253`*^9, 3.7733130867568274`*^9}}, CellID->1114840142], 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"Construct", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"f", ",", "g", ",", "h"}], "}"}], ",", "2"}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.773313029176355*^9, 3.773313056253193*^9}, { 3.7733131004925957`*^9, 3.773313131671213*^9}, 3.773313165508219*^9}, CellLabel->"In[1]:=", CellID->667905639], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"f", "[", "2", "]"}], ",", RowBox[{"g", "[", "2", "]"}], ",", RowBox[{"h", "[", "2", "]"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.773313029597546*^9, 3.773313056549963*^9}, { 3.7733130877694902`*^9, 3.773313132068255*^9}, 3.7733131658694277`*^9, 3.773314176264872*^9, 3.773314914112339*^9, 3.773315604020781*^9, 3.7733159245101433`*^9, 3.773316131453031*^9, 3.773316409772912*^9}, CellLabel->"Out[1]=", CellID->524700828] }, Open ]], Cell[TextData[{ "This can also be achieved using ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Through", "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/Through", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.773313200800685*^9, 3.773313211027957*^9}}, CellID->1183702696], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Through", "[", RowBox[{ RowBox[{"{", RowBox[{"f", ",", "g", ",", "h"}], "}"}], "[", "2", "]"}], "]"}]], "Input",\ TaggingRules->{}, CellChangeTimes->{{3.773313182613409*^9, 3.7733131928955803`*^9}}, CellLabel->"In[2]:=", CellID->1884765744], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"f", "[", "2", "]"}], ",", RowBox[{"g", "[", "2", "]"}], ",", RowBox[{"h", "[", "2", "]"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{3.773313193243783*^9, 3.773314177327176*^9, 3.77331491520289*^9, 3.773315605102199*^9, 3.773315925507916*^9, 3.773316132863277*^9, 3.773316411159602*^9}, CellLabel->"Out[2]=", CellID->310235741] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Properties and Relations", "\[NonBreakingSpace]", Cell["(3)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->754506620], Cell[TextData[{ "When the arrays are of equal length, ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["MapThread", "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/MapThread", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " and ", Cell[BoxData[ StyleBox["GeneralizedMapThread", "InlineResourceFunction"]], "InlineFormula", FontFamily->"Source Sans Pro"], " give the same result:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.77331185250307*^9, 3.773311874400354*^9}, { 3.773313243776115*^9, 3.773313249829941*^9}, 3.784006364829109*^9, 3.8594557399220037`*^9}, CellID->1550517141], Cell[CellGroupData[{ Cell[BoxData[ 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"11", ",", "12", ",", "13"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "8", ",", "9"}], "}"}]}], "}"}]}], "]"}], "===", RowBox[{"MapThread", "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"11", ",", "12", ",", "13"}], "}"}], ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"7", ",", "8", ",", "9"}], "}"}]}], "}"}]}], "]"}]}]], "Input",\ TaggingRules->{}, CellChangeTimes->{{3.7733118195334587`*^9, 3.7733118791536493`*^9}, { 3.7733122658772*^9, 3.773312267631713*^9}}, CellLabel->"In[1]:=", CellID->1671316914], Cell[BoxData["True"], "Output", TaggingRules->{}, CellChangeTimes->{{3.773311824138569*^9, 3.773311879479686*^9}, 3.773312268072866*^9, 3.773313253177125*^9, 3.7733141787370987`*^9, 3.773314916858223*^9, 3.7733156085038567`*^9, 3.7733159268737497`*^9}, CellLabel->"Out[1]=", CellID->1866440743] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->393002080], Cell[TextData[{ Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["MapThread", "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/MapThread", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " cannot handle lists with elements of unequal length (\"ragged\"):" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.773311991008337*^9, 3.77331200973269*^9}, 3.773312132841571*^9, {3.7733132617766037`*^9, 3.773313266684412*^9}, { 3.773313501575513*^9, 3.773313508886341*^9}, {3.784006376414242*^9, 3.7840063777023153`*^9}, {3.859455741673691*^9, 3.85945574596775*^9}}, CellID->2093744690], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"MapThread", "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "4", ",", "5"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "e"}], "}"}]}], "}"}]}], "}"}], ",", "2"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.773311986388329*^9, 3.773311988147666*^9}, 3.773312270060309*^9}, CellLabel->"In[1]:=", CellID->739520637], Cell[BoxData[ TemplateBox[{ "MapThread", "mptd", "\"Object \\!\\(\\*RowBox[{\\\"{\\\", RowBox[{RowBox[{\\\"{\\\", \ RowBox[{\\\"1\\\", \\\",\\\", \\\"2\\\"}], \\\"}\\\"}], \\\",\\\", RowBox[{\\\ \"{\\\", RowBox[{\\\"3\\\", \\\",\\\", \\\"4\\\", \\\",\\\", \\\"5\\\"}], \ \\\"}\\\"}]}], \\\"}\\\"}]\\) at position {2, \ \\!\\(\\*RowBox[{\\\"1\\\"}]\\)} in \\!\\(\\*RowBox[{\\\"MapThread\\\", \\\"[\ \\\", RowBox[{\\\"f\\\", \\\",\\\", RowBox[{\\\"{\\\", \ RowBox[{RowBox[{\\\"{\\\", RowBox[{RowBox[{\\\"{\\\", RowBox[{\\\"1\\\", \ \\\",\\\", \\\"2\\\"}], \\\"}\\\"}], \\\",\\\", RowBox[{\\\"{\\\", RowBox[{\\\ \"3\\\", \\\",\\\", \\\"4\\\", \\\",\\\", \\\"5\\\"}], \\\"}\\\"}]}], \\\"}\\\ \"}], \\\",\\\", RowBox[{\\\"{\\\", RowBox[{RowBox[{\\\"{\\\", \ RowBox[{\\\"a\\\", \\\",\\\", \\\"b\\\"}], \\\"}\\\"}], \\\",\\\", RowBox[{\\\ \"{\\\", RowBox[{\\\"c\\\", \\\",\\\", \\\"d\\\", \\\",\\\", \\\"e\\\"}], \ \\\"}\\\"}]}], \\\"}\\\"}]}], \\\"}\\\"}], \\\",\\\", \\\"2\\\"}], \ \\\"]\\\"}]\\) has only \\!\\(\\*RowBox[{\\\"1\\\"}]\\) of required \ \\!\\(\\*RowBox[{\\\"2\\\"}]\\) dimensions.\"", 2, 396, 35, 31648811322360916082, "Local"}, "MessageTemplate"]], "Message", "MSG", TaggingRules->{}, CellChangeTimes->{ 3.7733122716811028`*^9, {3.773313255775132*^9, 3.773313267996026*^9}, 3.773313510068845*^9, 3.773314181617588*^9, 3.773315611013032*^9, 3.7733159289173*^9}, CellLabel->"During evaluation of In[1]:=", CellID->892761495], Cell[BoxData[ RowBox[{"MapThread", "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "4", ",", "5"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "e"}], "}"}]}], "}"}]}], "}"}], ",", "2"}], "]"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.773312271692774*^9, {3.7733132557855062`*^9, 3.773313268003051*^9}, 3.773313510078733*^9, 3.7733141816246243`*^9, 3.773315611018942*^9, 3.773315928925088*^9}, CellLabel->"Out[1]=", CellID->174204876] }, Open ]], Cell[TextData[{ Cell[BoxData[ StyleBox["GeneralizedMapThread", "InlineResourceFunction"]], "InlineFormula", FontFamily->"Source Sans Pro"], " can handle these cases:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.773312053025528*^9, 3.7733121359993668`*^9}}, CellID->1264845271], 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "4", ",", "5"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"a", ",", "b"}], "}"}], ",", RowBox[{"{", RowBox[{"c", ",", "d", ",", "e"}], "}"}]}], "}"}]}], "}"}], ",", "2"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.773311936678195*^9, 3.773311982095153*^9}, { 3.773312012115687*^9, 3.773312013718696*^9}, 3.7733122773880053`*^9}, CellLabel->"In[2]:=", CellID->1757546310], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"1", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "b"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"3", ",", "c"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"4", ",", "d"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"5", ",", "e"}], "]"}]}], "}"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7733119664251747`*^9, 3.773311974351266*^9}, 3.773312041950952*^9, 3.773312111402367*^9, 3.7733122778726377`*^9, 3.773313270598324*^9, 3.773313511571303*^9, 3.773314182700349*^9, 3.7733156121867247`*^9, 3.773315929866255*^9}, CellLabel->"Out[2]=", CellID->171372887] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->441115352], Cell[TextData[{ Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Thread", "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/Thread", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " can handle arrays with different depths:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.773312809213152*^9, 3.773312810035239*^9}, { 3.773312906633246*^9, 3.773312934163314*^9}, {3.773312986643118*^9, 3.773312987450515*^9}, 3.773763816349496*^9}, CellID->2054039417], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Thread", "[", RowBox[{"f", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], ",", "2", ",", RowBox[{"{", RowBox[{"4", ",", "5", ",", "6"}], "}"}]}], "]"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.773312812276556*^9, 3.7733128210383797`*^9}}, CellLabel->"In[1]:=", CellID->183791298], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"1", ",", "2", ",", "4"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "2", ",", "5"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"3", ",", "2", ",", "6"}], "]"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{3.77331282138811*^9, 3.773312935446834*^9, 3.7733130098378696`*^9, 3.773313273705083*^9, 3.77331351331765*^9, 3.7733141839657516`*^9, 3.773315614234475*^9}, CellLabel->"Out[1]=", CellID->334062090] }, Open ]], Cell[TextData[{ Cell[BoxData[ StyleBox["GeneralizedMapThread", "InlineResourceFunction"]], "InlineFormula", FontFamily->"Source Sans Pro"], " can also do this but the syntax of GeneralizedMapThread follows the syntax \ of ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["MapThread", "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/MapThread", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.773312953661456*^9, 3.773313001083129*^9}, 3.859455732809986*^9}, CellID->2052312684], 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], ",", "2", ",", RowBox[{"{", RowBox[{"4", ",", "5", ",", "6"}], "}"}]}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.773312829545545*^9, 3.7733128331330223`*^9}}, CellLabel->"In[2]:=", CellID->1487199632], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"1", ",", "2", ",", "4"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "2", ",", "5"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"3", ",", "2", ",", "6"}], "]"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{3.773312834509832*^9, 3.773312936633027*^9, 3.773313007525597*^9, 3.7733132780427856`*^9, 3.773313514943034*^9, 3.773314185012792*^9, 3.7733156152952957`*^9}, CellLabel->"Out[2]=", CellID->1128726865] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Possible Issues", "\[NonBreakingSpace]", Cell["(4)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->92483860], Cell["Associations must have the same keys:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7733122398669243`*^9, 3.7733122471236*^9}}, CellID->1186266912], 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"<|", RowBox[{"a", "\[Rule]", "2"}], "|>"}], ",", RowBox[{"<|", RowBox[{"a", "\[Rule]", "3"}], "|>"}], ",", RowBox[{"<|", RowBox[{ RowBox[{"a", "\[Rule]", "4"}], ",", RowBox[{"b", "\[Rule]", "2"}]}], "|>"}]}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.773312216683968*^9, 3.7733122879795113`*^9}, { 3.7733138654009323`*^9, 3.773313868187005*^9}}, CellLabel->"In[1]:=", CellID->1291938957], Cell[BoxData[ TemplateBox[{ "MapThread", "mpth", "\"Incompatible heads of objects at positions {2, \\!\\(\\*RowBox[{\\\"2\\\ \"}]\\)} and {2, \\!\\(\\*RowBox[{\\\"3\\\"}]\\)} of \ \\!\\(\\*RowBox[{\\\"MapThread\\\", \\\"[\\\", \ RowBox[{RowBox[{RowBox[{\\\"GeneralizedMapThread\\\", \\\"[\\\", \ RowBox[{\\\"f\\\", \\\",\\\", RowBox[{\\\"{\\\", \\\"##1\\\", \\\"}\\\"}], \\\ \",\\\", RowBox[{\\\"1\\\", \\\"-\\\", \\\"1\\\"}]}], \\\"]\\\"}], \ \\\"&\\\"}], \\\",\\\", RowBox[{\\\"{\\\", RowBox[{RowBox[{\\\"{\\\", \ RowBox[{RowBox[{\\\"\[LeftAssociation]\\\", RowBox[{\\\"a\\\", \ \\\"\[Rule]\\\", \\\"2\\\"}], \\\"\[RightAssociation]\\\"}], \\\",\\\", \ RowBox[{\\\"\[LeftAssociation]\\\", RowBox[{\\\"a\\\", \\\"\[Rule]\\\", \\\"2\ \\\"}], \\\"\[RightAssociation]\\\"}]}], \\\"}\\\"}], \\\",\\\", \ RowBox[{\\\"{\\\", RowBox[{RowBox[{\\\"\[LeftAssociation]\\\", \ RowBox[{\\\"a\\\", \\\"\[Rule]\\\", \\\"3\\\"}], \ \\\"\[RightAssociation]\\\"}], \\\",\\\", RowBox[{\\\"\[LeftAssociation]\\\", \ RowBox[{\\\"a\\\", \\\"\[Rule]\\\", \\\"3\\\"}], \ \\\"\[RightAssociation]\\\"}]}], \\\"}\\\"}], \\\",\\\", RowBox[{\\\"\ \[LeftAssociation]\\\", RowBox[{RowBox[{\\\"a\\\", \\\"\[Rule]\\\", \ \\\"4\\\"}], \\\",\\\", RowBox[{\\\"b\\\", \\\"\[Rule]\\\", \\\"2\\\"}]}], \\\ \"\[RightAssociation]\\\"}]}], \\\"}\\\"}]}], \\\"]\\\"}]\\); heads are \ \\!\\(\\*RowBox[{\\\"List\\\"}]\\) and \\!\\(\\*RowBox[{\\\"Association\\\"}]\ \\).\"", 2, 368, 33, 31648811322360916082, "Local"}, "MessageTemplate"]], "Message", "MSG", TaggingRules->{}, CellChangeTimes->{3.773313868554865*^9, 3.773314188173963*^9, 3.7733156178595133`*^9}, CellLabel->"During evaluation of In[1]:=", CellID->2033787875], Cell[BoxData[ RowBox[{"MapThread", "[", 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["GeneralizedMapThread", "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., {2., 9.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {2., 9.}}]}, 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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", "##1", "}"}], ",", RowBox[{"1", "-", "1"}]}], "]"}], "&"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"\[LeftAssociation]", RowBox[{"a", "\[Rule]", "2"}], "\[RightAssociation]"}], ",", RowBox[{"\[LeftAssociation]", RowBox[{"a", "\[Rule]", "2"}], "\[RightAssociation]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[LeftAssociation]", RowBox[{"a", "\[Rule]", "3"}], "\[RightAssociation]"}], ",", RowBox[{"\[LeftAssociation]", RowBox[{"a", "\[Rule]", "3"}], "\[RightAssociation]"}]}], "}"}], ",", RowBox[{"\[LeftAssociation]", RowBox[{ RowBox[{"a", "\[Rule]", "4"}], ",", RowBox[{"b", "\[Rule]", "2"}]}], "\[RightAssociation]"}]}], "}"}]}], "]"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7733122355186663`*^9, 3.773312288424347*^9}, 3.773313280562402*^9, 3.773313532555626*^9, 3.773313794094805*^9, { 3.773313858582655*^9, 3.773313868565118*^9}, 3.7733141881797333`*^9, 3.773315617867772*^9}, CellLabel->"Out[1]=", CellID->375605826] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->764337092], Cell["Associations and lists can not be mixed:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7733135774095163`*^9, 3.7733135901727953`*^9}}, CellID->2109535518], 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"<|", RowBox[{"a", "\[Rule]", "1"}], "|>"}], ",", "2"}], "}"}], ",", "1"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.773313561321612*^9, 3.773313572871928*^9}, { 3.773313783355947*^9, 3.773313786246505*^9}}, CellLabel->"In[1]:=", CellID->647706746], Cell[BoxData[ TemplateBox[{ "MapThread", "mpth", "\"Incompatible heads of objects at positions {2, \\!\\(\\*RowBox[{\\\"1\\\ \"}]\\)} and {2, \\!\\(\\*RowBox[{\\\"2\\\"}]\\)} of \ \\!\\(\\*RowBox[{\\\"MapThread\\\", \\\"[\\\", \ RowBox[{RowBox[{RowBox[{\\\"GeneralizedMapThread\\\", \\\"[\\\", \ RowBox[{\\\"f\\\", \\\",\\\", RowBox[{\\\"{\\\", \\\"##1\\\", \\\"}\\\"}], \\\ \",\\\", RowBox[{\\\"1\\\", \\\"-\\\", \\\"1\\\"}]}], \\\"]\\\"}], \ \\\"&\\\"}], \\\",\\\", RowBox[{\\\"{\\\", RowBox[{RowBox[{\\\"\ \[LeftAssociation]\\\", RowBox[{\\\"a\\\", \\\"\[Rule]\\\", \\\"1\\\"}], \\\"\ \[RightAssociation]\\\"}], \\\",\\\", RowBox[{\\\"{\\\", \\\"2\\\", \ \\\"}\\\"}]}], \\\"}\\\"}]}], \\\"]\\\"}]\\); heads are \ \\!\\(\\*RowBox[{\\\"Association\\\"}]\\) and \\!\\(\\*RowBox[{\\\"List\\\"}]\ \\).\"", 2, 369, 34, 31648811322360916082, "Local"}, "MessageTemplate"]], "Message", "MSG", TaggingRules->{}, CellChangeTimes->{{3.773313862422035*^9, 3.77331387013794*^9}, 3.773314190034581*^9, 3.7733156192359743`*^9}, CellLabel->"During evaluation of In[1]:=", CellID->436196496], Cell[BoxData[ RowBox[{"MapThread", "[", 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["GeneralizedMapThread", "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., {2., 9.}}], False-> DynamicBox[FEPrivate`FrontEndResource[ "FEBitmaps", "IconizeOpener"], ImageSizeCache->{11., {2., 9.}}]}, 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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", "##1", "}"}], ",", RowBox[{"1", "-", "1"}]}], "]"}], "&"}], ",", RowBox[{"{", RowBox[{ RowBox[{"\[LeftAssociation]", RowBox[{"a", "\[Rule]", "1"}], "\[RightAssociation]"}], ",", RowBox[{"{", "2", "}"}]}], "}"}]}], "]"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7733135643661327`*^9, 3.773313591473517*^9}, { 3.7733137772796383`*^9, 3.773313786560295*^9}, {3.7733138624273767`*^9, 3.773313870145466*^9}, 3.773314190043763*^9, 3.773315619243178*^9}, CellLabel->"Out[1]=", CellID->1792821061] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->1666715828], Cell[TextData[{ "Values with another head, such as ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["List", "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/List", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " or ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Association", "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/Association", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], ", or an incorrect length will get copied:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.773313678644446*^9, 3.7733136788017263`*^9}, { 3.773313906156633*^9, 3.773313940897423*^9}, {3.7840064047103276`*^9, 3.784006415911729*^9}}, CellID->839883026], 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"G", "[", RowBox[{"a", ",", "b"}], "]"}]}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.773313682944663*^9, 3.7733137517411413`*^9}, { 3.773313885670822*^9, 3.773313894513866*^9}}, CellLabel->"In[1]:=", CellID->1900475558], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"1", ",", RowBox[{"G", "[", RowBox[{"a", ",", "b"}], "]"}]}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", RowBox[{"G", "[", RowBox[{"a", ",", "b"}], "]"}]}], "]"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.773313686031393*^9, 3.7733137701244097`*^9}, { 3.773313871713035*^9, 3.773313942049889*^9}, 3.773314192290721*^9, 3.7733156204647827`*^9}, CellLabel->"Out[1]=", CellID->583344748] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->1852210909], Cell["\<\ For the case of unequal length, the longest list is taken as the actual \ length. Here the last list is the longest; the first list is copied:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.7733139563277617`*^9, 3.773314039096386*^9}, { 3.784006428463622*^9, 3.7840064452116637`*^9}}, CellID->1904421409], 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "3", ",", "4"}], "}"}]}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7733139471469707`*^9, 3.773313948067603*^9}}, CellLabel->"In[1]:=", CellID->386368364], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", "2"}], "]"}], ",", RowBox[{"f", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", "3"}], "]"}], ",", RowBox[{"f", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", "4"}], "]"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.77331394841998*^9, 3.7733141938008623`*^9, {3.773315143510063*^9, 3.7733151592947893`*^9}, 3.77331562840828*^9}, CellLabel->"Out[1]=", CellID->697704800] }, Open ]], Cell["Here the first list is the longest; the last list is copied:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7733139968428793`*^9, 3.7733140502228727`*^9}, { 3.78400645197791*^9, 3.784006453551276*^9}}, CellID->1438373964], 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", "2", "}"}]}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.773313973943244*^9, 3.773313974316394*^9}}, CellLabel->"In[2]:=", CellID->56842514], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"1", ",", RowBox[{"{", "2", "}"}]}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", RowBox[{"{", "2", "}"}]}], "]"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.773313975031657*^9, 3.7733140208911743`*^9, 3.773314052574387*^9, 3.773314194838282*^9, {3.7733151410233192`*^9, 3.77331516812458*^9}, 3.773315630759324*^9}, CellLabel->"Out[2]=", CellID->990291431] }, Open ]], Cell["\<\ An extra bracket around the second list will make it the shortest:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.7733140736626387`*^9, 3.773314093962023*^9}}, CellID->905764497], 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"{", RowBox[{"2", ",", "3", ",", "4"}], "}"}], "}"}]}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.773314062541621*^9, 3.773314070393064*^9}}, CellLabel->"In[3]:=", CellID->2125533916], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"1", ",", RowBox[{"{", RowBox[{"{", RowBox[{"2", ",", "3", ",", "4"}], "}"}], "}"}]}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", RowBox[{"{", RowBox[{"{", RowBox[{"2", ",", "3", ",", "4"}], "}"}], "}"}]}], "]"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.773314064068009*^9, 3.7733140965604267`*^9}, 3.773314196858283*^9, 3.773315139468648*^9, 3.773315171007553*^9, 3.7733156332185793`*^9}, CellLabel->"Out[3]=", CellID->1011059733] }, Open ]], Cell["\<\ One can also give it a different head, which prevent it from being \ interpreted as a list:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.7733149818673897`*^9, 3.773314986955661*^9}, { 3.773315176496709*^9, 3.773315183495797*^9}, 3.7840064659169216`*^9}, CellID->1498137003], 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], ",", RowBox[{"c", "[", RowBox[{"2", ",", "3", ",", "4"}], "]"}]}], "}"}], ",", "1"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.77331499429521*^9, 3.7733150401625843`*^9}}, CellLabel->"In[4]:=", CellID->1980298828], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"1", ",", RowBox[{"c", "[", RowBox[{"2", ",", "3", ",", "4"}], "]"}]}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", RowBox[{"c", "[", RowBox[{"2", ",", "3", ",", "4"}], "]"}]}], "]"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.773314999649887*^9, 3.773315040448721*^9}, { 3.7733151362410707`*^9, 3.773315186609462*^9}, 3.773315635105438*^9}, CellLabel->"Out[4]=", CellID->816050561] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Neat Examples", "\[NonBreakingSpace]", Cell["(2)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellID->540091361], Cell["\<\ Interpret the entries as three levels deep, copying them all:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.7733123577093*^9, 3.7733123778821077`*^9}, { 3.784006477866806*^9, 3.7840064785374484`*^9}}, CellID->833804323], 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{"1", ",", "2", ",", "3"}], "}"}], ",", "3"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.773312346158339*^9, 3.7733123538511133`*^9}}, CellLabel->"In[1]:=", CellID->1142369266], Cell[BoxData[ RowBox[{"{", RowBox[{"{", RowBox[{"{", RowBox[{"f", "[", RowBox[{"1", ",", "2", ",", "3"}], "]"}], "}"}], "}"}], "}"}]], "Output",\ TaggingRules->{}, CellChangeTimes->{{3.77331235420922*^9, 3.77331238003299*^9}, 3.773313284898395*^9, 3.773313775114458*^9, 3.77331419809975*^9, 3.773315642502843*^9, 3.773316351477688*^9}, CellLabel->"Out[1]=", CellID->1147689187] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->73934594], Cell["Create a complex ragged array with different depths:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7733144829831743`*^9, 3.773314497951198*^9}, 3.773315503700017*^9}, CellID->1666596213], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"SeedRandom", "[", "1234", "]"}], ";"}], "\[IndentingNewLine]", RowBox[{"random", "=", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{ RowBox[{"RandomInteger", "[", RowBox[{"5", ",", "#"}], "]"}], "&"}], "/@", RowBox[{"RandomInteger", "[", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "6"}], "}"}], ",", RowBox[{"{", RowBox[{"#", ",", "3"}], "}"}]}], "]"}]}], ")"}], "&"}], "/@", RowBox[{"RandomInteger", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "6"}], "}"}], ",", "2"}], "]"}]}]}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.77331420094516*^9, 3.773314472048294*^9}, { 3.773314513046371*^9, 3.7733145697489567`*^9}}, CellLabel->"In[1]:=", CellID->429883847], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "2"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "3"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "0"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"2", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "2"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "2"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"3", ",", "3"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "2"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "0"}], "}"}], ",", RowBox[{"{", RowBox[{"2", ",", "2"}], "}"}]}], "}"}]}], "}"}], "}"}], ",", RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "5", ",", "0", ",", "2", ",", "1", ",", "1"}], "}"}], ",", RowBox[{"{", RowBox[{"5", ",", "4", ",", "1", ",", "2", ",", "4", ",", "1"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"3", ",", "3", ",", "0", ",", "5", ",", "4", ",", "4"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "2", ",", "3", ",", "1", ",", "4", ",", "4"}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"5", ",", "0", ",", "4", ",", "2", ",", "2", ",", "5"}], "}"}], ",", RowBox[{"{", RowBox[{"4", ",", "1", ",", "2", ",", "5", ",", "5", ",", "2"}], "}"}]}], "}"}]}], "}"}], "}"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.773314407922019*^9, 3.773314472373412*^9}, { 3.773314534399663*^9, 3.7733145702244873`*^9}, 3.7733146008737803`*^9, 3.773314674815345*^9, 3.773314709860792*^9, 3.773315505245743*^9, 3.773315644710146*^9, 3.773316358197075*^9}, CellLabel->"Out[1]=", CellID->1603404668] }, Open ]], Cell[TextData[{ "Apply the function ", Cell[BoxData[ StyleBox["f", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " five levels deep, with the second argument set constant to ", Cell[BoxData[ StyleBox["a", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.773314684564042*^9, 3.773314706439227*^9}, { 3.784006500230948*^9, 3.7840065691520214`*^9}}, CellID->313068411], 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["GeneralizedMapThread", "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["GeneralizedMapThread", "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/GeneralizedMapThread"}, "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], "GeneralizedMapThread"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["GeneralizedMapThread"], BoxID -> "GeneralizedMapThread", Selectable->False], "[", RowBox[{"f", ",", RowBox[{"{", RowBox[{"random", ",", "a"}], "}"}], ",", "5"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.773314576768289*^9, 3.7733145920447063`*^9}, 3.773314681195167*^9}, CellLabel->"In[2]:=", CellID->1196333512], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"1", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"0", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"0", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"0", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"4", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}]}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"0", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"5", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"4", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"1", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"3", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"0", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"3", ",", "a"}], "]"}]}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"0", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"5", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"4", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"1", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"4", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"1", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"3", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"0", ",", "a"}], "]"}]}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"5", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"0", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"3", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"5", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}]}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"0", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"3", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"0", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"1", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"3", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"3", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"4", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}]}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"0", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"4", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"5", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"4", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"4", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"0", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}]}], "}"}]}], "}"}]}], "}"}], "}"}], ",", RowBox[{"{", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"0", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"5", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"0", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"1", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"1", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"5", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"4", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"1", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"4", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"1", ",", "a"}], "]"}]}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"3", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"3", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"0", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"5", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"4", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"4", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"4", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"3", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"1", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"4", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"4", ",", "a"}], "]"}]}], "}"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"5", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"0", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"4", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"5", ",", "a"}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{ RowBox[{"f", "[", RowBox[{"4", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"1", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"5", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"5", ",", "a"}], "]"}], ",", RowBox[{"f", "[", RowBox[{"2", ",", "a"}], "]"}]}], "}"}]}], "}"}]}], "}"}], "}"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.773314577410838*^9, 3.7733146022625017`*^9}, { 3.773314675674*^9, 3.7733147116764297`*^9}, 3.773315507598447*^9, 3.773315647439*^9, 3.773316359294841*^9}, CellLabel->"Out[2]=", CellID->1938753698] }, Open ]] }, Open ]] }, Closed]] }, ClosingSaveDialog->False, WindowSize->Automatic, WindowMargins->Automatic, WindowTitle->"GeneralizedMapThread | 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[633, 23, 168, 7, 70, "Subsection",ExpressionUUID->"0f7e4849-13c2-4581-8cdc-3d32e85044c9", CellID->462042388], Cell[804, 32, 212, 4, 70, "Text",ExpressionUUID->"71beb06f-0b21-45f3-97bc-b33f360eb836", CellID->13078159], Cell[CellGroupData[{ Cell[1041, 40, 7535, 191, 70, "Input",ExpressionUUID->"35230215-9c8d-457c-a1de-782ddca150f9", CellID->1361972870], Cell[8579, 233, 670, 17, 70, "Output",ExpressionUUID->"df4b40fc-e200-49d1-b62c-c81b49808c72", CellID->704733800] }, Open ]], Cell[CellGroupData[{ Cell[9286, 255, 144, 4, 70, "ExampleDelimiter",ExpressionUUID->"ad21f67e-0951-4101-b8d3-e2f201db6442", CellID->832336434], Cell[9433, 261, 331, 5, 70, "Text",ExpressionUUID->"3f7903e8-32ab-41d5-8f85-f86c1d7438bd", CellID->461940098], Cell[CellGroupData[{ Cell[9789, 270, 7756, 199, 70, "Input",ExpressionUUID->"e673c534-cda1-4efc-8024-a28557325530", CellID->1755019743], Cell[17548, 471, 1133, 33, 70, "Output",ExpressionUUID->"da7022b3-164b-4330-9d9a-001dca369b65", CellID->1148791732] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[18730, 510, 144, 4, 70, "ExampleDelimiter",ExpressionUUID->"4ed9db00-3111-460a-8611-5d855be39362", CellID->174526116], Cell[18877, 516, 317, 10, 70, "Text",ExpressionUUID->"099bbecb-8cb9-4561-9e3e-3462536f2f25", CellID->65987167], Cell[CellGroupData[{ Cell[19219, 530, 7621, 196, 70, "Input",ExpressionUUID->"5b60e05c-218b-4088-88c1-380913b9dfe3", CellID->2124793111], Cell[26843, 728, 576, 15, 70, "Output",ExpressionUUID->"584f34be-e6c3-427d-87fa-a72a7bbb98b8", CellID->950912362] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[27480, 750, 159, 7, 70, "Subsection",ExpressionUUID->"790a539a-7833-433f-b6ac-7649d2033d36", CellID->964056545], Cell[27642, 759, 278, 5, 70, "Text",ExpressionUUID->"aa42dfad-8e39-4316-ae6a-aec97b127cef", CellID->649685796], Cell[CellGroupData[{ Cell[27945, 768, 7925, 200, 70, "Input",ExpressionUUID->"03d9b0ca-027b-4e2e-af29-fb4ca8c00d13", CellID->836153427], Cell[35873, 970, 1575, 44, 70, "Output",ExpressionUUID->"47962ba2-6d13-46d8-9f2b-e6b97b195cf5", CellID->113478405] }, Open ]], Cell[37463, 1017, 204, 4, 70, "Text",ExpressionUUID->"541f4ae9-2c84-4da2-a326-710f75b343a3", CellID->1907554436], Cell[CellGroupData[{ Cell[37692, 1025, 189, 5, 70, "Input",ExpressionUUID->"0e274d63-3868-4b1f-87e4-d299b911a3ac", CellID->498726094], Cell[37884, 1032, 1477, 43, 70, "Output",ExpressionUUID->"2b8b609f-07ec-4fb9-935b-a6f5e72056ba", CellID->930199798] }, Open ]], Cell[CellGroupData[{ Cell[39398, 1080, 144, 4, 70, "ExampleDelimiter",ExpressionUUID->"37f3638b-bfd3-4f39-90d8-fbc2957eda28", CellID->253249249], Cell[39545, 1086, 550, 15, 70, "Text",ExpressionUUID->"877c2ca4-ee7b-40d7-8424-b60d06259630", CellID->995067595], Cell[CellGroupData[{ Cell[40120, 1105, 7574, 192, 70, "Input",ExpressionUUID->"33f07f75-bbb5-4e75-b6d4-3444c94d388b", CellID->1690783212], Cell[47697, 1299, 606, 17, 70, "Output",ExpressionUUID->"8ed01a7b-65c0-4ccc-8ef1-355fed8af79b", CellID->1062376210] }, Open ]], Cell[48318, 1319, 468, 13, 70, "Text",ExpressionUUID->"cd355a95-b61c-4005-8479-0461d8206a32", CellID->2096873973], Cell[CellGroupData[{ Cell[48811, 1336, 7610, 194, 70, "Input",ExpressionUUID->"3390d01a-116b-4cbd-88af-68a17418c572", CellID->1409930297], Cell[56424, 1532, 730, 21, 70, "Output",ExpressionUUID->"fbdd8c91-8a4f-4849-9011-f548c2fc95ad", CellID->1172924820] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[57203, 1559, 145, 4, 70, "ExampleDelimiter",ExpressionUUID->"2e5a8e92-c134-4874-a0d2-58269f858abd", CellID->1372625092], Cell[57351, 1565, 324, 10, 70, "Text",ExpressionUUID->"949171c9-3611-4094-9d7f-5694c84e0b78", CellID->1652496038], Cell[57678, 1577, 7649, 187, 70, "Input",ExpressionUUID->"47477e30-d429-4cc5-966e-54c9f2e4d46e", CellID->596657193], Cell[65330, 1766, 254, 5, 70, "Text",ExpressionUUID->"901a677f-cedd-4e7d-bf11-6d752493638d", CellID->190766715], Cell[CellGroupData[{ Cell[65609, 1775, 344, 11, 70, "Input",ExpressionUUID->"c5e7060e-2bf7-42ce-8fde-ab60fd56836d", CellID->208904671], Cell[65956, 1788, 446, 14, 70, "Output",ExpressionUUID->"6f0d32ee-9a87-417a-8aa4-f44e1722048a", CellID->1111199998] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[66463, 1809, 166, 7, 70, "Subsection",ExpressionUUID->"4120a84b-ce29-43cb-8662-71684345608d", CellID->568056528], Cell[66632, 1818, 371, 13, 70, "Text",ExpressionUUID->"a0ef429d-8ddd-4ca0-8bdc-44f1c6d9f5da", CellID->900293773], Cell[CellGroupData[{ Cell[67028, 1835, 7950, 204, 70, "Input",ExpressionUUID->"65429fe0-34cf-4027-9e43-bd3d1fd163d6", CellID->955132211], Cell[74981, 2041, 675, 23, 70, "Output",ExpressionUUID->"189d2c46-c8ae-4aa2-997f-b2a965730555", CellID->315396549] }, Open ]], Cell[CellGroupData[{ Cell[75693, 2069, 145, 4, 70, "ExampleDelimiter",ExpressionUUID->"de1b0758-ff59-426b-a27f-31c43d190bf9", CellID->1313439539], Cell[75841, 2075, 204, 5, 70, "Text",ExpressionUUID->"a14086bd-7747-44f3-a843-8d919137e3e0", CellID->1114840142], Cell[CellGroupData[{ Cell[76070, 2084, 7449, 189, 70, "Input",ExpressionUUID->"aca14cc8-9e0f-4876-98b0-9f3c150a5b49", CellID->667905639], Cell[83522, 2275, 516, 12, 70, "Output",ExpressionUUID->"24a8ed3f-a26f-4e77-9527-8d589fe2f9d7", CellID->524700828] }, Open ]], Cell[84053, 2290, 649, 21, 70, "Text",ExpressionUUID->"22248e76-2e6d-409e-a45d-a6d5c4f4974a", CellID->1183702696], Cell[CellGroupData[{ Cell[84727, 2315, 280, 9, 70, "Input",ExpressionUUID->"ef940d03-5a61-4a57-a699-7a51de14ff25", CellID->1884765744], Cell[85010, 2326, 411, 11, 70, "Output",ExpressionUUID->"18fbc9cf-8e53-45bf-8267-43aa168485ac", CellID->310235741] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[85482, 2344, 178, 7, 70, "Subsection",ExpressionUUID->"0db83b6d-3299-4a5d-a6e3-14453ded7fe9", CellID->754506620], Cell[85663, 2353, 917, 27, 70, "Text",ExpressionUUID->"4153fb97-518f-49e7-8ea1-4836f27fcefd", CellID->1550517141], Cell[CellGroupData[{ Cell[86605, 2384, 8109, 206, 70, "Input",ExpressionUUID->"84a8fea2-0ff9-4298-9c97-be0730d9df1e", CellID->1671316914], Cell[94717, 2592, 306, 6, 70, "Output",ExpressionUUID->"516a64b5-ed5b-41ac-a4e3-84172b1709c5", CellID->1866440743] }, Open ]], Cell[CellGroupData[{ Cell[95060, 2603, 144, 4, 70, "ExampleDelimiter",ExpressionUUID->"ec7c0eb2-940d-4f3a-80d0-db5420c8d45d", CellID->393002080], Cell[95207, 2609, 901, 23, 70, "Text",ExpressionUUID->"8651b6d6-04e9-47df-910f-a85fd0fb3e56", CellID->2093744690], Cell[CellGroupData[{ Cell[96133, 2636, 656, 22, 70, "Input",ExpressionUUID->"bad079e2-d099-4a77-95b1-10194ac72392", CellID->739520637], Cell[96792, 2660, 1460, 26, 70, "Message",ExpressionUUID->"0e431f32-bb56-4d86-907e-bc2fe3d47b2b", CellID->892761495], Cell[98255, 2688, 756, 24, 70, "Output",ExpressionUUID->"b081e3b8-7426-4cbc-b8c4-1d03b92d6f31", CellID->174204876] }, Open ]], Cell[99026, 2715, 292, 8, 70, "Text",ExpressionUUID->"c5134f63-5f12-4737-9700-013c25fbcf4b", CellID->1264845271], Cell[CellGroupData[{ Cell[99343, 2727, 7744, 199, 70, "Input",ExpressionUUID->"9714094d-fe2f-4582-a0b1-e04cec7729ff", CellID->1757546310], Cell[107090, 2928, 793, 23, 70, "Output",ExpressionUUID->"a6e32183-cb6c-4ca5-b414-8e31236042e2", CellID->171372887] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[107932, 2957, 144, 4, 70, "ExampleDelimiter",ExpressionUUID->"9ffba1bb-3ad8-4374-ba3b-8cf0b93fc68d", CellID->441115352], Cell[108079, 2963, 772, 22, 70, "Text",ExpressionUUID->"113d79e9-fab0-44f0-a2fc-e93293ffe6eb", CellID->2054039417], Cell[CellGroupData[{ Cell[108876, 2989, 373, 11, 70, "Input",ExpressionUUID->"bd404194-8ab9-4f84-b5aa-8ac996e98c61", CellID->183791298], Cell[109252, 3002, 519, 14, 70, "Output",ExpressionUUID->"772fc572-a7b3-4e29-bccf-c83bc0617c9e", CellID->334062090] }, Open ]], Cell[109786, 3019, 857, 26, 70, "Text",ExpressionUUID->"7f08c95f-a682-4856-91f8-3b796ba7425d", CellID->2052312684], Cell[CellGroupData[{ Cell[110668, 3049, 7440, 189, 70, "Input",ExpressionUUID->"d41c3e4d-470a-4b32-a471-6598b4a03f2e", CellID->1487199632], Cell[118111, 3240, 522, 14, 70, "Output",ExpressionUUID->"52f6d77a-0b66-44bd-bfa1-abfb0f417863", CellID->1128726865] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[118694, 3261, 168, 7, 70, "Subsection",ExpressionUUID->"7ede70b9-5fa1-411f-b8f3-135fac3e4106", CellID->92483860], Cell[118865, 3270, 159, 3, 70, "Text",ExpressionUUID->"96f2daf4-0b7b-4b90-9211-574e03cabfa3", CellID->1186266912], Cell[CellGroupData[{ Cell[119049, 3277, 7610, 194, 70, "Input",ExpressionUUID->"42c86e34-8fe8-4bac-b20a-a935a630e364", CellID->1291938957], Cell[126662, 3473, 1696, 29, 70, "Message",ExpressionUUID->"f290c0f8-b4fd-46b8-945c-3efd8ed9019f", CellID->2033787875], Cell[128361, 3504, 8881, 218, 70, "Output",ExpressionUUID->"7f1e2173-2e05-474c-b5aa-6a5709248218", CellID->375605826] }, Open ]], Cell[CellGroupData[{ Cell[137279, 3727, 144, 4, 70, "ExampleDelimiter",ExpressionUUID->"ee95bfba-d831-43bf-a9fb-2c167a629d19", CellID->764337092], Cell[137426, 3733, 166, 3, 70, "Text",ExpressionUUID->"0a3b4940-1d7e-4f78-89a5-ce13685abe7e", CellID->2109535518], Cell[CellGroupData[{ Cell[137617, 3740, 7424, 189, 70, "Input",ExpressionUUID->"dc0a3d79-4a3a-4963-8e26-74923bb53eef", CellID->647706746], Cell[145044, 3931, 1093, 20, 70, "Message",ExpressionUUID->"81b47e30-0ac9-4f3b-80cd-2c599b448972", CellID->436196496], Cell[146140, 3953, 8301, 201, 70, "Output",ExpressionUUID->"df1ecf77-78ad-4646-82f7-d230185f6b9a", CellID->1792821061] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[154490, 4160, 145, 4, 70, "ExampleDelimiter",ExpressionUUID->"44acb05a-94da-4a77-9a8a-9fdac6c7b22f", CellID->1666715828], Cell[154638, 4166, 1277, 39, 70, "Text",ExpressionUUID->"385a3ca1-ab28-4820-9da2-3516233e57c9", CellID->839883026], Cell[CellGroupData[{ Cell[155940, 4209, 7464, 190, 70, "Input",ExpressionUUID->"eef4ecda-f7d4-451b-8075-5ac1d5709451", CellID->1900475558], Cell[163407, 4401, 527, 16, 70, "Output",ExpressionUUID->"31a349f4-101a-42b2-b3bc-9e6eff958a47", CellID->583344748] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[163983, 4423, 145, 4, 70, "ExampleDelimiter",ExpressionUUID->"eb6a8e0a-b028-49cb-a862-e350d45ab677", CellID->1852210909], Cell[164131, 4429, 325, 7, 70, "Text",ExpressionUUID->"8aef590b-b9ca-4f95-959e-b7a37fa35086", CellID->1904421409], Cell[CellGroupData[{ Cell[164481, 4440, 7419, 189, 70, "Input",ExpressionUUID->"d0515564-1fa0-432e-9dba-871d191d5656", CellID->386368364], Cell[171903, 4631, 607, 20, 70, "Output",ExpressionUUID->"dde3af55-1bc9-4029-89cc-8f65d267de8c", CellID->697704800] }, Open ]], Cell[172525, 4654, 234, 4, 70, "Text",ExpressionUUID->"9b8ee6ec-e5a3-4c7e-921b-e7b89be5806d", CellID->1438373964], Cell[CellGroupData[{ Cell[172784, 4662, 7379, 188, 70, "Input",ExpressionUUID->"10ac98cf-b7db-419d-a2ad-d446bc7dbce3", CellID->56842514], Cell[180166, 4852, 485, 15, 70, "Output",ExpressionUUID->"291f5b7c-6086-4719-903f-c2e1c0c28efc", CellID->990291431] }, Open ]], Cell[180666, 4870, 197, 5, 70, "Text",ExpressionUUID->"d2214e0a-ca19-4831-bec4-50290bc6b335", CellID->905764497], Cell[CellGroupData[{ Cell[180888, 4879, 7449, 191, 70, "Input",ExpressionUUID->"8343ef22-0b9f-481b-bb44-965dc4a156ee", CellID->2125533916], Cell[188340, 5072, 595, 19, 70, "Output",ExpressionUUID->"188d3b5e-5956-4483-8fcb-27256afdb07c", CellID->1011059733] }, Open ]], Cell[188950, 5094, 297, 7, 70, "Text",ExpressionUUID->"c7af71aa-8ada-463f-aab5-5ca71afc64db", CellID->1498137003], Cell[CellGroupData[{ Cell[189272, 5105, 7437, 190, 70, "Input",ExpressionUUID->"32a9d6e4-c075-4b29-8495-e38a58e17219", CellID->1980298828], Cell[196712, 5297, 519, 15, 70, "Output",ExpressionUUID->"5b54aa33-46fd-4d75-9666-d0ee4dde490e", CellID->816050561] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[197292, 5319, 167, 7, 70, "Subsection",ExpressionUUID->"16cae8e8-5e8f-485b-b055-e59f1a9c3d60", CellID->540091361], Cell[197462, 5328, 241, 6, 70, "Text",ExpressionUUID->"5292cebd-c96c-4f73-ad3c-5935e0d2f12e", CellID->833804323], Cell[CellGroupData[{ Cell[197728, 5338, 7324, 185, 70, "Input",ExpressionUUID->"85c2340e-386f-4571-8b94-4fbc45e86918", CellID->1142369266], Cell[205055, 5525, 409, 12, 70, "Output",ExpressionUUID->"1f0ba922-9d83-4f91-b71e-bf5565a2c8ac", CellID->1147689187] }, Open ]], Cell[CellGroupData[{ Cell[205501, 5542, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"e1f72cb9-38bc-4f3e-a61c-bfdeba8e1af4", CellID->73934594], Cell[205647, 5548, 202, 4, 70, "Text",ExpressionUUID->"45e31819-ab59-4efb-b849-76e5bdeaf8a1", CellID->1666596213], Cell[CellGroupData[{ Cell[205874, 5556, 819, 25, 70, "Input",ExpressionUUID->"982a88ab-3c98-49a4-ac3e-9d176c41ba5a", CellID->429883847], Cell[206696, 5583, 3281, 99, 70, "Output",ExpressionUUID->"900be609-dd0b-45c4-b606-39cccad91e88", CellID->1603404668] }, Open ]], Cell[209992, 5685, 457, 14, 70, "Text",ExpressionUUID->"27721124-ec4a-40bc-b6b7-7190ceb77d11", CellID->313068411], Cell[CellGroupData[{ Cell[210474, 5703, 7345, 186, 70, "Input",ExpressionUUID->"3f198d1f-91fd-44d0-93d0-5262fb8fa564", CellID->1196333512], Cell[217822, 5891, 8864, 262, 70, "Output",ExpressionUUID->"fa6076c1-922f-48f9-ab24-20b863b46b57", CellID->1938753698] }, Open ]] }, Open ]] }, Closed]] } ] *) (* End of internal cache information *)