(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 11.3' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 81748, 1806] NotebookOptionsPosition[ 78409, 1722] NotebookOutlinePosition[ 78873, 1741] CellTagsIndexPosition[ 78830, 1738] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["Basic Examples", "Subsection", CellID->493026219], Cell["Print a message when a context finishes loading:", "Text", CellChangeTimes->{{3.7435543360626016`*^9, 3.743554342837388*^9}}, CellID->162861731], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ InterpretationBox[ FrameBox[ TemplateBox[{GraphicsBox[{ RGBColor[0.9882352941176471, 0.4, 0.25098039215686274`], Thickness[ Dynamic[ If[CurrentValue["CellStyleName"] === "Input", 0.2, 0.1]]], CircleBox[{0, 0}]}, ImageSize -> 10, BaselinePosition -> Scaled[0.05], ImagePadding -> 1],TemplateBox[{3}, "Spacer1"],StyleBox[ "\"RunAfterLoading\"", FontColor -> RGBColor[0.2784313725490196, 0.2784313725490196, 0.2784313725490196], ShowAutoStyles -> False, ShowStringCharacters -> False, FontSize -> 0.78 Inherited, FontFamily -> "Roboto", Selectable -> True, FontWeight -> Dynamic[ If[CurrentValue["CellStyleName"] === "Input", "DemiBold", Plain]], StripOnInput -> False]}, "Row", DisplayFunction->(PaneBox[ RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}], BaselinePosition -> Center]& ), InterpretationFunction->(RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaselinePosition", "\[Rule]", "Center"}]}], "]"}]& )], Selectable -> False, Background->RGBColor[ 0.9686274509803922, 0.9686274509803922, 0.9686274509803922], ContentPadding->False, FrameMargins->{{3, 4}, {0, -2}}, FrameStyle->Directive[ AbsoluteThickness[1], RGBColor[0.8627450980392157, 0.8627450980392157, 0.8627450980392157]], RoundingRadius->3, StripOnInput->False], ResourceFunction[ ResourceObject[ Association[{ "Name" -> "RunAfterLoading", "UUID" -> "RunAfterLoading", "ResourceType" -> "Function", "Description" -> "Evaluate an expression when a package finishes loading", "SymbolName" -> "FunctionRepository`$721b47e980a24c31bd1d7ce9fa0b023d`\ RunAfterLoading", "Function" -> HoldComplete[ FunctionRepository`$721b47e980a24c31bd1d7ce9fa0b023d`RunAfterLoading]\ , "FunctionLocation" -> None, "VerificationTests" -> HoldComplete[], "ShortName" -> "RunAfterLoading"}]]], Selectable->False], ResourceFunction["RunAfterLoading"]], "[", RowBox[{ RowBox[{"Print", "[", RowBox[{ RowBox[{"Length", "[", RowBox[{"Names", "[", "\"\\"", "]"}], "]"}], ",", "\"\< symbols loaded in Notation`.\>\""}], "]"}], ",", "\"\\""}], "]"}]], "Input", CellContext->Notebook, CellFrameLabels->None, CellChangeTimes->{ 3.70999648737139*^9, {3.743554348142234*^9, 3.7435543504601603`*^9}, { 3.7435544093102703`*^9, 3.7435544496670065`*^9}}, CellLabel->"In[15]:=", CellID->723544481], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["Success", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{PaneSelectorBox[{False -> GridBox[{{ FrameBox[ StyleBox["\"\[Checkmark]\"", Directive[ RGBColor[ 0.3607843137254902, 0.596078431372549, 0.3803921568627451], 25], StripOnInput -> False], ContentPadding -> False, FrameStyle -> None, FrameMargins -> {{0, 0}, {0, 0}}, StripOnInput -> False], GridBox[{{ RowBox[{ TagBox[ TemplateBox[{"\"Message\"", "\": \""}, "RowDefault"], "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Handler added successfully\"", "SummaryItem"]}]}, { RowBox[{ TagBox[ TemplateBox[{"\"Tag\"", "\": \""}, "RowDefault"], "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"RunAfterLoading\"", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ FrameBox[ StyleBox["\"\[Checkmark]\"", Directive[ RGBColor[ 0.3607843137254902, 0.596078431372549, 0.3803921568627451], 25], StripOnInput -> False], ContentPadding -> False, FrameStyle -> None, FrameMargins -> {{0, 0}, {0, 0}}, StripOnInput -> False], GridBox[{{ RowBox[{ TagBox[ TemplateBox[{"\"Message\"", "\": \""}, "RowDefault"], "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Handler added successfully\"", "SummaryItem"]}]}, { RowBox[{ TagBox[ TemplateBox[{"\"Tag\"", "\": \""}, "RowDefault"], "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"RunAfterLoading\"", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], Success[ InterpretationBox[ InterpretationBox[ FrameBox[ TemplateBox[{ GraphicsBox[{ RGBColor[0.9882352941176471, 0.4, 0.25098039215686274`], Thickness[ Dynamic[ If[CurrentValue["CellStyleName"] === "Input", 0.2, 0.1]]], CircleBox[{0, 0}]}, ImageSize -> 10, BaselinePosition -> Scaled[0.05], ImagePadding -> 1], TemplateBox[{3}, "Spacer1"], StyleBox[ "\"RunAfterLoading\"", FontColor -> RGBColor[0.2784313725490196, 0.2784313725490196, 0.2784313725490196], ShowAutoStyles -> False, ShowStringCharacters -> False, FontSize -> 0.78 Inherited, FontFamily -> "Roboto", Selectable -> True, FontWeight -> Dynamic[ If[CurrentValue["CellStyleName"] === "Input", "DemiBold", Plain]], StripOnInput -> False]}, "Row", DisplayFunction -> (PaneBox[ RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}], BaselinePosition -> Center]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaselinePosition", "\[Rule]", "Center"}]}], "]"}]& )], Background -> RGBColor[0.9686274509803922, 0.9686274509803922, 0.9686274509803922], ContentPadding -> False, FrameMargins -> {{3, 4}, {0, -2}}, FrameStyle -> Directive[ AbsoluteThickness[1], RGBColor[0.8627450980392157, 0.8627450980392157, 0.8627450980392157]], RoundingRadius -> 3, StripOnInput -> False, Selectable -> False], ResourceFunction[ ResourceObject[ Association[{ "Name" -> "RunAfterLoading", "UUID" -> "RunAfterLoading", "ResourceType" -> "Function", "Description" -> "Evaluate an expression when a package finishes loading", "SymbolName" -> "FunctionRepository`$721b47e980a24c31bd1d7ce9fa0b023d`\ RunAfterLoading", "Function" -> HoldComplete[ FunctionRepository`$721b47e980a24c31bd1d7ce9fa0b023d`\ RunAfterLoading], "FunctionLocation" -> None, "VerificationTests" -> HoldComplete[], "ShortName" -> "RunAfterLoading"}]]], Selectable -> False], ResourceFunction["RunAfterLoading"]], Association["Message" -> "Handler added successfully"]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7435544569487715`*^9}, CellLabel->"Out[15]=", CellID->471739087] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Needs", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{ 3.70999648737139*^9, {3.743554459302699*^9, 3.743554465028497*^9}}, CellLabel->"In[16]:=", CellID->498501855], Cell[BoxData[ InterpretationBox[ RowBox[{"22", "\[InvisibleSpace]", "\<\" symbols loaded in Notation`.\"\>"}], 22 " symbols loaded in Notation`.", Editable->False]], "Print", CellChangeTimes->{3.7435544710553045`*^9}, CellLabel->"During evaluation of In[16]:=", CellID->320725451] }, Open ]], Cell["Get the load timing for a package:", "Text", CellChangeTimes->{{3.743554535406272*^9, 3.7435545420450487`*^9}, { 3.7435548896294317`*^9, 3.7435549033730097`*^9}}, CellID->353661611], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ FrameBox[ TemplateBox[{GraphicsBox[{ RGBColor[0.9882352941176471, 0.4, 0.25098039215686274`], Thickness[ Dynamic[ If[CurrentValue["CellStyleName"] === "Input", 0.2, 0.1]]], CircleBox[{0, 0}]}, ImageSize -> 10, BaselinePosition -> Scaled[0.05], ImagePadding -> 1],TemplateBox[{3}, "Spacer1"],StyleBox[ "\"RunBeforeLoading\"", FontColor -> RGBColor[0.2784313725490196, 0.2784313725490196, 0.2784313725490196], ShowAutoStyles -> False, ShowStringCharacters -> False, FontSize -> 0.78 Inherited, FontFamily -> "Roboto", Selectable -> True, FontWeight -> Dynamic[ If[CurrentValue["CellStyleName"] === "Input", "DemiBold", Plain]], StripOnInput -> False]}, "Row", DisplayFunction->(PaneBox[ RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}], BaselinePosition -> Center]& ), InterpretationFunction->(RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaselinePosition", "\[Rule]", "Center"}]}], "]"}]& )], Selectable -> False, Background->RGBColor[ 0.9686274509803922, 0.9686274509803922, 0.9686274509803922], ContentPadding->False, FrameMargins->{{3, 4}, {0, -2}}, FrameStyle->Directive[ AbsoluteThickness[1], RGBColor[0.8627450980392157, 0.8627450980392157, 0.8627450980392157]], RoundingRadius->3, StripOnInput->False], ResourceFunction[ ResourceObject[ Association[ "Name" -> "RunBeforeLoading", "UUID" -> "03c8eb0d-7dba-4087-9aa2-730df19a1e32", "ResourceType" -> "Function", "Version" -> "1.0.0", "Description" -> "Evaluate an expression when a package is first loaded", "RepositoryLocation" -> URL["https://www.wolframcloud.com/objects/resourcesystem/api/1.0"], "WolframLanguageVersionRequired" -> "10.0", "SymbolName" -> "FunctionRepository`$c1ab7e5af0bc4a4e88598a0e2b5c0e7b`RunBeforeLoading", "FunctionLocation" -> CloudObject[ "https://www.wolframcloud.com/objects/e0b613fd-5418-4287-87ad-\ e1a2f940bc8f"], "ShortName" -> "RunBeforeLoading"], { ResourceSystemBase -> Automatic}]], Selectable->False], "[", RowBox[{ RowBox[{"$start", "=", "Now"}], ",", "\"\\""}], "]"}]], "Input", CellChangeTimes->{ 3.70999648737139*^9, {3.7435545459839373`*^9, 3.7435546264133606`*^9}, { 3.7435547435920963`*^9, 3.74355474855894*^9}, {3.7435548362151318`*^9, 3.7435548378450947`*^9}}, CellLabel->"In[15]:=", CellID->383909211], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["Success", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{PaneSelectorBox[{False -> GridBox[{{ FrameBox[ StyleBox["\"\[Checkmark]\"", Directive[ RGBColor[ 0.3607843137254902, 0.596078431372549, 0.3803921568627451], 25], StripOnInput -> False], ContentPadding -> False, FrameStyle -> None, FrameMargins -> {{0, 0}, {0, 0}}, StripOnInput -> False], GridBox[{{ RowBox[{ TagBox[ TemplateBox[{"\"Message\"", "\": \""}, "RowDefault"], "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Handler added successfully\"", "SummaryItem"]}]}, { RowBox[{ TagBox[ TemplateBox[{"\"Tag\"", "\": \""}, "RowDefault"], "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"RunBeforeLoading\"", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ FrameBox[ StyleBox["\"\[Checkmark]\"", Directive[ RGBColor[ 0.3607843137254902, 0.596078431372549, 0.3803921568627451], 25], StripOnInput -> False], ContentPadding -> False, FrameStyle -> None, FrameMargins -> {{0, 0}, {0, 0}}, StripOnInput -> False], GridBox[{{ RowBox[{ TagBox[ TemplateBox[{"\"Message\"", "\": \""}, "RowDefault"], "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Handler added successfully\"", "SummaryItem"]}]}, { RowBox[{ TagBox[ TemplateBox[{"\"Tag\"", "\": \""}, "RowDefault"], "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"RunBeforeLoading\"", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], Success["RunBeforeLoading", Association["Message" -> "Handler added successfully"]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7435545660422983`*^9, 3.743554635870077*^9, 3.743554841258972*^9}, CellLabel->"Out[15]=", CellID->135085179] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ InterpretationBox[ FrameBox[ TemplateBox[{GraphicsBox[{ RGBColor[0.9882352941176471, 0.4, 0.25098039215686274`], Thickness[ Dynamic[ If[CurrentValue["CellStyleName"] === "Input", 0.2, 0.1]]], CircleBox[{0, 0}]}, ImageSize -> 10, BaselinePosition -> Scaled[0.05], ImagePadding -> 1],TemplateBox[{3}, "Spacer1"],StyleBox[ "\"RunAfterLoading\"", FontColor -> RGBColor[0.2784313725490196, 0.2784313725490196, 0.2784313725490196], ShowAutoStyles -> False, ShowStringCharacters -> False, FontSize -> 0.78 Inherited, FontFamily -> "Roboto", Selectable -> True, FontWeight -> Dynamic[ If[CurrentValue["CellStyleName"] === "Input", "DemiBold", Plain]], StripOnInput -> False]}, "Row", DisplayFunction->(PaneBox[ RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}], BaselinePosition -> Center]& ), InterpretationFunction->(RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaselinePosition", "\[Rule]", "Center"}]}], "]"}]& )], Selectable -> False, Background->RGBColor[ 0.9686274509803922, 0.9686274509803922, 0.9686274509803922], ContentPadding->False, FrameMargins->{{3, 4}, {0, -2}}, FrameStyle->Directive[ AbsoluteThickness[1], RGBColor[0.8627450980392157, 0.8627450980392157, 0.8627450980392157]], RoundingRadius->3, StripOnInput->False], ResourceFunction[ ResourceObject[ Association[{ "Name" -> "RunAfterLoading", "UUID" -> "RunAfterLoading", "ResourceType" -> "Function", "Description" -> "Evaluate an expression when a package finishes loading", "SymbolName" -> "FunctionRepository`$721b47e980a24c31bd1d7ce9fa0b023d`\ RunAfterLoading", "Function" -> HoldComplete[ FunctionRepository`$721b47e980a24c31bd1d7ce9fa0b023d`RunAfterLoading]\ , "FunctionLocation" -> None, "VerificationTests" -> HoldComplete[], "ShortName" -> "RunAfterLoading"}]]], Selectable->False], ResourceFunction["RunAfterLoading"]], "[", RowBox[{ RowBox[{"$end", "=", "Now"}], ",", "\"\\""}], "]"}]], "Input", CellLabel->"In[16]:=", CellID->411471871], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["Success", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{PaneSelectorBox[{False -> GridBox[{{ FrameBox[ StyleBox["\"\[Checkmark]\"", Directive[ RGBColor[ 0.3607843137254902, 0.596078431372549, 0.3803921568627451], 25], StripOnInput -> False], ContentPadding -> False, FrameStyle -> None, FrameMargins -> {{0, 0}, {0, 0}}, StripOnInput -> False], GridBox[{{ RowBox[{ TagBox[ TemplateBox[{"\"Message\"", "\": \""}, "RowDefault"], "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Handler added successfully\"", "SummaryItem"]}]}, { RowBox[{ TagBox[ TemplateBox[{"\"Tag\"", "\": \""}, "RowDefault"], "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"RunAfterLoading\"", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ FrameBox[ StyleBox["\"\[Checkmark]\"", Directive[ RGBColor[ 0.3607843137254902, 0.596078431372549, 0.3803921568627451], 25], StripOnInput -> False], ContentPadding -> False, FrameStyle -> None, FrameMargins -> {{0, 0}, {0, 0}}, StripOnInput -> False], GridBox[{{ RowBox[{ TagBox[ TemplateBox[{"\"Message\"", "\": \""}, "RowDefault"], "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Handler added successfully\"", "SummaryItem"]}]}, { RowBox[{ TagBox[ TemplateBox[{"\"Tag\"", "\": \""}, "RowDefault"], "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"RunAfterLoading\"", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], Success[ InterpretationBox[ InterpretationBox[ FrameBox[ TemplateBox[{ GraphicsBox[{ RGBColor[0.9882352941176471, 0.4, 0.25098039215686274`], Thickness[ Dynamic[ If[CurrentValue["CellStyleName"] === "Input", 0.2, 0.1]]], CircleBox[{0, 0}]}, ImageSize -> 10, BaselinePosition -> Scaled[0.05], ImagePadding -> 1], TemplateBox[{3}, "Spacer1"], StyleBox[ "\"RunAfterLoading\"", FontColor -> RGBColor[0.2784313725490196, 0.2784313725490196, 0.2784313725490196], ShowAutoStyles -> False, ShowStringCharacters -> False, FontSize -> 0.78 Inherited, FontFamily -> "Roboto", Selectable -> True, FontWeight -> Dynamic[ If[CurrentValue["CellStyleName"] === "Input", "DemiBold", Plain]], StripOnInput -> False]}, "Row", DisplayFunction -> (PaneBox[ RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}], BaselinePosition -> Center]& ), InterpretationFunction -> (RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaselinePosition", "\[Rule]", "Center"}]}], "]"}]& )], Background -> RGBColor[0.9686274509803922, 0.9686274509803922, 0.9686274509803922], ContentPadding -> False, FrameMargins -> {{3, 4}, {0, -2}}, FrameStyle -> Directive[ AbsoluteThickness[1], RGBColor[0.8627450980392157, 0.8627450980392157, 0.8627450980392157]], RoundingRadius -> 3, StripOnInput -> False, Selectable -> False], ResourceFunction[ ResourceObject[ Association[{ "Name" -> "RunAfterLoading", "UUID" -> "RunAfterLoading", "ResourceType" -> "Function", "Description" -> "Evaluate an expression when a package finishes loading", "SymbolName" -> "FunctionRepository`$721b47e980a24c31bd1d7ce9fa0b023d`\ RunAfterLoading", "Function" -> HoldComplete[ FunctionRepository`$721b47e980a24c31bd1d7ce9fa0b023d`\ RunAfterLoading], "FunctionLocation" -> None, "VerificationTests" -> HoldComplete[], "ShortName" -> "RunAfterLoading"}]]], Selectable -> False], ResourceFunction["RunAfterLoading"]], Association["Message" -> "Handler added successfully"]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.743554849463726*^9}, CellLabel->"Out[16]=", CellID->151045973] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"NetModel", "[", "\"\\"", "]"}]], "Input", CellChangeTimes->{ 3.70999648737139*^9, {3.7435546442568107`*^9, 3.7435546485506725`*^9}}, CellLabel->"In[17]:=", CellID->442087902], Cell[BoxData[ TagBox[ TemplateBox[{RowBox[{ StyleBox[ TagBox["NetChain", "SummaryHead"], "NonInterpretableSummary"], StyleBox["[", "NonInterpretableSummary"], DynamicModuleBox[{Typeset`open = False}, PanelBox[ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> {Automatic, 24}], GraphicsBox[{ Thickness[0.014925373134328358`], { RGBColor[0.729, 0.729, 0.729], Thickness[0.018686567164179105`], Opacity[1.], JoinForm[{"Miter", 10.}], JoinedCurveBox[{{{0, 2, 0}}}, {{{23., 91.5}, {30., 91.5}}}, CurveClosed -> {0}]}, { RGBColor[0.729, 0.729, 0.729], Thickness[0.018686567164179105`], Opacity[1.], JoinForm[{"Miter", 10.}], JoinedCurveBox[{{{0, 2, 0}}}, {{{37., 91.5}, {44., 91.5}}}, CurveClosed -> {0}]}, { FaceForm[{ RGBColor[0.631, 0.8160000000000001, 0.498], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{15.5, 103.5}, {23.5, 103.5}, {23.5, 79.5}, {15.5, 79.5}}}]}, { FaceForm[{ RGBColor[0.40800000000000003`, 0.627, 0.196], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{24., 104.}, {15., 104.}, { 15., 79.}, {24., 79.}}, {{23., 80.}, {16., 80.}, {16., 103.}, {23., 103.}}}]}, { FaceForm[{ RGBColor[0.38, 0.753, 0.89], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{29.5, 103.5}, {37.5, 103.5}, {37.5, 79.5}, {29.5, 79.5}}}]}, { FaceForm[{ RGBColor[0.24300000000000002`, 0.608, 0.71], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{38., 104.}, {29., 104.}, { 29., 79.}, {38., 79.}}, {{37., 80.}, {30., 80.}, {30., 103.}, {37., 103.}}}]}, { FaceForm[{ RGBColor[0.584, 0.51, 0.8390000000000001], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{43.5, 103.5}, {51.5, 103.5}, {51.5, 79.5}, {43.5, 79.5}}}]}, { FaceForm[{ RGBColor[0.4, 0.396, 0.659], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{52., 104.}, {43., 104.}, { 43., 79.}, {52., 79.}}, {{51., 80.}, {44., 80.}, {44., 103.}, {51., 103.}}}]}, { FaceForm[{ RGBColor[0.549, 0.549, 0.549], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}}}, {{{28., 91.5}, {25., 95.}, {25., 88.}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}}}, {{{42., 91.5}, {39., 95.}, {39., 88.}}}]}}, ImageMargins -> 0, ImageSize -> {36, Automatic}, PlotRangePadding -> 0], GridBox[{{ StyleBox[ TemplateBox[{ TemplateBox[{ StyleBox["\"Input\"", GrayLevel[0], StripOnInput -> False], "\" \"", "\"port\""}, "RowDefault"], "\":\""}, "RowDefault"], "SummaryItemAnnotation"], StyleBox["\"image\"", "SummaryItem"]}, { StyleBox[ TemplateBox[{ TemplateBox[{ StyleBox["\"Output\"", GrayLevel[0], StripOnInput -> False], "\" \"", "\"port\""}, "RowDefault"], "\":\""}, "RowDefault"], "SummaryItemAnnotation"], StyleBox["\"class\"", "SummaryItem"]}, { StyleBox[ TemplateBox[{"\"Number of layers\"", "\":\""}, "RowDefault"], "SummaryItemAnnotation"], StyleBox["11", "SummaryItem"]}}, BaselinePosition -> {2, 1}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridFrameMargins -> {{0, 0}, {0, 0}}, BaselinePosition -> {1, 3}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> {Automatic, 24}], GraphicsBox[{ Thickness[0.014925373134328358`], { RGBColor[0.729, 0.729, 0.729], Thickness[0.018686567164179105`], Opacity[1.], JoinForm[{"Miter", 10.}], JoinedCurveBox[{{{0, 2, 0}}}, {{{23., 91.5}, {30., 91.5}}}, CurveClosed -> {0}]}, { RGBColor[0.729, 0.729, 0.729], Thickness[0.018686567164179105`], Opacity[1.], JoinForm[{"Miter", 10.}], JoinedCurveBox[{{{0, 2, 0}}}, {{{37., 91.5}, {44., 91.5}}}, CurveClosed -> {0}]}, { FaceForm[{ RGBColor[0.631, 0.8160000000000001, 0.498], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{15.5, 103.5}, {23.5, 103.5}, {23.5, 79.5}, {15.5, 79.5}}}]}, { FaceForm[{ RGBColor[0.40800000000000003`, 0.627, 0.196], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{24., 104.}, {15., 104.}, { 15., 79.}, {24., 79.}}, {{23., 80.}, {16., 80.}, {16., 103.}, {23., 103.}}}]}, { FaceForm[{ RGBColor[0.38, 0.753, 0.89], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{29.5, 103.5}, {37.5, 103.5}, {37.5, 79.5}, {29.5, 79.5}}}]}, { FaceForm[{ RGBColor[0.24300000000000002`, 0.608, 0.71], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{38., 104.}, {29., 104.}, { 29., 79.}, {38., 79.}}, {{37., 80.}, {30., 80.}, {30., 103.}, {37., 103.}}}]}, { FaceForm[{ RGBColor[0.584, 0.51, 0.8390000000000001], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{43.5, 103.5}, {51.5, 103.5}, {51.5, 79.5}, {43.5, 79.5}}}]}, { FaceForm[{ RGBColor[0.4, 0.396, 0.659], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{52., 104.}, {43., 104.}, { 43., 79.}, {52., 79.}}, {{51., 80.}, {44., 80.}, {44., 103.}, {51., 103.}}}]}, { FaceForm[{ RGBColor[0.549, 0.549, 0.549], Opacity[1.]}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}}}, {{{28., 91.5}, {25., 95.}, {25., 88.}}}], FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}}}, {{{42., 91.5}, {39., 95.}, {39., 88.}}}]}}, ImageMargins -> 0, ImageSize -> {36, Automatic}, PlotRangePadding -> 0], GridBox[{{ DynamicModuleBox[{ NeuralNetworks`Private`NetChain`assoc3 = Association[ "Type" -> "Chain", "Nodes" -> Association[ "1" -> Association[ "Type" -> "Convolution", "Arrays" -> Association[ "Weights" -> NeuralNetworks`Private`DummyRawArray[{20, 1, 5, 5}], "Biases" -> NeuralNetworks`Private`DummyRawArray[{20}]], "Parameters" -> Association[ "OutputChannels" -> 20, "KernelSize" -> {5, 5}, "Stride" -> {1, 1}, "PaddingSize" -> {0, 0}, "Dilation" -> {1, 1}, "Dimensionality" -> 2, "$InputChannels" -> 1, "$GroupNumber" -> 1, "$InputSize" -> {28, 28}, "$OutputSize" -> {24, 24}, "Interleaving" -> False], "Inputs" -> Association[ "Input" -> NeuralNetworks`TensorT[{1, 28, 28}, NeuralNetworks`RealT]], "Outputs" -> Association[ "Output" -> NeuralNetworks`TensorT[{20, 24, 24}, NeuralNetworks`RealT]]], "2" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> NeuralNetworks`ValidatedParameter[Ramp], "$Dimensions" -> {20, 24, 24}], "Inputs" -> Association[ "Input" -> NeuralNetworks`TensorT[{20, 24, 24}, NeuralNetworks`RealT]], "Outputs" -> Association[ "Output" -> NeuralNetworks`TensorT[{20, 24, 24}, NeuralNetworks`RealT]]], "3" -> Association[ "Type" -> "Pooling", "Arrays" -> Association[], "Parameters" -> Association[ "KernelSize" -> {2, 2}, "Stride" -> {2, 2}, "PaddingSize" -> {0, 0}, "Function" -> Max, "Dimensionality" -> 2, "$Channels" -> 20, "$InputSize" -> {24, 24}, "$OutputSize" -> {12, 12}, "$MXPoolingConvention" -> "valid", "$MXGlobalPool" -> False, "Interleaving" -> False], "Inputs" -> Association[ "Input" -> NeuralNetworks`TensorT[{20, 24, 24}, NeuralNetworks`RealT]], "Outputs" -> Association[ "Output" -> NeuralNetworks`TensorT[{20, 12, 12}, NeuralNetworks`RealT]]], "4" -> Association[ "Type" -> "Convolution", "Arrays" -> Association[ "Weights" -> NeuralNetworks`Private`DummyRawArray[{50, 20, 5, 5}], "Biases" -> NeuralNetworks`Private`DummyRawArray[{50}]], "Parameters" -> Association[ "OutputChannels" -> 50, "KernelSize" -> {5, 5}, "Stride" -> {1, 1}, "PaddingSize" -> {0, 0}, "Dilation" -> {1, 1}, "Dimensionality" -> 2, "$InputChannels" -> 20, "$GroupNumber" -> 1, "$InputSize" -> {12, 12}, "$OutputSize" -> {8, 8}, "Interleaving" -> False], "Inputs" -> Association[ "Input" -> NeuralNetworks`TensorT[{20, 12, 12}, NeuralNetworks`RealT]], "Outputs" -> Association[ "Output" -> NeuralNetworks`TensorT[{50, 8, 8}, NeuralNetworks`RealT]]], "5" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> NeuralNetworks`ValidatedParameter[Ramp], "$Dimensions" -> {50, 8, 8}], "Inputs" -> Association[ "Input" -> NeuralNetworks`TensorT[{50, 8, 8}, NeuralNetworks`RealT]], "Outputs" -> Association[ "Output" -> NeuralNetworks`TensorT[{50, 8, 8}, NeuralNetworks`RealT]]], "6" -> Association[ "Type" -> "Pooling", "Arrays" -> Association[], "Parameters" -> Association[ "KernelSize" -> {2, 2}, "Stride" -> {2, 2}, "PaddingSize" -> {0, 0}, "Function" -> Max, "Dimensionality" -> 2, "$Channels" -> 50, "$InputSize" -> {8, 8}, "$OutputSize" -> {4, 4}, "$MXPoolingConvention" -> "valid", "$MXGlobalPool" -> False, "Interleaving" -> False], "Inputs" -> Association[ "Input" -> NeuralNetworks`TensorT[{50, 8, 8}, NeuralNetworks`RealT]], "Outputs" -> Association[ "Output" -> NeuralNetworks`TensorT[{50, 4, 4}, NeuralNetworks`RealT]]], "7" -> Association[ "Type" -> "Flatten", "Arrays" -> Association[], "Parameters" -> Association["Level" -> Infinity], "Inputs" -> Association[ "Input" -> NeuralNetworks`TensorT[{50, 4, 4}, NeuralNetworks`RealT]], "Outputs" -> Association[ "Output" -> NeuralNetworks`TensorT[{800}, NeuralNetworks`RealT]]], "8" -> Association[ "Type" -> "Linear", "Arrays" -> Association[ "Weights" -> NeuralNetworks`Private`DummyRawArray[{500, 800}], "Biases" -> NeuralNetworks`Private`DummyRawArray[{500}]], "Parameters" -> Association[ "OutputDimensions" -> {500}, "$OutputSize" -> 500, "$InputSize" -> 800, "$InputDimensions" -> {800}], "Inputs" -> Association[ "Input" -> NeuralNetworks`TensorT[{800}, NeuralNetworks`RealT]], "Outputs" -> Association[ "Output" -> NeuralNetworks`TensorT[{500}, NeuralNetworks`RealT]]], "9" -> Association[ "Type" -> "Elementwise", "Arrays" -> Association[], "Parameters" -> Association[ "Function" -> NeuralNetworks`ValidatedParameter[Ramp], "$Dimensions" -> {500}], "Inputs" -> Association[ "Input" -> NeuralNetworks`TensorT[{500}, NeuralNetworks`RealT]], "Outputs" -> Association[ "Output" -> NeuralNetworks`TensorT[{500}, NeuralNetworks`RealT]]], "10" -> Association[ "Type" -> "Linear", "Arrays" -> Association[ "Weights" -> NeuralNetworks`Private`DummyRawArray[{10, 500}], "Biases" -> NeuralNetworks`Private`DummyRawArray[{10}]], "Parameters" -> Association[ "OutputDimensions" -> {10}, "$OutputSize" -> 10, "$InputSize" -> 500, "$InputDimensions" -> {500}], "Inputs" -> Association[ "Input" -> NeuralNetworks`TensorT[{500}, NeuralNetworks`RealT]], "Outputs" -> Association[ "Output" -> NeuralNetworks`TensorT[{10}, NeuralNetworks`RealT]]], "11" -> Association[ "Type" -> "Softmax", "Arrays" -> Association[], "Parameters" -> Association["Level" -> -1], "Inputs" -> Association[ "Input" -> NeuralNetworks`TensorT[{10}, NeuralNetworks`RealT]], "Outputs" -> Association[ "Output" -> NeuralNetworks`TensorT[{10}, NeuralNetworks`RealT]]]], "Edges" -> { NeuralNetworks`NetPath["Nodes", "1", "Inputs", "Input"] -> NeuralNetworks`NetPath["Inputs", "Input"], NeuralNetworks`NetPath["Nodes", "2", "Inputs", "Input"] -> NeuralNetworks`NetPath["Nodes", "1", "Outputs", "Output"], NeuralNetworks`NetPath["Nodes", "3", "Inputs", "Input"] -> NeuralNetworks`NetPath["Nodes", "2", "Outputs", "Output"], NeuralNetworks`NetPath["Nodes", "4", "Inputs", "Input"] -> NeuralNetworks`NetPath["Nodes", "3", "Outputs", "Output"], NeuralNetworks`NetPath["Nodes", "5", "Inputs", "Input"] -> NeuralNetworks`NetPath["Nodes", "4", "Outputs", "Output"], NeuralNetworks`NetPath["Nodes", "6", "Inputs", "Input"] -> NeuralNetworks`NetPath["Nodes", "5", "Outputs", "Output"], NeuralNetworks`NetPath["Nodes", "7", "Inputs", "Input"] -> NeuralNetworks`NetPath["Nodes", "6", "Outputs", "Output"], NeuralNetworks`NetPath["Nodes", "8", "Inputs", "Input"] -> NeuralNetworks`NetPath["Nodes", "7", "Outputs", "Output"], NeuralNetworks`NetPath["Nodes", "9", "Inputs", "Input"] -> NeuralNetworks`NetPath["Nodes", "8", "Outputs", "Output"], NeuralNetworks`NetPath["Nodes", "10", "Inputs", "Input"] -> NeuralNetworks`NetPath["Nodes", "9", "Outputs", "Output"], NeuralNetworks`NetPath["Nodes", "11", "Inputs", "Input"] -> NeuralNetworks`NetPath[ "Nodes", "10", "Outputs", "Output"], NeuralNetworks`NetPath["Outputs", "Output"] -> NeuralNetworks`NetPath[ "Nodes", "11", "Outputs", "Output"]}, "Inputs" -> Association["Input" -> NetEncoder["Image", Association[ "ImageSize" -> {28, 28}, "ColorSpace" -> "Grayscale", "ColorChannels" -> 1, "MeanImage" -> None], NeuralNetworks`TensorT[{1, 28, 28}, NeuralNetworks`RealT]]], "Outputs" -> Association["Output" -> NetDecoder["Class", Association[ "Labels" -> {0, 1, 2, 3, 4, 5, 6, 7, 8, 9}, "Dimensions" -> 10], NeuralNetworks`TensorT[{10}, NeuralNetworks`RealT]]]], NeuralNetworks`Private`NetChain`opart, NeuralNetworks`Private`NetChain`part, NeuralNetworks`Private`NetChain`selected = Null}, DynamicBox[ GridBox[{{ NeuralNetworks`Private`NetChain`MouseClickBoxes[ TagBox[ GridBox[{{ TagBox[ TagBox[ "\"\"", Annotation[#, {"Inputs", "Input"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ "\"Input\"", Annotation[#, {"Inputs", "Input"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ TagBox[ GridBox[{{"\"image\""}, { TemplateBox[{"\"3-tensor\"", "\" \"", StyleBox[ TemplateBox[{"\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"1\"", "\"28\"", "\"28\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"]}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, BaselinePosition -> 2, DefaultBaseStyle -> "Column", GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], Annotation[#, {"Inputs", "Input"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]]}, { TagBox[ TagBox[ StyleBox["\"1\"", GrayLevel[0.5], StripOnInput -> False], Annotation[#, {"Nodes", "1"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ StyleBox["ConvolutionLayer", GrayLevel[0], StripOnInput -> False], Annotation[#, {"Nodes", "1"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ TemplateBox[{"\"3-tensor\"", "\" \"", StyleBox[ TemplateBox[{"\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"20\"", "\"24\"", "\"24\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"], Annotation[#, {"Nodes", "1"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]]}, { TagBox[ TagBox[ StyleBox["\"2\"", GrayLevel[0.5], StripOnInput -> False], Annotation[#, {"Nodes", "2"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ StyleBox["Ramp", GrayLevel[0], StripOnInput -> False], Annotation[#, {"Nodes", "2"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ TemplateBox[{"\"3-tensor\"", "\" \"", StyleBox[ TemplateBox[{"\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"20\"", "\"24\"", "\"24\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"], Annotation[#, {"Nodes", "2"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]]}, { TagBox[ TagBox[ StyleBox["\"3\"", GrayLevel[0.5], StripOnInput -> False], Annotation[#, {"Nodes", "3"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ StyleBox["PoolingLayer", GrayLevel[0], StripOnInput -> False], Annotation[#, {"Nodes", "3"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ TemplateBox[{"\"3-tensor\"", "\" \"", StyleBox[ TemplateBox[{"\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"20\"", "\"12\"", "\"12\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"], Annotation[#, {"Nodes", "3"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]]}, { TagBox[ TagBox[ StyleBox["\"4\"", GrayLevel[0.5], StripOnInput -> False], Annotation[#, {"Nodes", "4"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ StyleBox["ConvolutionLayer", GrayLevel[0], StripOnInput -> False], Annotation[#, {"Nodes", "4"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ TemplateBox[{"\"3-tensor\"", "\" \"", StyleBox[ TemplateBox[{"\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"50\"", "\"8\"", "\"8\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"], Annotation[#, {"Nodes", "4"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]]}, { TagBox[ TagBox[ StyleBox["\"5\"", GrayLevel[0.5], StripOnInput -> False], Annotation[#, {"Nodes", "5"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ StyleBox["Ramp", GrayLevel[0], StripOnInput -> False], Annotation[#, {"Nodes", "5"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ TemplateBox[{"\"3-tensor\"", "\" \"", StyleBox[ TemplateBox[{"\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"50\"", "\"8\"", "\"8\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"], Annotation[#, {"Nodes", "5"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]]}, { TagBox[ TagBox[ StyleBox["\"6\"", GrayLevel[0.5], StripOnInput -> False], Annotation[#, {"Nodes", "6"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ StyleBox["PoolingLayer", GrayLevel[0], StripOnInput -> False], Annotation[#, {"Nodes", "6"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ TemplateBox[{"\"3-tensor\"", "\" \"", StyleBox[ TemplateBox[{"\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"50\"", "\"4\"", "\"4\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"], Annotation[#, {"Nodes", "6"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]]}, { TagBox[ TagBox[ StyleBox["\"7\"", GrayLevel[0.5], StripOnInput -> False], Annotation[#, {"Nodes", "7"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ StyleBox["FlattenLayer", GrayLevel[0], StripOnInput -> False], Annotation[#, {"Nodes", "7"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ TemplateBox[{"\"vector\"", "\" \"", StyleBox[ TemplateBox[{"\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"800\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"], Annotation[#, {"Nodes", "7"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]]}, { TagBox[ TagBox[ StyleBox["\"8\"", GrayLevel[0.5], StripOnInput -> False], Annotation[#, {"Nodes", "8"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ StyleBox["LinearLayer", GrayLevel[0], StripOnInput -> False], Annotation[#, {"Nodes", "8"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ TemplateBox[{"\"vector\"", "\" \"", StyleBox[ TemplateBox[{"\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"500\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"], Annotation[#, {"Nodes", "8"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]]}, { TagBox[ TagBox[ StyleBox["\"9\"", GrayLevel[0.5], StripOnInput -> False], Annotation[#, {"Nodes", "9"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ StyleBox["Ramp", GrayLevel[0], StripOnInput -> False], Annotation[#, {"Nodes", "9"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ TemplateBox[{"\"vector\"", "\" \"", StyleBox[ TemplateBox[{"\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"500\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"], Annotation[#, {"Nodes", "9"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]]}, { TagBox[ TagBox[ StyleBox["\"10\"", GrayLevel[0.5], StripOnInput -> False], Annotation[#, {"Nodes", "10"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ StyleBox["LinearLayer", GrayLevel[0], StripOnInput -> False], Annotation[#, {"Nodes", "10"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ TemplateBox[{"\"vector\"", "\" \"", StyleBox[ TemplateBox[{"\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"10\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"], Annotation[#, {"Nodes", "10"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]]}, { TagBox[ TagBox[ StyleBox["\"11\"", GrayLevel[0.5], StripOnInput -> False], Annotation[#, {"Nodes", "11"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ StyleBox["SoftmaxLayer", GrayLevel[0], StripOnInput -> False], Annotation[#, {"Nodes", "11"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ TemplateBox[{"\"vector\"", "\" \"", StyleBox[ TemplateBox[{"\"(\"", "\"\[VeryThinSpace]\"", "\"size\"", "\":\"", "\" \"", TemplateBox[{"\[Times]", "\"\[Times]\"", "\"10\""}, "RowWithSeparators"], "\"\[VeryThinSpace]\"", "\")\""}, "RowDefault"], GrayLevel[0.5], StripOnInput -> False]}, "RowDefault"], Annotation[#, {"Nodes", "11"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]]}, { TagBox[ TagBox[ "\"\"", Annotation[#, {"Outputs", "Output"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ "\"Output\"", Annotation[#, {"Outputs", "Output"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]], TagBox[ TagBox[ "\"class\"", Annotation[#, {"Outputs", "Output"}, "Mouse"]& ], MouseAppearanceTag["LinkHand"]]}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{1.1}}}], "Grid"], If[ ListQ[ NeuralNetworks`Private`NetChain`part = MouseAnnotation[]], If[NeuralNetworks`Private`NetChain`opart === NeuralNetworks`Private`NetChain`part, NeuralNetworks`Private`NetChain`selected = Null; NeuralNetworks`Private`NetChain`opart = Null, NeuralNetworks`Private`NetChain`selected = Part[NeuralNetworks`Private`NetChain`assoc3, Apply[Sequence, NeuralNetworks`Private`NetChain`part]]; NeuralNetworks`Private`NetChain`opart = NeuralNetworks`Private`NetChain`part; Null]; Null]]}, NeuralNetworks`Private`NetChain`fmtSelected[ NeuralNetworks`Private`NetChain`selected, NeuralNetworks`Private`NetChain`part, NeuralNetworks`Private`GetSharedArrays[ NeuralNetworks`Private`NetChain`assoc3]]}, GridBoxSpacings -> {"Columns" -> {{1}}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridFrameMargins -> {{0, 0}, {0, 0}}], TrackedSymbols :> { NeuralNetworks`Private`NetChain`selected}], Initialization :> {NetChain}]}}, BaselinePosition -> Automatic, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{2}}, "Rows" -> {{Automatic}}}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridFrameMargins -> {{0, 0}, {0, 0}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open], ImageSize -> Automatic], BaselinePosition -> Baseline, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]], StyleBox["]", "NonInterpretableSummary"]}]}, "CopyTag", DisplayFunction->(#& ), InterpretationFunction->("NetChain[<>]"& )], False, Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.743554655370454*^9, 3.743554857840461*^9}, CellLabel->"Out[17]=", CellID->2264657] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"$end", "-", "$start"}]], "Input", CellChangeTimes->{ 3.70999648737139*^9, {3.7435546586053514`*^9, 3.743554662094225*^9}}, CellLabel->"In[18]:=", CellID->419187529], Cell[BoxData[ TemplateBox[{"2.5009237`","\"s\"","seconds","\"Seconds\""}, "Quantity"]], "Output", CellChangeTimes->{3.7435546644261503`*^9, 3.7435548603943768`*^9}, CellLabel->"Out[18]=", CellID->195150441] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["More Examples", "Subsection", CellID->52214708], Cell[CellGroupData[{ Cell["Scope", "Subsubsection", CellID->87210935], Cell[TextData[{ "Retrieve the ", Cell[BoxData[ ButtonBox["ResourceFunction", BaseStyle->"Link"]], "InlineFormula"], ":" }], "Text", CellID->64365255], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ResourceFunction", "[", "\"\\"", "]"}]], "Input", CellContext->Notebook, CellFrameLabels->None, CellID->730158433], Cell[BoxData[ InterpretationBox[ InterpretationBox[ FrameBox[ TemplateBox[{GraphicsBox[{ RGBColor[0.9882352941176471, 0.4, 0.25098039215686274`], Thickness[ Dynamic[ If[CurrentValue["CellStyleName"] === "Input", 0.2, 0.1]]], CircleBox[{0, 0}]}, ImageSize -> 10, BaselinePosition -> Scaled[0.05], ImagePadding -> 1],TemplateBox[{3}, "Spacer1"],StyleBox[ "\"RunAfterLoading\"", FontColor -> RGBColor[0.2784313725490196, 0.2784313725490196, 0.2784313725490196], ShowAutoStyles -> False, ShowStringCharacters -> False, FontSize -> 0.78 Inherited, FontFamily -> "Roboto", Selectable -> True, FontWeight -> Dynamic[ If[CurrentValue["CellStyleName"] === "Input", "DemiBold", Plain]], StripOnInput -> False]}, "Row", DisplayFunction->(PaneBox[ RowBox[{ TemplateSlotSequence[1, "\[InvisibleSpace]"]}], BaselinePosition -> Center]& ), InterpretationFunction->(RowBox[{"Row", "[", RowBox[{ RowBox[{"{", TemplateSlotSequence[1, ","], "}"}], ",", RowBox[{"BaselinePosition", "\[Rule]", "Center"}]}], "]"}]& )], Selectable -> False, Background->RGBColor[ 0.9686274509803922, 0.9686274509803922, 0.9686274509803922], ContentPadding->False, FrameMargins->{{3, 4}, {0, -2}}, FrameStyle->Directive[ AbsoluteThickness[1], RGBColor[0.8627450980392157, 0.8627450980392157, 0.8627450980392157]], RoundingRadius->3, StripOnInput->False], ResourceFunction[ ResourceObject[ Association[{ "Name" -> "RunAfterLoading", "UUID" -> "RunAfterLoading", "ResourceType" -> "Function", "Description" -> "Evaluate an expression when a package finishes loading", "SymbolName" -> "FunctionRepository`$721b47e980a24c31bd1d7ce9fa0b023d`RunAfterLoading", "Function" -> HoldComplete[ FunctionRepository`$721b47e980a24c31bd1d7ce9fa0b023d`RunAfterLoading], "FunctionLocation" -> None, "VerificationTests" -> HoldComplete[], "ShortName" -> "RunAfterLoading"}]]], Selectable->False], ResourceFunction["RunAfterLoading"]]], "Output", CellID->88949377] }, Open ]], Cell[TextData[{ "Retrieve the ", Cell[BoxData[ ButtonBox["ResourceObject", BaseStyle->"Link"]], "InlineFormula"], ":" }], "Text", CellID->28155648], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ResourceObject", "[", "\"\\"", "]"}]], "Input", CellID->598105041], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["ResourceObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, (3.5 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], GraphicsBox[ RasterBox[CompressedData[" 1:eJztmzFvEzEUxyNg6JiNtUysmRADQ7qA2KJWrEitCBUMAaVFiO0GRoZILIyV +gGQGJkqBmZgR06FKoRQRRAghBA6/JI7al585+fzc85X50n/Km3vzu8X28/2 s+/C1r3122dardbOivyxvvlwbTjcfLTRlr/cGOzc2R70b10f7Pa3+8PLW2fl H69kOieVpqkXiWsrHan7UntSB1KpQQfZtXBPx5dfzIy9zOcJgc+kSfasXt1c iLEtlUiNGRiLNM7KaNfMmjDVpU2dJzVwdj3XJ6W+uwtqu6MaObFGvtq4fO6q 1JsAGLHAp1Vm1o5YbD+1FfjGMoY1gJWNuUGszsxi1l+bxKoyW/VnMYvDIcYm qsB3ctwWYY05VTUisnYD8JVLXQJvnfMmbo0NrEkAPnIrKYlRTYzHJgHTXOw6 pXVbWMeC0G8/Prhq1OHG+bn7ju5eKrye4i8806Y8jcaItUcpl2I6hp/vXhVe TykXnmlTXoH+5UnELG9ivOfL/uNC33+8fjH9/4ebF428f75Ppn+D6ynlwjO/ vdzXlm3Bu6fwkuMUtB9sv96/Lb1H9fP3p0Onvvj5Sb8q7yQ9WRNYlYnt6/On ZF747MKLv28L3lSc5EydeE3tUuU1fTe25Vvy5vnhhfFS+6wnXmou3Atv2ThT Nm458FqzcvKWjTPYmHid29OSd8m75OUrf8nLIxg7wFcQtnwuDDp+tlvKC/Ps JvDCnB3m+RTDazTO+ST44chLHoPh2ab61a2RVF74znRrKKpw+RXmG9bzSVzP Nv03N1gnUesa8gVwvc4qzCet1wvY/yq8uVHbVZFVWC9YrwdhjWPDG5Cme0vC Mi+JY0ZDeKfr/dQin6MKxp3c8jUtxGUYb8A4xh1mqfkcUr4OC3JKucFnHMcg 9xIAZ67/zjWJivsouC87xBKfmttXEQ75duDK2zFu44FIl29n2U9xmUt4knY/ xbWOA5Z2v8y1Hweq0v3QNML97jSy8wxK7IrmvErGHM15JIU5mvNmDWSO6Qwl GyvqzyHGMPbzwChuhzRWeTvvjbijOM+v4Y7ifQ1NG4/ifRwN+6l/36qEPcj3 6f4CgLLCWA== "], {{0, 0}, {60, 60}}, {0, 255}, ColorFunction -> RGBColor], AspectRatio -> 1, Axes -> False, Background -> None, Frame -> None, FrameTicks -> None, ImageSize -> {Automatic, Dynamic[ 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification]), ImageSizeCache -> {45., {0., 9.}}]}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"RunAfterLoading\"", "SummaryItem"]}], TagBox["\"\"", "SummaryItem"]}, { RowBox[{ TagBox["\"Type: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Function\"", "SummaryItem"]}], "\[SpanFromLeft]"}, { RowBox[{ TagBox["\"Description: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"Evaluate an expression when a package finishes loading\"", "SummaryItem"]}], "\[SpanFromLeft]"}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, (3.5 CurrentValue["FontCapHeight"])/ AbsoluteCurrentValue[Magnification]}]], GraphicsBox[ RasterBox[CompressedData[" 1:eJztmzFvEzEUxyNg6JiNtUysmRADQ7qA2KJWrEitCBUMAaVFiO0GRoZILIyV +gGQGJkqBmZgR06FKoRQRRAghBA6/JI7al585+fzc85X50n/Km3vzu8X28/2 s+/C1r3122dardbOivyxvvlwbTjcfLTRlr/cGOzc2R70b10f7Pa3+8PLW2fl H69kOieVpqkXiWsrHan7UntSB1KpQQfZtXBPx5dfzIy9zOcJgc+kSfasXt1c iLEtlUiNGRiLNM7KaNfMmjDVpU2dJzVwdj3XJ6W+uwtqu6MaObFGvtq4fO6q 1JsAGLHAp1Vm1o5YbD+1FfjGMoY1gJWNuUGszsxi1l+bxKoyW/VnMYvDIcYm qsB3ctwWYY05VTUisnYD8JVLXQJvnfMmbo0NrEkAPnIrKYlRTYzHJgHTXOw6 pXVbWMeC0G8/Prhq1OHG+bn7ju5eKrye4i8806Y8jcaItUcpl2I6hp/vXhVe TykXnmlTXoH+5UnELG9ivOfL/uNC33+8fjH9/4ebF428f75Ppn+D6ynlwjO/ vdzXlm3Bu6fwkuMUtB9sv96/Lb1H9fP3p0Onvvj5Sb8q7yQ9WRNYlYnt6/On ZF747MKLv28L3lSc5EydeE3tUuU1fTe25Vvy5vnhhfFS+6wnXmou3Atv2ThT Nm458FqzcvKWjTPYmHid29OSd8m75OUrf8nLIxg7wFcQtnwuDDp+tlvKC/Ps JvDCnB3m+RTDazTO+ST44chLHoPh2ab61a2RVF74znRrKKpw+RXmG9bzSVzP Nv03N1gnUesa8gVwvc4qzCet1wvY/yq8uVHbVZFVWC9YrwdhjWPDG5Cme0vC Mi+JY0ZDeKfr/dQin6MKxp3c8jUtxGUYb8A4xh1mqfkcUr4OC3JKucFnHMcg 9xIAZ67/zjWJivsouC87xBKfmttXEQ75duDK2zFu44FIl29n2U9xmUt4knY/ xbWOA5Z2v8y1Hweq0v3QNML97jSy8wxK7IrmvErGHM15JIU5mvNmDWSO6Qwl GyvqzyHGMPbzwChuhzRWeTvvjbijOM+v4Y7ifQ1NG4/ifRwN+6l/36qEPcj3 6f4CgLLCWA== "], {{0, 0}, {60, 60}}, {0, 255}, ColorFunction -> RGBColor], AspectRatio -> 1, Axes -> False, Background -> None, Frame -> None, FrameTicks -> None, ImageSize -> {Automatic, Dynamic[ 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification]), ImageSizeCache -> {45., {0., 9.}}]}], GridBox[{{ RowBox[{ TagBox["\"Name: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"RunAfterLoading\"", "SummaryItem"]}], TagBox["\"\"", "SummaryItem"]}, { RowBox[{ TagBox["\"Type: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Function\"", "SummaryItem"]}], "\[SpanFromLeft]"}, { RowBox[{ TagBox["\"Description: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"Evaluate an expression when a package finishes loading\"", "SummaryItem"]}], "\[SpanFromLeft]"}, { RowBox[{ TagBox["\"Keywords: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ TagBox[ TemplateBox[{ ",", "\",\"", "\"trace context\"", "\"get file event\""}, "RowWithSeparators"], Short], "SummaryItem"]}], ""}, { RowBox[{ TagBox["\"UUID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"RunAfterLoading\"", "SummaryItem"]}], ""}, { RowBox[{ TagBox["\"Version: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}], ""}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], ResourceObject[ Association[{ "Name" -> "RunAfterLoading", "UUID" -> "RunAfterLoading", "ResourceType" -> "Function", "Description" -> "Evaluate an expression when a package finishes loading", "SymbolName" -> "FunctionRepository`$721b47e980a24c31bd1d7ce9fa0b023d`RunAfterLoading", "Function" -> HoldComplete[ FunctionRepository`$721b47e980a24c31bd1d7ce9fa0b023d`RunAfterLoading], "FunctionLocation" -> None, "VerificationTests" -> HoldComplete[], "ShortName" -> "RunAfterLoading"}]], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellID->72614288] }, Open ]] }, Open ]] }, Open ]] }, WindowSize->Automatic, WindowMargins->Automatic, Visible->True, DockedCells->{}, Background->GrayLevel[1], FrontEndVersion->"11.3 for Microsoft Windows (64-bit) (March 6, 2018)", StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "FunctionResourceDefinitionStyles.nb", CharacterEncoding -> "UTF-8"] ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[580, 22, 56, 1, 70, "Subsection",ExpressionUUID->"109d41b6-c2eb-4a52-a44f-b87beee9a20d", CellID->493026219], Cell[639, 25, 152, 2, 70, "Text",ExpressionUUID->"a06326f6-e9a7-452e-b946-257e37760175", CellID->162861731], Cell[CellGroupData[{ Cell[816, 31, 2761, 67, 70, "Input",ExpressionUUID->"632e52be-44b0-4638-83c8-4e7d0341e1e0", CellID->723544481], Cell[3580, 100, 6112, 131, 70, "Output",ExpressionUUID->"09af40e0-4f33-4857-9571-2aa34fe5f044", CellID->471739087] }, Open ]], Cell[CellGroupData[{ Cell[9729, 236, 208, 5, 70, "Input",ExpressionUUID->"f211e2ab-5a8a-42aa-9b5d-64fb1e4e5746", CellID->498501855], Cell[9940, 243, 290, 7, 70, "Print",ExpressionUUID->"d4732c69-b252-4694-a4d6-4f52c88811a0", CellID->320725451] }, Open ]], Cell[10245, 253, 191, 3, 70, "Text",ExpressionUUID->"92c5b48d-ed79-4ebb-b43b-6546e2b5d240", CellID->353661611], Cell[CellGroupData[{ Cell[10461, 260, 2682, 63, 70, "Input",ExpressionUUID->"afb4e6f0-1e4d-4bee-ae07-4bf69cd16cc6", CellID->383909211], Cell[13146, 325, 3875, 83, 70, "Output",ExpressionUUID->"15e44dc1-085a-4ab7-a0f2-8aa1af5ef4be", CellID->135085179] }, Open ]], Cell[CellGroupData[{ Cell[17058, 413, 2412, 58, 70, "Input",ExpressionUUID->"9f5a2066-560b-4575-8404-79c4f9e28cfe", CellID->411471871], Cell[19473, 473, 6110, 131, 70, "Output",ExpressionUUID->"e36590b5-6e15-46ab-84a6-9adb31458201", CellID->151045973] }, Open ]], Cell[CellGroupData[{ Cell[25620, 609, 236, 6, 70, "Input",ExpressionUUID->"b5d2e832-2ed5-4c5c-8a1d-f26650c678ad", CellID->442087902], Cell[25859, 617, 40148, 808, 70, "Output",ExpressionUUID->"a9c06149-7ab5-457e-b9c2-0a872c358435", CellID->2264657] }, Open ]], Cell[CellGroupData[{ Cell[66044, 1430, 193, 5, 70, "Input",ExpressionUUID->"6096ea0e-6e5f-494b-a0a8-2bea5b7e7553", CellID->419187529], Cell[66240, 1437, 212, 5, 70, "Output",ExpressionUUID->"6b4f99a6-7a63-4712-829e-ca26896ddda3", CellID->195150441] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[66501, 1448, 54, 1, 70, "Subsection",ExpressionUUID->"3f927b66-e369-4e90-9ed7-7e1df794f751", CellID->52214708], Cell[CellGroupData[{ Cell[66580, 1453, 49, 1, 70, "Subsubsection",ExpressionUUID->"c79a269b-2bf9-421a-b495-2c711e1ccd4d", CellID->87210935], Cell[66632, 1456, 158, 7, 70, "Text",ExpressionUUID->"d174ead8-849a-4d17-97c4-d718e71dcc7b", CellID->64365255], Cell[CellGroupData[{ Cell[66815, 1467, 159, 4, 70, "Input",ExpressionUUID->"e2e20af0-d67c-45d5-b7e4-a1d254b418cc", CellID->730158433], Cell[66977, 1473, 2238, 52, 70, "Output",ExpressionUUID->"566ec54b-c288-414d-abef-a360243e52c0", CellID->88949377] }, Open ]], Cell[69230, 1528, 156, 7, 70, "Text",ExpressionUUID->"d28b9811-36a1-4ef6-a1ac-3122fa3c94b8", CellID->28155648], Cell[CellGroupData[{ Cell[69411, 1539, 109, 2, 70, "Input",ExpressionUUID->"487b14f5-2d77-4786-b49f-134e8ca45017", CellID->598105041], Cell[69523, 1543, 8846, 174, 70, "Output",ExpressionUUID->"d7c18640-4bbe-468d-a131-2656179bb123", CellID->72614288] }, Open ]] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)