diff --git a/PacletInfo.wl b/PacletInfo.wl index 0f26eca..0662abe 100644 --- a/PacletInfo.wl +++ b/PacletInfo.wl @@ -3,7 +3,7 @@ PacletObject[ <| "Description" -> "A complete sample Paclet that includes library resources", "Creator" -> "Sample Author", "BuildDate" -> "$BuildDate$", - "Version" -> "1.6.0", + "Version" -> "1.7.0", "WolframVersion" -> "13.0+", "License" -> "MIT", "PublisherID" -> "SamplePublisher", diff --git a/ResourceDefinition.nb b/ResourceDefinition.nb index 23bb2dc..b6624d8 100644 --- a/ResourceDefinition.nb +++ b/ResourceDefinition.nb @@ -29,91 +29,33 @@ Notebook[ CellGroupData[ { Cell[ - "Paclet", + "Paclet Manifest", "Section", Editable -> False, Deletable -> False, - TaggingRules -> {"TemplateGroupName" -> "Paclet"}, - CellTags -> {"Paclet", "TemplateSection"}, - CellID -> 864524491 + TaggingRules -> {"TemplateGroupName" -> "PacletManifest"}, + CellTags -> {"Paclet Manifest", "PacletManifest", "TemplateCellGroup"}, + CellID -> 196832285 ], Cell[ - CellGroupData[ - { - Cell[ - "Paclet Directory", - "Subsection", - Editable -> False, - Deletable -> False, - TaggingRules -> {"TemplateGroupName" -> "PacletDirectory"}, - DefaultNewCellStyle -> { - "LocalDirectoryInput", - TaggingRules -> {"FileInputProperty" -> "PacletDirectory"} - }, - CellTags -> { - "Paclet Directory", - "PacletDirectory", - "TemplateCellGroup" - }, - CellID -> 95800296 - ], - Cell[ - BoxData[RowBox[{"NotebookDirectory", "[", "]"}]], - "LocalDirectoryInput", - Deletable -> False, - CellID -> 288681386 - ] - }, - Open - ] + BoxData[TemplateBox[{}, "PacletDirectoryChooserTemplate"]], + "PacletDirectoryChooser", + TaggingRules -> { + "PacletDirectoryType" -> "Notebook", + "Refreshing" -> False + }, + CellTags -> "PacletManifestPanel", + CellID -> 115408480 ], Cell[ CellGroupData[ { Cell[ - "Manifest", - "Subsection", - Editable -> False, - Deletable -> False, - TaggingRules -> {"TemplateGroupName" -> "PacletFiles"}, - CellFrameLabels -> { - { - None, - Cell[ - BoxData[ - ButtonBox[ - "\"Refresh\"", - ButtonFunction :> - DefinitionNotebookClient`RedirectOutputsToConsole[ - Block[ { $ContextPath }, - - Quiet[ - Needs["PacletResource`DefinitionNotebook`"], - MessageName[General, "shdw"] - ]; - - PacletResource`DefinitionNotebook`RefreshNotebookPacletFiles[ - - ] - ] - ], - Appearance :> - FEPrivate`FrontEndResource[ - "FEExpressions", - "GrayButtonNinePatchAppearance" - ], - FrameMargins -> {{5, 5}, {0, 0}}, - BaseStyle -> {"Panel", FontSize -> 12}, - Evaluator -> Automatic, - Method -> "Queued" - ] - ] - ] - }, - {None, None} - }, - CellTags -> {"Manifest", "PacletFiles", "TemplateCellGroup"}, - CellID -> 324117918 + "", + "FileManagerTopSpacer", + CellGroupingRules -> {"SectionGrouping", 99}, + CellTags -> {"FileManagerCell", "FileManager-PacletFiles"}, + CellID -> 349855787 ], Cell[ CellGroupData[ @@ -158,7 +100,7 @@ Notebook[ ] ] ], - File[FileNameJoin[{NotebookDirectory[], "Documentation"}]], + FileNameJoin[{NotebookDirectory[], "Documentation"}], BoxID -> "FileTreePath", BaseStyle -> {"Text"} ] @@ -226,10 +168,8 @@ Notebook[ ] ] ], - File[ - FileNameJoin[ - {NotebookDirectory[], "Documentation/English"} - ] + FileNameJoin[ + {NotebookDirectory[], "Documentation", "English"} ], BoxID -> "FileTreePath", BaseStyle -> {"Text"} @@ -298,13 +238,13 @@ Notebook[ ] ] ], - File[ - FileNameJoin[ - { - NotebookDirectory[], - "Documentation/English/ReferencePages" - } - ] + FileNameJoin[ + { + NotebookDirectory[], + "Documentation", + "English", + "ReferencePages" + } ], BoxID -> "FileTreePath", BaseStyle -> {"Text"} @@ -373,13 +313,14 @@ Notebook[ ] ] ], - File[ - FileNameJoin[ - { - NotebookDirectory[], - "Documentation/English/ReferencePages/Symbols" - } - ] + FileNameJoin[ + { + NotebookDirectory[], + "Documentation", + "English", + "ReferencePages", + "Symbols" + } ], BoxID -> "FileTreePath", BaseStyle -> {"Text"} @@ -412,13 +353,15 @@ Notebook[ TemplateBox[ { "\"AddOne.nb\"", - File[ - FileNameJoin[ - { - NotebookDirectory[], - "Documentation/English/ReferencePages/Symbols/AddOne.nb" - } - ] + FileNameJoin[ + { + NotebookDirectory[], + "Documentation", + "English", + "ReferencePages", + "Symbols", + "AddOne.nb" + } ] }, "FileManagerFileOpenerTemplate" @@ -432,13 +375,15 @@ Notebook[ ] ] ], - File[ - FileNameJoin[ - { - NotebookDirectory[], - "Documentation/English/ReferencePages/Symbols/AddOne.nb" - } - ] + FileNameJoin[ + { + NotebookDirectory[], + "Documentation", + "English", + "ReferencePages", + "Symbols", + "AddOne.nb" + } ], BoxID -> "FileTreePath", BaseStyle -> {"Text"} @@ -467,13 +412,15 @@ Notebook[ TemplateBox[ { "\"AddTwo.nb\"", - File[ - FileNameJoin[ - { - NotebookDirectory[], - "Documentation/English/ReferencePages/Symbols/AddTwo.nb" - } - ] + FileNameJoin[ + { + NotebookDirectory[], + "Documentation", + "English", + "ReferencePages", + "Symbols", + "AddTwo.nb" + } ] }, "FileManagerFileOpenerTemplate" @@ -487,13 +434,15 @@ Notebook[ ] ] ], - File[ - FileNameJoin[ - { - NotebookDirectory[], - "Documentation/English/ReferencePages/Symbols/AddTwo.nb" - } - ] + FileNameJoin[ + { + NotebookDirectory[], + "Documentation", + "English", + "ReferencePages", + "Symbols", + "AddTwo.nb" + } ], BoxID -> "FileTreePath", BaseStyle -> {"Text"} @@ -574,7 +523,7 @@ Notebook[ ] ] ], - File[FileNameJoin[{NotebookDirectory[], "Kernel"}]], + FileNameJoin[{NotebookDirectory[], "Kernel"}], BoxID -> "FileTreePath", BaseStyle -> {"Text"} ] @@ -604,10 +553,8 @@ Notebook[ TemplateBox[ { "\"AdvancedSamplePaclet.wl\"", - File[ - FileNameJoin[ - {NotebookDirectory[], "Kernel/AdvancedSamplePaclet.wl"} - ] + FileNameJoin[ + {NotebookDirectory[], "Kernel", "AdvancedSamplePaclet.wl"} ] }, "FileManagerFileOpenerTemplate" @@ -621,10 +568,8 @@ Notebook[ ] ] ], - File[ - FileNameJoin[ - {NotebookDirectory[], "Kernel/AdvancedSamplePaclet.wl"} - ] + FileNameJoin[ + {NotebookDirectory[], "Kernel", "AdvancedSamplePaclet.wl"} ], BoxID -> "FileTreePath", BaseStyle -> {"Text"} @@ -690,9 +635,7 @@ Notebook[ ] ] ], - File[ - FileNameJoin[{NotebookDirectory[], "LibraryResources"}] - ], + FileNameJoin[{NotebookDirectory[], "LibraryResources"}], BoxID -> "FileTreePath", BaseStyle -> {"Text"} ] @@ -724,7 +667,7 @@ Notebook[ TemplateBox[ { "\"LICENSE\"", - File[FileNameJoin[{NotebookDirectory[], "LICENSE"}]] + FileNameJoin[{NotebookDirectory[], "LICENSE"}] }, "FileManagerFileOpenerTemplate" ], @@ -737,7 +680,7 @@ Notebook[ ] ] ], - File[FileNameJoin[{NotebookDirectory[], "LICENSE"}]], + FileNameJoin[{NotebookDirectory[], "LICENSE"}], BoxID -> "FileTreePath", BaseStyle -> {"Text"} ] @@ -765,7 +708,7 @@ Notebook[ TemplateBox[ { "\"PacletInfo.wl\"", - File[FileNameJoin[{NotebookDirectory[], "PacletInfo.wl"}]] + FileNameJoin[{NotebookDirectory[], "PacletInfo.wl"}] }, "FileManagerFileOpenerTemplate" ], @@ -778,7 +721,7 @@ Notebook[ ] ] ], - File[FileNameJoin[{NotebookDirectory[], "PacletInfo.wl"}]], + FileNameJoin[{NotebookDirectory[], "PacletInfo.wl"}], BoxID -> "FileTreePath", BaseStyle -> {"Text"} ] @@ -808,7 +751,7 @@ Notebook[ TemplateBox[ { "\"README.md\"", - File[FileNameJoin[{NotebookDirectory[], "README.md"}]] + FileNameJoin[{NotebookDirectory[], "README.md"}] }, "FileManagerFileOpenerTemplate" ], @@ -821,7 +764,7 @@ Notebook[ ] ] ], - File[FileNameJoin[{NotebookDirectory[], "README.md"}]], + FileNameJoin[{NotebookDirectory[], "README.md"}], BoxID -> "FileTreePath", BaseStyle -> {"Text"} ] @@ -849,10 +792,8 @@ Notebook[ TemplateBox[ { "\"ResourceDefinition.nb\"", - File[ - FileNameJoin[ - {NotebookDirectory[], "ResourceDefinition.nb"} - ] + FileNameJoin[ + {NotebookDirectory[], "ResourceDefinition.nb"} ] }, "FileManagerFileOpenerTemplate" @@ -866,10 +807,8 @@ Notebook[ ] ] ], - File[ - FileNameJoin[ - {NotebookDirectory[], "ResourceDefinition.nb"} - ] + FileNameJoin[ + {NotebookDirectory[], "ResourceDefinition.nb"} ], BoxID -> "FileTreePath", BaseStyle -> {"Text"} @@ -934,7 +873,7 @@ Notebook[ ] ] ], - File[FileNameJoin[{NotebookDirectory[], "Scripts"}]], + FileNameJoin[{NotebookDirectory[], "Scripts"}], BoxID -> "FileTreePath", BaseStyle -> {"Text"} ] @@ -966,8 +905,8 @@ Notebook[ TemplateBox[ { "\"Compile.wls\"", - File[ - FileNameJoin[{NotebookDirectory[], "Scripts/Compile.wls"}] + FileNameJoin[ + {NotebookDirectory[], "Scripts", "Compile.wls"} ] }, "FileManagerFileOpenerTemplate" @@ -981,8 +920,8 @@ Notebook[ ] ] ], - File[ - FileNameJoin[{NotebookDirectory[], "Scripts/Compile.wls"}] + FileNameJoin[ + {NotebookDirectory[], "Scripts", "Compile.wls"} ], BoxID -> "FileTreePath", BaseStyle -> {"Text"} @@ -1011,10 +950,8 @@ Notebook[ TemplateBox[ { "\"SetBuildDate.wls\"", - File[ - FileNameJoin[ - {NotebookDirectory[], "Scripts/SetBuildDate.wls"} - ] + FileNameJoin[ + {NotebookDirectory[], "Scripts", "SetBuildDate.wls"} ] }, "FileManagerFileOpenerTemplate" @@ -1028,10 +965,8 @@ Notebook[ ] ] ], - File[ - FileNameJoin[ - {NotebookDirectory[], "Scripts/SetBuildDate.wls"} - ] + FileNameJoin[ + {NotebookDirectory[], "Scripts", "SetBuildDate.wls"} ], BoxID -> "FileTreePath", BaseStyle -> {"Text"} @@ -1100,7 +1035,7 @@ Notebook[ ] ] ], - File[FileNameJoin[{NotebookDirectory[], "Source"}]], + FileNameJoin[{NotebookDirectory[], "Source"}], BoxID -> "FileTreePath", BaseStyle -> {"Text"} ] @@ -1132,9 +1067,7 @@ Notebook[ TemplateBox[ { "\"AddOne.c\"", - File[ - FileNameJoin[{NotebookDirectory[], "Source/AddOne.c"}] - ] + FileNameJoin[{NotebookDirectory[], "Source", "AddOne.c"}] }, "FileManagerFileOpenerTemplate" ], @@ -1147,9 +1080,7 @@ Notebook[ ] ] ], - File[ - FileNameJoin[{NotebookDirectory[], "Source/AddOne.c"}] - ], + FileNameJoin[{NotebookDirectory[], "Source", "AddOne.c"}], BoxID -> "FileTreePath", BaseStyle -> {"Text"} ] @@ -1177,9 +1108,7 @@ Notebook[ TemplateBox[ { "\"AddTwo.c\"", - File[ - FileNameJoin[{NotebookDirectory[], "Source/AddTwo.c"}] - ] + FileNameJoin[{NotebookDirectory[], "Source", "AddTwo.c"}] }, "FileManagerFileOpenerTemplate" ], @@ -1192,9 +1121,7 @@ Notebook[ ] ] ], - File[ - FileNameJoin[{NotebookDirectory[], "Source/AddTwo.c"}] - ], + FileNameJoin[{NotebookDirectory[], "Source", "AddTwo.c"}], BoxID -> "FileTreePath", BaseStyle -> {"Text"} ] @@ -1222,9 +1149,7 @@ Notebook[ TemplateBox[ { "\"Library.c\"", - File[ - FileNameJoin[{NotebookDirectory[], "Source/Library.c"}] - ] + FileNameJoin[{NotebookDirectory[], "Source", "Library.c"}] }, "FileManagerFileOpenerTemplate" ], @@ -1237,9 +1162,7 @@ Notebook[ ] ] ], - File[ - FileNameJoin[{NotebookDirectory[], "Source/Library.c"}] - ], + FileNameJoin[{NotebookDirectory[], "Source", "Library.c"}], BoxID -> "FileTreePath", BaseStyle -> {"Text"} ] @@ -1307,7 +1230,7 @@ Notebook[ ] ] ], - File[FileNameJoin[{NotebookDirectory[], "Tests"}]], + FileNameJoin[{NotebookDirectory[], "Tests"}], BoxID -> "FileTreePath", BaseStyle -> {"Text"} ] @@ -1339,9 +1262,7 @@ Notebook[ TemplateBox[ { "\"AddOne.wlt\"", - File[ - FileNameJoin[{NotebookDirectory[], "Tests/AddOne.wlt"}] - ] + FileNameJoin[{NotebookDirectory[], "Tests", "AddOne.wlt"}] }, "FileManagerFileOpenerTemplate" ], @@ -1354,9 +1275,7 @@ Notebook[ ] ] ], - File[ - FileNameJoin[{NotebookDirectory[], "Tests/AddOne.wlt"}] - ], + FileNameJoin[{NotebookDirectory[], "Tests", "AddOne.wlt"}], BoxID -> "FileTreePath", BaseStyle -> {"Text"} ] @@ -1384,9 +1303,7 @@ Notebook[ TemplateBox[ { "\"AddTwo.wlt\"", - File[ - FileNameJoin[{NotebookDirectory[], "Tests/AddTwo.wlt"}] - ] + FileNameJoin[{NotebookDirectory[], "Tests", "AddTwo.wlt"}] }, "FileManagerFileOpenerTemplate" ], @@ -1399,9 +1316,7 @@ Notebook[ ] ] ], - File[ - FileNameJoin[{NotebookDirectory[], "Tests/AddTwo.wlt"}] - ], + FileNameJoin[{NotebookDirectory[], "Tests", "AddTwo.wlt"}], BoxID -> "FileTreePath", BaseStyle -> {"Text"} ] @@ -1517,7 +1432,113 @@ Notebook[ BoxData[ FrameBox[ Cell[ - "Give an image that you want to display on the main landing page for your paclet. This will be displayed along side the basic description that's given below.", + TextData[ + { + "Provide an image that you want to display on the main landing page for your paclet. This will be displayed along side the basic description that's given below. The image can be given directly (i.e. pasted from the clipboard) or as code that generates the desired image. \n\nIf importing the image from a local file, use notebook-relative paths when possible (e.g. ", + Cell[ + BoxData[ + StyleBox[ + RowBox[ + { + TagBox[ + ButtonBox[ + StyleBox[ + "Import", + "SymbolsRefLink", + ShowStringCharacters -> True, + FontFamily -> "Source Sans Pro" + ], + BaseStyle -> + Dynamic[ + FEPrivate`If[ + CurrentValue["MouseOver"], + {"Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, + {"Link"} + ] + ], + ButtonData -> "paclet:ref/Import", + ContentPadding -> False + ], + MouseAppearanceTag["LinkHand"] + ], + "[", + RowBox[ + { + TagBox[ + ButtonBox[ + StyleBox[ + "FileNameJoin", + "SymbolsRefLink", + ShowStringCharacters -> True, + FontFamily -> "Source Sans Pro" + ], + BaseStyle -> + Dynamic[ + FEPrivate`If[ + CurrentValue["MouseOver"], + {"Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, + {"Link"} + ] + ], + ButtonData -> "paclet:ref/FileNameJoin", + ContentPadding -> False + ], + MouseAppearanceTag["LinkHand"] + ], + "[", + RowBox[ + { + "{", + RowBox[ + { + RowBox[ + { + TagBox[ + ButtonBox[ + StyleBox[ + "NotebookDirectory", + "SymbolsRefLink", + ShowStringCharacters -> True, + FontFamily -> "Source Sans Pro" + ], + BaseStyle -> + Dynamic[ + FEPrivate`If[ + CurrentValue["MouseOver"], + {"Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, + {"Link"} + ] + ], + ButtonData -> "paclet:ref/NotebookDirectory", + ContentPadding -> False + ], + MouseAppearanceTag["LinkHand"] + ], + "[", + "]" + } + ], + ",", + StyleBox["\[Ellipsis]", "TR"] + } + ], + "}" + } + ], + "]" + } + ], + "]" + } + ], + ShowStringCharacters -> True, + FontFamily -> "Source Sans Pro" + ] + ] + ], + ") rather than absolute file names." + } + ], "MoreInfoText" ], Background -> GrayLevel[0.95], @@ -1553,7 +1574,7 @@ Notebook[ Deletable -> False, TaggingRules -> {"TemplateGroupName" -> "HeroImage"}, CellTags -> {"Headline Image", "HeroImage", "TemplateCellGroup"}, - CellID -> 670275254 + CellID -> 509724307 ], Cell[ CellGroupData[ @@ -1867,50 +1888,15 @@ Notebook[ Editable -> False, Deletable -> False, TaggingRules -> {"TemplateGroupName" -> "MainGuidePage"}, - DefaultNewCellStyle -> { - "LocalFileInput", - TaggingRules -> {"FileInputProperty" -> "MainGuidePage"} - }, CellTags -> {"Main Guide Page", "MainGuidePage", "TemplateCellGroup"}, - CellID -> 254653237 + CellID -> 587602718 ], Cell[ - BoxData[ - TagBox[ - RowBox[{"File", "[", "\"path/to/guide.nb\"", "]"}], - #1 &, - TaggingRules -> {"DefaultContentBoxes" -> True}, - AutoDelete -> True - ] - ], - "LocalFileInput", - TaggingRules -> {"FileInputProperty" -> "MainGuidePage"}, - CellEventActions -> { - Inherited, - {"KeyDown", "\t"} :> - Replace[ - SelectionMove[SelectedNotebook[], After, Cell]; - NotebookFind[ - SelectedNotebook[], - "TabNext", - Next, - CellTags, - AutoScroll -> True, - WrapAround -> True - ], - Blank[NotebookSelection] :> - SelectionMove[ - SelectedNotebook[], - All, - CellContents, - AutoScroll -> True - ] - ], - PassEventsDown -> False, - PassEventsUp -> False - }, - CellTags -> {"DefaultContent", "TabNext"}, - CellID -> 835369788 + BoxData[TemplateBox[{}, "MainGuideChooserTemplate"]], + "MainGuideChooser", + TaggingRules -> {"Refreshing" -> False, "Relative" -> True}, + CellTags -> "MainGuidePagePanel", + CellID -> 614786987 ] }, Open @@ -1939,7 +1925,7 @@ Notebook[ BoxData[ FrameBox[ Cell[ - "Provide examples showing how to install, configure, and load your Paclet along with some basic usage. This section will be displayed on the main landing page for your Paclet when deployed to the cloud or published in the Wolfram Language Paclet Repository.\n\nThe default content appearing here shows the recommended structure for this section, but any of it can be removed or changed as desired. Use additional cells and cell styles as needed.", + "Provide examples showing how to install, configure, and load your Paclet along with some basic usage. This section will be displayed on the main landing page for your Paclet when deployed to the cloud or published in the Wolfram Language Paclet Repository.\n\nThe usage examples should provide a succinct overview of what types of features users can expect from your paclet. Detailed examples should be reserved for the corresponding function, guide, or tutorial pages.\n\nThe default content appearing here shows the recommended structure for this section, but any of it can be removed or changed as desired. Use additional cells and cell styles as needed.", "MoreInfoText" ], Background -> GrayLevel[0.95], @@ -1975,7 +1961,7 @@ Notebook[ Deletable -> False, TaggingRules -> {"TemplateGroupName" -> "ExampleNotebook"}, CellTags -> {"ExampleNotebook", "Examples", "TemplateCellGroup"}, - CellID -> 405986742 + CellID -> 365974185 ], Cell[ CellGroupData[ @@ -2747,11 +2733,7 @@ Notebook[ "RadioButtonValue" -> "MIT", "SpecifiedLicenseID" -> Null }, - CellTags -> { - "LicensingInformation", - "LicensingInformation-RadioButtons", - "RadioButtonsCell" - }, + CellTags -> {"LicensingInformation-RadioButtons", "RadioButtonsCell"}, CellID -> 42282576 ] }, @@ -2912,14 +2894,59 @@ Notebook[ CellGroupData[ { Cell[ - "Categories", + TextData[ + { + "Categories", + Cell[ + BoxData[ + PaneSelectorBox[ + { + True -> + TemplateBox[ + { + "Categories", + Cell[ + BoxData[ + FrameBox[ + Cell[ + "Choose categories that best represent your paclet. These choices determine which pages your paclet will appear on when published to the repository.", + "MoreInfoText" + ], + Background -> GrayLevel[0.95], + FrameMargins -> 20, + FrameStyle -> GrayLevel[0.9], + RoundingRadius -> 5, + ImageSize -> {Scaled[0.65], Automatic} + ] + ], + "MoreInfoText", + Deletable -> True, + CellTags -> {"SectionMoreInfoCategories"}, + CellMargins -> {{66, 66}, {15, 15}} + ] + }, + "MoreInfoOpenerButtonTemplate" + ] + }, + Dynamic[ + CurrentValue[ + EvaluationNotebook[], + {TaggingRules, "ResourceCreateNotebook"} + ] + ], + ImageSize -> Automatic + ] + ] + ] + } + ], "Subsection", Editable -> False, Deletable -> False, TaggingRules -> {"TemplateGroupName" -> "Categories"}, DefaultNewCellStyle -> "Item", CellTags -> {"Categories", "TemplateCellGroup"}, - CellID -> 193940140 + CellID -> 651640710 ], Cell[ BoxData[ @@ -3315,7 +3342,7 @@ Notebook[ "CheckboxData" -> "OEM6eJxVj10KwkAMhFH8aUW8gl6ghyhVUVAU4wXWdrSL2+6yyT709m4VRJ+SkMmXmTzJaEzSGdDkFMQFyWha1CifqO4DHh00Cy13+lHDr45KajRKdKnMqrBNVMfBthGxFzTMaR7EvgUZJWdvHbx0NCuU4GG9Bkf4yfUnfB9+4H29BANONpUWdYvdeKsM47tI1zD43fQOrQlN+/9wsW8F3nl8TFGatx2FGyNGml/ANvgS187FpGdVRuQL1GJYGg==" }, CellTags -> {"Categories", "Categories-Checkboxes", "CheckboxCell"}, - CellID -> 382860812 + CellID -> 518828741 ] }, Open @@ -3419,7 +3446,7 @@ Notebook[ Cell[ TextData[ { - "Source/Reference Citation", + "Original Source References and Attributions", Cell[ BoxData[ PaneSelectorBox[ @@ -3468,8 +3495,12 @@ Notebook[ Deletable -> False, TaggingRules -> {"TemplateGroupName" -> "Source/Reference Citation"}, DefaultNewCellStyle -> "Text", - CellTags -> {"Source/Reference Citation", "TemplateCellGroup"}, - CellID -> 53755805 + CellTags -> { + "Original Source References and Attributions", + "Source/Reference Citation", + "TemplateCellGroup" + }, + CellID -> 687116677 ], Cell[ "Source, reference or citation information", @@ -3872,7 +3903,7 @@ Notebook[ "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes" }, - CellID -> 11097510 + CellID -> 168971546 ] }, Closed @@ -4056,7 +4087,7 @@ Notebook[ "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes" }, - CellID -> 22145403 + CellID -> 349250540 ] }, Closed @@ -4337,14 +4368,14 @@ Notebook[ Editable -> False, Deletable -> False, TaggingRules -> { - "CheckboxData" -> "OEM6eJxdUdFqwzAMhK1tEtj2EXvPR3RZBhmDhmqwZydRialjG0su5O/nlMTJ9uSTTtzp5GOawx54VAiHk2frOYek6LG9YndJaPcliSEBJJJGwwFaJy1DBr65otOo4PkHm/ImlBd8nwjlsa7CRNtj5xV2kL4JbvtP0wSninGgRffyQLtzGFn1FxCZxXB+Y3+zwAoj+2+nv+WqPa86vxvtuPoKIxvTbHOltTMWHY/wWpjBBp9GKsnj6lrqm3RGD6inA5/s1KNJdHsISstOsmgC2n8IRRiJ7B0Vbpnpl4zyg6biMYeXSjM668LIPXF21GM4C2EwezojGe9a/B5tCF2LNij9AojVrVE=" + "CheckboxData" -> "OEM6eJxdkdtqwzAMhmFrc4BtD7H7PESWZpAxaKgGu3YclZg6trHlQt5+ztY46a70S7/5dHCZFbAHmiRCcvRkPBWQVgPyC/bn1O0+hSNIAZ0TWsHzN3b1lUnPaE6zN0Z8+NAdJMCtMARJeFC2DeTguwtahTJIPmDvJfahU0M4uoV7fnC7UzBW/iKiE7l/Mdbv+IuM7r8x79OVfZv1FjfsZeCNjO66c1QFZK3VBi1N8Frp0YQ+nZCCprVrra7CajWimg98NHPNzdDtIVxW94JYF9T+nUmH0cgPKHHrzL+kpR+Vqx4LeGkUoTU2PPndOC/VFM7iMDR7OqHT3nL8mkxYumU8kH4AghGtUQ==" }, CellTags -> { "CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes" }, - CellID -> 16188031 + CellID -> 131343849 ] }, Closed @@ -4466,7 +4497,7 @@ Notebook[ "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes" }, - CellID -> 551724461 + CellID -> 145907755 ] }, Closed @@ -4572,6 +4603,7 @@ Notebook[ "\" \"", TemplateBox[ { + "\"Local files\"", TemplateBox[ { "DisclosuresLocalFiles", @@ -4598,8 +4630,7 @@ Notebook[ "Click for more information" }, "InlineMoreInfoOpenerButtonTemplate" - ], - "\"Local files\"" + ] }, "RowDefault" ] @@ -4633,10 +4664,15 @@ Notebook[ Deletable -> False, CellMargins -> {{Inherited, Inherited}, {5, Inherited}}, TaggingRules -> { - "CheckboxData" -> "OEM6eJx9VE1uUzEQpm3SJm1UNrBhZSGWhAOwqZrXFiKlahXnAu7zOLHq53nyT9vHlkNwGY4Al0AsEWdg7CQvDSp4Y3vm8/ibmc8+7Q15l4fGAN+/iqGOYcgPigWUtyDVM9+ZaE+W7jhA5dXOcq92fWcaDdB+b4r3aZvNO743FfcjfABPtqMZVLURAcigOksIf3mmfWnQRwd+gqUwF9oQuus7BRhDEQ4IfSaCUPu+d+FElU/vLt38826xQPTAwkJ7hnXQaJlWrMHoWC1KA4FJ7aAMpmESwTNhG4aK8MAUGoP32s6ZjC5NBoVMMzpm0VXCsOjFHN4f/vjylRUOiLp/yyRQVIpEqAqlVprWJjFnKlHP4HFVowueSSLOlMNqC5FSJLLgROLrmYNUFckCru9dUdfWB2FMhhFz2TIUDhg8lFDTsXd8cIkOxlbhDB7aXvjDkShv5w6jlVTG/gcnmgncgXEqj98nLXKQ63op3JwuLF5sImR71sJ2hO/f0vi1iXA8TdcQsynxi77otp7+uKIScv0JHqlin1MxQK7i/Dzx/dMYsKI8y38k0z9LVRc3tOzMXITW0Us6mIl5q0X+hlO7qWDrOE8LbH3+KJ1fpd4yXM3FqBi16+fFc7pi8BGNLJB0TBqg53B8fidMzA3KgnxVGF3ekrSSOKhJmgi4Kvv567E12sKa11UNFtwohoB2/TL40WSjE3644TvkvWuXJBOabfPBVRa9V3vbT/G/iVFX7AKcJvU8Wrapdv8yLgt9LvWyAd0LYTw81ZqlJ/0XaGJl/aO+Dvnx2AZwtSNsLkf/1DY83nig72QwBU9PtoRZU9O/c53l/wdcjJ+8" + "CheckboxData" -> "OEM6eJyNVM1uEzEQhpC0SRO1F+DAyUIcCQ/ApWq2LURq1SrOC7jr2cSq17PyT9vtlYfgZXgEeAnEEfEMjJ3sJq2KxF48nj9/M/PNHvXHvMd9rYHvXARfBT/mu9kS8muQxTPXPVOONL2ph9IVz1f3ouO6s6CB7i9meBuvUc2HZ5gLzQqlIfr2Z+J2gnckd9xwDmWlhQdSFN21/6tj5XKNLlhwKfQ0RfZcNwOtKcMueR8LL4od1z+1okzRnZWZf+lkS0QHzC+VY1h5hYapgtUYLKtErsEzqSzkXtdMIjgmTM2wIH9gBWqNt8osmAw2HhqFjCdaZtCWVEZwYgEf935+/cYyCwTdvWcSKCtlIq8SpSoUyXpTdHKelhVa75gk4KywWD7wiCUSWLAi4nXMQuyKZB6bd9fQlXFeaJ3cCLlsEQoLDO5yqCjsAx+do4WpKXAOd+1g3N5E5NcLi8FIauPgkxX1GdyAtkX6/hy2nqPU13NhF/Rg9nKTIekTMR5m+PE9fr83GfZn8RlCNiN8wWW91jKYltRCru6hoQil2uHUDJDrPL8O3eAoeCypzvwfxQyOY9fFFYnduQ3QGvqRB3OxaInJ33EaNzWsyfM0wZr4YYxfl94iXJ/ZJJu08kF2QE+MPqOWGRKPiQO0G/snN0KHNKBEyDeZVvk1USuSg4akCIAtk52/nRqtDDS4LiowYCfBezTNZvC9DcQx71/ayBJf8+FWEbSbF4norlmi/yqGJmGWYBUxZktsy+s9Uq6aeyLVqum9U6EdPDWOR5Z2Hvz1NubtsnYz1KE0bmvqY74/NR5sZSlratbgyNQ8XDmgP89oBo4WOod5XdEv6jItx1/s7691" + }, + CellTags -> { + "CheckboxCell", + "Disclosures", + "Disclosures-Checkboxes", + "Disclosures-LocalFiles" }, - CellTags -> {"CheckboxCell", "LocalFiles", "LocalFiles-Checkboxes"}, - CellID -> 454797044 + CellID -> 539272590 ], Cell[ BoxData[ @@ -4655,6 +4691,7 @@ Notebook[ "\" \"", TemplateBox[ { + "\"Wolfram account\"", TemplateBox[ { "DisclosuresWolframAccount", @@ -4681,8 +4718,7 @@ Notebook[ "Click for more information" }, "InlineMoreInfoOpenerButtonTemplate" - ], - "\"Wolfram account\"" + ] }, "RowDefault" ] @@ -4716,14 +4752,15 @@ Notebook[ Deletable -> False, CellMargins -> {{Inherited, Inherited}, {5, Inherited}}, TaggingRules -> { - "CheckboxData" -> "OEM6eJx9VLFyEzEQJcRO7MTjNDRQaago8A/QZOxzAp5JJhnLDLWi27OF5dOhleIcFX/BUPEjfAL8RIaS4RtY6eyLHQhX2NJq9+0+7Vv1Wz3e5K7UwPcuvCu86/H9ZAZyDmn2CBtnCsnSHDlYYLZT7bPH2Bh7DbTfHZtl2EbzDrbGYjkwN4BkO5zAotDCARmyRuXCnw4VSm3QW8B3RmdWLPpSGp+7rImNBLQmlH2KGAonsj1snZJHRHhcHfOvu8nMGATmZgqZKZwyOVMZK423rBBSg2OpsiCdLllqAJnIS2Yy8geWGa3NUuXTVwe3n7+xMXzw5IovmcfwayyjQGPTKkjlmbELETNYCFRS5kzwtbefviBbEWCjYUQb5Q6skA7ZUrlZzFe7Jtr4lImKasizjl2ZIkBigXJQHSkQC6qc/BYmVZmi9RacjHDm6j3RxM3YEAI3IH1YV14pFNqUVDrKGaTUNiIhcF6FvcXaT1pIlaPslORaSVgbNqtdmWLouZhDfQd9XcwEk0Jr5J1zY2FEdzeBm1oreDAQcj61RDalFrdfW1GewTVom8Xv93Ht2Yk9Pxd2qnJMntwhRHvU6jbCj+/h+3WH0B2HNNTmsUiVx6RZn7RHCzEFrj7Chmr3OBUO6Qrn5zG2+96Z0Hj5AJn2MHRIXNGyMbEe6oNW0OhETOtZ4S849YgUtMZ5eADWGIcBY0W/rnL1nwySQb0+So4oTeeN0WliaNZIMzSy3ZNroX1UbRyYZ4lWck7SD2KysKlq/nyUa5XDuraLAnKwA++cydfTy4/uSZV3t+vu8dalNQVYV/59tH8RBxSz3e2n478kqUv5DKyiedtY1rSb94zVxZ+QMGNDmqdCI/yrVdVJeN+M9oscN/rc4904voUl33g17X5ecn+FQCw6Y0B6XiRMyoLeycv4yvwBt4/oNQ==" + "CheckboxData" -> "OEM6eJyNVM1uEzEQhjZpkzZKL1zoyeLEgbwAlyrZtBCpVas4iLPrnU1MnPXisZsuJ94CceJFeAR4iYoj4hkYO9ltGlGJPSTj8cw3f9+43+rxJnelBr536V3hXY/vJzOQc0izJ9g4V0ia5sjBArOnq3O2g42x10Dn3bFZhmNQ86P3RmdWLJiQ0vjc0X1rLJYDcwtIRocTWBRaOCBF1lj7PB8qlNqgt4Br9/7au4mNBLQmlH3yGAonsj1snZFFRNhZXfNvu8nMGATmZgqZKZwyOVMZK423rBBSg2OpsiCdLllqAJnIS2YysgeWGa3NUuXT1wd3X76zMXz0ZIqvmMfwaywjR2PTlZPKM2MXIkawEEpJmTPB1t59/oqsqn80jGij3IEV0iFbKjeL8WrTRBufVo0KcbZ6FwESCxSD8kiBqqDMyW5hUpUpkh/AyQhnrj9QmbjpG1zgFqQP8soqhUKbklJHOYOU5khFCJyv3N5hbSctpMpRdApyoyRUis1s16roeiHmUPegr4uZYFJojbxzYSyMqHcTuK3JgwcDIedTS8WmNOL2GyvKc7gBbbP4/TmpLTtx5hfCTlWOybN7hKiP5H2I8PNH+H7fI3THIQyNeSxS5TFp1jft0UJMgatPUNGYoPY4JQ7pGufXCbb73pkwePlIMe1hmJC4JrExsR7qi1bg6ERM6+XhLznNiBhU4Ty+ABXGYcBYl19nuf5PBsmglo+SIwrTeWt0mhjaNeIM7XD39EZoH1kbF+Y40UrOifqBTBY2Wc1fjHKtcqhyuywgBzvwzpm82l7efZhmj7eurCnAupIfbhRD78hlXEaslv2/CqKJ5DOwinZrQ6xLbG4pV00+JRLG5jfPhEb411i2buq58OPNnLdL20+M9oscNxjQ49242IUl5Ni0dj8vub9GIIfOGJAeHgmTsqAn9Sq+P38Bxkb37g==" }, CellTags -> { "CheckboxCell", - "WolframAccount", - "WolframAccount-Checkboxes" + "Disclosures", + "Disclosures-Checkboxes", + "Disclosures-WolframAccount" }, - CellID -> 707443347 + CellID -> 574853471 ], Cell[ BoxData[ @@ -4742,6 +4779,7 @@ Notebook[ "\" \"", TemplateBox[ { + "\"External services\"", TemplateBox[ { "DisclosuresExternalServices", @@ -4768,8 +4806,7 @@ Notebook[ "Click for more information" }, "InlineMoreInfoOpenerButtonTemplate" - ], - "\"External services\"" + ] }, "RowDefault" ] @@ -4803,14 +4840,15 @@ Notebook[ Deletable -> False, CellMargins -> {{Inherited, Inherited}, {5, Inherited}}, TaggingRules -> { - "CheckboxData" -> "OEM6eJx9VF1uEzEQJm3SJm2UgsQTvFg8AWouwEuVbFOI1CpVnAu4u7OJFa+9eOyky0W4C+IIcAnEI+IMzHqTbRuV+mHXnt9vZj570O7zFneFAn4w8S73rs8PowXES0jSZ9i8lEiS1thBhmmjOqd72Jx6BXTen5p1eQziBranYj00t4AkO55BlivhgARpszLhr88lxsqgt4CjWwdWC8XBrmRMPi1sRqAUxTkkn3PhRHqA7QsrshBjr1Lzb41oYQwCcwuJzOROGs1kygrjLctFrMCxRFqInSpYYgCZ0AUzKdkDS41SZi31/MPRr6/f2ZVYkt7CZw/okDnDYIOK4QYWe7twLj9laflBXJwycPG74B1ZoPoIg2Ue6b9xYbHRmtITrmDGQScMMiEV8u6VsTDWqZlRom0j8Wgo4uXcGq8Tqr7z0YriElagbBrW37PashvacSXsXGqMXt5FCPIwyIcRfv4o15+7CL1pmYY6MBWJ9Bi1ak1nnIk5cPkF7o30gMdCQbKJ8/sMOwPvTCacjP9TTOccaATihrbNmfVQK9rl+GZiXhOJv+dVm7ZxnmLHNspxGWXTgBrn5h8No2G9P4lOKFH3k1FJZIiK4IAY3RuthPKizBrY9CpSMl4SLyzLCAWTBMNmQc/fjLWSGrboJjlosEPvnNFbcvMXo13C8Oe72Pu8fW1NDtYVjykPJ4HDmO4/vF9PlkrT0guw0kFyb1sX39oRVgMYJbIaTOtCKITHRlZpykfAKJ9pvDfvPu+NNYHPLdmGBnUGuuD+BoHeiO4UkG5gDLMip8fkOlzEf85ukpM=" + "CheckboxData" -> "OEM6eJyNVN1u0zAUZqPp2q3ahsQVcGFxBWh9AW6mNuug0qpNcV/AS04aq44dfOxt4UV4F8QjwEsgLhHPwEnaZKX8CF8k9vn5zt9nj3pDHnBXKuDdS+8K74Z8L8wgXkKSPsDOhUSSBFMHOaY7q3O6i53IK6Dzw8jcVsdKzB9N7hxYLRRDsDcyhsqjF4nbsbmj/S4ezCEvlHBAgrSz9np6JjFWBr0FbAB44x9gJwSlCGePfM6EE2kXe+dW5DXG7krNP+6EmTEIzGUSmSmcNJrJlJXGW1aIWIFjibQQO1WyxAAyoUtmUrIHlhqlzK3Ui9f7Xz98YjOxJL2Fdx7QIXOGwXZZ7EXmXHHC0uqDmJ0wcPHL2ju0QPVRDpZ5pP/ahcVGawpPedVmHHTCIBdSIR/MjIWpTs2cAjW9xf2xiJcLa7xOqPr+GyvKC7gBZdN6/ThtLQd1O2bCLqTG8PE9Qi2vZ/srwpfP1fp+j3AYVWGoA5FIpMcwaDX9aS4WwOV7aKZMUF0eCwXJGufbKfZH3plcOBn/pZj+GdAIxDVtO3ProVX0qvHNxaLlFn/FV21qcP7FjgbloEJZN6DNc/0Px+G43R+FRxRo8NaoJDRERXBAJD+c3AjlRRW1ZtOTUMl4SbywLKcsmKQ0bF7r+fOpVlJDk91lARrs2DtndENufryd6JD3rqwpwLqSH2wURFftsuYqNrfhv0qiqegMrHSQbGzbIoMt4arRk0SuBhCcC4Xwp9FsadrZ8GebOf9e3F5olM81bvBgyA+nmuwKS9h14/ojXXJ/jUDPySACpJsZw7ws6N25qi/oTyONokw=" }, CellTags -> { "CheckboxCell", - "ExternalServices", - "ExternalServices-Checkboxes" + "Disclosures", + "Disclosures-Checkboxes", + "Disclosures-ExternalServices" }, - CellID -> 746227322 + CellID -> 74550641 ], Cell[ BoxData[ @@ -4829,6 +4867,7 @@ Notebook[ "\" \"", TemplateBox[ { + "\"WL system configuration\"", TemplateBox[ { "DisclosuresWLSystemConfiguration", @@ -4836,101 +4875,7 @@ Notebook[ BoxData[ FrameBox[ Cell[ - TextData[ - { - "Choose this option if your paclet directly does any of the following:\n\[FilledSmallSquare] Creates persistent local scheduled tasks\n\[FilledSmallSquare] Modifies WL system or environment settings\n\[FilledSmallSquare] Modifies ", - Cell[ - BoxData[ - StyleBox[ - TagBox[ - ButtonBox[ - StyleBox[ - "$Path", - "SymbolsRefLink", - ShowStringCharacters -> True, - FontFamily -> "Source Sans Pro" - ], - BaseStyle -> - Dynamic[ - FEPrivate`If[ - CurrentValue["MouseOver"], - {"Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, - {"Link"} - ] - ], - ButtonData -> "paclet:ref/$Path", - ContentPadding -> False - ], - MouseAppearanceTag["LinkHand"] - ], - ShowStringCharacters -> True, - FontFamily -> "Source Sans Pro" - ] - ] - ], - ", ", - Cell[ - BoxData[ - StyleBox[ - TagBox[ - ButtonBox[ - StyleBox[ - "Directory", - "SymbolsRefLink", - ShowStringCharacters -> True, - FontFamily -> "Source Sans Pro" - ], - BaseStyle -> - Dynamic[ - FEPrivate`If[ - CurrentValue["MouseOver"], - {"Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, - {"Link"} - ] - ], - ButtonData -> "paclet:ref/Directory", - ContentPadding -> False - ], - MouseAppearanceTag["LinkHand"] - ], - ShowStringCharacters -> True, - FontFamily -> "Source Sans Pro" - ] - ] - ], - ", or similar\n\[FilledSmallSquare] Installs additional paclets or dependencies\n\[FilledSmallSquare] Creates, modifies or deletes symbols outside of the Publisher`PacletBaseName` context\n\[FilledSmallSquare] Creates or imports non-public ", - Cell[ - BoxData[ - StyleBox[ - TagBox[ - ButtonBox[ - StyleBox[ - "ResourceObject", - "SymbolsRefLink", - ShowStringCharacters -> True, - FontFamily -> "Source Sans Pro" - ], - BaseStyle -> - Dynamic[ - FEPrivate`If[ - CurrentValue["MouseOver"], - {"Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, - {"Link"} - ] - ], - ButtonData -> "paclet:ref/ResourceObject", - ContentPadding -> False - ], - MouseAppearanceTag["LinkHand"] - ], - ShowStringCharacters -> True, - FontFamily -> "Source Sans Pro" - ] - ] - ], - " content\n\[FilledSmallSquare] Makes FrontEnd modifications\n\[FilledSmallSquare] Internal handlers" - } - ], + "Choose this option if your paclet directly does any of the following:\n\[FilledSmallSquare] Creates persistent local scheduled tasks\n\[FilledSmallSquare] Modifies WL system or environment settings\n\[FilledSmallSquare] Modifies <+$Path+>, <+Directory+>, or similar\n\[FilledSmallSquare] Installs additional paclets or dependencies\n\[FilledSmallSquare] Creates or imports non-public <+ResourceObject+> content\n\[FilledSmallSquare] Makes FrontEnd modifications\n\[FilledSmallSquare] Internal handlers", "MoreInfoText" ], Background -> GrayLevel[0.95], @@ -4949,8 +4894,95 @@ Notebook[ "Click for more information" }, "InlineMoreInfoOpenerButtonTemplate" - ], - "\"WL system configuration\"" + ] + }, + "RowDefault" + ] + }, + "RowDefault" + ], + StripOnInput -> False, + FontSize -> 12 + ] + } + }, + DefaultBaseStyle -> "Column", + GridBoxAlignment -> {"Columns" -> {{Left}}}, + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}} + ], + "Column" + ] + } + }, + AutoDelete -> False, + BaseStyle -> {"ControlStyle"}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{2}}} + ], + "Grid" + ] + ], + "Output", + Editable -> False, + Deletable -> False, + CellMargins -> {{Inherited, Inherited}, {5, Inherited}}, + TaggingRules -> { + "CheckboxData" -> "OEM6eJyNVM1uEzEQpiVpk7YqFxASJ4O4lYg7Qq2aTQuRUqWKI/XsrGcTE6+98thtlxfhZXgEeAnEEXHlyqyTbNOqFexlbc/M529+Ph+3OrzJfamBbw2DL4Lv8O1kBukcZPYIGwOFdNLse8gx21jss01sjIIG2j8e2atqWx3z5xcDhiWSK0utydQ0OOEVrTawNRJXXXsNSM67Y8gLLTzQQdZYxrKewlRbDA7wYsAjSnILpImNBLQmsG0K7Akvsi1snTqRR6DNhZn/2Uxm1iIwP1PIbFHFMpWx0gbHCpFq8EwqB6nXJZMWkAlTMpuRP7DMam2vlJm+2/nx5StLHBBNZAU4JJJgPNM2FZphOgNJFZDMC5xjdD6zUmWKvG+qYB0Dc6mcNXkVi+A9Yd9xf3/w+lz42cHhG1r2IjPrympL4ahypYWLEX2DXmhNhKVUVVpEZJEQVq4SCjASTEqgt9iTTeWFdeRmrOkUYaJVSneNAKkmKQwnn+jOg8OqaVWOC3piTqGnRN2fGMnyyDaNncAlGw+uojATRmoqEN87sw76JrNjuK5nBHe6Ip1PnQ1GUuvaH5woB3AJ2mXx+31Ue+7FXp4JN1UGk6c3CPE8zuhthO/fqu/XDcL+qLqGSjwSUgVMmrWl3c/FFLj6DKtpJagtTr0EucT5eYTt4+BtTkmmDyTT7gGVW0xo2Ri7ALWhVc3eWExrjfC3nIpK1Vrh/HO+V1C7FdSyCjXZ5T/pJt16/SR5QrftfbRaJpYUBR5Isfsnl0KHCBn18CKhbs9psh010QFTxMXl0c5f9Y1WBlYUhzRA4LrBe2tWGuXP7mXb4a1zZ0kXvuS7a6nR4zGMksOVsv8rL+qPmYFTHuTass60eedwUfITUkFsRfNUaIT7mnTHUneJv1zn/ECG24nVITe4NhYdvh/nvnB0QSxh+9iUPExI2h2+t1LUuCzoOT2P2vwLc4v1vg==" + }, + CellTags -> { + "CheckboxCell", + "Disclosures", + "Disclosures-Checkboxes", + "Disclosures-WLSystemConfiguration" + }, + CellID -> 289617923 + ], + Cell[ + BoxData[ + TagBox[ + GridBox[ + { + { + TagBox[ + GridBox[ + { + { + StyleBox[ + TemplateBox[ + { + CheckboxBox[False, {False, "WLSystemSymbols"}], + "\" \"", + TemplateBox[ + { + "\"WL built-in symbols\"", + TemplateBox[ + { + "DisclosuresWLSystemSymbols", + Cell[ + BoxData[ + FrameBox[ + Cell[ + "Choose this option if your paclet directly modifies definitions of built-in symbols such as those in System` or other internal contexts.", + "MoreInfoText" + ], + Background -> GrayLevel[0.95], + FrameMargins -> 20, + FrameStyle -> GrayLevel[0.9], + RoundingRadius -> 5, + ImageSize -> {Scaled[0.65], Automatic} + ] + ], + "MoreInfoText", + Deletable -> True, + CellTags -> {"SectionMoreInfoDisclosuresWLSystemSymbols"}, + CellMargins -> {{66, 66}, {15, 15}} + ], + HoldComplete[EvaluationCell[]], + "Click for more information" + }, + "InlineMoreInfoOpenerButtonTemplate" + ] }, "RowDefault" ] @@ -4984,14 +5016,15 @@ Notebook[ Deletable -> False, CellMargins -> {{Inherited, Inherited}, {5, Inherited}}, TaggingRules -> { - "CheckboxData" -> "OEM6eJyFVM1uEzEQpm3SJm3VXkBInCzErY24I9Sq2bQQKSFRHKlXnPVsYuK1Vx5v2+VFeBkeAQ68AuKIeAZmvUmaVi3sZe3xzOdvfj6fNVq8zn2hgW8Pcp/lvsV3ohnEc5DJE6z1FJKl3vWQYrJR7ZNNrI1yDbTfGtnrchvMG9gYieu2vQEk294Y0kwLD2RIapULZx2FsbaYO8DLHi+QcCNrEjXNnfCKVnWsRaA1ge1QYEd4kWxj48KJNABtVsf8x1Y0sxaB+ZlCZrMylqmEFTZ3LBOxBs+kchB7XTBpAZkwBbMJ+QNLrNb2Wpnpm92fX76yyAHRRJaBQyIJxjNtY6EZxjOQlKhkXuAcg3PfSpUo8r7sMQz8mXUMzJVy1qRlLIL3hH3P/e3Rq6Hws6OTY1p2AjPrinJL4ahSpYULEV2DXmhNhKVUZVpEpEoIS1cJGRgJJibQdfbHLF1eFbzIn5ZYpBNLWDb3qCQsCzDMJ1rhDNzHYUBuC4QPVOGPLLbGw42/UxfCU2lmHREw1rSyMjimLEaAVO0YBpNPlM3RSRVsquC+mFPoBRXFnxu5IBeHHuMiTw+uTG4mjNRUer7ftw66JrFjYrAcMtxti3g+dTY3koai+c6JogdXoF0Svj+nK8/9MCV94abKYPT0FiHYw5DfRfj+rfx+3yIcjMprqHkjIVWOUX110uymYgpcfYa1cd/mNCUgFzi/TrF5lnubUpLxI8k0O2VjxISWtbHLYXXQKKd6LKYrkfHXnIpK1Vri/Fc5S6i9EmpRhRXZxT9qR+3V+jA6pNv231stI0tapYkhyR+cXwmdB8igtBcRdXtOmnHURAdMEReXhnP+smu0MrCkOKDRBNfOvbdmqX7+/FYo8Tpf/uzBNFq8MXSWpOiLRz12BkHvmGzdfZD+mTq10NDEKw9ybbkqRv2eserKOUkwdKt+ITTCQ32sTspX0+o8Nbg2BC1+EKY8c+Qbcm6emYLnE3oiWnx/qZ9xkdHrWynxL9i8CFw=" + "CheckboxData" -> "OEM6eJyNVMFy0zAQpSVuEpJJDnAqFw03DuEXOonTlsykk46VmV5R7HWiiSx5tFJb8wV8HPwFR4ZvYO3EbkiBwRevdrVPu/ueNO6MeMBdoYCfLbzLvRvxdriBeAtJ+gJbc4nkCWYOMkxPduv0FFuRV0Drl5F5KJelm7++m7OVl8qNpGZYZCujypxOJB4m5hGQNvaWkOVKOCBH2trnnU8lxsqgt4B3c14gHcb36QG2QlCKYNqUMhVOpGfYubIiqyBOd2H+5STcGIPA3EYiM7mTRjOZssJ4y3IRK3AskRZipwqWmUSmEpAlkEoty72Ukz6rnaGPN0wggZbQFNjV9okZy4zbgCWfA6uFYrEh69HhB96/MRZmOjVLWtejwlcTEW/X1nidUC/dayuKOdyDsmn1/bxodvar5m6EXUuN4ZsnhMpfUfU7wrev5ffjCWEQlcdIvY5EIj2GQRPpzjKxBi4/Q00aQZ3xWChI9jjfL7A79s5kwsn4L810p0ADFSsyW0vroQl0SjKWYt1Ihb/nNHMacI3zD6prkF4Jsu+/KXP/DyfhpLGH4ZDO6X80KgkNyQockGQHl/dCeVEeWknjPFQy3rKUOMuoCKKMzKyK83czraSGurhFDhrsxDtndC1UPjyqc8Q7t9bkYF3Bewft0L1ZVLrDWtj/1RFxoklJ0kFyYDY9BkfO3ZgvE7kbf3AlFMKfiDmKNMzwt4c1P+utHRrlM40HIhjxwayUeW4Juhpbd6wL7lcI9DT0I0C6ZDEsi5zekNvqrv0CBTKNJA==" }, CellTags -> { "CheckboxCell", - "WLSystemConfiguration", - "WLSystemConfiguration-Checkboxes" + "Disclosures", + "Disclosures-Checkboxes", + "Disclosures-WLSystemSymbols" }, - CellID -> 406353161 + CellID -> 230524661 ], Cell[ BoxData[ @@ -5010,6 +5043,7 @@ Notebook[ "\" \"", TemplateBox[ { + "\"OS configuration\"", TemplateBox[ { "DisclosuresOSConfiguration", @@ -5017,40 +5051,7 @@ Notebook[ BoxData[ FrameBox[ Cell[ - TextData[ - { - "Choose this option if your paclet directly does any of the following:\n\[FilledSmallSquare] Modifies OS settings\n\[FilledSmallSquare] Makes any use of ", - Cell[ - BoxData[ - StyleBox[ - TagBox[ - ButtonBox[ - StyleBox[ - "SystemCredential", - "SymbolsRefLink", - ShowStringCharacters -> True, - FontFamily -> "Source Sans Pro" - ], - BaseStyle -> - Dynamic[ - FEPrivate`If[ - CurrentValue["MouseOver"], - {"Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, - {"Link"} - ] - ], - ButtonData -> "paclet:ref/SystemCredential", - ContentPadding -> False - ], - MouseAppearanceTag["LinkHand"] - ], - ShowStringCharacters -> True, - FontFamily -> "Source Sans Pro" - ] - ] - ] - } - ], + "Choose this option if your paclet directly does any of the following:\n\[FilledSmallSquare] Modifies OS settings\n\[FilledSmallSquare] Makes any use of <+SystemCredential+>", "MoreInfoText" ], Background -> GrayLevel[0.95], @@ -5069,8 +5070,7 @@ Notebook[ "Click for more information" }, "InlineMoreInfoOpenerButtonTemplate" - ], - "\"OS configuration\"" + ] }, "RowDefault" ] @@ -5104,14 +5104,15 @@ Notebook[ Deletable -> False, CellMargins -> {{Inherited, Inherited}, {5, Inherited}}, TaggingRules -> { - "CheckboxData" -> "OEM6eJx9VF1uGjEQLgkESBDpQ5/yZPWtirhAVTWCJWmRgogwF3B2x2DhtVceO2R7gt6gl+kR2ktUfax6hs7uwoZEafyy4/n5PDPfzA47A97iPtfAj2bBZ8EPeDtaQbyGRL7C5rVC0rQmHlKUjeouD7A5Dxrofji3m+JaqhvYmYvNyN4Dku5kAWmmhQdSyGblws/GCmNtMTjAGY+skWoZnPCKpBY2I9CaYNoUMhZeyCPsXDmRlhAHlZl/bUQraxGYXylkNitimZIst8GxTMQaPEuUg9jrnCUWkAmTMyvJH5i0WtuNMsv3x7++fWdTmyipyGXGGYL3ZMDKINbbwEAvUfCHc54jNSFykIDxSujzj7w3tQ4mRtoF3NddweORiNdLZ4NJqJbuJyfya7gD7WR5/l7Unr2yuKlwS2UwevOAUOpLVh4j/PxRnD8PCP158QylPReJChi1akt3koolcPUF9vg54rHQkGxxfl9gdxi8Tan/8X+K6Y6BGipuSWwuXIDa0CnIWIhlPRX8HaeeExk7nBeo3oGcFCDb+us0t99oFI1q+TQ6pXd6n61OIktjBR5oOvuXd0KHErIcjbNIq3hNJDuWUhJMURYuLe387cRoZWCX3CwDA24UvLdmN6j8NY1BvJ8oP32S+YB3bpzNwPn8GVt7Vk4jysPHi/JincSUWYFTHpI9sa689URZNf8yURUprSuhEZ6jq7IU22x1SA3ucT3g/Ynx4DJHvmWd3aHJebilHRjw3hyQdimGRZ7RX+GmXKl/fRB8PA==" + "CheckboxData" -> "OEM6eJyNVF1uEzEQpiW/bZTwwFN5sXhDVS6AEFXithCpVao4F3B3ZxMrXnvlsZsuJ+AGXIYjwCUQj4gzMLvJbtPwI/yy9ozn83zzzeyoMxRN4XMNojUNPgt+KNp8CdEK4uQJNq4UkqU58ZBicrA5J4fYmAUNdH46s+viWJjFs6lgkTWJWgQnvaLdAXZmcj2294B063gOaaalBzIkjW3QybnCSFsMDnAq+KPwJjY4aE0wbQo5l14mLexcOpmWEIcbt/h4wJfWIjC/VMhsVsQylbDcBscyGWnwLFYOIq9zFltAJk3ObEL3gSVWa7tWZvH66Nunz+zaxipRdIW4IHhPDtw45GobGOglCn5zKnKksnAHMRivpD59K3rX1sHEJHYO93Wd8Ggso9XC2WBi4tJ952R+BXegXVKun2f1zV5J7lq6hTLInz8glPZSp8cIX78U68cDQn9WPENpz2SsAvJm7elOUrkAoT5ApRhBtUQkNcRbnO9n2B0Fb1Oqf/QXMt1zoILKW9o25i5A7egUYszlou4T8UpQzUmMCucfUlcgxwXIln+d5vbLx3xc7wd8QO/03lsdc0ttBR6oX/sXd1KHErJsjROuVbQikR1LKQmmKAuXln7xcmK0MlAlN83AgBsH762pGlUM9vIcis6Nsxk4n4vjHTo0NNOy77Bq7P9iRJqYJTjlId7Z1hybe8ZNmS9itSl/81JqhD8Js+eplREvdnP+jVubWx1SgztNMBT9ifHgMkfQZdm6I5OLcEvDMRS9GSANWQTzPKMfyE05a78Ax3SL9Q==" }, CellTags -> { "CheckboxCell", - "OSConfiguration", - "OSConfiguration-Checkboxes" + "Disclosures", + "Disclosures-Checkboxes", + "Disclosures-OSConfiguration" }, - CellID -> 787398734 + CellID -> 563151195 ], Cell[ BoxData[ @@ -5130,6 +5131,7 @@ Notebook[ "\" \"", TemplateBox[ { + "\"Local system interactions\"", TemplateBox[ { "DisclosuresLocalSystemInteractions", @@ -5137,41 +5139,7 @@ Notebook[ BoxData[ FrameBox[ Cell[ - TextData[ - { - "Choose this option if your paclet directly does any of the following:\n\[FilledSmallSquare] Executes Shell or RUN commands\n\[FilledSmallSquare] Uses external evaluators via ", - Cell[ - BoxData[ - StyleBox[ - TagBox[ - ButtonBox[ - StyleBox[ - "ExternalEvaluate", - "SymbolsRefLink", - ShowStringCharacters -> True, - FontFamily -> "Source Sans Pro" - ], - BaseStyle -> - Dynamic[ - FEPrivate`If[ - CurrentValue["MouseOver"], - {"Link", FontColor -> RGBColor[0.8549, 0.39608, 0.1451]}, - {"Link"} - ] - ], - ButtonData -> "paclet:ref/ExternalEvaluate", - ContentPadding -> False - ], - MouseAppearanceTag["LinkHand"] - ], - ShowStringCharacters -> True, - FontFamily -> "Source Sans Pro" - ] - ] - ], - "\n\[FilledSmallSquare] Interacts with external libraries\n\[FilledSmallSquare] Reads or writes to streams or sockets\n\[FilledSmallSquare] Launches parallel kernels, subkernels or GPUs" - } - ], + "Choose this option if your paclet directly does any of the following:\n\[FilledSmallSquare] Executes Shell or RUN commands\n\[FilledSmallSquare] Uses external evaluators via <+ExternalEvaluate+>\n\[FilledSmallSquare] Interacts with external libraries\n\[FilledSmallSquare] Reads or writes to streams or sockets\n\[FilledSmallSquare] Launches parallel kernels, subkernels or GPUs", "MoreInfoText" ], Background -> GrayLevel[0.95], @@ -5190,8 +5158,7 @@ Notebook[ "Click for more information" }, "InlineMoreInfoOpenerButtonTemplate" - ], - "\"Local system interactions\"" + ] }, "RowDefault" ] @@ -5225,14 +5192,15 @@ Notebook[ Deletable -> False, CellMargins -> {{Inherited, Inherited}, {5, Inherited}}, TaggingRules -> { - "CheckboxData" -> "OEM6eJyNVM1uEzEQpm3SJm3UXpAQnKxeSw5cEaJqtmmJlNJqnT6AszubWPHaK4+ddHkRrjwIjwAvgTginoFZb35aRCv2svb8fP4883nOWl3e5K5UwHevvSu86/K9aArJDNLsGTaGEsnSHDjIMduq99k2NmKvgPY7sVlU22DewlYsFj1zB0i2gxHkhRIOyJA16hB+fC4xUQa9BRyaRCheIkEPtAMrEieNxqyJjQiUIrg9Sj0XTmS72LqwIg9Q27Wbf9mOpsYgMDeVyExRJTOZsdJ4ywqRKHAslRYSp0qWGkAmdMlMRvHAMqOUWUg9ebv/4/NX1r+DxDsK4VOCZsay+PYjS0yeC51iCLlFcsMd8dRCMZgL5YUzFtlcCvbupL/09GsHnLwPWauLIVtIN93kKzm2wkqosWMQKVanLqysWDjD0FkQeTCioWa4OnIovE6mFFIIK5QCxWYECApfM/Tj5bpKury5Rd65MhYGOjMjOnjVNdzviWQ2scbrlGrcvrSiHMIclM3C9/t0HdkJRb8SdiI1Rs83CMEeVPMQ4fu36vu1QTiMq2OozrFIpceoufa0B7mYAJef4J5+djlJAtIlzs9TbJ95Z3LhZPLIZdrnQI0WY1o2RtbD2tGqRDISk7Vq+RsOQWErnP+Q4grsoAJb1mFNd/mPelFvvT6Kjui8zgej0siQ/MEBvaLDpSoIM0j3VaRkMiMRWpYTGSaJjc2Dnx8PtJIaViSvC9Bge945o1cPir8MfBkGwpS9YcxfPHKVLm/dWFOAdeUTMXvXRX3xnYcv/ckCUCv1FCrlpveW65I0/zLW3emnsu5a80IohH/1s/ZU48gon2u8J4YuPwzEC0uxoWztM11yP0agadWJAWkIJDAqCxprN2EW/AF5ZskH" + "CheckboxData" -> "OEM6eJyNVE1uEzEUhpK0SRuVDRKClVWWJQu2CFE107RESmk1Tg/gzLxJrHjskZ/ddLgIWw7CEeASiCXiDLzxJNO0oojZjP1+vvf3PR93+rzNXamAb194V3jX5zvRHJIFpNkjbI0lkqQ9cpBj9ri+Z1vYir0Cuj+JzbK6VmL+YmwSoRiWSNZMagdWJE4aXXl2YrEcmBtAMt+bQF4o4YAEWWvlfXAiMVEGvQUMQDzgjDZh2tiKQCmC2yHXE+FEto2dUyvyALVVq/mXrWhuDAJzc4nMFJUzkxkrjbesEIkCx1JpIXGqZKkBZEKXzGRkDywzSpml1LO3uz8+f2XDG0i8IxM+J2hmLIuvPrLE5LnQKQaTKyQ13FCemsqHa6G8cMYiu5aCvTscrjTDWgGH74PXujBkS+nmt/5KTq2wEmrsGESKVdSllVUWzjB0FkQehGhoTq62HAuvkzmZFMIKpUCxBQGCwtcM/XR1rpzOLq+Q986NhZHOzIQCrweKuwORLGbWeJ1Sj7tnVpRjuAZls/D9Pmose6Hp58LOpMbo2S1CkAdC3UX4/q36ft0i7MdVGOpzLFLpMWo3mu4oFzPg8hOsqUVQ25woAekK5+cRdo+9M7lwMnmgmO4J0KDFlI6tifXQKDoVSSZi1hCav+EQGLbG+Q8qrsH2KrBVH5p0V/9oEA2a89PoKcXrfTAqjQzRHxzQgu2vWEGYgbovIyWTBZHQspySoS2iYx70/GCkldSwTvKiAA124J0zer1Q/PkD+fZ559KaAqwr+d5GebTtF0VdUevudv+zMpqRnkNFyXTj2NTavies2z5MZT2O9qlQCH8b1D1NMyn+ajPnB2vciYzyucYNcvT5frApLIUIbewe65L7KQI9bL0YkB6FBCZlQS/gZXgb/gAVUNjA" }, CellTags -> { "CheckboxCell", - "LocalSystemInteractions", - "LocalSystemInteractions-Checkboxes" + "Disclosures", + "Disclosures-Checkboxes", + "Disclosures-LocalSystemInteractions" }, - CellID -> 595267108 + CellID -> 670672081 ], Cell[ BoxData[ @@ -5251,6 +5219,7 @@ Notebook[ "\" \"", TemplateBox[ { + "\"Other\"", TemplateBox[ { "DisclosuresOther", @@ -5277,8 +5246,7 @@ Notebook[ "Click for more information" }, "InlineMoreInfoOpenerButtonTemplate" - ], - "\"Other\"" + ] }, "RowDefault" ] @@ -5312,10 +5280,15 @@ Notebook[ Deletable -> False, CellMargins -> {{Inherited, Inherited}, {5, Inherited}}, TaggingRules -> { - "CheckboxData" -> "OEM6eJx9U9ty2jAQbRIMpmFIH/rUl2r6Tn8hAyZpmUmGjMUPLNYaNMiSRxeI+43tX/Sx02/o2oAhvelFq72cvZzVOB7xiPtKIe/Ogy+DH/FessZsgyJ/5ToP0pEmmnksXH6xf+eXrpMGhfS+Ss2ufjbqCxensJuYZ3Sku15gUSrwSIq8s3fhb6bSZcq4YNHN/RptHrlOgkpRcI8cp+Ah77r43kLRBF7uzdyNhWAghPTSaFDM47Nn4JhGFCiY1AxI3rGMnNkSldkxb5gwWShQk6euzqPFqQrm10B2i0wbzxQVSXCwNFv8yAePxuJM52ZB2Y5du9cTyDYra4IWVHX/k4XqAbeobN6cn7et56Bp4xHsSmqXvD0hNPpm6i8Rvn2tz48TwjCt00i9SkHI4JKotfRnBayQyy94Nv8uz0ChOOB8v3X9cfCmAC+zfzTTn6JCD0sSOwsbsDXE9dgXsGpZ5+85ZvX8jjh/UHkMva5DD123xR3uZJJMWvkmuSH0wWejRGJoWdAj7dzwbgsqQJ2qof5domS2YbmxrKDUxDWJRWPnH2ZaSY3HkuYlarST4L3Rx/XjUVPd4Rrx+MmaEq2vWk1vXtZgLr96ud//bYQI0BQtaV3OxLa16DflfqZ3tIHNrKN7UA7/xsLeUn9Co0Kh3RmFIz6caY+2tOTbtN8f64qHpUP6o4MUnQk2w0VV0md+gowgfwHj7V7a" + "CheckboxData" -> "OEM6eJyNU91u0zAUhtGsLa06kLjiBov78gpTm25QaVOnui9wGp+0Vh078k+77BnhLbhEPAMnaZKWARK+8fH5+c7f50lvzCPuC4X8chF8HvyYd+MtJjsU6QvXuZOONNHcY+bSl8d3euE6y6CQ3q+W5lA+SzWPFn6LlrS9JRym5hEdmQYrzHIFHkmRdmrPNzPpEmVcsOiOQZHrxKgUBXfJcQYe0kvXu7WQVYEXRzN3EyEYCCG9NBoU8/joGTimEQUKJjUDkg8sIWe2RmUOzBsmTBIy1OSpi/NocaqC+S2Q3SLTxjNFRRIcrM0eP/HhvbE416lZUbamefd6CsluY03Qgqruf7ZQ3OEelU2r8/O69RxWbdyD3Ujt4ncnhEpfDf93hG9fy/PjhDBalmmk3ixByODiqLX05xlskMsnbNZAUJc8AYWixvl+7fqT4E0GXib/aKY/Q4Ue1iR2VjZga+iVY1/Bpl0+/8AxKefX4PyxyiZ0UIbWXbfF1Xc8jaetfBVfEfrwi1EiNkQW9EjUG93sQQUoU1Wrfx8rmexYaizLKDXtmsSssvOPc62kxqakRY4a7TR4b3RDv5qdY957sCZH6ws+OCudWL/ISyzXkPS/+qD5a0KVxJYzse0seqY8jvSGCFiNOroF5fBvS3hmabfA357XXHfUjY0KmXZnax7z0Vx7tLklwGpE/YkueFg7pO88XKIzwSa4KnL69w+QUN5fC7dukw==" + }, + CellTags -> { + "CheckboxCell", + "Disclosures", + "Disclosures-Checkboxes", + "Disclosures-Other" }, - CellTags -> {"CheckboxCell", "Other", "Other-Checkboxes"}, - CellID -> 641642549 + CellID -> 14186222 ] }, Open @@ -5422,34 +5395,7 @@ Notebook[ ] ] }, - DockedCells -> { - Cell[ - BoxData[TemplateBox[{}, "MainGridTemplate"]], - "DockedCell", - CellMargins -> {{-10, -10}, {-8, -8}}, - CellFrame -> 0, - Background -> RGBColor[0.33333, 0.33333, 0.33333], - CellTags -> {"MainDockedCell"}, - CacheGraphics -> False - ], - Cell[ - BoxData[TemplateBox[{}, "ToolsGridTemplate"]], - "DockedCell", - TaggingRules -> {"Tools" -> True}, - CellTags -> {"ToolbarDockedCell"}, - CellFrameMargins -> {{0, 0}, {2, 2}}, - CellFrame -> {{0, 0}, {1, 0}}, - CacheGraphics -> False, - CellOpen -> - Dynamic[ - CurrentValue[ - EvaluationNotebook[], - {TaggingRules, "ToolsOpen"}, - True - ] - ] - ] - }, + WindowTitle -> "SamplePublisher/AdvancedSamplePaclet | Definition Notebook", TaggingRules -> { "CompatibilityTest" -> HoldComplete[ @@ -5464,17 +5410,18 @@ Notebook[ "ResourceCreateNotebook" -> True, "ResourceType" -> "Paclet", "RuntimeConfiguration" -> { + "Contexts" -> {"PacletResource`", "PacletResource`DefinitionNotebook`"}, + "DefaultContentMethod" -> "Tagged", + "HintPods" -> True, "LoadingMethod" -> "Paclet", "PacletName" -> "PacletResource", - "Contexts" -> {"PacletResource`", "PacletResource`DefinitionNotebook`"}, - "DefaultContentMethod" -> "Tagged" + "SourceID" -> "28e913fdefe16776d9d4a0b6f7e1ad001e3994de" }, "SubmissionReviewData" -> {"Review" -> False}, "ToolsOpen" -> False, - "UpdatedTimestamp" -> 3.8696*^9, - "TemplateVersion" -> "1.5.62", - "StatusMessage" -> "", - "AutoUpdate" -> True + "UpdatedTimestamp" -> 3.8729*^9, + "TemplateVersion" -> "1.5.93", + "StatusMessage" -> "" }, CreateCellID -> True, DynamicEvaluationTimeout -> 60, @@ -5520,7 +5467,8 @@ Notebook[ }, CellLabelAutoDelete -> False, CodeAssistOptions -> {"AutoDetectHyperlinks" -> False}, - AutoQuoteCharacters -> { } + AutoQuoteCharacters -> { }, + PasteAutoQuoteCharacters -> { } ], Cell[ StyleData[ @@ -7390,7 +7338,7 @@ Notebook[ StripOnInput -> False ], { - "\"Insert comment for reviewer\"" :> + "\"Mark/unmark selected cells as comments\"" :> With[ { RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath }, Quiet[ Block[ @@ -7414,7 +7362,7 @@ Notebook[ Annotation[ DefinitionNotebookClient`$ButtonCodeID = - 2572781756330727330; + 3646530685697756512; DefinitionNotebookClient`CheckForUpdates[ RSNB`nb$, @@ -7424,20 +7372,20 @@ Notebook[ DefinitionNotebookClient`$ClickedButton = "Cells"; DefinitionNotebookClient`$ClickedAction = - "Insert comment for reviewer"; + "Mark/unmark selected cells as comments"; - DefinitionNotebookClient`CommentInsert[] + DefinitionNotebookClient`CommentToggle[] ] ] ], - DefinitionNotebookClient`ButtonCodeID[2572781756330727330] + DefinitionNotebookClient`ButtonCodeID[3646530685697756512] ], DefinitionNotebookClient`$ButtonsDisabled = False; ]; ] ] ], - "\"Mark/unmark selected cells as comments\"" :> + "\"Mark/unmark selected cells as excluded\"" :> With[ { RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath }, Quiet[ Block[ @@ -7461,7 +7409,7 @@ Notebook[ Annotation[ DefinitionNotebookClient`$ButtonCodeID = - 3646530685697756512; + 1866935765212102190; DefinitionNotebookClient`CheckForUpdates[ RSNB`nb$, @@ -7471,20 +7419,20 @@ Notebook[ DefinitionNotebookClient`$ClickedButton = "Cells"; DefinitionNotebookClient`$ClickedAction = - "Mark/unmark selected cells as comments"; + "Mark/unmark selected cells as excluded"; - DefinitionNotebookClient`CommentToggle[] + DefinitionNotebookClient`ExclusionToggle[] ] ] ], - DefinitionNotebookClient`ButtonCodeID[3646530685697756512] + DefinitionNotebookClient`ButtonCodeID[1866935765212102190] ], DefinitionNotebookClient`$ButtonsDisabled = False; ]; ] ] ], - "\"Mark/unmark selected cells as excluded\"" :> + "\"Insert comment\"" :> With[ { RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath }, Quiet[ Block[ @@ -7508,7 +7456,7 @@ Notebook[ Annotation[ DefinitionNotebookClient`$ButtonCodeID = - 1866935765212102190; + 8817953515714839566; DefinitionNotebookClient`CheckForUpdates[ RSNB`nb$, @@ -7516,15 +7464,12 @@ Notebook[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Cells"; - - DefinitionNotebookClient`$ClickedAction = - "Mark/unmark selected cells as excluded"; - - DefinitionNotebookClient`ExclusionToggle[] + DefinitionNotebookClient`$ClickedAction = "Insert comment"; + DefinitionNotebookClient`CommentInsert[] ] ] ], - DefinitionNotebookClient`ButtonCodeID[1866935765212102190] + DefinitionNotebookClient`ButtonCodeID[8817953515714839566] ], DefinitionNotebookClient`$ButtonsDisabled = False; ]; @@ -7860,526 +7805,318 @@ Notebook[ { GraphicsBox[ { - Thickness[0.015385], - StyleBox[ - { - FilledCurveBox[ + Thickness[0.0025], + { + FaceForm[ + {RGBColor[0.96078, 0.50588, 0.19608], Opacity[1.0]} + ], + FilledCurveBox[ + { + {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, + {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, { - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}} + {0, 2, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0} }, { - { - {19.297, 56.875}, - {32.5, 64.492}, - {45.703, 56.875}, - {32.5, 49.258}, - {19.297, 56.875} - }, - { - {21.328, 56.875}, - {32.5, 63.324}, - {43.672, 56.875}, - {32.5, 50.426}, - {21.328, 56.875} - }, - { - {33.008, 33.262}, - {33.008, 48.496}, - {46.211, 56.113}, - {46.211, 40.879}, - {33.008, 33.262} - } - } - ] - }, - {FaceForm[RGBColor[0.70196, 0.60392, 0.78824, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, - { - { - {31.992, 33.262}, - {18.789, 40.879}, - {18.789, 56.113}, - {31.992, 48.496}, - {31.992, 33.262} - } + {0, 2, 0}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3} } - ] - }, - {FaceForm[RGBColor[0.53725, 0.40392, 0.67451, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ + }, + { { - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}} + {205.0, 22.66}, + {205.0, 212.11}, + {246.02, 235.8}, + {369.07, 306.84}, + {369.07, 117.39}, + {205.0, 22.66} }, { - { - {17.773, 8.8868}, - {4.5703, 16.504}, - {4.5703, 31.738}, - {17.773, 24.121}, - {17.773, 8.8868} - }, - { - {16.758, 10.664}, - {5.5859, 17.113}, - {5.5859, 29.961}, - {16.758, 23.512}, - {16.758, 10.664} - }, - { - {31.484, 32.5}, - {18.281, 40.117}, - {5.0781, 32.5}, - {18.281, 24.883}, - {31.484, 32.5} - } - } - ] - }, - {FaceForm[RGBColor[0.63529, 0.73333, 0.83137, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, - { - { - {31.992, 31.738}, - {18.789, 24.121}, - {18.789, 8.8868}, - {31.992, 16.504}, - {31.992, 31.738} - } - } - ] - }, - {FaceForm[RGBColor[0.2902, 0.40784, 0.57647, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - { - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}} + {30.929, 306.84}, + {153.98, 235.8}, + {195.0, 212.11}, + {195.0, 22.66}, + {30.929, 117.39}, + {30.929, 306.84} }, { - { - {47.227, 8.8868}, - {47.227, 24.121}, - {60.43, 31.738}, - {60.43, 16.504}, - {47.227, 8.8868} - }, - { - {48.242, 10.664}, - {48.242, 23.512}, - {59.414, 29.961}, - {59.414, 17.113}, - {48.242, 10.664} - }, - { - {33.516, 32.5}, - {46.719, 40.117}, - {59.922, 32.5}, - {46.719, 24.883}, - {33.516, 32.5} - } - } - ] - }, - {FaceForm[RGBColor[0.6, 0.6, 0.37255, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, - { - { - {33.008, 31.738}, - {33.008, 16.504}, - {46.211, 8.8868}, - {46.211, 24.121}, - {33.008, 31.738} - } - } - ] - }, - {FaceForm[RGBColor[0.39608, 0.60392, 0.30196, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - { - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}} + {200.0, 410.23}, + {364.07, 315.5}, + {241.02, 244.46}, + {200.0, 220.77}, + {158.98, 244.46}, + {35.929, 315.5}, + {200.0, 410.23} }, CompressedData[ - "\n1:eJxTTMoPSmVmYGBgA2JWIGYC4qvPs7S/hYs5LHLd9vlvi6MDjL/imLd550d3\nB9O4XZ48hwwcQBSTtjecH2G55UTZPhcHdP1zFinv/OMuBNG/0AHOL86Y+LbG\n3sPh5rnvwY+PGkL08/nA+b3T84SaC1ww9F9fXGDLZe4H50+WYAnjm+sOVw/j\nw8yDqYfZh64f7M4tvnD3Pr2gdPunnAfcPzA+zL8w9bDwQNdf+VLNkMPH2IEB\nBBwUoLSDwzTn7pzn1foOLkDq9003DHmZy8LTKhwe2KPrbxcDhYgphnpwOKnq\nOuwpAfr4miuGfKiB1krhC7/s0fUDAHimvy8=\n " + "\n1:eJxTTMoPSmViYGCQAWIQ3fo6cIdcZ7nDwyqRde5/ix0YQCAgE8J3rXJIAwG5\nTIc3QGWtwVUOs2YCwcMMOB+sfkMGXP3z3ys/Xso1h5uXL9R84NRDU4friwts\nud4XQ+TfmjgU2nJdX3wFwQebswONvyAGzgcpL9CNgZu3BGjc9cPRcPuqgdY9\n7IqGu+dzX3CJSrgyxJ4TGQ6m7y1c3YuUHEDKqp5kOMi8fmQmxaAEUc+QCeeD\n/SWN4Pcf+qoRY54J1w8LH5j5sPCD2R8E1P56YTncfWD5jeVw98P4MP+h8IH+\nh/Fh4QMzDxZ+6PEFAOibv7E=\n " ] - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.55294, 0.67451, 0.81176], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {7.1094, 32.5}, - {7.1094, 31.098}, - {5.9726, 29.961}, - {4.5703, 29.961}, - {3.168, 29.961}, - {2.0312, 31.098}, - {2.0312, 32.5}, - {2.0312, 33.902}, - {3.168, 35.039}, - {4.5703, 35.039}, - {5.9726, 35.039}, - {7.1094, 33.902}, - {7.1094, 32.5} - } + {43.0, 198.67}, + {107.71, 161.31}, + {107.71, 86.587}, + {43.0, 123.95}, + {43.0, 198.67} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.31373, 0.4549, 0.61176], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {20.82, 56.367}, - {20.82, 54.965}, - {19.684, 53.828}, - {18.281, 53.828}, - {16.879, 53.828}, - {15.742, 54.965}, - {15.742, 56.367}, - {15.742, 57.769}, - {16.879, 58.906}, - {18.281, 58.906}, - {19.684, 58.906}, - {20.82, 57.769}, - {20.82, 56.367} - } + {182.78, 198.67}, + {182.78, 123.95}, + {118.06, 86.587}, + {118.06, 161.31}, + {182.78, 198.67} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.78039, 0.86275, 0.94902], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {20.82, 40.625}, - {20.82, 39.223}, - {19.684, 38.086}, - {18.281, 38.086}, - {16.879, 38.086}, - {15.742, 39.223}, - {15.742, 40.625}, - {15.742, 42.027}, - {16.879, 43.164}, - {18.281, 43.164}, - {19.684, 43.164}, - {20.82, 42.027}, - {20.82, 40.625} - } + {112.89, 245.0}, + {177.6, 207.64}, + {112.89, 170.27}, + {48.174, 207.64}, + {112.89, 245.0} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.6902, 0.58824, 0.81176], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {20.82, 24.375}, - {20.82, 22.973}, - {19.684, 21.836}, - {18.281, 21.836}, - {16.879, 21.836}, - {15.742, 22.973}, - {15.742, 24.375}, - {15.742, 25.777}, - {16.879, 26.914}, - {18.281, 26.914}, - {19.684, 26.914}, - {20.82, 25.777}, - {20.82, 24.375} - } + {130.03, 350.12}, + {194.8, 312.72}, + {194.8, 237.93}, + {130.03, 275.32}, + {130.03, 350.12} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.46275, 0.36078, 0.61176], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {20.82, 8.6329}, - {20.82, 7.2306}, - {19.684, 6.0938}, - {18.281, 6.0938}, - {16.879, 6.0938}, - {15.742, 7.2306}, - {15.742, 8.6329}, - {15.742, 10.035}, - {16.879, 11.172}, - {18.281, 11.172}, - {19.684, 11.172}, - {20.82, 10.035}, - {20.82, 8.6329} - } + {269.93, 350.12}, + {269.93, 275.32}, + {205.16, 237.93}, + {205.16, 312.72}, + {269.93, 350.12} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.88627, 0.80392, 0.95294], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {35.039, 48.75}, - {35.039, 47.348}, - {33.902, 46.211}, - {32.5, 46.211}, - {31.098, 46.211}, - {29.961, 47.348}, - {29.961, 48.75}, - {29.961, 50.152}, - {31.098, 51.289}, - {32.5, 51.289}, - {33.902, 51.289}, - {35.039, 50.152}, - {35.039, 48.75} - } + {199.98, 396.48}, + {264.75, 359.09}, + {199.98, 321.69}, + {135.21, 359.09}, + {199.98, 396.48} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.66275, 0.80392, 0.56863], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {35.039, 32.5}, - {35.039, 31.098}, - {33.902, 29.961}, - {32.5, 29.961}, - {31.098, 29.961}, - {29.961, 31.098}, - {29.961, 32.5}, - {29.961, 33.902}, - {31.098, 35.039}, - {32.5, 35.039}, - {33.902, 35.039}, - {35.039, 33.902}, - {35.039, 32.5} - } + {217.61, 199.14}, + {281.9, 162.02}, + {281.9, 87.791}, + {217.61, 124.91}, + {217.61, 199.14} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.43137, 0.60392, 0.3451], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {35.039, 16.25}, - {35.039, 14.848}, - {33.902, 13.711}, - {32.5, 13.711}, - {31.098, 13.711}, - {29.961, 14.848}, - {29.961, 16.25}, - {29.961, 17.652}, - {31.098, 18.789}, - {32.5, 18.789}, - {33.902, 18.789}, - {35.039, 17.652}, - {35.039, 16.25} - } + {356.47, 199.14}, + {356.47, 124.91}, + {292.18, 87.791}, + {292.18, 162.02}, + {356.47, 199.14} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[{RGBColor[0.8549, 0.9451, 0.8], Opacity[1.0]}], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {49.258, 56.367}, - {49.258, 54.965}, - {48.121, 53.828}, - {46.719, 53.828}, - {45.316, 53.828}, - {44.18, 54.965}, - {44.18, 56.367}, - {44.18, 57.769}, - {45.316, 58.906}, - {46.719, 58.906}, - {48.121, 58.906}, - {49.258, 57.769}, - {49.258, 56.367} - } + {287.04, 245.16}, + {351.33, 208.04}, + {287.04, 170.93}, + {222.75, 208.04}, + {287.04, 245.16} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.66275, 0.80392, 0.56863], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {49.258, 40.625}, - {49.258, 39.223}, - {48.121, 38.086}, - {46.719, 38.086}, - {45.316, 38.086}, - {44.18, 39.223}, - {44.18, 40.625}, - {44.18, 42.027}, - {45.316, 43.164}, - {46.719, 43.164}, - {48.121, 43.164}, - {49.258, 42.027}, - {49.258, 40.625} - } + {356.47, 215.77}, + {296.28, 250.59}, + {356.47, 285.27}, + {356.47, 215.77} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.66275, 0.80392, 0.56863], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {49.258, 24.375}, - {49.258, 22.973}, - {48.121, 21.836}, - {46.719, 21.836}, - {45.316, 21.836}, - {44.18, 22.973}, - {44.18, 24.375}, - {44.18, 25.777}, - {45.316, 26.914}, - {46.719, 26.914}, - {48.121, 26.914}, - {49.258, 25.777}, - {49.258, 24.375} - } + {217.61, 114.06}, + {277.79, 79.24}, + {217.61, 44.566}, + {217.61, 114.06} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.55294, 0.67451, 0.81176], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {49.258, 8.6329}, - {49.258, 7.2306}, - {48.121, 6.0938}, - {46.719, 6.0938}, - {45.316, 6.0938}, - {44.18, 7.2306}, - {44.18, 8.6329}, - {44.18, 10.035}, - {45.316, 11.172}, - {46.719, 11.172}, - {48.121, 11.172}, - {49.258, 10.035}, - {49.258, 8.6329} - } + {122.17, 78.363}, + {182.42, 113.07}, + {182.36, 43.614}, + {122.17, 78.363} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.55294, 0.67451, 0.81176], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {62.969, 32.5}, - {62.969, 31.098}, - {61.832, 29.961}, - {60.43, 29.961}, - {59.027, 29.961}, - {57.891, 31.098}, - {57.891, 32.5}, - {57.891, 33.902}, - {59.027, 35.039}, - {60.43, 35.039}, - {61.832, 35.039}, - {62.969, 33.902}, - {62.969, 32.5} - } + {103.52, 249.47}, + {43.272, 214.76}, + {43.335, 284.22}, + {103.52, 249.47} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ] + } + ] + }, + { + FaceForm[ + {RGBColor[0.6902, 0.58824, 0.81176], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {120.87, 350.62}, + {120.8, 281.08}, + {60.68, 315.87}, + {120.87, 350.62} + } + } + ] + }, + { + FaceForm[ + {RGBColor[0.6902, 0.58824, 0.81176], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {278.37, 281.22}, + {278.44, 350.75}, + {338.56, 315.96}, + {278.37, 281.22} + } + } + ] + } }, { ImageSize -> {Automatic, 32}, @@ -8460,6 +8197,7 @@ Notebook[ "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", + "\[SpanFromLeft]", TemplateBox[ { StyleBox[ @@ -8477,135 +8215,20 @@ Notebook[ ] }, { - TemplateBox[ - { - TemplateBox[ - { - "\"Guidelines\"", - "\"View general guidelines for authoring paclets\"" - }, - "PrettyTooltipTemplate" - ], - Function[ - Annotation[ - - DefinitionNotebookClient`$ButtonCodeID = - 5906117565281445171; - - ( - DefinitionNotebookClient`$ClickedButton = - "Style Guidelines"; - - DefinitionNotebookClient`ViewStyleGuidelines[ - ButtonNotebook[] - ]), - DefinitionNotebookClient`ButtonCodeID[5906117565281445171] - ] - ], - "\"View general guidelines for authoring paclets\"", - False - }, - "OrangeButtonTemplate" - ], - TemplateBox[ - { - TemplateBox[ - { - TagBox[ - GridBox[ + ActionMenuBox[ + TemplateBox[ + { + TemplateBox[ + { + TemplateBox[ { - { - "\"Tools\"", - PaneSelectorBox[ - { - False -> - GraphicsBox[ - { - RGBColor[1.0, 1.0, 1.0], - AbsoluteThickness[1.0], - LineBox[{{0, 0}, {0, 10}, {10, 10}, {10, 0}, {0, 0}}], - LineBox[{{5, 2.5}, {5, 7.5}}], - LineBox[{{2.5, 5}, {7.5, 5}}] - }, - ImageSize -> 9, - PlotRangePadding -> 1.5 - ], - True -> - GraphicsBox[ - { - RGBColor[1.0, 1.0, 1.0], - AbsoluteThickness[1.0], - LineBox[{{0, 0}, {0, 10}, {10, 10}, {10, 0}, {0, 0}}], - LineBox[{{2.5, 5}, {7.5, 5}}] - }, - ImageSize -> 9, - PlotRangePadding -> 1.5 - ] - }, - Dynamic[ - CurrentValue[ - EvaluationNotebook[], - {TaggingRules, "ToolsOpen"}, - True - ] - ], - BaselinePosition -> Scaled[0] - ] - } + "\"Open Sample\"", + TemplateBox[{5}, "Spacer1"], + "\"\[FilledDownTriangle]\"" }, - GridBoxAlignment -> {"Columns" -> {{Automatic}}, "Rows" -> {{Baseline}}}, - AutoDelete -> False, - GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, - GridBoxSpacings -> {"Columns" -> {{0.35}}} + "RowDefault" ], - "Grid" - ], - "\"Toggle documentation toolbar\"" - }, - "PrettyTooltipTemplate" - ], - Function[ - Annotation[ - - DefinitionNotebookClient`$ButtonCodeID = - 5074018684552945401; - - (DefinitionNotebookClient`$ClickedButton = "Tools"; - DefinitionNotebookClient`ToggleToolbar[ButtonNotebook[]]), - DefinitionNotebookClient`ButtonCodeID[5074018684552945401] - ] - ], - "\"Toggle documentation toolbar\"", - False - }, - "OrangeButtonTemplate" - ], - TagBox[ - GridBox[ - {{"\"\"", "\"\""}}, - GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Center}}}, - AutoDelete -> False, - GridBoxDividers -> {"ColumnsIndexed" -> {2 -> True}, "Rows" -> {{False}}}, - GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{2}}}, - GridBoxSpacings -> {"Columns" -> {{0.5}}}, - FrameStyle -> RGBColor[1.0, 1.0, 1.0] - ], - "Grid" - ], - ActionMenuBox[ - TemplateBox[ - { - TemplateBox[ - { - TemplateBox[ - { - "\"Check\"", - TemplateBox[{5}, "Spacer1"], - "\"\[FilledDownTriangle]\"" - }, - "RowDefault" - ], - "\"Check notebook for potential errors\"" + "\"View a completed sample definition notebook\"" }, "PrettyTooltipTemplate" ], @@ -8616,13 +8239,13 @@ Notebook[ DefinitionNotebookClient`ButtonCodeID[1898445052439169298] ] ], - "\"Check notebook for potential errors\"", + "\"View a completed sample definition notebook\"", True }, "OrangeButtonTemplate" ], { - "\"Definition Notebook\"" :> + "\"Basic\"" :> With[ { RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath }, Quiet[ Block[ @@ -8651,26 +8274,20 @@ Notebook[ Annotation[ DefinitionNotebookClient`$ButtonCodeID = - 4301941258590251066; + 3934291920460873112; DefinitionNotebookClient`CheckForUpdates[ RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ - DefinitionNotebookClient`$ClickedButton = "Check"; - - DefinitionNotebookClient`$ClickedAction = - "Definition Notebook"; - - PacletResource`DefinitionNotebook`CheckPacletNotebook[ - ButtonNotebook[], - "DefinitionNotebook" - ] + DefinitionNotebookClient`$ClickedButton = "Open Sample"; + DefinitionNotebookClient`$ClickedAction = "Basic"; + PacletResource`DefinitionNotebook`ViewSamplePaclet["Basic"] ] ] ], - DefinitionNotebookClient`ButtonCodeID[4301941258590251066] + DefinitionNotebookClient`ButtonCodeID[3934291920460873112] ], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = @@ -8681,7 +8298,7 @@ Notebook[ ] ] ], - "\"Paclet Files\"" :> + "\"Advanced\"" :> With[ { RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath }, Quiet[ Block[ @@ -8710,23 +8327,22 @@ Notebook[ Annotation[ DefinitionNotebookClient`$ButtonCodeID = - 1312802444570235546; + 7566953809767785517; DefinitionNotebookClient`CheckForUpdates[ RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ - DefinitionNotebookClient`$ClickedButton = "Check"; - DefinitionNotebookClient`$ClickedAction = "Paclet Files"; - PacletResource`DefinitionNotebook`CheckPacletNotebook[ - ButtonNotebook[], - "PacletFiles" + DefinitionNotebookClient`$ClickedButton = "Open Sample"; + DefinitionNotebookClient`$ClickedAction = "Advanced"; + PacletResource`DefinitionNotebook`ViewSamplePaclet[ + "Advanced" ] ] ] ], - DefinitionNotebookClient`ButtonCodeID[1312802444570235546] + DefinitionNotebookClient`ButtonCodeID[7566953809767785517] ], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = @@ -8736,8 +8352,157 @@ Notebook[ ]; ] ] + ] + }, + Appearance -> None, + Method -> "Queued" + ], + TemplateBox[ + { + TemplateBox[ + { + "\"Guidelines\"", + "\"View general guidelines for authoring paclets\"" + }, + "PrettyTooltipTemplate" + ], + Function[ + Annotation[ + + DefinitionNotebookClient`$ButtonCodeID = + 5906117565281445171; + + ( + DefinitionNotebookClient`$ClickedButton = + "Style Guidelines"; + + DefinitionNotebookClient`ViewStyleGuidelines[ + ButtonNotebook[] + ]), + DefinitionNotebookClient`ButtonCodeID[5906117565281445171] + ] + ], + "\"View general guidelines for authoring paclets\"", + False + }, + "OrangeButtonTemplate" + ], + TemplateBox[ + { + TemplateBox[ + { + TagBox[ + GridBox[ + { + { + "\"Tools\"", + PaneSelectorBox[ + { + False -> + GraphicsBox[ + { + RGBColor[1.0, 1.0, 1.0], + AbsoluteThickness[1.0], + LineBox[{{0, 0}, {0, 10}, {10, 10}, {10, 0}, {0, 0}}], + LineBox[{{5, 2.5}, {5, 7.5}}], + LineBox[{{2.5, 5}, {7.5, 5}}] + }, + ImageSize -> 12, + PlotRangePadding -> 1.5 + ], + True -> + GraphicsBox[ + { + RGBColor[1.0, 1.0, 1.0], + AbsoluteThickness[1.0], + LineBox[{{0, 0}, {0, 10}, {10, 10}, {10, 0}, {0, 0}}], + LineBox[{{2.5, 5}, {7.5, 5}}] + }, + ImageSize -> 12, + PlotRangePadding -> 1.5 + ] + }, + Dynamic[ + CurrentValue[ + EvaluationNotebook[], + {TaggingRules, "ToolsOpen"}, + True + ] + ], + BaselinePosition -> Scaled[0.05] + ] + } + }, + GridBoxAlignment -> {"Columns" -> {{Automatic}}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{0.35}}} + ], + "Grid" + ], + "\"Toggle documentation toolbar\"" + }, + "PrettyTooltipTemplate" + ], + Function[ + Annotation[ + + DefinitionNotebookClient`$ButtonCodeID = + 5074018684552945401; + + (DefinitionNotebookClient`$ClickedButton = "Tools"; + DefinitionNotebookClient`ToggleToolbar[ButtonNotebook[]]), + DefinitionNotebookClient`ButtonCodeID[5074018684552945401] + ] + ], + "\"Toggle documentation toolbar\"", + False + }, + "OrangeButtonTemplate" + ], + TagBox[ + GridBox[ + {{"\"\"", "\"\""}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Center}}}, + AutoDelete -> False, + GridBoxDividers -> {"ColumnsIndexed" -> {2 -> True}, "Rows" -> {{False}}}, + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{2}}}, + GridBoxSpacings -> {"Columns" -> {{0.5}}}, + FrameStyle -> RGBColor[1.0, 1.0, 1.0] + ], + "Grid" + ], + ActionMenuBox[ + TemplateBox[ + { + TemplateBox[ + { + TemplateBox[ + { + "\"Check\"", + TemplateBox[{5}, "Spacer1"], + "\"\[FilledDownTriangle]\"" + }, + "RowDefault" + ], + "\"Check notebook for potential errors\"" + }, + "PrettyTooltipTemplate" + ], + Function[ + Annotation[ + DefinitionNotebookClient`$ButtonCodeID = + 1898445052439169298;, + DefinitionNotebookClient`ButtonCodeID[1898445052439169298] + ] ], - "\"Documentation\"" :> + "\"Check notebook for potential errors\"", + True + }, + "OrangeButtonTemplate" + ], + { + "\"All\"" :> With[ { RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath }, Quiet[ Block[ @@ -8766,7 +8531,7 @@ Notebook[ Annotation[ DefinitionNotebookClient`$ButtonCodeID = - 6325522174070009817; + 8900916902137752067; DefinitionNotebookClient`CheckForUpdates[ RSNB`nb$, @@ -8774,15 +8539,15 @@ Notebook[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Check"; - DefinitionNotebookClient`$ClickedAction = "Documentation"; + DefinitionNotebookClient`$ClickedAction = "All"; PacletResource`DefinitionNotebook`CheckPacletNotebook[ ButtonNotebook[], - "Documentation" + All ] ] ] ], - DefinitionNotebookClient`ButtonCodeID[6325522174070009817] + DefinitionNotebookClient`ButtonCodeID[8900916902137752067] ], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = @@ -8794,7 +8559,7 @@ Notebook[ ] ], Delimiter, - "\"All\"" :> + "\"Definition Notebook\"" :> With[ { RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath }, Quiet[ Block[ @@ -8823,7 +8588,7 @@ Notebook[ Annotation[ DefinitionNotebookClient`$ButtonCodeID = - 8900916902137752067; + 4301941258590251066; DefinitionNotebookClient`CheckForUpdates[ RSNB`nb$, @@ -8831,15 +8596,18 @@ Notebook[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Check"; - DefinitionNotebookClient`$ClickedAction = "All"; + + DefinitionNotebookClient`$ClickedAction = + "Definition Notebook"; + PacletResource`DefinitionNotebook`CheckPacletNotebook[ ButtonNotebook[], - All + "DefinitionNotebook" ] ] ] ], - DefinitionNotebookClient`ButtonCodeID[8900916902137752067] + DefinitionNotebookClient`ButtonCodeID[4301941258590251066] ], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = @@ -8849,36 +8617,8 @@ Notebook[ ]; ] ] - ] - }, - Appearance -> None, - Method -> "Queued" - ], - ActionMenuBox[ - TemplateBox[ - { - TemplateBox[ - { - "\"Build\"", - TemplateBox[{5}, "Spacer1"], - "\"\[FilledDownTriangle]\"" - }, - "RowDefault" - ], - Function[ - Annotation[ - DefinitionNotebookClient`$ButtonCodeID = - 1898445052439169298;, - DefinitionNotebookClient`ButtonCodeID[1898445052439169298] - ] ], - "\"\"", - True - }, - "OrangeButtonTemplate" - ], - { - "\"Documentation\"" :> + "\"Paclet Files\"" :> With[ { RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath }, Quiet[ Block[ @@ -8907,18 +8647,158 @@ Notebook[ Annotation[ DefinitionNotebookClient`$ButtonCodeID = - 1579518736508902704; + 1312802444570235546; DefinitionNotebookClient`CheckForUpdates[ RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ - DefinitionNotebookClient`$ClickedButton = "Build"; - DefinitionNotebookClient`$ClickedAction = "Documentation"; - PacletResource`DefinitionNotebook`BuildPaclet[ + DefinitionNotebookClient`$ClickedButton = "Check"; + DefinitionNotebookClient`$ClickedAction = "Paclet Files"; + PacletResource`DefinitionNotebook`CheckPacletNotebook[ ButtonNotebook[], - "Documentation" + "PacletFiles" + ] + ] + ] + ], + DefinitionNotebookClient`ButtonCodeID[1312802444570235546] + ], + + CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = + ""; + + DefinitionNotebookClient`$ButtonsDisabled = False; + ]; + ] + ] + ], + "\"Documentation\"" :> + With[ { RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath }, + Quiet[ + Block[ + { + $ContextPath = RSNB`$cp$, + ResourceSystemClient`$AsyncronousResourceInformationUpdates = + False, + DefinitionNotebookClient`$SuppressDynamicEvents = True, + DefinitionNotebookClient`$ButtonCodeID = None + }, + Internal`WithLocalSettings[ + DefinitionNotebookClient`$ButtonsDisabled = True; + + CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = + ProgressIndicator[Appearance -> "Necklace"]; + + + Once[ + ReleaseHold[ + CurrentValue[RSNB`nb$, {TaggingRules, "CompatibilityTest"}] + ], + "KernelSession" + ]; + + Needs["DefinitionNotebookClient`"], + Annotation[ + + DefinitionNotebookClient`$ButtonCodeID = + 6325522174070009817; + + DefinitionNotebookClient`CheckForUpdates[ + RSNB`nb$, + ReleaseHold[ + DefinitionNotebookClient`$ButtonCode = + HoldForm[ + DefinitionNotebookClient`$ClickedButton = "Check"; + DefinitionNotebookClient`$ClickedAction = "Documentation"; + PacletResource`DefinitionNotebook`CheckPacletNotebook[ + ButtonNotebook[], + "Documentation" + ] + ] + ] + ], + DefinitionNotebookClient`ButtonCodeID[6325522174070009817] + ], + + CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = + ""; + + DefinitionNotebookClient`$ButtonsDisabled = False; + ]; + ] + ] + ] + }, + Appearance -> None, + Method -> "Queued" + ], + ActionMenuBox[ + TemplateBox[ + { + TemplateBox[ + { + "\"Build\"", + TemplateBox[{5}, "Spacer1"], + "\"\[FilledDownTriangle]\"" + }, + "RowDefault" + ], + Function[ + Annotation[ + DefinitionNotebookClient`$ButtonCodeID = + 1898445052439169298;, + DefinitionNotebookClient`ButtonCodeID[1898445052439169298] + ] + ], + "\"\"", + True + }, + "OrangeButtonTemplate" + ], + { + "\"Documentation\"" :> + With[ { RSNB`nb$ = InputNotebook[], RSNB`$cp$ = $ContextPath }, + Quiet[ + Block[ + { + $ContextPath = RSNB`$cp$, + ResourceSystemClient`$AsyncronousResourceInformationUpdates = + False, + DefinitionNotebookClient`$SuppressDynamicEvents = True, + DefinitionNotebookClient`$ButtonCodeID = None + }, + Internal`WithLocalSettings[ + DefinitionNotebookClient`$ButtonsDisabled = True; + + CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = + ProgressIndicator[Appearance -> "Necklace"]; + + + Once[ + ReleaseHold[ + CurrentValue[RSNB`nb$, {TaggingRules, "CompatibilityTest"}] + ], + "KernelSession" + ]; + + Needs["DefinitionNotebookClient`"], + Annotation[ + + DefinitionNotebookClient`$ButtonCodeID = + 1579518736508902704; + + DefinitionNotebookClient`CheckForUpdates[ + RSNB`nb$, + ReleaseHold[ + DefinitionNotebookClient`$ButtonCode = + HoldForm[ + DefinitionNotebookClient`$ClickedButton = "Build"; + DefinitionNotebookClient`$ClickedAction = "Documentation"; + PacletResource`DefinitionNotebook`BuildPaclet[ + ButtonNotebook[], + "Documentation" ] ] ] @@ -9529,526 +9409,318 @@ Notebook[ { GraphicsBox[ { - Thickness[0.015385], - StyleBox[ - { - FilledCurveBox[ + Thickness[0.0025], + { + FaceForm[ + {RGBColor[0.96078, 0.50588, 0.19608], Opacity[1.0]} + ], + FilledCurveBox[ + { + {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, + {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, { - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}} + {0, 2, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0} }, { - { - {19.297, 56.875}, - {32.5, 64.492}, - {45.703, 56.875}, - {32.5, 49.258}, - {19.297, 56.875} - }, - { - {21.328, 56.875}, - {32.5, 63.324}, - {43.672, 56.875}, - {32.5, 50.426}, - {21.328, 56.875} - }, - { - {33.008, 33.262}, - {33.008, 48.496}, - {46.211, 56.113}, - {46.211, 40.879}, - {33.008, 33.262} - } - } - ] - }, - {FaceForm[RGBColor[0.70196, 0.60392, 0.78824, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, - { - { - {31.992, 33.262}, - {18.789, 40.879}, - {18.789, 56.113}, - {31.992, 48.496}, - {31.992, 33.262} - } + {0, 2, 0}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3} } - ] - }, - {FaceForm[RGBColor[0.53725, 0.40392, 0.67451, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ + }, + { { - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}} + {205.0, 22.66}, + {205.0, 212.11}, + {246.02, 235.8}, + {369.07, 306.84}, + {369.07, 117.39}, + {205.0, 22.66} }, { - { - {17.773, 8.8868}, - {4.5703, 16.504}, - {4.5703, 31.738}, - {17.773, 24.121}, - {17.773, 8.8868} - }, - { - {16.758, 10.664}, - {5.5859, 17.113}, - {5.5859, 29.961}, - {16.758, 23.512}, - {16.758, 10.664} - }, - { - {31.484, 32.5}, - {18.281, 40.117}, - {5.0781, 32.5}, - {18.281, 24.883}, - {31.484, 32.5} - } - } - ] - }, - {FaceForm[RGBColor[0.63529, 0.73333, 0.83137, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, - { - { - {31.992, 31.738}, - {18.789, 24.121}, - {18.789, 8.8868}, - {31.992, 16.504}, - {31.992, 31.738} - } - } - ] - }, - {FaceForm[RGBColor[0.2902, 0.40784, 0.57647, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - { - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}} + {30.929, 306.84}, + {153.98, 235.8}, + {195.0, 212.11}, + {195.0, 22.66}, + {30.929, 117.39}, + {30.929, 306.84} }, { - { - {47.227, 8.8868}, - {47.227, 24.121}, - {60.43, 31.738}, - {60.43, 16.504}, - {47.227, 8.8868} - }, - { - {48.242, 10.664}, - {48.242, 23.512}, - {59.414, 29.961}, - {59.414, 17.113}, - {48.242, 10.664} - }, - { - {33.516, 32.5}, - {46.719, 40.117}, - {59.922, 32.5}, - {46.719, 24.883}, - {33.516, 32.5} - } - } - ] - }, - {FaceForm[RGBColor[0.6, 0.6, 0.37255, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, - { - { - {33.008, 31.738}, - {33.008, 16.504}, - {46.211, 8.8868}, - {46.211, 24.121}, - {33.008, 31.738} - } - } - ] - }, - {FaceForm[RGBColor[0.39608, 0.60392, 0.30196, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - { - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, - {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}} + {200.0, 410.23}, + {364.07, 315.5}, + {241.02, 244.46}, + {200.0, 220.77}, + {158.98, 244.46}, + {35.929, 315.5}, + {200.0, 410.23} }, CompressedData[ - "\n1:eJxTTMoPSmVmYGBgA2JWIGYC4qvPs7S/hYs5LHLd9vlvi6MDjL/imLd550d3\nB9O4XZ48hwwcQBSTtjecH2G55UTZPhcHdP1zFinv/OMuBNG/0AHOL86Y+LbG\n3sPh5rnvwY+PGkL08/nA+b3T84SaC1ww9F9fXGDLZe4H50+WYAnjm+sOVw/j\nw8yDqYfZh64f7M4tvnD3Pr2gdPunnAfcPzA+zL8w9bDwQNdf+VLNkMPH2IEB\nBBwUoLSDwzTn7pzn1foOLkDq9003DHmZy8LTKhwe2KPrbxcDhYgphnpwOKnq\nOuwpAfr4miuGfKiB1krhC7/s0fUDAHimvy8=\n " + "\n1:eJxTTMoPSmViYGCQAWIQ3fo6cIdcZ7nDwyqRde5/ix0YQCAgE8J3rXJIAwG5\nTIc3QGWtwVUOs2YCwcMMOB+sfkMGXP3z3ys/Xso1h5uXL9R84NRDU4friwts\nud4XQ+TfmjgU2nJdX3wFwQebswONvyAGzgcpL9CNgZu3BGjc9cPRcPuqgdY9\n7IqGu+dzX3CJSrgyxJ4TGQ6m7y1c3YuUHEDKqp5kOMi8fmQmxaAEUc+QCeeD\n/SWN4Pcf+qoRY54J1w8LH5j5sPCD2R8E1P56YTncfWD5jeVw98P4MP+h8IH+\nh/Fh4QMzDxZ+6PEFAOibv7E=\n " ] - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.55294, 0.67451, 0.81176], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {7.1094, 32.5}, - {7.1094, 31.098}, - {5.9726, 29.961}, - {4.5703, 29.961}, - {3.168, 29.961}, - {2.0312, 31.098}, - {2.0312, 32.5}, - {2.0312, 33.902}, - {3.168, 35.039}, - {4.5703, 35.039}, - {5.9726, 35.039}, - {7.1094, 33.902}, - {7.1094, 32.5} - } + {43.0, 198.67}, + {107.71, 161.31}, + {107.71, 86.587}, + {43.0, 123.95}, + {43.0, 198.67} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.31373, 0.4549, 0.61176], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {20.82, 56.367}, - {20.82, 54.965}, - {19.684, 53.828}, - {18.281, 53.828}, - {16.879, 53.828}, - {15.742, 54.965}, - {15.742, 56.367}, - {15.742, 57.769}, - {16.879, 58.906}, - {18.281, 58.906}, - {19.684, 58.906}, - {20.82, 57.769}, - {20.82, 56.367} - } + {182.78, 198.67}, + {182.78, 123.95}, + {118.06, 86.587}, + {118.06, 161.31}, + {182.78, 198.67} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.78039, 0.86275, 0.94902], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {20.82, 40.625}, - {20.82, 39.223}, - {19.684, 38.086}, - {18.281, 38.086}, - {16.879, 38.086}, - {15.742, 39.223}, - {15.742, 40.625}, - {15.742, 42.027}, - {16.879, 43.164}, - {18.281, 43.164}, - {19.684, 43.164}, - {20.82, 42.027}, - {20.82, 40.625} - } + {112.89, 245.0}, + {177.6, 207.64}, + {112.89, 170.27}, + {48.174, 207.64}, + {112.89, 245.0} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.6902, 0.58824, 0.81176], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {20.82, 24.375}, - {20.82, 22.973}, - {19.684, 21.836}, - {18.281, 21.836}, - {16.879, 21.836}, - {15.742, 22.973}, - {15.742, 24.375}, - {15.742, 25.777}, - {16.879, 26.914}, - {18.281, 26.914}, - {19.684, 26.914}, - {20.82, 25.777}, - {20.82, 24.375} - } + {130.03, 350.12}, + {194.8, 312.72}, + {194.8, 237.93}, + {130.03, 275.32}, + {130.03, 350.12} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.46275, 0.36078, 0.61176], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {20.82, 8.6329}, - {20.82, 7.2306}, - {19.684, 6.0938}, - {18.281, 6.0938}, - {16.879, 6.0938}, - {15.742, 7.2306}, - {15.742, 8.6329}, - {15.742, 10.035}, - {16.879, 11.172}, - {18.281, 11.172}, - {19.684, 11.172}, - {20.82, 10.035}, - {20.82, 8.6329} - } + {269.93, 350.12}, + {269.93, 275.32}, + {205.16, 237.93}, + {205.16, 312.72}, + {269.93, 350.12} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.88627, 0.80392, 0.95294], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {35.039, 48.75}, - {35.039, 47.348}, - {33.902, 46.211}, - {32.5, 46.211}, - {31.098, 46.211}, - {29.961, 47.348}, - {29.961, 48.75}, - {29.961, 50.152}, - {31.098, 51.289}, - {32.5, 51.289}, - {33.902, 51.289}, - {35.039, 50.152}, - {35.039, 48.75} - } + {199.98, 396.48}, + {264.75, 359.09}, + {199.98, 321.69}, + {135.21, 359.09}, + {199.98, 396.48} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.66275, 0.80392, 0.56863], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {35.039, 32.5}, - {35.039, 31.098}, - {33.902, 29.961}, - {32.5, 29.961}, - {31.098, 29.961}, - {29.961, 31.098}, - {29.961, 32.5}, - {29.961, 33.902}, - {31.098, 35.039}, - {32.5, 35.039}, - {33.902, 35.039}, - {35.039, 33.902}, - {35.039, 32.5} - } + {217.61, 199.14}, + {281.9, 162.02}, + {281.9, 87.791}, + {217.61, 124.91}, + {217.61, 199.14} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.43137, 0.60392, 0.3451], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {35.039, 16.25}, - {35.039, 14.848}, - {33.902, 13.711}, - {32.5, 13.711}, - {31.098, 13.711}, - {29.961, 14.848}, - {29.961, 16.25}, - {29.961, 17.652}, - {31.098, 18.789}, - {32.5, 18.789}, - {33.902, 18.789}, - {35.039, 17.652}, - {35.039, 16.25} - } + {356.47, 199.14}, + {356.47, 124.91}, + {292.18, 87.791}, + {292.18, 162.02}, + {356.47, 199.14} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[{RGBColor[0.8549, 0.9451, 0.8], Opacity[1.0]}], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {49.258, 56.367}, - {49.258, 54.965}, - {48.121, 53.828}, - {46.719, 53.828}, - {45.316, 53.828}, - {44.18, 54.965}, - {44.18, 56.367}, - {44.18, 57.769}, - {45.316, 58.906}, - {46.719, 58.906}, - {48.121, 58.906}, - {49.258, 57.769}, - {49.258, 56.367} - } + {287.04, 245.16}, + {351.33, 208.04}, + {287.04, 170.93}, + {222.75, 208.04}, + {287.04, 245.16} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.66275, 0.80392, 0.56863], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {49.258, 40.625}, - {49.258, 39.223}, - {48.121, 38.086}, - {46.719, 38.086}, - {45.316, 38.086}, - {44.18, 39.223}, - {44.18, 40.625}, - {44.18, 42.027}, - {45.316, 43.164}, - {46.719, 43.164}, - {48.121, 43.164}, - {49.258, 42.027}, - {49.258, 40.625} - } + {356.47, 215.77}, + {296.28, 250.59}, + {356.47, 285.27}, + {356.47, 215.77} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.66275, 0.80392, 0.56863], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {49.258, 24.375}, - {49.258, 22.973}, - {48.121, 21.836}, - {46.719, 21.836}, - {45.316, 21.836}, - {44.18, 22.973}, - {44.18, 24.375}, - {44.18, 25.777}, - {45.316, 26.914}, - {46.719, 26.914}, - {48.121, 26.914}, - {49.258, 25.777}, - {49.258, 24.375} - } + {217.61, 114.06}, + {277.79, 79.24}, + {217.61, 44.566}, + {217.61, 114.06} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.55294, 0.67451, 0.81176], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {49.258, 8.6329}, - {49.258, 7.2306}, - {48.121, 6.0938}, - {46.719, 6.0938}, - {45.316, 6.0938}, - {44.18, 7.2306}, - {44.18, 8.6329}, - {44.18, 10.035}, - {45.316, 11.172}, - {46.719, 11.172}, - {48.121, 11.172}, - {49.258, 10.035}, - {49.258, 8.6329} - } + {122.17, 78.363}, + {182.42, 113.07}, + {182.36, 43.614}, + {122.17, 78.363} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ], - StyleBox[ - { - FilledCurveBox[ - {{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, + } + ] + }, + { + FaceForm[ + {RGBColor[0.55294, 0.67451, 0.81176], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, + { { - { - {62.969, 32.5}, - {62.969, 31.098}, - {61.832, 29.961}, - {60.43, 29.961}, - {59.027, 29.961}, - {57.891, 31.098}, - {57.891, 32.5}, - {57.891, 33.902}, - {59.027, 35.039}, - {60.43, 35.039}, - {61.832, 35.039}, - {62.969, 33.902}, - {62.969, 32.5} - } + {103.52, 249.47}, + {43.272, 214.76}, + {43.335, 284.22}, + {103.52, 249.47} } - ] - }, - {FaceForm[RGBColor[0.96078, 0.5098, 0.20784, 1.0]]}, - StripOnInput -> False - ] + } + ] + }, + { + FaceForm[ + {RGBColor[0.6902, 0.58824, 0.81176], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {120.87, 350.62}, + {120.8, 281.08}, + {60.68, 315.87}, + {120.87, 350.62} + } + } + ] + }, + { + FaceForm[ + {RGBColor[0.6902, 0.58824, 0.81176], Opacity[1.0]} + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {278.37, 281.22}, + {278.44, 350.75}, + {338.56, 315.96}, + {278.37, 281.22} + } + } + ] + } }, { ImageSize -> 12, @@ -10056,7 +9728,7 @@ Notebook[ ImageSize -> {Automatic, 35} } ], - "Wolfram Function Repository Reviewer" + "Wolfram Paclet Repository Reviewer" }, "PrettyTooltipTemplate" ] @@ -10072,6 +9744,62 @@ Notebook[ ]) } ], + Cell[ + StyleData["CommentReplyIcon"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + GraphicsBox[ + { + Thickness[0.076923], + FaceForm[{#1, Opacity[1.0]}], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}}}, + {{{1.5, 7.5}, {6.5, 11.5}, {6.5, 3.5}}} + ], + FilledCurveBox[ + { + { + {1, 4, 3}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {1, 3, 3} + } + }, + CompressedData[ + "\n1:eJw9U2tIVEEUvq5iVkttZmdfuo/ZbQukJGKVqPBLUTGJ0h9hVLIJRYhUVJj2\nAjGRWCKiF0llZWRCSEnZExEJ06CotaiQyH7EIrthT3u6NXPn3jswnDlzzzlz\nvu8711u9vWJzsqIoSXwv5tuk6IsgrQvOnLf+1CRC5ZKbg3WJAIJV90rNJoJF\nXOR6sebI6W3pyXq8DxccIoGwa+uxj/v/McxNbTxZOJ3w4Rkb+ZVgWGk2ZbcQ\nYfm0V+07Jhm6St7vzVhI2JfBT78ZCkI8cj2hqe/xxaIJJm0PoWEssCgtzvCc\nlzlYYwXP5iUYHpXlHV4xasXLeh4wyKCWX2fDqcJwbfQ+w4F83vGQDT1fJ1/U\ndzJ842bsih1XB3hiI0NzrPyOq9mBPb1tjpyNDBXci5U7MVQnLhji4nMsE+9W\nc6ARL3i3XSWbXNiiLi8EzPxbbqydsaD73LgHJ2wp/OiFoKVJ8Ui+Chha6M3T\nH8NZUMPm+XB9p8h0QtATjvtxqUh0SBgV76QHZN+lszReA5pNQ66o1+8HV6O3\nrdWCBIcTuKHxHJ4NQdO1sx4Nxxy4VYBug2dVt4lMnB/vGCi7TSgWz/504Etk\nVbXlNSGkCmWHqFYbJXziYXlT7VKXEdLq2DDMwyvvksTZZ5W4OgiCjmCVFTUP\ndh+3HSKJ8y9hqUogIfqn83PkCUndQoTLQsZ2gpperL3fQJLXIMEn5F5GaD3D\nl50g2O3OIkhiCUf7v8/fMJOMuRPTmT2FjLlU+0ghY471+dV93epzr/sPPaJz\nu3Ev65sNX/8//gP5Ei2u\n " + ] + ] + }, + AspectRatio -> Automatic, + ImageSize -> {13.0, 13.0}, + PlotRange -> {{0.0, 13.0}, {0.0, 13.0}} + ] + ]) + } + ], Cell[ StyleData["CommentCellLabelTemplate"], TemplateBoxOptions -> { @@ -10081,7 +9809,7 @@ Notebook[ TagBox[ GridBox[ { - {StyleBox[#1, FontSize -> 11]}, + {StyleBox[#1, FontSize -> 11], "\[SpanFromLeft]"}, { StyleBox[ DynamicBox[ @@ -10105,6 +9833,31 @@ Notebook[ SingleEvaluation -> True ], FontSize -> 9 + ], + ItemBox[ + ButtonBox[ + TagBox[ + StyleBox[ + TemplateBox[ + { + "\"Reply \[RightGuillemet]\"", + StyleBox["\"Reply \[RightGuillemet]\"", "HyperlinkActive"], + BaseStyle -> "Hyperlink" + }, + "MouseoverTemplate" + ], + FontSize -> 9 + ], + MouseAppearanceTag["LinkHand"] + ], + BaseStyle -> "Hyperlink", + ButtonFunction :> + (SelectionMove[ParentCell[EvaluationCell[]], After, Cell]; + DefinitionNotebookClient`CommentInsert[]), + Evaluator -> Automatic, + Method -> "Queued" + ], + Alignment -> Right ] } }, @@ -15640,486 +15393,1474 @@ Notebook[ } ], Cell[ - StyleData[ - "FileManagerFile", - StyleDefinitions -> StyleData["Text"] - ], - CellMargins -> {{60, Inherited}, {0, 0}}, - Deployed -> True, - Evaluatable -> True, - CellGroupingRules -> {"SectionGrouping", 100}, - CellFrameMargins -> {{5, 5}, {2, 2}}, - CellFrameLabelMargins -> {{0, Inherited}, {Inherited, Inherited}}, - ContextMenu -> { - MenuItem[ - "Open", - KernelExecute[ - ToExpression[ - "DefinitionNotebookClient`FileTreeOpen[EvaluationCell[]]" - ] - ], - MenuEvaluator -> Automatic, - Method -> "Queued" - ], - MenuItem[ - "Un/Mark as Excluded", - KernelExecute[ - ToExpression[ - "DefinitionNotebookClient`FileTreeExclusionToggle[EvaluationCell[]]" - ] - ], - MenuEvaluator -> Automatic, - Method -> "Queued" - ], - MenuItem[ - "Copy Path to Clipboard", - KernelExecute[ - ToExpression[ - "DefinitionNotebookClient`FileTreeCopy[EvaluationCell[]]" - ] - ], - MenuEvaluator -> Automatic, - Method -> "Queued" - ] - }, - ShowStringCharacters -> False, - Background :> - FEPrivate`If[ - CurrentValue["MouseOver"], - GrayLevel[0.92], - GrayLevel[0.99] - ] + StyleData["HintPodTitleBar"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + GraphicsBox[ + { + GrayLevel[0.97], + FilledCurveBox[ + BezierCurve[ + { + Offset[{0, -3}, {1, 1}], + Offset[{0, -1.3443}, {1, 1}], + Offset[{-1.3443, 0}, {1, 1}], + Offset[{-3, 0}, {1, 1}], + Offset[{-3, 0}, {1, 1}], + Offset[{3, 0}, {-1, 1}], + Offset[{3, 0}, {-1, 1}], + Offset[{1.3443, 0}, {-1, 1}], + Offset[{0, -1.3443}, {-1, 1}], + Offset[{0, -3}, {-1, 1}], + Offset[{0, -3}, {-1, 1}], + {-1, -1}, + {-1, -1}, + {-1, -1}, + {1, -1}, + {1, -1} + } + ] + ], + InsetBox[ + FormBox[ + StyleBox[ + "\"Notebook Analysis\"", + FontColor -> GrayLevel[0.4], + FontColor -> GrayLevel[0.4], + FontFamily -> "Source Sans Pro", + FontWeight -> Plain, + FontSize -> 13, + StripOnInput -> False + ], + TraditionalForm + ], + Offset[{8, 0}, {-1, 0}], + NCache[ImageScaled[{0, 1/2}], ImageScaled[{0, 0.5}]] + ], + TagBox[ + TagBox[ + TooltipBox[ + { + GrayLevel[0.6], + DiskBox[Offset[{-13, -10}, {1, 1}], Offset[6]], + GrayLevel[0.97], + AbsoluteThickness[1.5], + CapForm["Round"], + LineBox[ + { + {Offset[{-15, -8}, {1, 1}], Offset[{-11, -12}, {1, 1}]}, + {Offset[{-15, -12}, {1, 1}], Offset[{-11, -8}, {1, 1}]} + } + ] + }, + FrameBox[ + StyleBox[ + "\"Close analysis pod\"", + "Text", + FontColor -> RGBColor[0.53725, 0.53725, 0.53725], + FontSize -> 12, + FontWeight -> "Plain", + FontTracking -> "Plain", + StripOnInput -> False + ], + Background -> RGBColor[0.96078, 0.96078, 0.96078], + FrameStyle -> RGBColor[0.89804, 0.89804, 0.89804], + FrameMargins -> 8, + StripOnInput -> False + ], + TooltipDelay -> 0.1, + TooltipStyle -> {Background -> None, CellFrame -> 0} + ], + Annotation[#1, "Close analysis pod", "Tooltip"] & + ], + EventHandlerTag[ + { + "MouseClicked" :> NotebookDelete[EvaluationCell[]], + Method -> "Preemptive", + PassEventsDown -> Automatic, + PassEventsUp -> True + } + ] + ] + }, + AspectRatio -> Full, + ImageSize -> {Full, 20}, + PlotRange -> {{-1, 1}, {-1, 1}}, + ImageMargins -> {{0, 0}, {0, 0}}, + ImagePadding -> {{0, 0}, {0, 0}} + ] + ]) + } ], Cell[ - StyleData[ - "FileManagerDirectory", - StyleDefinitions -> StyleData["FileManagerFile"] - ], - ShowGroupOpener -> "Inline", - Evaluatable -> False, - CellEventActions -> None, - CellFrameLabels -> { - { - Cell[ - BoxData[ - TemplateBox[{}, "FileManagerDirectoryIconTemplate"] - ], - Background -> None - ], - None - }, - {None, None} - }, - ContextMenu -> { - MenuItem[ - "Open/Close Group", - KernelExecute[ - SelectionMove[EvaluationCell[], All, Cell]; - FrontEndTokenExecute[ - EvaluationNotebook[], - "OpenCloseGroup" - ] - ], - MenuEvaluator -> Automatic, - Method -> "Queued" - ], - MenuItem[ - "Open Directory", - KernelExecute[ - ToExpression[ - "DefinitionNotebookClient`FileTreeOpen[EvaluationCell[]]" - ] - ], - MenuEvaluator -> Automatic, - Method -> "Queued" - ], - MenuItem[ - "Un/Mark as Excluded", - KernelExecute[ - ToExpression[ - "DefinitionNotebookClient`FileTreeExclusionToggle[EvaluationCell[]]" + StyleData["HintPodDelimiterTop"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + GraphicsBox[ + { + AbsoluteThickness[1], + GrayLevel[0.85], + CapForm["Round"], + LineBox[{{-1, 0}, {1, 0}}] + }, + AspectRatio -> Full, + PlotRange -> {{-1, 1}, {-1, 1}}, + ImagePadding -> {{0, 0}, {0, 0}}, + ImageSize -> {Full, 2}, + BaselinePosition -> Scaled[0.1], + ImageMargins -> {{0, 0}, {4, 0}} ] - ], - MenuEvaluator -> Automatic, - Method -> "Queued" - ], - MenuItem[ - "Copy Path to Clipboard", - KernelExecute[ - ToExpression[ - "DefinitionNotebookClient`FileTreeCopy[EvaluationCell[]]" + ]) + } + ], + Cell[ + StyleData["HintPodDelimiterBottom"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + GraphicsBox[ + { + AbsoluteThickness[1], + GrayLevel[0.85], + CapForm["Round"], + LineBox[{{-1, 0}, {1, 0}}] + }, + AspectRatio -> Full, + PlotRange -> {{-1, 1}, {-1, 1}}, + ImagePadding -> {{0, 0}, {0, 0}}, + ImageSize -> {Full, 2}, + BaselinePosition -> Scaled[0.1], + ImageMargins -> {{0, 0}, {0, 4}} ] - ], - MenuEvaluator -> Automatic, - Method -> "Queued" - ] - }, - Background -> GrayLevel[0.99] + ]) + } ], Cell[ - StyleData[ - "FileManagerEmptyDirectory", - StyleDefinitions -> StyleData["FileManagerDirectory"] - ], - CellFrameLabels -> { - { - Cell[ - BoxData[ - TemplateBox[{}, "FileManagerEmptyDirectoryIconTemplate"] - ], - Background -> None - ], - None - }, - {None, None} + StyleData["HintPodFooter"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + GraphicsBox[ + { + GrayLevel[0.97], + FilledCurveBox[ + BezierCurve[ + { + {-1, 1}, + {-1, 1}, + Offset[{0, 3}, {-1, -1}], + Offset[{0, 3}, {-1, -1}], + Offset[{0, 1.3443}, {-1, -1}], + Offset[{1.3443, 0}, {-1, -1}], + Offset[{3, 0}, {-1, -1}], + Offset[{3, 0}, {-1, -1}], + Offset[{-3, 0}, {1, -1}], + Offset[{-3, 0}, {1, -1}], + Offset[{-1.3443, 0}, {1, -1}], + Offset[{0, 1.3443}, {1, -1}], + Offset[{0, 3}, {1, -1}], + Offset[{0, 3}, {1, -1}], + {1, 1}, + {1, 1} + } + ] + ], + InsetBox[ + BoxData[ + FormBox[ + TemplateBox[ + { + StyleBox[ + TemplateBox[{3}, "Spacer1"], + FontColor -> GrayLevel[0.4], + FontFamily -> "Source Sans Pro", + FontWeight -> Plain, + FontSize -> 12, + StripOnInput -> False + ], + StyleBox[ + #1, + FontColor -> GrayLevel[0.4], + FontFamily -> "Source Sans Pro", + FontWeight -> Plain, + FontSize -> 12, + StripOnInput -> False + ], + StyleBox[ + TemplateBox[{5}, "Spacer1"], + FontColor -> GrayLevel[0.4], + FontFamily -> "Source Sans Pro", + FontWeight -> Plain, + FontSize -> 12, + StripOnInput -> False + ] + }, + "RowDefault" + ], + TraditionalForm + ] + ], + Offset[{5, 2.5}, {-1, 0}], + {-1, 0} + ] + }, + AspectRatio -> Full, + ImageSize -> {Full, 21}, + PlotRange -> {{-1, 1}, {-1, 1}}, + ImageMargins -> {{0, 0}, {0, 3}}, + ImagePadding -> {{0, 0}, {0, 0}} + ] + ]) } ], Cell[ - StyleData["FileManagerBottomSpacer"], - ShowCellBracket -> False + StyleData["HintPodMenuItems"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + TemplateBox[ + { + #1, + FrameMargins -> 3, + Background -> GrayLevel[1], + RoundingRadius -> 0, + FrameStyle -> + Directive[ + AbsoluteThickness[1], + RGBColor[0.75686, 0.82745, 0.88235] + ], + ImageMargins -> #2 + }, + "Highlighted" + ] + ]) + } ], Cell[ - StyleData[ - "UsageInputs", - StyleDefinitions -> StyleData["Input"] - ], - CellMargins -> {{66, 10}, {0, 8}}, - StyleKeyMapping -> {"Tab" -> "UsageDescription"}, - Evaluatable -> False, - CellEventActions -> { - "ReturnKeyDown" :> - With[ { RSNB`nb$ = Notebooks[EvaluationCell[]] }, - SelectionMove[EvaluationCell[], After, Cell]; - NotebookWrite[RSNB`nb$, Cell["", "UsageDescription"], All]; - SelectionMove[RSNB`nb$, Before, CellContents] - ], - {"KeyDown", "\t"} :> - Replace[ - SelectionMove[SelectedNotebook[], After, Cell]; - NotebookFind[ - SelectedNotebook[], - "TabNext", - Next, - CellTags, - AutoScroll -> True, - WrapAround -> True - ], - Blank[NotebookSelection] :> - SelectionMove[ - SelectedNotebook[], - All, - CellContents, - AutoScroll -> True - ] - ] - }, - ShowAutoStyles -> False, - ShowCodeAssist -> False, - CodeAssistOptions -> {"DynamicHighlighting" -> False}, - LineSpacing -> {1, 3}, - TabSpacings -> {2.5}, - CounterIncrements -> "Text", - FontFamily -> "Source Sans Pro", - FontSize -> 15, - FontWeight -> "Plain" + StyleData["HintPodActionMenuItem"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + ButtonBox[ + TemplateBox[ + { + TagBox[ + GridBox[ + {{#1, TemplateBox[{7}, "Spacer1"], #2}}, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{0}}} + ], + "Grid" + ], + FrameStyle -> None, + RoundingRadius -> 0, + FrameMargins -> {{5, 2}, {2, 2}}, + ImageSize -> Full, + ImageMargins -> {{0, 0}, {0, 0}}, + Background -> + Dynamic[ + If[ CurrentValue["MouseOver"], + GrayLevel[0.96], + GrayLevel[1.0] + ] + ] + }, + "Highlighted" + ], + ButtonFunction :> ReleaseHold[#3], + Appearance -> { + "Default" -> + Image[ + CompressedData[ + "1:eJxTTMoPSmNiYGAo5gESfqW5qUWZyY5FRYmVScxAARhmAeL/QAClwDQDBPxHFg8WALJC84oz0/NSUzzzSlLTU4ssAL+sIf8=" + ], + "Byte", + ColorSpace -> "RGB", + ImageResolution -> {72, 72}, + Interleaving -> True + ], + "Hover" -> + Image[ + CompressedData[ + "1:eJxTTMoPSmNiYGAo5gESfqW5qUWZyY5FRYmVScxAARhmAeL/QAClwDQDBPxHFg8WALJC84oz0/NSUzzzSlLTU4ssAL+sIf8=" + ], + "Byte", + ColorSpace -> "RGB", + ImageResolution -> {72, 72}, + Interleaving -> True + ], + "Pressed" -> + Image[ + CompressedData[ + "1:eJxTTMoPSmNiYGAo5gESfqW5qUWZyY5FRYmVScxAARhmAeL/QAClwDQDBPxHFg8WALJC84oz0/NSUzzzSlLTU4ssAL+sIf8=" + ], + "Byte", + ColorSpace -> "RGB", + ImageResolution -> {72, 72}, + Interleaving -> True + ] + }, + Method -> "Queued", + Evaluator -> Automatic + ] + ]) + } ], Cell[ - StyleData[ - "UsageDescription", - StyleDefinitions -> StyleData["Text"] - ], - CellMargins -> {{86, 10}, {7, 0}}, - StyleKeyMapping -> {"Backspace" -> "UsageInputs"}, - CellGroupingRules -> "OutputGrouping", - CellEventActions -> { - "ReturnKeyDown" :> - With[ { RSNB`nb$ = Notebooks[EvaluationCell[]] }, - SelectionMove[EvaluationCell[], After, Cell]; - - NotebookWrite[ - RSNB`nb$, - Cell[ - BoxData[""], - "UsageInputs", - FontFamily -> "Source Sans Pro" + StyleData["HintPodDisabledMenuItem"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + ButtonBox[ + TemplateBox[ + { + TagBox[ + GridBox[ + { + { + #1, + TemplateBox[{7}, "Spacer1"], + StyleBox[#2, FontOpacity -> 0.4] + } + }, + GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{0}}} + ], + "Grid" + ], + FrameStyle -> None, + RoundingRadius -> 0, + FrameMargins -> {{5, 2}, {2, 2}}, + ImageSize -> Full, + ImageMargins -> {{0, 0}, {0, 0}}, + Background -> GrayLevel[1.0] + }, + "Highlighted" ], - All - ]; - - SelectionMove[RSNB`nb$, Before, CellContents] - ], - {"KeyDown", "\t"} :> - Replace[ - SelectionMove[SelectedNotebook[], After, Cell]; - NotebookFind[ - SelectedNotebook[], - "TabNext", - Next, - CellTags, - AutoScroll -> True, - WrapAround -> True - ], - Blank[NotebookSelection] :> - SelectionMove[ - SelectedNotebook[], - All, - CellContents, - AutoScroll -> True - ] - ] - }, - ShowAutoSpellCheck -> False + ButtonFunction :> Null, + Appearance -> { + "Default" -> + Image[ + CompressedData[ + "1:eJxTTMoPSmNiYGAo5gESfqW5qUWZyY5FRYmVScxAARhmAeL/QAClwDQDBPxHFg8WALJC84oz0/NSUzzzSlLTU4ssAL+sIf8=" + ], + "Byte", + ColorSpace -> "RGB", + ImageResolution -> {72, 72}, + Interleaving -> True + ], + "Hover" -> + Image[ + CompressedData[ + "1:eJxTTMoPSmNiYGAo5gESfqW5qUWZyY5FRYmVScxAARhmAeL/QAClwDQDBPxHFg8WALJC84oz0/NSUzzzSlLTU4ssAL+sIf8=" + ], + "Byte", + ColorSpace -> "RGB", + ImageResolution -> {72, 72}, + Interleaving -> True + ], + "Pressed" -> + Image[ + CompressedData[ + "1:eJxTTMoPSmNiYGAo5gESfqW5qUWZyY5FRYmVScxAARhmAeL/QAClwDQDBPxHFg8WALJC84oz0/NSUzzzSlLTU4ssAL+sIf8=" + ], + "Byte", + ColorSpace -> "RGB", + ImageResolution -> {72, 72}, + Interleaving -> True + ] + }, + Method -> "Queued", + Evaluator -> Automatic, + Enabled -> False + ] + ]) + } ], Cell[ - StyleData["Notes", StyleDefinitions -> StyleData["Item"]], - CellDingbat -> - StyleBox[ - "\[FilledVerySmallSquare]", - FontColor -> GrayLevel[0.6] - ], - CellMargins -> {{66, 24}, {9, 7}}, - ReturnCreatesNewCell -> False, - StyleKeyMapping -> { }, - DefaultNewCellStyle -> "Notes", - ShowAutoSpellCheck -> False, - GridBoxOptions -> {BaseStyle -> "TableNotes"} + StyleData["HintPodActionLabel"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + PaneBox[ + StyleBox[ + #1, + FontColor -> GrayLevel[0.2], + FontFamily -> "Source Sans Pro", + FontWeight -> Plain, + FontSize -> 13, + LineIndent -> 0, + StripOnInput -> False + ], + FrameMargins -> 0, + ImageMargins -> 0, + BaselinePosition -> Baseline, + ImageSize -> Full + ] + ]) + } ], Cell[ - StyleData[ - "TableNotes", - StyleDefinitions -> StyleData["Notes"] - ], - CellDingbat -> None, - CellFrameColor -> RGBColor[0.749, 0.694, 0.553], - StyleMenuListing -> None, - ButtonBoxOptions -> {Appearance -> {Automatic, None}}, - GridBoxOptions -> { - FrameStyle -> GrayLevel[0.906], - GridBoxAlignment -> { - "Columns" -> {{Left}}, - "ColumnsIndexed" -> { }, - "Rows" -> {{Baseline}}, - "RowsIndexed" -> { } - }, - GridBoxDividers -> {"Columns" -> {{None}}, "Rows" -> {{True}}}, - GridDefaultElement -> Cell["\[Placeholder]", "TableText"] + StyleData["HintPodMenuDelimiter"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + PaneBox[ + StyleBox[ + GraphicsBox[ + { + CapForm["Round"], + GrayLevel[0.9], + AbsoluteThickness[1], + LineBox[{{-1, 0}, {1, 0}}] + }, + AspectRatio -> Full, + PlotRange -> {{-1, 1}, {-1, 1}}, + ImageMargins -> {{0, 0}, {2, 2}}, + ImagePadding -> {{5, 5}, {0, 0}}, + ImageSize -> {Full, 2} + ], + LineIndent -> 0, + StripOnInput -> False + ], + FrameMargins -> 0, + ImageMargins -> 0, + BaselinePosition -> Baseline, + ImageSize -> Full + ] + ]) } ], Cell[ - StyleData["TableText"], - DefaultInlineFormatType -> "DefaultInputInlineFormatType", - AutoQuoteCharacters -> { }, - StyleMenuListing -> None + StyleData["HintPodIconChevron"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + GraphicsBox[ + { + GrayLevel[0.2], + AbsoluteThickness[1.8], + CapForm["Round"], + JoinForm["Miter"], + LineBox[{{-0.5, 1}, {0.5, 0}, {-0.5, -1}}] + }, + AspectRatio -> Full, + BaselinePosition -> Bottom, + ImageMargins -> {{0, 4}, {0, 0}}, + ImageSize -> {5.6, 7.7} + ] + ]) + } ], Cell[ - StyleData["ExampleDelimiter"], - Selectable -> False, - ShowCellBracket -> Automatic, - CellMargins -> {{66, 14}, {5, 10}}, - Evaluatable -> True, - CellGroupingRules -> {"SectionGrouping", 58}, - CellEvaluationFunction -> (($Line = 0;) &), - ShowCellLabel -> False, - CellLabelAutoDelete -> True, - TabFilling -> "\[LongDash]\[NegativeThickSpace]", - TabSpacings -> {100}, - StyleMenuListing -> None, - FontFamily -> "Verdana", - FontWeight -> Bold, - FontSlant -> "Plain", - FontColor -> GrayLevel[0.906] + StyleData["HintPodIconPopOut"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + GraphicsBox[ + { + FaceForm[GrayLevel[0.4]], + FilledCurveBox[ + { + { + {1, 4, 3}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3} + } + }, + CompressedData[ + "\n1:eJxTTMoPSmVmYGBgBGIlIGYC4h1yra8Dd6g4rHN/WCWip+KwRiYqxXq+isNk\nCZYwvlwEDROHqYPpKwUrUHFgAIEDKg5nzwDBG2VU/hlluPogMEMCzm9kOdpv\naC6OJi/mINR84NRCVwQfIq8M519wufHhi5Yymn4lNPOVHNLAQBHO/6YR03/o\nK5eDB9Ab69wFHJoeHZ+xexqng8r0/xPqfvM5cG9dVnl8JacD0FO6m+byOPxL\n/f4kUZHbQZr3ge4EBW6HD2IeAX9m8Dhkzyqfs2gxp8ONxmK3Kd/4HOYsUt75\np50Tbi6YesgF9b8ShJ+oCOfD3Anjw/zx9JP8pXx7hD9h4QfjqxtyAKNCBU0e\nEY4wPqr5iHh4/nvlx0tnVRyYObvkk98pOwA9+X75MRUHWWD03udHxCssngGf\nXO7X\n " + ] + ] + }, + AspectRatio -> Automatic, + ImageSize -> {14.0, 14.0}, + PlotRange -> {{0.0, 13.62}, {0.0, 13.62}} + ] + ]) + } ], Cell[ - StyleData[ - "ExampleText", - StyleDefinitions -> StyleData["Text"] - ] + StyleData["HintPodIconWrench"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + GraphicsBox[ + { + GrayLevel[0.4], + AbsoluteThickness[1], + Opacity[1.0], + JoinedCurveBox[ + { + { + {0, 2, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3} + } + }, + CompressedData[ + "\n1:eJxTTMoPSmVmYGBgBGJRIGYCYmWv6mZ9n3/2cmJZvp/5BBzci37yv9wu6/Au\nysnuhaQynG8at8uT55AGXJwBDHQdPl3yTRKIUIfzo1Ks7/vzajiosjVOdfbW\nccjaUzJZokUFrv8ySLmlqoPbts9/r1iowsVh6mD6zp4BAh4NnPbA3AHTr+ss\n8/rRNoS7YXyYv2D+7H/ySf5SPrdD7D/nX29ff7H/6hXZZnGNGc6HqYPRMPED\nb+bZ6FxBqAPpOprL7YAefgCtVISU\n " + ], + CurveClosed -> {1} + ] + }, + AspectRatio -> Automatic, + BaselinePosition -> Scaled[0.2], + ImagePadding -> 0.5, + ImageSize -> {16.0, 16.0}, + PlotRange -> {{0.0, 16.0}, {0.0, 16.0}} + ] + ]) + } ], Cell[ - StyleData[ - "PageBreak", - StyleDefinitions -> StyleData["ExampleDelimiter"] - ], - Selectable -> False, - CellFrame -> {{0, 0}, {1, 0}}, - CellMargins -> {{66, 14}, {15, -5}}, - CellElementSpacings -> {"CellMinHeight" -> 1}, - Evaluatable -> True, - CellEvaluationFunction -> (($Line = 0;) &), - CellFrameColor -> GrayLevel[77/85] + StyleData["HintPodIconInfo"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + GraphicsBox[ + { + FaceForm[GrayLevel[0.4]], + FilledCurveBox[ + { + {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, + { + {1, 4, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3} + }, + { + {1, 4, 3}, + {0, 1, 0}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3} + } + }, + { + { + {6.81, 13.0}, + {3.3914, 13.0}, + {0.62, 10.229}, + {0.62, 6.81}, + {0.62, 3.3914}, + {3.3914, 0.62}, + {6.81, 0.62}, + {10.229, 0.62}, + {13.0, 3.3914}, + {13.0, 6.81}, + {13.0, 10.229}, + {10.229, 13.0}, + {6.81, 13.0} + }, + CompressedData[ + "\n1:eJxTTMoPSmViYGCQB2IQbct1fXGBrbRD6+vAHXKtvA7r3B9WiayTdoCI8zgc\n/qoR039IHkoLOjCAgYKDB0iZu4CDPFijgsOsmSDAC1UnCzWPE0rLQMXZHV6x\nmAia1Ug56E1Y8MMwjdXh685bXX9VJRx4Jq9sCvRkcTh7BgREHfoPgTSwOAQB\ndb8OFHYAO4eLFeo+IQcRMIMLzoe4h9dBW2LqFc4MYYd4zdMCx38JOviYdzom\npIo4PJgjuHSvo6jDkgKQz0QdCsEelHDQjAHZJAa1VxIqLwH3Jzofok8S4i9W\nRQews67LQsJhnoKDMRjIQ9Q3wMJJwQFMJULDSRJmrhzUPKh6Blmof+QcwM6K\nkXb4Bgq2rzJQcXFovMhA5UUdciqqluo0SztsKMqY+NZG2OHV1E08hTrSDquA\noTmXQdABPX4BaWq/EA==\n " + ], + { + {8.81, 9.79}, + {8.8101, 9.5122}, + {8.5878, 9.2854}, + {8.31, 9.28}, + {7.51, 9.28}, + {7.2283, 9.28}, + {7.0, 9.5083}, + {7.0, 9.79}, + {7.0, 10.62}, + {7.0054, 10.898}, + {7.2322, 11.12}, + {7.51, 11.12}, + {8.35, 11.12}, + {8.6239, 11.115}, + {8.8447, 10.894}, + {8.85, 10.62} + } + } + ] + }, + AspectRatio -> Automatic, + ImagePadding -> 0.5, + ImageSize -> {14.0, 14.0}, + PlotRange -> {{0.0, 13.62}, {0.0, 13.62}} + ] + ]) + } ], Cell[ - StyleData["Subsection"], - Evaluatable -> True, - CellEvaluationFunction -> (($Line = 0;) &), - ShowCellLabel -> False + StyleData["HintPodIconNone"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + GraphicsBox[ + { }, + AspectRatio -> Automatic, + ImageSize -> {16.0, 16.0}, + PlotRange -> {{0.0, 16.0}, {0.0, 16.0}}, + BaselinePosition -> Scaled[0.2], + ImagePadding -> 0.5 + ] + ]) + } ], Cell[ - StyleData["Subsubsection"], - Evaluatable -> True, - CellEvaluationFunction -> (($Line = 0;) &), - ShowCellLabel -> False + StyleData["HintPodIconIgnoreAlways"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + GraphicsBox[ + { + EdgeForm[None], + FaceForm[GrayLevel[0.4]], + FilledCurveBox[ + { + { + {0, 2, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3} + } + }, + CompressedData[ + "\n1:eJxTTMoPSmVmYGBgBGJTIGYCYpF17g+rROQcbLmuLy6wlXaoBguoOvQf+qoR\nw6/i8CZwh1zralWH4oyJb2vsVRx0N819v/yYqoO0/l0VtkYEv/U1UOFRBP/D\n8mPe5pyqcP0z8oSaD3ipws2H0famcbs8fVQd2BqnOnevUXUAa+dWdUgSiLDc\nckLVwQPounXHVeB8kK1TmxH8gN7peULOKnD9EP+owM2H+QvmzyUFIBEeuHxC\nmb+c2CtuuP75NjpXZj3jgpsP0s11nRPO5+feuqzyOAec73dxYsy/w+xw/WDr\nuNjh5n9MPhPr7cEG93+V2Wq78Nus8PCB8WHhB+PDwhemHxb+MPNh8ZMGBhJw\nf8Lkv2nEAJXwOGyu/rQh4DWrwwrTs9Z+F7kdvHiYtNunsTrYgrwpy+XQteHh\ny6lGbA6HxNWCWRdzOJwKObhiyTk2B3fmCm4VDXaouRwOEaeMjmzUY4OHhybI\neA02eHgt/GH4bJ0qm4PT+bSrz4Hh+Z0tfobPVDZ4eIOVx7DD3QlzNwMYIPx1\nsmzffCl9FUg4u7M5hPEBU1S+isPs0Pmr195gdTAGgc0qUHewOswDJhfv7yoO\n/g7CiYcvszoAU9vrQAtVh6V+QAFnNqg9iHj5dMk3SWAGIt78wBGJiFcYH+ZP\nGB/mT5h+WLqBmQ/zJwC4F0s3\n " + ] + ] + }, + AspectRatio -> Automatic, + ImageMargins -> {{0, 0}, {0, 2}}, + ImageSize -> {14.0, 14.0}, + PlotRange -> {{-0.5, 13.62}, {-0.5, 13.62}} + ] + ]) + } ], Cell[ - StyleData["ExampleImage"], - PageWidth :> First[{650}], - CellMargins -> {{66, 66}, {16, 5}}, - Evaluatable -> False, - ShowCellLabel -> False, - MenuSortingValue -> 10000, - RasterBoxOptions -> {ImageEditMode -> False} + StyleData["HintPodIconIgnoreInCell"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + GraphicsBox[ + { + EdgeForm[None], + FaceForm[GrayLevel[0.4]], + FilledCurveBox[ + { + { + {0, 2, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0} + }, + {{0, 2, 0}, {0, 1, 0}} + }, + { + { + {11.69, 13.37}, + {7.57, 13.37}, + {7.57, 12.37}, + {7.76, 12.37}, + {11.19, 8.93}, + {11.19, 1.25}, + {7.57, 1.25}, + {7.57, 0.25}, + {12.19, 0.25}, + {12.19, 13.37} + }, + {{9.17, 12.37}, {11.17, 12.37}, {11.17, 10.37}} + } + ], + FilledCurveBox[ + { + { + {0, 2, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3} + } + }, + CompressedData[ + "\n1:eJxTTMoPSmVmYGBgBGIjIGYCYo+HVSLr3EUdbLmuLy6wlXZYUgBiyTlAxJUc\nkt9FOdllyDuU6yrKf1mD4LM879F466sMV28MApuVHX7yv9y+3lkOQj9WdngU\nIb794gFZh/Dojfvf/FN22CHX+jrQAsHvf/JJ/tJ6GTgfbI+ODFz/2TMgIA03\nvxroqodVQg5gSkQO6m4mVPubGR1E7I/d2fpE2cHy2tFckwYGB2n9uypsjCoO\nYG89/GcP4wd5zm1QO/QHzr9wNeyN/u5f9jD9kHD4aQ8zX+z36XcnD3+3v8fE\n2SXfrOygvqBzw8OX3+yDQAxHBB/srr9KcL7mW959BjuV4PrnCi7de7BcCW4+\nLLwhND88PmDyEHcLOjg2PTo+Y/d3+/21shbpLYIOTglPLyjd/mZ//wH35JVM\nCD4knATgfL0JC34YPuOH688Nq1237REf3HzNmP5DXzX4HLhVNOp6dv6yP3xZ\nO1UyiRcePrlH/22q/sQDD79vGiANPA5yy1946NUzOOy61fU39TuPw5GNenmL\nGxkdwPal8cLjB2Y+LP7SwEDCgQEMZODyf7+VPpgTKOOw9ldM7tE6XgfmCqCL\n9sk43PfvnZ4nxAuJZ2NZB5j9UV933uraK+swf/XaG/HfeCDudZJzuA1yTgov\nPH3CzBcAJg/mdHmHVElQyuSH851lXj8ykxKEq4eFNwCKHGBr\n " + ] + ] + }, + AspectRatio -> Automatic, + ImageMargins -> {{0, 0}, {0, 2}}, + ImageSize -> {14.0, 14.0}, + PlotRange -> {{-0.5, 13.62}, {-0.5, 13.62}} + ] + ]) + } ], Cell[ - StyleData["Link"], - FontFamily -> "Source Sans Pro", - FontColor -> - Dynamic[ - If[ CurrentValue["MouseOver"], - RGBColor[0.855, 0.396, 0.145], - RGBColor[0.02, 0.286, 0.651] - ] - ] + StyleData["HintPodIconIgnoreInNotebook"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + GraphicsBox[ + { + FaceForm[GrayLevel[0.4]], + FilledCurveBox[ + { + { + {0, 2, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3} + } + }, + CompressedData[ + "\n1:eJxTTMoPSmVmYGBgBGJTIGYC4qAdcq2vAwUcbLmuLy6wFXdYUgBiSTp4PKwS\nWeeu4GCgtVL4AouUw1zBpXsPlis4vDlgqexlLeWg+ZZ3n8FOBB+s/y+CH6S+\noHODoyJc/z0mzi75ZkW4+cYgsFnRoanYbco3N0kHEftjd7Y+UXRYeM3kvcVR\nCYeQx0tnH2FQgroLwb9pWxmxYqs4nP9zQfrmV8bicP0g1VzXxeDmf9OI6T/0\nlcsB6Bmgj6QcGMDggz1MvoTnRNz7f2/sf/K/3L7+saLDzmCriP/PX9iHR2/c\n/+YfzL1P4Pz+Xoc96+IfwPkrVqZm1068AdcPtAxo4yW4+ccenln/jOGkPcz/\nMjWJRqEGh+xh4QPjw8IPxoeFL0w/LPxh5sPiB0KzwuNPHhibO+Su2h8GKTvE\n7aAYeYAl7+5Z+/rfVgXnOLgdPu6qO5h345j9voPiasGsXHA+JJw44Hy9CQt+\nGD5jh+vPDatdt+0RG9x8TZByDTYH/uky5V7st+21JaZe4cxgdZgp5PnFqOuh\nvQY/99ZlP1kcIO54CjWfxeFeX0HUh0Uv7bdEft15i4vVoa2/Q3Oiy1t77Xax\nm+fKWeHxAzMfFn9pYCACj1+YfMeX29cbgfF/+LJ2qmQSKzx95B79t6n6Ews8\n/cDsB3O5JB1Upv+fUPebxeHIRr28xQeB6e+Cy40PX1gdnjTPO7uKX8qh/8kn\n+Uv57A4sYXy6m2KlHDjBCY3DwV9OLMvXGJjeda7MejaXC56eYeENAPSkchE=\n\n " + ] + ], + FilledCurveBox[ + { + { + {0, 2, 0}, + {1, 3, 3}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {0, 1, 0}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3} + } + }, + CompressedData[ + "\n1:eJxTTMoPSmVmYGBgBGJdIGYC4qAdcq2vL6o52HJdX1ywVwtC24rB+YdTViWE\nXBKE86tF1rk/rOJxMAaBzxpwPkReDY2vCDVPCMpXhvPB+jerwfnPf6/8eOms\nukPDdoemR+wiUHkNuHtgfJh7YXy2xqnO3W/U0eQ14ObB+DD7YHzNmP5DXzWY\n4PzY3KP/NlX/toeZBxYP/GIPsw/GBzuHSxrOX7TF/MchFSkH9g9iHgF/Ptmb\nvrdwdTeSdNjZywYU+WQPcb8E1B+f7H8EP146m0XcYeE1E6DKT/Z9IGUXRB02\nV3/aEJD92R5s7A4Rh1kzQeCr/YQFPwyfvRN2+Put9MEcwe/2894vP+ZtLuxw\n3793ep7QT3uIOiEHkC651t/2YH8a80LtY3NA5TPB+RPrflsVnPtkL/8lJ6xW\nT8jhTSDYo1DzxOB8BjBQh/O/aQADzlQTTV4bbh6MD7MPxoeFfwDI2czaDmfP\ngAA0nCdqOTglPL2gdFvDweNhlci645oO8iAPzdOEmPNXw+EPMDp9k7Qc4nZ5\n8jC9VncAG39KywE9/QIAH6UuJw==\n " + ] + ], + FilledCurveBox[ + {{{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {5.63, 11.05}, + {5.63, 10.44}, + {6.0569, 10.539}, + {6.5048, 10.49}, + {6.9, 10.3}, + {9.53, 10.3}, + {9.53, 11.05} + } + } + ], + FilledCurveBox[ + {{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {7.92, 3.73}, + {8.0396, 3.4994}, + {8.0784, 3.2353}, + {8.03, 2.98}, + {9.41, 2.98}, + {9.41, 3.73} + } + } + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {6.73, 6.21}, + {6.2, 5.82}, + {6.67, 5.46}, + {11.22, 5.46}, + {11.22, 6.21}, + {6.73, 6.21} + } + } + ], + FilledCurveBox[ + {{{1, 4, 3}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {8.0, 8.7}, + {8.0514, 8.4458}, + {8.0162, 8.1818}, + {7.9, 7.95}, + {10.25, 7.95}, + {10.25, 8.7} + } + } + ] + }, + AspectRatio -> Automatic, + ImagePadding -> 0.75, + ImageSize -> {15.0, 15.0}, + PlotRange -> {{0.0, 13.62}, {0.0, 13.62}} + ] + ]) + } + ], + Cell[ + StyleData["HintPodIconHint"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + GraphicsBox[ + { + EdgeForm[None], + FaceForm[#1], + FilledCurveBox[ + { + {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}, + { + {1, 4, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3} + }, + { + {0, 2, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3} + } + }, + { + { + {9.015, 17.37}, + {4.4559, 17.37}, + {0.76, 13.645}, + {0.76, 9.05}, + {0.76, 4.455}, + {4.4559, 0.73}, + {9.015, 0.73}, + {13.574, 0.73}, + {17.27, 4.455}, + {17.27, 9.05}, + {17.27, 13.645}, + {13.574, 17.37}, + {9.015, 17.37} + }, + CompressedData[ + "\n1:eJxTTMoPSmViYGCQBGIQbcixRiYqRcVh3bak+pu23A5rf8XkHt2n7OC/fkpq\nx2MOB8+5DWqHnik5nP8e/HjpbHYHj4dVIuvYlRyAiisjVrA78Bau6b6toegQ\nApQ9soDdQepAtIJjoILDJ8fzaVefczgs6Nzw8GWoPNx84yMb9fIeyzr831T9\nacMFXod1N+LL/OVkHV5uX8/8/IyAw7Fck4btDrIOZQ/mCC7dK+TAXMGtomEn\n6/DP+dfb1w0iDkIi9sfufJV1ePRy6iYeQzGHac7dOc+t5R3SwEDcwe7FzTW/\nbBQc9kybwF+1TcLh7TwbnStSig7Hd+3oZSuQdDjab1iuy6jk0MIL8qGkg8f+\nWlmL50oO9uHRG/fnSDr4fu4LLjmi7HDw1ELXbZslHGDhAzO//9BXjRh+VQeG\niXW/rQzEHKzv+/dOz1N1uFfY1fekSMRhzhGFDUUZqhB/LhaCmFOs6sC0h1VI\nZL+Ag8g6d2AIqjqYCJrZ7L3E64Ae/gDrrapT\n " + ], + CompressedData[ + "\n1:eJxTTMoPSmViYGBQBGIQ/emSb5KAhJoDAwg0aDhYbjlRtu++isNudX7urWpK\nDrX2pnG7Tqo4TFPsKy2sVnRQvv2zLqtGBULfUXAI6J2eJ8Ss4mDSsN2hKUnB\nIa0jOfZOmrKD/l0Vtsar8g5Gz9apPlms5GDgs4zLLVXeweLHoZRVDxQdnNdm\n3ivskneQW/7CQ09e0aHEbco3tnh5h+jLex6LxCo4FErzPtC9IO+wVfT36Xed\n8nDzH5tJHYheIOeQBxJ4pOCgu2nu++Vscg75Qs0HTjUqOjDkN7IcPS/rcObd\nycNOukoObqqlTLM4ZOD+O7JRL2/xQWkHHibtdrFITYeb8WX+ctOkHQ6eWui6\nzVjLQfD4rh29bdIO/Ye+asTwazuAnJswRdohaIdc6+uL2g6qbI1TnbtlHGy5\nri8uqNVxEIgAhtg3WYj5B3QcgKEkzcsAdOfS2UcUDHQdEp5eULotqehw89z3\n4Mepug63pGsSjUyVHMr3zZfSj9V1uKKdKvkoQtmhOGPi25p6XQeQ8p91KhB9\nlroOIGH7UlWH+qw9JZNn6EDs54bGF4OOA9AVtlzhag6KG4oyJupqO4CCYaGr\nmgM4XiO0HK5WvFQz9FBzuAzi7tR0cNv2+e8VCzUHJ5AF0poO6PEPAFdvzZk=\n\n " + ] + } + ] + }, + AspectRatio -> Automatic, + BaselinePosition -> Scaled[0.1], + ImagePadding -> 0.5, + ImageSize -> {14.0, 14.778}, + PlotRange -> {{0.76, 17.27}, {0.73, 17.37}} + ] + ]) + } ], Cell[ StyleData[ - "StringTypeLink", - StyleDefinitions -> StyleData["Link"] + "FileManagerFile", + StyleDefinitions -> StyleData["Text"] ], - FontColor -> - Dynamic[ - If[ CurrentValue["MouseOver"], - RGBColor[0.969, 0.467, 0.0], - GrayLevel[0.467] - ] + CellMargins -> {{60, Inherited}, {0, 0}}, + Deployed -> True, + Evaluatable -> True, + CellGroupingRules -> {"SectionGrouping", 100}, + CellFrameMargins -> {{5, 5}, {2, 2}}, + CellFrameLabelMargins -> {{0, Inherited}, {Inherited, Inherited}}, + ContextMenu -> { + MenuItem[ + "Open", + KernelExecute[ + ToExpression[ + "DefinitionNotebookClient`FileTreeOpen[EvaluationCell[]]" + ] + ], + MenuEvaluator -> Automatic, + Method -> "Queued" + ], + MenuItem[ + "Un/Mark as Excluded", + KernelExecute[ + ToExpression[ + "DefinitionNotebookClient`FileTreeExclusionToggle[EvaluationCell[]]" + ] + ], + MenuEvaluator -> Automatic, + Method -> "Queued" + ], + MenuItem[ + "Copy Path to Clipboard", + KernelExecute[ + ToExpression[ + "DefinitionNotebookClient`FileTreeCopy[EvaluationCell[]]" + ] + ], + MenuEvaluator -> Automatic, + Method -> "Queued" + ] + }, + ShowStringCharacters -> False, + Background :> + FEPrivate`If[ + CurrentValue["MouseOver"], + GrayLevel[0.92], + GrayLevel[0.99] ] ], Cell[ - StyleData["CharactersRefLink"], - ShowSpecialCharacters -> False - ], - Cell[ - StyleData["Excluded"], - CellBracketOptions -> {"Color" -> RGBColor[0.9, 0.4, 0.4], "Thickness" -> 2}, - GeneratedCellStyles -> { - "Graphics" -> {"Graphics", "Excluded"}, - "Message" -> {"Message", "MSG", "Excluded"}, - "Output" -> {"Output", "Excluded"}, - "Print" -> {"Print", "Excluded"}, - "PrintTemporary" -> {"PrintTemporary", "Excluded"} - }, - CellFrameMargins -> 4, + StyleData[ + "FileManagerDirectory", + StyleDefinitions -> StyleData["FileManagerFile"] + ], + ShowGroupOpener -> "Inline", + Evaluatable -> False, + CellEventActions -> None, CellFrameLabels -> { { - None, Cell[ BoxData[ - TemplateBox[ - { - StyleBox[ - "\"excluded\"", - "ExcludedCellLabel", - StripOnInput -> False - ], - "\"Excluded cells will not appear anywhere in the published resource except for the definition notebook\"" - }, - "PrettyTooltipTemplate" - ] + TemplateBox[{}, "FileManagerDirectoryIconTemplate"] ], - "ExcludedCellLabel" - ] + Background -> None + ], + None }, {None, None} }, - StyleMenuListing -> None, - Background -> RGBColor[1, 0.95, 0.95] + ContextMenu -> { + MenuItem[ + "Open/Close Group", + KernelExecute[ + SelectionMove[EvaluationCell[], All, Cell]; + FrontEndTokenExecute[ + EvaluationNotebook[], + "OpenCloseGroup" + ] + ], + MenuEvaluator -> Automatic, + Method -> "Queued" + ], + MenuItem[ + "Open Directory", + KernelExecute[ + ToExpression[ + "DefinitionNotebookClient`FileTreeOpen[EvaluationCell[]]" + ] + ], + MenuEvaluator -> Automatic, + Method -> "Queued" + ], + MenuItem[ + "Un/Mark as Excluded", + KernelExecute[ + ToExpression[ + "DefinitionNotebookClient`FileTreeExclusionToggle[EvaluationCell[]]" + ] + ], + MenuEvaluator -> Automatic, + Method -> "Queued" + ], + MenuItem[ + "Copy Path to Clipboard", + KernelExecute[ + ToExpression[ + "DefinitionNotebookClient`FileTreeCopy[EvaluationCell[]]" + ] + ], + MenuEvaluator -> Automatic, + Method -> "Queued" + ] + }, + Background -> GrayLevel[0.99] ], Cell[ StyleData[ - "ExcludedCellLabel", - StyleDefinitions -> StyleData["Text"] + "FileManagerEmptyDirectory", + StyleDefinitions -> StyleData["FileManagerDirectory"] ], - ShowStringCharacters -> False, - FontFamily -> "Source Sans Pro", - FontSize -> 9, - FontWeight -> Plain, - FontSlant -> Italic, - FontColor -> RGBColor[0.9, 0.4, 0.4, 0.5], - Background -> None + CellFrameLabels -> { + { + Cell[ + BoxData[ + TemplateBox[{}, "FileManagerEmptyDirectoryIconTemplate"] + ], + Background -> None + ], + None + }, + {None, None} + } ], Cell[ - StyleData["Comment", StyleDefinitions -> StyleData["Text"]], - CellFrame -> {{3, 0}, {0, 0}}, - CellMargins -> {{66, 0}, {1, 0}}, - CellElementSpacings -> {"ClosedCellHeight" -> 0}, - GeneratedCellStyles -> { - "Graphics" -> {"Graphics", "Comment"}, - "Message" -> {"Message", "MSG", "Comment"}, - "Output" -> {"Output", "Comment"}, - "Print" -> {"Print", "Comment"}, - "PrintTemporary" -> {"PrintTemporary", "Comment"} - }, - CellFrameColor -> RGBColor[0.88072, 0.61104, 0.14205], - CellFrameLabelMargins -> {{0, 10}, {0, 0}}, - FontColor -> GrayLevel[0.25], - Background -> RGBColor[0.982, 0.942, 0.871] + StyleData["FileManagerBottomSpacer"], + ShowCellBracket -> False + ], + Cell[ + StyleData["FileManagerTopSpacer"], + CellMargins -> 0, + CellElementSpacings -> {"CellMinHeight" -> 0, "ClosedCellHeight" -> 0}, + CellOpen -> False ], Cell[ StyleData[ - "AuthorComment", - StyleDefinitions -> StyleData["Comment"] + "UsageInputs", + StyleDefinitions -> StyleData["Input"] ], - GeneratedCellStyles -> { - "Graphics" -> {"Graphics", "AuthorComment"}, - "Message" -> {"Message", "MSG", "AuthorComment"}, - "Output" -> {"Output", "AuthorComment"}, - "Print" -> {"Print", "AuthorComment"}, - "PrintTemporary" -> {"PrintTemporary", "AuthorComment"} + CellMargins -> {{66, 10}, {0, 8}}, + StyleKeyMapping -> {"Tab" -> "UsageDescription"}, + Evaluatable -> False, + CellEventActions -> { + "ReturnKeyDown" :> + With[ { RSNB`nb$ = Notebooks[EvaluationCell[]] }, + SelectionMove[EvaluationCell[], After, Cell]; + NotebookWrite[RSNB`nb$, Cell["", "UsageDescription"], All]; + SelectionMove[RSNB`nb$, Before, CellContents] + ], + {"KeyDown", "\t"} :> + Replace[ + SelectionMove[SelectedNotebook[], After, Cell]; + NotebookFind[ + SelectedNotebook[], + "TabNext", + Next, + CellTags, + AutoScroll -> True, + WrapAround -> True + ], + Blank[NotebookSelection] :> + SelectionMove[ + SelectedNotebook[], + All, + CellContents, + AutoScroll -> True + ] + ] }, - CellFrameColor -> RGBColor[0.36842, 0.50678, 0.7098], - Background -> RGBColor[0.905, 0.926, 0.956] + ShowAutoStyles -> False, + ShowCodeAssist -> False, + CodeAssistOptions -> {"DynamicHighlighting" -> False}, + LineSpacing -> {1, 3}, + TabSpacings -> {2.5}, + CounterIncrements -> "Text", + FontFamily -> "Source Sans Pro", + FontSize -> 15, + FontWeight -> "Plain" ], Cell[ StyleData[ - "ReviewerComment", - StyleDefinitions -> StyleData["Comment"] + "UsageDescription", + StyleDefinitions -> StyleData["Text"] ], - GeneratedCellStyles -> { - "Graphics" -> {"Graphics", "ReviewerComment"}, - "Message" -> {"Message", "MSG", "ReviewerComment"}, - "Output" -> {"Output", "ReviewerComment"}, - "Print" -> {"Print", "ReviewerComment"}, - "PrintTemporary" -> {"PrintTemporary", "ReviewerComment"} + CellMargins -> {{86, 10}, {7, 0}}, + StyleKeyMapping -> {"Backspace" -> "UsageInputs"}, + CellGroupingRules -> "OutputGrouping", + CellEventActions -> { + "ReturnKeyDown" :> + With[ { RSNB`nb$ = Notebooks[EvaluationCell[]] }, + SelectionMove[EvaluationCell[], After, Cell]; + + NotebookWrite[ + RSNB`nb$, + Cell[ + BoxData[""], + "UsageInputs", + FontFamily -> "Source Sans Pro" + ], + All + ]; + + SelectionMove[RSNB`nb$, Before, CellContents] + ], + {"KeyDown", "\t"} :> + Replace[ + SelectionMove[SelectedNotebook[], After, Cell]; + NotebookFind[ + SelectedNotebook[], + "TabNext", + Next, + CellTags, + AutoScroll -> True, + WrapAround -> True + ], + Blank[NotebookSelection] :> + SelectionMove[ + SelectedNotebook[], + All, + CellContents, + AutoScroll -> True + ] + ] }, - CellFrameColor -> RGBColor[0.56018, 0.69157, 0.19488], - Background -> RGBColor[0.934, 0.954, 0.879] + ShowAutoSpellCheck -> False + ], + Cell[ + StyleData["Notes", StyleDefinitions -> StyleData["Item"]], + CellDingbat -> + StyleBox[ + "\[FilledVerySmallSquare]", + FontColor -> GrayLevel[0.6] + ], + CellMargins -> {{66, 24}, {9, 7}}, + ReturnCreatesNewCell -> False, + StyleKeyMapping -> { }, + DefaultNewCellStyle -> "Notes", + ShowAutoSpellCheck -> False, + GridBoxOptions -> {BaseStyle -> "TableNotes"} ], Cell[ StyleData[ - "CommentLabel", + "TableNotes", + StyleDefinitions -> StyleData["Notes"] + ], + CellDingbat -> None, + CellFrameColor -> RGBColor[0.749, 0.694, 0.553], + StyleMenuListing -> None, + ButtonBoxOptions -> {Appearance -> {Automatic, None}}, + GridBoxOptions -> { + FrameStyle -> GrayLevel[0.906], + GridBoxAlignment -> { + "Columns" -> {{Left}}, + "ColumnsIndexed" -> { }, + "Rows" -> {{Baseline}}, + "RowsIndexed" -> { } + }, + GridBoxDividers -> {"Columns" -> {{None}}, "Rows" -> {{True}}}, + GridDefaultElement -> Cell["\[Placeholder]", "TableText"] + } + ], + Cell[ + StyleData["TableText"], + DefaultInlineFormatType -> "DefaultInputInlineFormatType", + AutoQuoteCharacters -> { }, + PasteAutoQuoteCharacters -> { }, + StyleMenuListing -> None + ], + Cell[ + StyleData["ExampleDelimiter"], + Selectable -> False, + ShowCellBracket -> Automatic, + CellMargins -> {{66, 14}, {5, 10}}, + Evaluatable -> True, + CellGroupingRules -> {"SectionGrouping", 58}, + CellEvaluationFunction -> (($Line = 0;) &), + ShowCellLabel -> False, + CellLabelAutoDelete -> True, + TabFilling -> "\[LongDash]\[NegativeThickSpace]", + TabSpacings -> {100}, + StyleMenuListing -> None, + FontFamily -> "Verdana", + FontWeight -> Bold, + FontSlant -> "Plain", + FontColor -> GrayLevel[0.906] + ], + Cell[ + StyleData[ + "ExampleText", StyleDefinitions -> StyleData["Text"] + ] + ], + Cell[ + StyleData[ + "PageBreak", + StyleDefinitions -> StyleData["ExampleDelimiter"] ], - ShowStringCharacters -> False, - FontSlant -> "Italic", - FontColor -> GrayLevel[0.5] + Selectable -> False, + CellFrame -> {{0, 0}, {1, 0}}, + CellMargins -> {{66, 14}, {15, -5}}, + CellElementSpacings -> {"CellMinHeight" -> 1}, + Evaluatable -> True, + CellEvaluationFunction -> (($Line = 0;) &), + CellFrameColor -> GrayLevel[77/85] ], Cell[ - StyleData["FormObjectCell"], - CellMargins -> {{66, 66}, {16, 5}} + StyleData["Subsection"], + Evaluatable -> True, + CellEvaluationFunction -> (($Line = 0;) &), + ShowCellLabel -> False + ], + Cell[ + StyleData["Subsubsection"], + Evaluatable -> True, + CellEvaluationFunction -> (($Line = 0;) &), + ShowCellLabel -> False + ], + Cell[ + StyleData["ExampleImage"], + PageWidth :> First[{650}], + CellMargins -> {{66, 66}, {16, 5}}, + Evaluatable -> False, + ShowCellLabel -> False, + MenuSortingValue -> 10000, + RasterBoxOptions -> {ImageEditMode -> False} + ], + Cell[ + StyleData["Link"], + FontFamily -> "Source Sans Pro", + FontColor -> + Dynamic[ + If[ CurrentValue["MouseOver"], + RGBColor[0.855, 0.396, 0.145], + RGBColor[0.02, 0.286, 0.651] + ] + ] ], Cell[ StyleData[ - "LocalFileInput", - StyleDefinitions -> StyleData["Input"] + "StringTypeLink", + StyleDefinitions -> StyleData["Link"] ], - CellFrameLabels -> { - { - None, - Cell[ - BoxData[ - ButtonBox[ - "\"Choose\"", - FrameMargins -> {{5, 5}, {0, 0}}, - BaseStyle -> {"Panel", FontSize -> 12}, + FontColor -> + Dynamic[ + If[ CurrentValue["MouseOver"], + RGBColor[0.969, 0.467, 0.0], + GrayLevel[0.467] + ] + ] + ], + Cell[ + StyleData["CharactersRefLink"], + ShowSpecialCharacters -> False + ], + Cell[ + StyleData["Excluded"], + CellBracketOptions -> {"Color" -> RGBColor[0.9, 0.4, 0.4], "Thickness" -> 2}, + GeneratedCellStyles -> { + "Graphics" -> {"Graphics", "Excluded"}, + "Message" -> {"Message", "MSG", "Excluded"}, + "Output" -> {"Output", "Excluded"}, + "Print" -> {"Print", "Excluded"}, + "PrintTemporary" -> {"PrintTemporary", "Excluded"} + }, + CellFrameMargins -> 4, + CellFrameLabels -> { + { + None, + Cell[ + BoxData[ + TemplateBox[ + { + StyleBox[ + "\"excluded\"", + "ExcludedCellLabel", + StripOnInput -> False + ], + "\"Excluded cells will not appear anywhere in the published resource except for the definition notebook\"" + }, + "PrettyTooltipTemplate" + ] + ], + "ExcludedCellLabel" + ] + }, + {None, None} + }, + StyleMenuListing -> None, + Background -> RGBColor[1, 0.95, 0.95] + ], + Cell[ + StyleData[ + "ExcludedCellLabel", + StyleDefinitions -> StyleData["Text"] + ], + ShowStringCharacters -> False, + FontFamily -> "Source Sans Pro", + FontSize -> 9, + FontWeight -> Plain, + FontSlant -> Italic, + FontColor -> RGBColor[0.9, 0.4, 0.4, 0.5], + Background -> None + ], + Cell[ + StyleData["Comment", StyleDefinitions -> StyleData["Text"]], + CellFrame -> {{3, 0}, {0, 0}}, + CellMargins -> {{66, 0}, {1, 0}}, + CellElementSpacings -> {"ClosedCellHeight" -> 0}, + GeneratedCellStyles -> { + "Graphics" -> {"Graphics", "Comment"}, + "Message" -> {"Message", "MSG", "Comment"}, + "Output" -> {"Output", "Comment"}, + "Print" -> {"Print", "Comment"}, + "PrintTemporary" -> {"PrintTemporary", "Comment"} + }, + CellFrameColor -> RGBColor[0.88072, 0.61104, 0.14205], + CellFrameLabelMargins -> {{0, 10}, {0, 0}}, + FontColor -> GrayLevel[0.25], + Background -> RGBColor[0.982, 0.942, 0.871] + ], + Cell[ + StyleData[ + "AuthorComment", + StyleDefinitions -> StyleData["Comment"] + ], + GeneratedCellStyles -> { + "Graphics" -> {"Graphics", "AuthorComment"}, + "Message" -> {"Message", "MSG", "AuthorComment"}, + "Output" -> {"Output", "AuthorComment"}, + "Print" -> {"Print", "AuthorComment"}, + "PrintTemporary" -> {"PrintTemporary", "AuthorComment"} + }, + CellFrameColor -> RGBColor[0.36842, 0.50678, 0.7098], + Background -> RGBColor[0.905, 0.926, 0.956] + ], + Cell[ + StyleData[ + "ReviewerComment", + StyleDefinitions -> StyleData["Comment"] + ], + GeneratedCellStyles -> { + "Graphics" -> {"Graphics", "ReviewerComment"}, + "Message" -> {"Message", "MSG", "ReviewerComment"}, + "Output" -> {"Output", "ReviewerComment"}, + "Print" -> {"Print", "ReviewerComment"}, + "PrintTemporary" -> {"PrintTemporary", "ReviewerComment"} + }, + CellFrameColor -> RGBColor[0.56018, 0.69157, 0.19488], + Background -> RGBColor[0.934, 0.954, 0.879] + ], + Cell[ + StyleData[ + "CommentLabel", + StyleDefinitions -> StyleData["Text"] + ], + ShowStringCharacters -> False, + FontSlant -> "Italic", + PrivateFontOptions -> {"OperatorSubstitution" -> False}, + FontColor -> GrayLevel[0.5] + ], + Cell[ + StyleData["FormObjectCell"], + CellMargins -> {{66, 66}, {16, 5}} + ], + Cell[ + StyleData[ + "LocalFileInput", + StyleDefinitions -> StyleData["Input"] + ], + CellFrameLabels -> { + { + None, + Cell[ + BoxData[ + ButtonBox[ + "\"Choose\"", + FrameMargins -> {{5, 5}, {0, 0}}, + BaseStyle -> {"Panel", FontSize -> 12}, Evaluator -> Automatic, Method -> "Queued", ButtonFunction :> @@ -16180,156 +16921,3687 @@ Notebook[ ] ] ] - ] - }, - {None, None} + ] + }, + {None, None} + } + ], + Cell[ + StyleData[ + "LocalDirectoryInput", + StyleDefinitions -> StyleData["Input"] + ], + CellFrameLabels -> { + { + None, + Cell[ + BoxData[ + ButtonBox[ + "\"Choose\"", + FrameMargins -> {{5, 5}, {0, 0}}, + BaseStyle -> {"Panel", FontSize -> 12}, + Evaluator -> Automatic, + Method -> "Queued", + ButtonFunction :> + With[ { RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath }, + Quiet[ + Block[ + { + $ContextPath = RSNB`$cp$, + ResourceSystemClient`$AsyncronousResourceInformationUpdates = + False, + DefinitionNotebookClient`$ButtonCodeID = None + }, + Internal`WithLocalSettings[ + DefinitionNotebookClient`$ButtonsDisabled = True; + + Once[ + ReleaseHold[ + CurrentValue[RSNB`nb$, {TaggingRules, "CompatibilityTest"}] + ], + "KernelSession" + ]; + + Needs["DefinitionNotebookClient`"], + Annotation[ + + DefinitionNotebookClient`$ButtonCodeID = + 4898876371082581810; + + DefinitionNotebookClient`CheckForUpdates[ + RSNB`nb$, + ReleaseHold[ + DefinitionNotebookClient`$ButtonCode = + HoldForm[ + If[ $VersionNumber >= 13.0, + DefinitionNotebookClient`LocalFileInputDialog[ + "Paclet", + ParentCell[EvaluationCell[]], + "Type" -> "Directory" + ], + MessageDialog[ + "This feature requires Wolfram Language version 13 or later." + ] + ] + ] + ] + ], + DefinitionNotebookClient`ButtonCodeID[4898876371082581810] + ], + DefinitionNotebookClient`$ButtonsDisabled = False; + ]; + ] + ] + ], + Appearance :> + FEPrivate`FrontEndResource[ + "FEExpressions", + "GrayButtonNinePatchAppearance" + ] + ] + ] + ] + }, + {None, None} + } + ], + Cell[StyleData["Item"], DefaultNewCellStyle -> "Item"], + Cell[ + StyleData[ + "RelatedSymbol", + StyleDefinitions -> StyleData["Item"] + ], + DefaultNewCellStyle -> {"RelatedSymbol", FontFamily -> "Source Sans Pro"}, + DefaultFormatType -> DefaultInputFormatType, + FormatType -> InputForm + ], + Cell[ + StyleData["ButtonText"], + FontFamily -> "Sans Serif", + FontSize -> 11, + FontWeight -> Bold, + FontColor -> RGBColor[0.459, 0.459, 0.459] + ], + Cell[ + StyleData["InlineFormula"], + HyphenationOptions -> {"HyphenationCharacter" -> "\[Continuation]"}, + LanguageCategory -> "Formula", + AutoSpacing -> True, + ScriptLevel -> 1, + SingleLetterItalics -> False, + SpanMaxSize -> 1, + StyleMenuListing -> None, + FontFamily -> "Source Sans Pro", + FontSize -> 1.0 * Inherited, + ButtonBoxOptions -> {Appearance -> {Automatic, None}}, + FractionBoxOptions -> {BaseStyle -> {SpanMaxSize -> Automatic}}, + GridBoxOptions -> { + GridBoxItemSize -> { + "Columns" -> {{Automatic}}, + "ColumnsIndexed" -> { }, + "Rows" -> {{1.0}}, + "RowsIndexed" -> { } + } + } + ], + Cell[ + StyleData["Input"], + CellProlog :> + First[ + { + Quiet[ + Block[{$ContextPath}, Once[ReleaseHold[CurrentValue[#1, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; If[$VersionNumber >= 12.2, Needs["DefinitionNotebookClient`"], Needs["ResourceSystemClient`DefinitionNotebook`"]]; DefinitionNotebookClient`LoadDefinitionNotebook["Paclet", #1]; ] &[ + InputNotebook[] + ] + ] + } + ] + ], + Cell[ + StyleData["Code"], + CellProlog :> + First[ + { + Quiet[ + Block[{$ContextPath}, Once[ReleaseHold[CurrentValue[#1, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; If[$VersionNumber >= 12.2, Needs["DefinitionNotebookClient`"], Needs["ResourceSystemClient`DefinitionNotebook`"]]; DefinitionNotebookClient`LoadDefinitionNotebook["Paclet", #1]; ] &[ + InputNotebook[] + ] + ] + } + ] + ], + Cell[ + StyleData["DockedCell"], + CellFrameColor -> GrayLevel[0.75], + Background -> GrayLevel[16/17] + ], + Cell[ + StyleData["DisclosureDetails"], + CellMargins -> {{94, Inherited}, {10, 0}}, + FontSize -> 12, + FontColor -> GrayLevel[0.5] + ], + Cell[ + StyleData[ + "PacletDirectoryChooser", + StyleDefinitions -> StyleData["Output"] + ], + Deletable -> False, + CellMargins -> {{50, 40}, {Inherited, Inherited}} + ], + Cell[ + StyleData["PacletDirectoryChooserTemplate"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + FrameBox[ + PaneSelectorBox[ + { + "Notebook" -> + TagBox[ + GridBox[ + { + { + TagBox[ + GridBox[ + { + { + TagBox[ + GridBox[ + { + { + TagBox[ + GridBox[ + { + { + TemplateBox[{}, "PacletDirectoryIconTemplate"], + StyleBox[ + "\"Paclet Directory\"", + "Text", + FontWeight -> "SemiBold", + StripOnInput -> False + ], + "\"\"" + } + }, + GridBoxAlignment -> {"Columns" -> {{Automatic}}, "Rows" -> {{Center}}}, + AutoDelete -> False, + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}} + ], + "Grid" + ] + }, + { + StyleBox[ + InterpretationBox[ + StyleBox[ + RowBox[ + { + GridBox[ + { + { + RadioButtonBox[ + Dynamic[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "PacletDirectoryType"} + ], + Function[ + With[ + { + RSNB`nbo = EvaluationNotebook[], + RSNB`cell = EvaluationCell[] + }, + { + RSNB`nbDir = Quiet[NotebookDirectory[RSNB`nbo]], + RSNB`oldDir = + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] + }, + WithCleanup[ + NotebookDelete[Cells[RSNB`cell, AttachedCell -> True]]; + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + True, + + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] = + Inherited; + + + CurrentValue[ + RSNB`cell, + {TaggingRules, "PacletDirectoryType"} + ] = + #1; + + Switch[ + #1, + "Notebook", + If[ DirectoryQ[RSNB`nbDir], + If[ And[ + RSNB`nbDir =!= RSNB`oldDir, + MemberQ[$Packages, "PacletResource`DefinitionNotebook`"] + ], + With[ { RSNB`nb$ = EvaluationNotebook[], RSNB`$cp$ = $ContextPath }, + Quiet[ + Block[ + { + $ContextPath = RSNB`$cp$, + ResourceSystemClient`$AsyncronousResourceInformationUpdates = + False, + DefinitionNotebookClient`$ButtonCodeID = None + }, + Internal`WithLocalSettings[ + DefinitionNotebookClient`$ButtonsDisabled = True; + + Once[ + ReleaseHold[ + CurrentValue[RSNB`nb$, {TaggingRules, "CompatibilityTest"}] + ], + "KernelSession" + ]; + + Needs["DefinitionNotebookClient`"], + Annotation[ + DefinitionNotebookClient`$ButtonCodeID = 341138948110023950; + DefinitionNotebookClient`CheckForUpdates[ + RSNB`nb$, + ReleaseHold[ + DefinitionNotebookClient`$ButtonCode = + HoldForm[ + PacletResource`DefinitionNotebook`RefreshNotebookPacletFiles[ + RSNB`nbo, + RSNB`cell + ] + ] + ] + ], + DefinitionNotebookClient`ButtonCodeID[341138948110023950] + ], + DefinitionNotebookClient`$ButtonsDisabled = False; + ]; + ] + ] + ] + ], + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ]; + + AttachCell[ + EvaluationCell[], + Cell[ + BoxData[ + TemplateBox[ + {"\"The current notebook is not saved.\""}, + "PacletDirectoryChooserErrorTemplate" + ] + ], + "AttachedMessage" + ], + "Inline", + RemovalConditions -> {"EvaluatorQuit"} + ]; + ], + "Custom", + If[ Quiet[PacletObjectQ[PacletObject[File[RSNB`nbDir]]]], + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] = + RSNB`nbDir, + + If[ StringQ[RSNB`nbDir], + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ]; + + AttachCell[ + RSNB`cell, + Cell[ + BoxData[ + TemplateBox[ + { + "\"The specified directory is not a valid paclet directory.\"" + }, + "PacletDirectoryChooserErrorTemplate" + ] + ], + "AttachedMessage" + ], + "Inline", + RemovalConditions -> {"EvaluatorQuit"} + ] + ]; + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ] + ] + ], + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + False + ] + ] + ] + ], + {"Notebook"}, + DefaultBaseStyle -> "RadioButtonBar", + Enabled -> + Dynamic[ + Not[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ] + ] + ] + ], + StyleBox[ + "\"Same as Notebook\"", + "RadioButtonBarLabel", + StripOnInput -> False + ] + } + }, + AutoDelete -> False, + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + ColumnAlignments -> Left, + ColumnSpacings -> 0.3, + BaselinePosition -> {1, 2} + ], + " ", + GridBox[ + { + { + RadioButtonBox[ + Dynamic[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "PacletDirectoryType"} + ], + Function[ + With[ + { + RSNB`nbo = EvaluationNotebook[], + RSNB`cell = EvaluationCell[] + }, + { + RSNB`nbDir = Quiet[NotebookDirectory[RSNB`nbo]], + RSNB`oldDir = + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] + }, + WithCleanup[ + NotebookDelete[Cells[RSNB`cell, AttachedCell -> True]]; + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + True, + + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] = + Inherited; + + + CurrentValue[ + RSNB`cell, + {TaggingRules, "PacletDirectoryType"} + ] = + #1; + + Switch[ + #1, + "Notebook", + If[ DirectoryQ[RSNB`nbDir], + If[ And[ + RSNB`nbDir =!= RSNB`oldDir, + MemberQ[$Packages, "PacletResource`DefinitionNotebook`"] + ], + With[ { RSNB`nb$ = EvaluationNotebook[], RSNB`$cp$ = $ContextPath }, + Quiet[ + Block[ + { + $ContextPath = RSNB`$cp$, + ResourceSystemClient`$AsyncronousResourceInformationUpdates = + False, + DefinitionNotebookClient`$ButtonCodeID = None + }, + Internal`WithLocalSettings[ + DefinitionNotebookClient`$ButtonsDisabled = True; + + Once[ + ReleaseHold[ + CurrentValue[RSNB`nb$, {TaggingRules, "CompatibilityTest"}] + ], + "KernelSession" + ]; + + Needs["DefinitionNotebookClient`"], + Annotation[ + DefinitionNotebookClient`$ButtonCodeID = 341138948110023950; + DefinitionNotebookClient`CheckForUpdates[ + RSNB`nb$, + ReleaseHold[ + DefinitionNotebookClient`$ButtonCode = + HoldForm[ + PacletResource`DefinitionNotebook`RefreshNotebookPacletFiles[ + RSNB`nbo, + RSNB`cell + ] + ] + ] + ], + DefinitionNotebookClient`ButtonCodeID[341138948110023950] + ], + DefinitionNotebookClient`$ButtonsDisabled = False; + ]; + ] + ] + ] + ], + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ]; + + AttachCell[ + EvaluationCell[], + Cell[ + BoxData[ + TemplateBox[ + {"\"The current notebook is not saved.\""}, + "PacletDirectoryChooserErrorTemplate" + ] + ], + "AttachedMessage" + ], + "Inline", + RemovalConditions -> {"EvaluatorQuit"} + ]; + ], + "Custom", + If[ Quiet[PacletObjectQ[PacletObject[File[RSNB`nbDir]]]], + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] = + RSNB`nbDir, + + If[ StringQ[RSNB`nbDir], + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ]; + + AttachCell[ + RSNB`cell, + Cell[ + BoxData[ + TemplateBox[ + { + "\"The specified directory is not a valid paclet directory.\"" + }, + "PacletDirectoryChooserErrorTemplate" + ] + ], + "AttachedMessage" + ], + "Inline", + RemovalConditions -> {"EvaluatorQuit"} + ] + ]; + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ] + ] + ], + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + False + ] + ] + ] + ], + {"Custom"}, + DefaultBaseStyle -> "RadioButtonBar", + Enabled -> + Dynamic[ + Not[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ] + ] + ] + ], + StyleBox[ + "\"Other\"", + "RadioButtonBarLabel", + StripOnInput -> False + ] + } + }, + AutoDelete -> False, + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + ColumnAlignments -> Left, + ColumnSpacings -> 0.3, + BaselinePosition -> {1, 2} + ] + } + ], + "Deploy" + ], + RadioButtonBar[ + Dynamic[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "PacletDirectoryType"} + ], + Function[ + With[ + { + RSNB`nbo = EvaluationNotebook[], + RSNB`cell = EvaluationCell[] + }, + { + RSNB`nbDir = Quiet[NotebookDirectory[RSNB`nbo]], + RSNB`oldDir = + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] + }, + WithCleanup[ + NotebookDelete[Cells[RSNB`cell, AttachedCell -> True]]; + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + True, + + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] = + Inherited; + + + CurrentValue[ + RSNB`cell, + {TaggingRules, "PacletDirectoryType"} + ] = + #1; + + Switch[ + #1, + "Notebook", + If[ DirectoryQ[RSNB`nbDir], + If[ And[ + RSNB`nbDir =!= RSNB`oldDir, + MemberQ[$Packages, "PacletResource`DefinitionNotebook`"] + ], + With[ { RSNB`nb$ = EvaluationNotebook[], RSNB`$cp$ = $ContextPath }, + Quiet[ + Block[ + { + $ContextPath = RSNB`$cp$, + ResourceSystemClient`$AsyncronousResourceInformationUpdates = + False, + DefinitionNotebookClient`$ButtonCodeID = None + }, + Internal`WithLocalSettings[ + DefinitionNotebookClient`$ButtonsDisabled = True; + + Once[ + ReleaseHold[ + CurrentValue[RSNB`nb$, {TaggingRules, "CompatibilityTest"}] + ], + "KernelSession" + ]; + + Needs["DefinitionNotebookClient`"], + Annotation[ + DefinitionNotebookClient`$ButtonCodeID = 341138948110023950; + DefinitionNotebookClient`CheckForUpdates[ + RSNB`nb$, + ReleaseHold[ + DefinitionNotebookClient`$ButtonCode = + HoldForm[ + PacletResource`DefinitionNotebook`RefreshNotebookPacletFiles[ + RSNB`nbo, + RSNB`cell + ] + ] + ] + ], + DefinitionNotebookClient`ButtonCodeID[341138948110023950] + ], + DefinitionNotebookClient`$ButtonsDisabled = False; + ]; + ] + ] + ] + ], + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ]; + + AttachCell[ + EvaluationCell[], + Cell[ + BoxData[ + TemplateBox[ + {"\"The current notebook is not saved.\""}, + "PacletDirectoryChooserErrorTemplate" + ] + ], + "AttachedMessage" + ], + "Inline", + RemovalConditions -> {"EvaluatorQuit"} + ]; + ], + "Custom", + If[ Quiet[PacletObjectQ[PacletObject[File[RSNB`nbDir]]]], + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] = + RSNB`nbDir, + + If[ StringQ[RSNB`nbDir], + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ]; + + AttachCell[ + RSNB`cell, + Cell[ + BoxData[ + TemplateBox[ + { + "\"The specified directory is not a valid paclet directory.\"" + }, + "PacletDirectoryChooserErrorTemplate" + ] + ], + "AttachedMessage" + ], + "Inline", + RemovalConditions -> {"EvaluatorQuit"} + ] + ]; + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ] + ] + ], + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + False + ] + ] + ] + ], + {"Notebook" -> "Same as Notebook", "Custom" -> "Other"}, + Enabled -> + Dynamic[ + Not[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ] + ] + ] + ] + ], + "Text", + FontSize -> 13, + StripOnInput -> False + ] + } + }, + GridBoxAlignment -> {"Columns" -> {{Left}}}, + DefaultBaseStyle -> "Column", + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}} + ], + "Column" + ], + ItemBox[ + TemplateBox[ + { + TemplateBox[ + { + FrameBox[ + ButtonBox[ + GraphicsBox[ + { + Thickness[0.02439], + StyleBox[ + { + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {12.383, 36.391}, + {35.711, 36.391}, + {35.711, 13.063}, + {12.383, 13.063}, + {12.383, 36.391} + } + } + ] + }, + { + EdgeForm[JoinForm[{"Miter", 10.0}]], + EdgeForm[Thickness[0.02439]], + EdgeForm[RGBColor[0.98039, 0.98039, 0.98039, 1.0]], + FaceForm[RGBColor[0.98039, 0.98039, 0.98039, 1.0]] + }, + StripOnInput -> False + ], + StyleBox[ + { + JoinedCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {12.383, 36.391}, + {35.711, 36.391}, + {35.711, 13.063}, + {12.383, 13.063}, + {12.383, 36.391} + } + }, + CurveClosed -> {1} + ] + }, + { + JoinForm[{"Miter", 10.0}], + Thickness[0.085346], + RGBColor[0.65098, 0.65098, 0.65098, 1.0] + }, + StripOnInput -> False + ], + StyleBox[ + { + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {4.609, 28.617}, + {27.937, 28.617}, + {27.937, 5.289}, + {4.609, 5.289}, + {4.609, 28.617} + } + } + ] + }, + { + EdgeForm[JoinForm[{"Miter", 10.0}]], + EdgeForm[Thickness[0.085346]], + EdgeForm[RGBColor[0.98039, 0.98039, 0.98039, 1.0]], + FaceForm[RGBColor[0.98039, 0.98039, 0.98039, 1.0]] + }, + StripOnInput -> False + ], + StyleBox[ + { + JoinedCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {4.609, 28.617}, + {27.937, 28.617}, + {27.937, 5.289}, + {4.609, 5.289}, + {4.609, 28.617} + } + }, + CurveClosed -> {1} + ] + }, + { + JoinForm[{"Miter", 10.0}], + Thickness[0.085346], + RGBColor[0.65098, 0.65098, 0.65098, 1.0] + }, + StripOnInput -> False + ], + StyleBox[ + { + JoinedCurveBox[ + {{{0, 2, 0}}}, + {{{12.383, 16.953}, {20.16, 16.953}}}, + CurveClosed -> {0} + ] + }, + { + JoinForm[{"Miter", 10.0}], + Thickness[0.085346], + RGBColor[0.65098, 0.65098, 0.65098, 1.0] + }, + StripOnInput -> False + ], + StyleBox[ + { + JoinedCurveBox[ + {{{0, 2, 0}}}, + {{{16.273, 20.84}, {16.273, 13.062}}}, + CurveClosed -> {0} + ] + }, + { + JoinForm[{"Miter", 10.0}], + Thickness[0.085346], + RGBColor[0.65098, 0.65098, 0.65098, 1.0] + }, + StripOnInput -> False + ] + }, + { + ImageSize -> 14, + PlotRange -> {{0.0, 41.0}, {0.0, 41.0}}, + AspectRatio -> Automatic + } + ], + ButtonFunction :> + ( + SelectionMove[ + First[ + Cells[ + EvaluationNotebook[], + CellStyle -> "FileManagerTopSpacer", + CellTags -> "FileManager-PacletFiles" + ], + $Failed + ], + All, + CellGroup, + AutoScroll -> False + ]; + + + FrontEndTokenExecute[ + EvaluationNotebook[], + "SelectionOpenAllGroups" + ]; + + SelectionMove[EvaluationCell[], Before, Cell];), + Appearance -> None, + Enabled -> + Dynamic[ + Not[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ] + ] + ], + FrameMargins -> 2, + Method -> "Preemptive", + ImageSize -> {Automatic, 20}, + Evaluator -> Automatic + ], + Background -> + Dynamic[ + If[ CurrentValue["MouseOver"], + If[ CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ], + GrayLevel[0.98], + GrayLevel[0.92] + ], + GrayLevel[0.98] + ] + ], + FrameMargins -> 0, + FrameStyle -> GrayLevel[0, 0], + StripOnInput -> False + ], + "\"Expand folders\"" + }, + "PrettyTooltipTemplate" + ], + TemplateBox[ + { + FrameBox[ + ButtonBox[ + GraphicsBox[ + { + Thickness[0.02439], + StyleBox[ + { + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {12.383, 36.391}, + {35.711, 36.391}, + {35.711, 13.063}, + {12.383, 13.063}, + {12.383, 36.391} + } + } + ] + }, + { + EdgeForm[JoinForm[{"Miter", 10.0}]], + EdgeForm[Thickness[0.02439]], + EdgeForm[RGBColor[0.98039, 0.98039, 0.98039, 1.0]], + FaceForm[RGBColor[0.98039, 0.98039, 0.98039, 1.0]] + }, + StripOnInput -> False + ], + StyleBox[ + { + JoinedCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {12.383, 36.391}, + {35.711, 36.391}, + {35.711, 13.063}, + {12.383, 13.063}, + {12.383, 36.391} + } + }, + CurveClosed -> {1} + ] + }, + { + JoinForm[{"Miter", 10.0}], + Thickness[0.085346], + RGBColor[0.65098, 0.65098, 0.65098, 1.0] + }, + StripOnInput -> False + ], + StyleBox[ + { + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {4.609, 28.617}, + {27.937, 28.617}, + {27.937, 5.289}, + {4.609, 5.289}, + {4.609, 28.617} + } + } + ] + }, + { + EdgeForm[JoinForm[{"Miter", 10.0}]], + EdgeForm[Thickness[0.085346]], + EdgeForm[RGBColor[0.98039, 0.98039, 0.98039, 1.0]], + FaceForm[RGBColor[0.98039, 0.98039, 0.98039, 1.0]] + }, + StripOnInput -> False + ], + StyleBox[ + { + JoinedCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {4.609, 28.617}, + {27.937, 28.617}, + {27.937, 5.289}, + {4.609, 5.289}, + {4.609, 28.617} + } + }, + CurveClosed -> {1} + ] + }, + { + JoinForm[{"Miter", 10.0}], + Thickness[0.085346], + RGBColor[0.65098, 0.65098, 0.65098, 1.0] + }, + StripOnInput -> False + ], + StyleBox[ + { + JoinedCurveBox[ + {{{0, 2, 0}}}, + {{{12.383, 16.953}, {20.16, 16.953}}}, + CurveClosed -> {0} + ] + }, + { + JoinForm[{"Miter", 10.0}], + Thickness[0.085346], + RGBColor[0.65098, 0.65098, 0.65098, 1.0] + }, + StripOnInput -> False + ] + }, + { + ImageSize -> 14, + PlotRange -> {{0.0, 41.0}, {0.0, 41.0}}, + AspectRatio -> Automatic + } + ], + ButtonFunction :> + ( + SelectionMove[ + First[ + Cells[ + EvaluationNotebook[], + CellStyle -> "FileManagerTopSpacer", + CellTags -> "FileManager-PacletFiles" + ], + $Failed + ], + All, + CellGroup, + AutoScroll -> False + ]; + + + FrontEndTokenExecute[ + EvaluationNotebook[], + "SelectionCloseAllGroups" + ]; + + + FrontEndTokenExecute[ + EvaluationNotebook[], + "OpenCloseGroup" + ]; + + SelectionMove[EvaluationCell[], Before, Cell];), + Appearance -> None, + Enabled -> + Dynamic[ + Not[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ] + ] + ], + FrameMargins -> 2, + Method -> "Preemptive", + ImageSize -> {Automatic, 20}, + Evaluator -> Automatic + ], + Background -> + Dynamic[ + If[ CurrentValue["MouseOver"], + If[ CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ], + GrayLevel[0.98], + GrayLevel[0.92] + ], + GrayLevel[0.98] + ] + ], + FrameMargins -> 0, + FrameStyle -> GrayLevel[0, 0], + StripOnInput -> False + ], + "\"Collapse folders\"" + }, + "PrettyTooltipTemplate" + ], + TemplateBox[ + { + FrameBox[ + ButtonBox[ + DynamicModuleBox[ + {RSNB`r$$ = 0}, + PaneSelectorBox[ + { + False -> + GraphicsBox[ + { + GrayLevel[0.65], + Thickness[0.1], + CapForm["Round"], + GeometricTransformationBox[ + { + CircleBox[ + {0, 0}, + 1, + NCache[{(2*Pi)/3, (7*Pi)/3}, {2.0944, 7.3304}] + ], + LineBox[ + NCache[ + { + {-1.125, Sqrt[3]/2}, + {-2^(-1), Sqrt[3]/2}, + {-2^(-1), 0.24103} + }, + {{-1.125, 0.86603}, {-0.5, 0.86603}, {-0.5, 0.24103}} + ] + ] + }, + {{{1, 0}, {0, 1}}, {0, 0}} + ] + }, + ImageSize -> 14, + ImagePadding -> 1, + PlotRange -> 1.3 + ], + True -> + OverlayBox[ + { + AnimatorBox[ + Dynamic[ + BoxForm`RemapVariable[RSNB`r$$, {0, -2*Pi}], + BoxForm`RemapValue[#1, RSNB`r$$, {0, -2*Pi}] & + ], + {0, 1}, + AppearanceElements -> { }, + DefaultDuration -> 1, + ImageSize -> 0.1 + ], + GraphicsBox[ + { + GrayLevel[0.65], + Thickness[0.1], + CapForm["Round"], + GeometricTransformationBox[ + GeometricTransformationBox[ + GeometricTransformationBox[ + { + CircleBox[ + {0, 0}, + 1, + NCache[{(2*Pi)/3, (7*Pi)/3}, {2.0944, 7.3304}] + ], + LineBox[ + NCache[ + { + {-1.125, Sqrt[3]/2}, + {-2^(-1), Sqrt[3]/2}, + {-2^(-1), 0.24103} + }, + {{-1.125, 0.86603}, {-0.5, 0.86603}, {-0.5, 0.24103}} + ] + ] + }, + {{{1, 0}, {0, 1}}, {0, 0}} + ], + { + { + {Cos[Dynamic[RSNB`r$$]], -Sin[Dynamic[RSNB`r$$]]}, + {Sin[Dynamic[RSNB`r$$]], Cos[Dynamic[RSNB`r$$]]} + }, + {0, 0} + } + ], + {{{1, 0}, {0, 1}}, {0, 0}} + ] + }, + ImageSize -> 14, + ImagePadding -> 1, + PlotRange -> 1.3 + ] + } + ] + }, + Dynamic[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ] + ], + ContentPadding -> False + ], + Initialization :> + (CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ] = + False), + DynamicModuleValues :> { } + ], + ButtonFunction :> + With[ + { + RSNB`nbo = EvaluationNotebook[], + RSNB`cell = EvaluationCell[] + }, + WithCleanup[ + NotebookDelete[Cells[RSNB`cell, AttachedCell -> True]]; + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + True, + If[ And[ + SameQ[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "PacletDirectoryType"} + ], + "Notebook" + ], + Not[DirectoryQ[Quiet[NotebookDirectory[RSNB`nbo]]]] + ], + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ]; + + AttachCell[ + EvaluationCell[], + Cell[ + BoxData[ + TemplateBox[ + {"\"The current notebook is not saved.\""}, + "PacletDirectoryChooserErrorTemplate" + ] + ], + "AttachedMessage" + ], + "Inline", + RemovalConditions -> {"EvaluatorQuit"} + ], + With[ { RSNB`nb$ = EvaluationNotebook[], RSNB`$cp$ = $ContextPath }, + Quiet[ + Block[ + { + $ContextPath = RSNB`$cp$, + ResourceSystemClient`$AsyncronousResourceInformationUpdates = + False, + DefinitionNotebookClient`$ButtonCodeID = None + }, + Internal`WithLocalSettings[ + DefinitionNotebookClient`$ButtonsDisabled = True; + + Once[ + ReleaseHold[ + CurrentValue[RSNB`nb$, {TaggingRules, "CompatibilityTest"}] + ], + "KernelSession" + ]; + + Needs["DefinitionNotebookClient`"], + Annotation[ + DefinitionNotebookClient`$ButtonCodeID = 341138948110023950; + DefinitionNotebookClient`CheckForUpdates[ + RSNB`nb$, + ReleaseHold[ + DefinitionNotebookClient`$ButtonCode = + HoldForm[ + PacletResource`DefinitionNotebook`RefreshNotebookPacletFiles[ + RSNB`nbo, + RSNB`cell + ] + ] + ] + ], + DefinitionNotebookClient`ButtonCodeID[341138948110023950] + ], + DefinitionNotebookClient`$ButtonsDisabled = False; + ]; + ] + ] + ] + ], + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + False + ] + ], + Appearance -> None, + Enabled -> + Dynamic[ + Not[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ] + ] + ], + FrameMargins -> 2, + Method -> "Queued", + ImageSize -> {Automatic, 20}, + Evaluator -> Automatic + ], + Background -> + Dynamic[ + If[ CurrentValue["MouseOver"], + If[ CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ], + GrayLevel[0.98], + GrayLevel[0.92] + ], + GrayLevel[0.98] + ] + ], + FrameMargins -> 0, + FrameStyle -> GrayLevel[0, 0], + StripOnInput -> False + ], + "\"Refresh files\"" + }, + "PrettyTooltipTemplate" + ] + }, + "RowDefault" + ], + ItemSize -> Fit, + StripOnInput -> False + ] + } + }, + GridBoxAlignment -> {"Columns" -> {Left, Right}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}} + ], + "Grid" + ] + } + }, + GridBoxAlignment -> {"Columns" -> {{Left}}}, + DefaultBaseStyle -> "Column", + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}} + ], + "Column" + ], + "Custom" -> + TagBox[ + GridBox[ + { + { + TagBox[ + GridBox[ + { + { + TagBox[ + GridBox[ + { + { + TagBox[ + GridBox[ + { + { + TemplateBox[{}, "PacletDirectoryIconTemplate"], + StyleBox[ + "\"Paclet Directory\"", + "Text", + FontWeight -> "SemiBold", + StripOnInput -> False + ], + "\"\"" + } + }, + GridBoxAlignment -> {"Columns" -> {{Automatic}}, "Rows" -> {{Center}}}, + AutoDelete -> False, + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}} + ], + "Grid" + ] + }, + { + StyleBox[ + InterpretationBox[ + StyleBox[ + RowBox[ + { + GridBox[ + { + { + RadioButtonBox[ + Dynamic[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "PacletDirectoryType"} + ], + Function[ + With[ + { + RSNB`nbo = EvaluationNotebook[], + RSNB`cell = EvaluationCell[] + }, + { + RSNB`nbDir = Quiet[NotebookDirectory[RSNB`nbo]], + RSNB`oldDir = + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] + }, + WithCleanup[ + NotebookDelete[Cells[RSNB`cell, AttachedCell -> True]]; + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + True, + + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] = + Inherited; + + + CurrentValue[ + RSNB`cell, + {TaggingRules, "PacletDirectoryType"} + ] = + #1; + + Switch[ + #1, + "Notebook", + If[ DirectoryQ[RSNB`nbDir], + If[ And[ + RSNB`nbDir =!= RSNB`oldDir, + MemberQ[$Packages, "PacletResource`DefinitionNotebook`"] + ], + With[ { RSNB`nb$ = EvaluationNotebook[], RSNB`$cp$ = $ContextPath }, + Quiet[ + Block[ + { + $ContextPath = RSNB`$cp$, + ResourceSystemClient`$AsyncronousResourceInformationUpdates = + False, + DefinitionNotebookClient`$ButtonCodeID = None + }, + Internal`WithLocalSettings[ + DefinitionNotebookClient`$ButtonsDisabled = True; + + Once[ + ReleaseHold[ + CurrentValue[RSNB`nb$, {TaggingRules, "CompatibilityTest"}] + ], + "KernelSession" + ]; + + Needs["DefinitionNotebookClient`"], + Annotation[ + DefinitionNotebookClient`$ButtonCodeID = 341138948110023950; + DefinitionNotebookClient`CheckForUpdates[ + RSNB`nb$, + ReleaseHold[ + DefinitionNotebookClient`$ButtonCode = + HoldForm[ + PacletResource`DefinitionNotebook`RefreshNotebookPacletFiles[ + RSNB`nbo, + RSNB`cell + ] + ] + ] + ], + DefinitionNotebookClient`ButtonCodeID[341138948110023950] + ], + DefinitionNotebookClient`$ButtonsDisabled = False; + ]; + ] + ] + ] + ], + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ]; + + AttachCell[ + EvaluationCell[], + Cell[ + BoxData[ + TemplateBox[ + {"\"The current notebook is not saved.\""}, + "PacletDirectoryChooserErrorTemplate" + ] + ], + "AttachedMessage" + ], + "Inline", + RemovalConditions -> {"EvaluatorQuit"} + ]; + ], + "Custom", + If[ Quiet[PacletObjectQ[PacletObject[File[RSNB`nbDir]]]], + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] = + RSNB`nbDir, + + If[ StringQ[RSNB`nbDir], + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ]; + + AttachCell[ + RSNB`cell, + Cell[ + BoxData[ + TemplateBox[ + { + "\"The specified directory is not a valid paclet directory.\"" + }, + "PacletDirectoryChooserErrorTemplate" + ] + ], + "AttachedMessage" + ], + "Inline", + RemovalConditions -> {"EvaluatorQuit"} + ] + ]; + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ] + ] + ], + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + False + ] + ] + ] + ], + {"Notebook"}, + DefaultBaseStyle -> "RadioButtonBar", + Enabled -> + Dynamic[ + Not[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ] + ] + ] + ], + StyleBox[ + "\"Same as Notebook\"", + "RadioButtonBarLabel", + StripOnInput -> False + ] + } + }, + AutoDelete -> False, + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + ColumnAlignments -> Left, + ColumnSpacings -> 0.3, + BaselinePosition -> {1, 2} + ], + " ", + GridBox[ + { + { + RadioButtonBox[ + Dynamic[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "PacletDirectoryType"} + ], + Function[ + With[ + { + RSNB`nbo = EvaluationNotebook[], + RSNB`cell = EvaluationCell[] + }, + { + RSNB`nbDir = Quiet[NotebookDirectory[RSNB`nbo]], + RSNB`oldDir = + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] + }, + WithCleanup[ + NotebookDelete[Cells[RSNB`cell, AttachedCell -> True]]; + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + True, + + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] = + Inherited; + + + CurrentValue[ + RSNB`cell, + {TaggingRules, "PacletDirectoryType"} + ] = + #1; + + Switch[ + #1, + "Notebook", + If[ DirectoryQ[RSNB`nbDir], + If[ And[ + RSNB`nbDir =!= RSNB`oldDir, + MemberQ[$Packages, "PacletResource`DefinitionNotebook`"] + ], + With[ { RSNB`nb$ = EvaluationNotebook[], RSNB`$cp$ = $ContextPath }, + Quiet[ + Block[ + { + $ContextPath = RSNB`$cp$, + ResourceSystemClient`$AsyncronousResourceInformationUpdates = + False, + DefinitionNotebookClient`$ButtonCodeID = None + }, + Internal`WithLocalSettings[ + DefinitionNotebookClient`$ButtonsDisabled = True; + + Once[ + ReleaseHold[ + CurrentValue[RSNB`nb$, {TaggingRules, "CompatibilityTest"}] + ], + "KernelSession" + ]; + + Needs["DefinitionNotebookClient`"], + Annotation[ + DefinitionNotebookClient`$ButtonCodeID = 341138948110023950; + DefinitionNotebookClient`CheckForUpdates[ + RSNB`nb$, + ReleaseHold[ + DefinitionNotebookClient`$ButtonCode = + HoldForm[ + PacletResource`DefinitionNotebook`RefreshNotebookPacletFiles[ + RSNB`nbo, + RSNB`cell + ] + ] + ] + ], + DefinitionNotebookClient`ButtonCodeID[341138948110023950] + ], + DefinitionNotebookClient`$ButtonsDisabled = False; + ]; + ] + ] + ] + ], + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ]; + + AttachCell[ + EvaluationCell[], + Cell[ + BoxData[ + TemplateBox[ + {"\"The current notebook is not saved.\""}, + "PacletDirectoryChooserErrorTemplate" + ] + ], + "AttachedMessage" + ], + "Inline", + RemovalConditions -> {"EvaluatorQuit"} + ]; + ], + "Custom", + If[ Quiet[PacletObjectQ[PacletObject[File[RSNB`nbDir]]]], + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] = + RSNB`nbDir, + + If[ StringQ[RSNB`nbDir], + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ]; + + AttachCell[ + RSNB`cell, + Cell[ + BoxData[ + TemplateBox[ + { + "\"The specified directory is not a valid paclet directory.\"" + }, + "PacletDirectoryChooserErrorTemplate" + ] + ], + "AttachedMessage" + ], + "Inline", + RemovalConditions -> {"EvaluatorQuit"} + ] + ]; + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ] + ] + ], + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + False + ] + ] + ] + ], + {"Custom"}, + DefaultBaseStyle -> "RadioButtonBar", + Enabled -> + Dynamic[ + Not[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ] + ] + ] + ], + StyleBox[ + "\"Other\"", + "RadioButtonBarLabel", + StripOnInput -> False + ] + } + }, + AutoDelete -> False, + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + ColumnAlignments -> Left, + ColumnSpacings -> 0.3, + BaselinePosition -> {1, 2} + ] + } + ], + "Deploy" + ], + RadioButtonBar[ + Dynamic[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "PacletDirectoryType"} + ], + Function[ + With[ + { + RSNB`nbo = EvaluationNotebook[], + RSNB`cell = EvaluationCell[] + }, + { + RSNB`nbDir = Quiet[NotebookDirectory[RSNB`nbo]], + RSNB`oldDir = + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] + }, + WithCleanup[ + NotebookDelete[Cells[RSNB`cell, AttachedCell -> True]]; + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + True, + + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] = + Inherited; + + + CurrentValue[ + RSNB`cell, + {TaggingRules, "PacletDirectoryType"} + ] = + #1; + + Switch[ + #1, + "Notebook", + If[ DirectoryQ[RSNB`nbDir], + If[ And[ + RSNB`nbDir =!= RSNB`oldDir, + MemberQ[$Packages, "PacletResource`DefinitionNotebook`"] + ], + With[ { RSNB`nb$ = EvaluationNotebook[], RSNB`$cp$ = $ContextPath }, + Quiet[ + Block[ + { + $ContextPath = RSNB`$cp$, + ResourceSystemClient`$AsyncronousResourceInformationUpdates = + False, + DefinitionNotebookClient`$ButtonCodeID = None + }, + Internal`WithLocalSettings[ + DefinitionNotebookClient`$ButtonsDisabled = True; + + Once[ + ReleaseHold[ + CurrentValue[RSNB`nb$, {TaggingRules, "CompatibilityTest"}] + ], + "KernelSession" + ]; + + Needs["DefinitionNotebookClient`"], + Annotation[ + DefinitionNotebookClient`$ButtonCodeID = 341138948110023950; + DefinitionNotebookClient`CheckForUpdates[ + RSNB`nb$, + ReleaseHold[ + DefinitionNotebookClient`$ButtonCode = + HoldForm[ + PacletResource`DefinitionNotebook`RefreshNotebookPacletFiles[ + RSNB`nbo, + RSNB`cell + ] + ] + ] + ], + DefinitionNotebookClient`ButtonCodeID[341138948110023950] + ], + DefinitionNotebookClient`$ButtonsDisabled = False; + ]; + ] + ] + ] + ], + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ]; + + AttachCell[ + EvaluationCell[], + Cell[ + BoxData[ + TemplateBox[ + {"\"The current notebook is not saved.\""}, + "PacletDirectoryChooserErrorTemplate" + ] + ], + "AttachedMessage" + ], + "Inline", + RemovalConditions -> {"EvaluatorQuit"} + ]; + ], + "Custom", + If[ Quiet[PacletObjectQ[PacletObject[File[RSNB`nbDir]]]], + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] = + RSNB`nbDir, + + If[ StringQ[RSNB`nbDir], + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ]; + + AttachCell[ + RSNB`cell, + Cell[ + BoxData[ + TemplateBox[ + { + "\"The specified directory is not a valid paclet directory.\"" + }, + "PacletDirectoryChooserErrorTemplate" + ] + ], + "AttachedMessage" + ], + "Inline", + RemovalConditions -> {"EvaluatorQuit"} + ] + ]; + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ] + ] + ], + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + False + ] + ] + ] + ], + {"Notebook" -> "Same as Notebook", "Custom" -> "Other"}, + Enabled -> + Dynamic[ + Not[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ] + ] + ] + ] + ], + "Text", + FontSize -> 13, + StripOnInput -> False + ] + } + }, + GridBoxAlignment -> {"Columns" -> {{Left}}}, + DefaultBaseStyle -> "Column", + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}} + ], + "Column" + ], + ItemBox[ + TemplateBox[ + { + TemplateBox[ + { + FrameBox[ + ButtonBox[ + GraphicsBox[ + { + Thickness[0.02439], + StyleBox[ + { + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {12.383, 36.391}, + {35.711, 36.391}, + {35.711, 13.063}, + {12.383, 13.063}, + {12.383, 36.391} + } + } + ] + }, + { + EdgeForm[JoinForm[{"Miter", 10.0}]], + EdgeForm[Thickness[0.02439]], + EdgeForm[RGBColor[0.98039, 0.98039, 0.98039, 1.0]], + FaceForm[RGBColor[0.98039, 0.98039, 0.98039, 1.0]] + }, + StripOnInput -> False + ], + StyleBox[ + { + JoinedCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {12.383, 36.391}, + {35.711, 36.391}, + {35.711, 13.063}, + {12.383, 13.063}, + {12.383, 36.391} + } + }, + CurveClosed -> {1} + ] + }, + { + JoinForm[{"Miter", 10.0}], + Thickness[0.085346], + RGBColor[0.65098, 0.65098, 0.65098, 1.0] + }, + StripOnInput -> False + ], + StyleBox[ + { + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {4.609, 28.617}, + {27.937, 28.617}, + {27.937, 5.289}, + {4.609, 5.289}, + {4.609, 28.617} + } + } + ] + }, + { + EdgeForm[JoinForm[{"Miter", 10.0}]], + EdgeForm[Thickness[0.085346]], + EdgeForm[RGBColor[0.98039, 0.98039, 0.98039, 1.0]], + FaceForm[RGBColor[0.98039, 0.98039, 0.98039, 1.0]] + }, + StripOnInput -> False + ], + StyleBox[ + { + JoinedCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {4.609, 28.617}, + {27.937, 28.617}, + {27.937, 5.289}, + {4.609, 5.289}, + {4.609, 28.617} + } + }, + CurveClosed -> {1} + ] + }, + { + JoinForm[{"Miter", 10.0}], + Thickness[0.085346], + RGBColor[0.65098, 0.65098, 0.65098, 1.0] + }, + StripOnInput -> False + ], + StyleBox[ + { + JoinedCurveBox[ + {{{0, 2, 0}}}, + {{{12.383, 16.953}, {20.16, 16.953}}}, + CurveClosed -> {0} + ] + }, + { + JoinForm[{"Miter", 10.0}], + Thickness[0.085346], + RGBColor[0.65098, 0.65098, 0.65098, 1.0] + }, + StripOnInput -> False + ], + StyleBox[ + { + JoinedCurveBox[ + {{{0, 2, 0}}}, + {{{16.273, 20.84}, {16.273, 13.062}}}, + CurveClosed -> {0} + ] + }, + { + JoinForm[{"Miter", 10.0}], + Thickness[0.085346], + RGBColor[0.65098, 0.65098, 0.65098, 1.0] + }, + StripOnInput -> False + ] + }, + { + ImageSize -> 14, + PlotRange -> {{0.0, 41.0}, {0.0, 41.0}}, + AspectRatio -> Automatic + } + ], + ButtonFunction :> + ( + SelectionMove[ + First[ + Cells[ + EvaluationNotebook[], + CellStyle -> "FileManagerTopSpacer", + CellTags -> "FileManager-PacletFiles" + ], + $Failed + ], + All, + CellGroup, + AutoScroll -> False + ]; + + + FrontEndTokenExecute[ + EvaluationNotebook[], + "SelectionOpenAllGroups" + ]; + + SelectionMove[EvaluationCell[], Before, Cell];), + Appearance -> None, + Enabled -> + Dynamic[ + Not[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ] + ] + ], + FrameMargins -> 2, + Method -> "Preemptive", + ImageSize -> {Automatic, 20}, + Evaluator -> Automatic + ], + Background -> + Dynamic[ + If[ CurrentValue["MouseOver"], + If[ CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ], + GrayLevel[0.98], + GrayLevel[0.92] + ], + GrayLevel[0.98] + ] + ], + FrameMargins -> 0, + FrameStyle -> GrayLevel[0, 0], + StripOnInput -> False + ], + "\"Expand folders\"" + }, + "PrettyTooltipTemplate" + ], + TemplateBox[ + { + FrameBox[ + ButtonBox[ + GraphicsBox[ + { + Thickness[0.02439], + StyleBox[ + { + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {12.383, 36.391}, + {35.711, 36.391}, + {35.711, 13.063}, + {12.383, 13.063}, + {12.383, 36.391} + } + } + ] + }, + { + EdgeForm[JoinForm[{"Miter", 10.0}]], + EdgeForm[Thickness[0.02439]], + EdgeForm[RGBColor[0.98039, 0.98039, 0.98039, 1.0]], + FaceForm[RGBColor[0.98039, 0.98039, 0.98039, 1.0]] + }, + StripOnInput -> False + ], + StyleBox[ + { + JoinedCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {12.383, 36.391}, + {35.711, 36.391}, + {35.711, 13.063}, + {12.383, 13.063}, + {12.383, 36.391} + } + }, + CurveClosed -> {1} + ] + }, + { + JoinForm[{"Miter", 10.0}], + Thickness[0.085346], + RGBColor[0.65098, 0.65098, 0.65098, 1.0] + }, + StripOnInput -> False + ], + StyleBox[ + { + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {4.609, 28.617}, + {27.937, 28.617}, + {27.937, 5.289}, + {4.609, 5.289}, + {4.609, 28.617} + } + } + ] + }, + { + EdgeForm[JoinForm[{"Miter", 10.0}]], + EdgeForm[Thickness[0.085346]], + EdgeForm[RGBColor[0.98039, 0.98039, 0.98039, 1.0]], + FaceForm[RGBColor[0.98039, 0.98039, 0.98039, 1.0]] + }, + StripOnInput -> False + ], + StyleBox[ + { + JoinedCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {4.609, 28.617}, + {27.937, 28.617}, + {27.937, 5.289}, + {4.609, 5.289}, + {4.609, 28.617} + } + }, + CurveClosed -> {1} + ] + }, + { + JoinForm[{"Miter", 10.0}], + Thickness[0.085346], + RGBColor[0.65098, 0.65098, 0.65098, 1.0] + }, + StripOnInput -> False + ], + StyleBox[ + { + JoinedCurveBox[ + {{{0, 2, 0}}}, + {{{12.383, 16.953}, {20.16, 16.953}}}, + CurveClosed -> {0} + ] + }, + { + JoinForm[{"Miter", 10.0}], + Thickness[0.085346], + RGBColor[0.65098, 0.65098, 0.65098, 1.0] + }, + StripOnInput -> False + ] + }, + { + ImageSize -> 14, + PlotRange -> {{0.0, 41.0}, {0.0, 41.0}}, + AspectRatio -> Automatic + } + ], + ButtonFunction :> + ( + SelectionMove[ + First[ + Cells[ + EvaluationNotebook[], + CellStyle -> "FileManagerTopSpacer", + CellTags -> "FileManager-PacletFiles" + ], + $Failed + ], + All, + CellGroup, + AutoScroll -> False + ]; + + + FrontEndTokenExecute[ + EvaluationNotebook[], + "SelectionCloseAllGroups" + ]; + + + FrontEndTokenExecute[ + EvaluationNotebook[], + "OpenCloseGroup" + ]; + + SelectionMove[EvaluationCell[], Before, Cell];), + Appearance -> None, + Enabled -> + Dynamic[ + Not[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ] + ] + ], + FrameMargins -> 2, + Method -> "Preemptive", + ImageSize -> {Automatic, 20}, + Evaluator -> Automatic + ], + Background -> + Dynamic[ + If[ CurrentValue["MouseOver"], + If[ CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ], + GrayLevel[0.98], + GrayLevel[0.92] + ], + GrayLevel[0.98] + ] + ], + FrameMargins -> 0, + FrameStyle -> GrayLevel[0, 0], + StripOnInput -> False + ], + "\"Collapse folders\"" + }, + "PrettyTooltipTemplate" + ], + TemplateBox[ + { + FrameBox[ + ButtonBox[ + DynamicModuleBox[ + {RSNB`r$$ = 0}, + PaneSelectorBox[ + { + False -> + GraphicsBox[ + { + GrayLevel[0.65], + Thickness[0.1], + CapForm["Round"], + GeometricTransformationBox[ + { + CircleBox[ + {0, 0}, + 1, + NCache[{(2*Pi)/3, (7*Pi)/3}, {2.0944, 7.3304}] + ], + LineBox[ + NCache[ + { + {-1.125, Sqrt[3]/2}, + {-2^(-1), Sqrt[3]/2}, + {-2^(-1), 0.24103} + }, + {{-1.125, 0.86603}, {-0.5, 0.86603}, {-0.5, 0.24103}} + ] + ] + }, + {{{1, 0}, {0, 1}}, {0, 0}} + ] + }, + ImageSize -> 14, + ImagePadding -> 1, + PlotRange -> 1.3 + ], + True -> + OverlayBox[ + { + AnimatorBox[ + Dynamic[ + BoxForm`RemapVariable[RSNB`r$$, {0, -2*Pi}], + BoxForm`RemapValue[#1, RSNB`r$$, {0, -2*Pi}] & + ], + {0, 1}, + AppearanceElements -> { }, + DefaultDuration -> 1, + ImageSize -> 0.1 + ], + GraphicsBox[ + { + GrayLevel[0.65], + Thickness[0.1], + CapForm["Round"], + GeometricTransformationBox[ + GeometricTransformationBox[ + GeometricTransformationBox[ + { + CircleBox[ + {0, 0}, + 1, + NCache[{(2*Pi)/3, (7*Pi)/3}, {2.0944, 7.3304}] + ], + LineBox[ + NCache[ + { + {-1.125, Sqrt[3]/2}, + {-2^(-1), Sqrt[3]/2}, + {-2^(-1), 0.24103} + }, + {{-1.125, 0.86603}, {-0.5, 0.86603}, {-0.5, 0.24103}} + ] + ] + }, + {{{1, 0}, {0, 1}}, {0, 0}} + ], + { + { + {Cos[Dynamic[RSNB`r$$]], -Sin[Dynamic[RSNB`r$$]]}, + {Sin[Dynamic[RSNB`r$$]], Cos[Dynamic[RSNB`r$$]]} + }, + {0, 0} + } + ], + {{{1, 0}, {0, 1}}, {0, 0}} + ] + }, + ImageSize -> 14, + ImagePadding -> 1, + PlotRange -> 1.3 + ] + } + ] + }, + Dynamic[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ] + ], + ContentPadding -> False + ], + Initialization :> + (CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ] = + False), + DynamicModuleValues :> { } + ], + ButtonFunction :> + With[ + { + RSNB`nbo = EvaluationNotebook[], + RSNB`cell = EvaluationCell[] + }, + WithCleanup[ + NotebookDelete[Cells[RSNB`cell, AttachedCell -> True]]; + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + True, + If[ And[ + SameQ[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "PacletDirectoryType"} + ], + "Notebook" + ], + Not[DirectoryQ[Quiet[NotebookDirectory[RSNB`nbo]]]] + ], + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ]; + + AttachCell[ + EvaluationCell[], + Cell[ + BoxData[ + TemplateBox[ + {"\"The current notebook is not saved.\""}, + "PacletDirectoryChooserErrorTemplate" + ] + ], + "AttachedMessage" + ], + "Inline", + RemovalConditions -> {"EvaluatorQuit"} + ], + With[ { RSNB`nb$ = EvaluationNotebook[], RSNB`$cp$ = $ContextPath }, + Quiet[ + Block[ + { + $ContextPath = RSNB`$cp$, + ResourceSystemClient`$AsyncronousResourceInformationUpdates = + False, + DefinitionNotebookClient`$ButtonCodeID = None + }, + Internal`WithLocalSettings[ + DefinitionNotebookClient`$ButtonsDisabled = True; + + Once[ + ReleaseHold[ + CurrentValue[RSNB`nb$, {TaggingRules, "CompatibilityTest"}] + ], + "KernelSession" + ]; + + Needs["DefinitionNotebookClient`"], + Annotation[ + DefinitionNotebookClient`$ButtonCodeID = 341138948110023950; + DefinitionNotebookClient`CheckForUpdates[ + RSNB`nb$, + ReleaseHold[ + DefinitionNotebookClient`$ButtonCode = + HoldForm[ + PacletResource`DefinitionNotebook`RefreshNotebookPacletFiles[ + RSNB`nbo, + RSNB`cell + ] + ] + ] + ], + DefinitionNotebookClient`ButtonCodeID[341138948110023950] + ], + DefinitionNotebookClient`$ButtonsDisabled = False; + ]; + ] + ] + ] + ], + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + False + ] + ], + Appearance -> None, + Enabled -> + Dynamic[ + Not[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ] + ] + ], + FrameMargins -> 2, + Method -> "Queued", + ImageSize -> {Automatic, 20}, + Evaluator -> Automatic + ], + Background -> + Dynamic[ + If[ CurrentValue["MouseOver"], + If[ CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ], + GrayLevel[0.98], + GrayLevel[0.92] + ], + GrayLevel[0.98] + ] + ], + FrameMargins -> 0, + FrameStyle -> GrayLevel[0, 0], + StripOnInput -> False + ], + "\"Refresh files\"" + }, + "PrettyTooltipTemplate" + ] + }, + "RowDefault" + ], + ItemSize -> Fit, + StripOnInput -> False + ] + } + }, + GridBoxAlignment -> {"Columns" -> {Left, Right}, "Rows" -> {{Top}}}, + AutoDelete -> False, + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}} + ], + "Grid" + ] + }, + { + TagBox[ + GridBox[ + { + { + InputFieldBox[ + Dynamic[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "PacletDirectory"} + ] + ], + String, + FieldHint -> "Choose paclet directory", + BaseStyle -> {FontSize -> 12, FontColor -> GrayLevel[0.25]}, + ImageSize -> {Full, 24}, + BaselinePosition -> Baseline, + FrameMargins -> {{3, 3}, {1, 1}} + ], + ButtonBox[ + StyleBox[ + "\"Browse\[Ellipsis]\"", + "Text", + FontSize -> 12, + StripOnInput -> False + ], + ButtonFunction :> + With[ + { + RSNB`nbo = EvaluationNotebook[], + RSNB`cell = EvaluationCell[] + }, + WithCleanup[ + NotebookDelete[Cells[RSNB`cell, AttachedCell -> True]]; + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + True, + Replace[ + SystemDialogInput[ + "Directory", + Replace[ + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}], + Except[PatternTest[Blank[], DirectoryQ]] :> + Replace[ + Quiet[NotebookDirectory[RSNB`nbo]], + Except[PatternTest[Blank[], DirectoryQ]] :> Directory[] + ] + ] + ], + Pattern[RSNB`s, Blank[String]] :> + With[ { RSNB`nbDir = Quiet[NotebookDirectory[RSNB`nbo]] }, + + If[ RSNB`nbDir === RSNB`s, + + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] = + Inherited; + + CurrentValue[ + RSNB`cell, + {TaggingRules, "PacletDirectoryType"} + ] = + "Notebook";, + + CurrentValue[RSNB`cell, {TaggingRules, "PacletDirectory"}] = + RSNB`s; + + CurrentValue[ + RSNB`cell, + {TaggingRules, "PacletDirectoryType"} + ] = + "Custom"; + ]; + + If[ Quiet[PacletObjectQ[PacletObject[File[RSNB`s]]]], + With[ { RSNB`nb$ = EvaluationNotebook[], RSNB`$cp$ = $ContextPath }, + Quiet[ + Block[ + { + $ContextPath = RSNB`$cp$, + ResourceSystemClient`$AsyncronousResourceInformationUpdates = + False, + DefinitionNotebookClient`$ButtonCodeID = None + }, + Internal`WithLocalSettings[ + DefinitionNotebookClient`$ButtonsDisabled = True; + + Once[ + ReleaseHold[ + CurrentValue[RSNB`nb$, {TaggingRules, "CompatibilityTest"}] + ], + "KernelSession" + ]; + + Needs["DefinitionNotebookClient`"], + Annotation[ + DefinitionNotebookClient`$ButtonCodeID = 341138948110023950; + DefinitionNotebookClient`CheckForUpdates[ + RSNB`nb$, + ReleaseHold[ + DefinitionNotebookClient`$ButtonCode = + HoldForm[ + PacletResource`DefinitionNotebook`RefreshNotebookPacletFiles[ + RSNB`nbo, + RSNB`cell + ] + ] + ] + ], + DefinitionNotebookClient`ButtonCodeID[341138948110023950] + ], + DefinitionNotebookClient`$ButtonsDisabled = False; + ]; + ] + ] + ], + + NotebookDelete[ + Cells[RSNB`nbo, CellTags -> "FileManager-PacletFiles"] + ]; + + AttachCell[ + RSNB`cell, + Cell[ + BoxData[ + TemplateBox[ + { + "\"The specified directory is not a valid paclet directory.\"" + }, + "PacletDirectoryChooserErrorTemplate" + ] + ], + "AttachedMessage" + ], + "Inline", + RemovalConditions -> {"EvaluatorQuit"} + ] + ] + ] + ], + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + False + ] + ], + Method -> "Queued", + ImageSize -> {Automatic, 24}, + Enabled -> + Dynamic[ + Not[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} + ] + ] + ], + Appearance -> Automatic, + Evaluator -> Automatic + ] + } + }, + GridBoxAlignment -> {"Columns" -> {{Automatic}}, "Rows" -> {{Center}}}, + AutoDelete -> False, + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + BaseStyle -> {"Text"} + ], + "Grid" + ] + } + }, + GridBoxAlignment -> {"Columns" -> {{Left}}}, + DefaultBaseStyle -> "Column", + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}} + ], + "Column" + ] + }, + Dynamic[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "PacletDirectoryType"} + ] + ], + ImageSize -> Automatic + ], + Background -> GrayLevel[0.98], + FrameMargins -> 10, + FrameStyle -> GrayLevel[0.8], + ImageSize -> {Scaled[1], Automatic}, + StripOnInput -> False + ] + ]) + } + ], + Cell[ + StyleData["PacletDirectoryChooserErrorTemplate"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + StyleBox[ + TagBox[ + GridBox[ + { + { + GraphicsBox[ + { + Thickness[0.028571], + StyleBox[ + { + FilledCurveBox[ + { + { + {1, 4, 3}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3} + }, + { + {1, 4, 3}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3} + }, + { + {1, 4, 3}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3}, + {0, 1, 0}, + {1, 3, 3}, + {1, 3, 3}, + {1, 3, 3} + } + }, + { + CompressedData[ + "\n1:eJxTTMoPSmViYGCQBWIQfbJs33yp88YO51advxqWI+LApN0udvOdsYOre9FP\n/pciDhGWW06U/TN26EiOvePWLArnb35VvFXUWgzOtzeN2+WZowTnX614qWZ4\nQgluXmvNhc2RosoOMPsOnlroui1Y2SGMT3fT3PXGDn8kiq8LTVJ24Lq+uMC2\ny9ihx+sVi8lGZYenF5Ru/4xD8EHW8Djpw/lvAnfItb7Wg/NDHi+dfWSBHty8\nfKHmA6cS9eD2/Vn58ZKvkh7cPQG90/OEmPXg7oXxYf6B8WH+hfFh4QEzDxZe\nMPtg4QlzD9if74Xh7pU6EK3guFEY7h8YH+ZfGB8WHjA+LLxg5qHHHwAbtMYJ\n\n " + ], + CompressedData[ + "\n1:eJxTTMoPSmViYGCQBWIQfdzbvNPxgLEDSxif7qa7Gg6WW06U7btv7HC14qWa\nIYemw78rQMZHY4cIkISdpoPIOveHVV+MHRhAoEHToXSyBEuYn4nDwVMLXbdN\nNoXznRKeXlDabQox19bE4V2NvWncLVMH5ds/67JkTKDmmsLNz5j4tsZe1Mxh\n2+e/VypOGjs0TnXuzlE3c9g3X0r/7hIEv/kAyCI9OB9kHV8ugg+2T1YPbt4u\nTx4m7eO6cPt+BD9eOrtFF+4e8Zvnvgcn6zpot4vdPLcdwa8FSu/qNHU4ewYI\nePTg/oXxYeEBCg4RPT14eBXacl1fXKAHD09jENis57Bs9hGFDZs0HAJ6p+cJ\nMetD5OdqOIDDPwHBjwM52NsYzp81EwgqEXyQ9uYFxnDz0OMPAAfUunk=\n " + ], + CompressedData[ + "\n1:eJxTTMoPSmViYGBQAmIQbcixRibqiJFD41Tn7pzl9g58upvmvlc3drA3jdvl\nmWPv0Hzg1ELXMmOHaUDp59L2Dkza7WI31xlDxLfZOQT0Ts8TCnZ0MAo10Fop\nzOsQlWJ937/X0eFMvcf+2rlsDue/Bz9e2u3okLoqISRIncFhnfvDKhE/R4c/\nKz9e8k36bJ8vBDTJ0NHh5OQl2Wr3X9k7JTy9oMTt6PDE85Lp5PyH9uogB95y\ncHilKHXX8c0Vex6QA1Y6OOgfsLMqfbrb3i9JIMKyxMGBAQqArl9+zBrB318r\na5HuwgLnV0asMD27mwHOjxTffpHh3i97mHmb9PIWM+75Yg+zz/Dyt/VrTN7a\nw9wzU8jzi1HXY3uYe4Gh8nvlxxv2MP8YXD0TxeWxfT/Mv9M49185P3vXflh4\n/LrA+lW3+Jo9LLzA+hbpwcPzV13WnhJhfXh4P146+4jCBn14fIDD09oAHl/F\nGRPf1sw3cDj8VSOm/5G9w5vAHXKt3IZQ/0HDoQHBFwFFwBcEHxR9zQlGcP3o\n6QEAaQXeGQ==\n " + ] + } + ] + }, + {FaceForm[RGBColor[0.85098, 0.0, 0.10588, 1.0]]}, + StripOnInput -> False + ] + }, + { + ImageSize -> 12, + BaselinePosition -> Scaled[0.05], + ImageSize -> 16 + } + ], + #1 + } + }, + GridBoxAlignment -> {"Columns" -> {{Automatic}}, "Rows" -> {{Baseline}}}, + AutoDelete -> False, + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"Columns" -> {{0.25}}} + ], + "Grid" + ], + FontColor -> RGBColor[0.86667, 0.06667, 0.0], + FontSize -> 13, + FontFamily -> "Source Sans Pro", + StripOnInput -> False + ] + ]) + } + ], + Cell[ + StyleData["PacletDirectoryIconTemplate"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + OverlayBox[ + { + TemplateBox[{}, "FileManagerDirectoryIconTemplate"], + GraphicsBox[ + { + Thickness[0.041667], + { + FaceForm[{RGBColor[0.961, 0.961, 0.961], Opacity[1.0]}], + FilledCurveBox[ + { + { + {0, 2, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0} + } + }, + { + { + {12.545, 22.597}, + {7.5464, 20.5}, + {2.5454, 18.402}, + {2.5454, 12.598}, + {2.5454, 12.597}, + {2.5454, 6.7952}, + {7.5454, 4.6962}, + {7.546, 4.6972}, + {12.545, 2.5992}, + {17.545, 4.6972}, + {17.545, 4.6962}, + {22.545, 6.7952}, + {22.545, 12.597}, + {22.545, 12.598}, + {22.545, 18.402} + } + } + ] + }, + { + FaceForm[{RGBColor[0.898, 0.898, 0.898], Opacity[1.0]}], + FilledCurveBox[ + { + { + {0, 2, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0} + } + }, + { + { + {17.125, 8.3359}, + {17.125, 14.057}, + {16.875, 14.057}, + {16.875, 8.3359}, + {17.0, 8.1169}, + {21.952, 6.0399}, + {22.049, 6.2709} + } + } + ], + FilledCurveBox[ + { + { + {0, 2, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0} + } + }, + { + { + {7.125, 8.3359}, + {7.125, 14.057}, + {6.875, 14.057}, + {6.875, 8.3359}, + {1.952, 6.2709}, + {2.048, 6.0399}, + {7.0, 8.1169} + } + } + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {11.874, 6.2383}, + {6.9515, 4.1733}, + {7.0475, 3.9423}, + {12.0, 6.0193}, + {16.952, 3.9423}, + {17.048, 4.1733} + } + } + ], + FilledCurveBox[ + { + { + {0, 2, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0} + } + }, + { + { + {17.125, 14.139}, + {17.125, 19.86}, + {16.875, 19.86}, + {16.875, 14.139}, + {17.0, 13.92}, + {21.952, 11.843}, + {22.049, 12.074} + } + } + ], + FilledCurveBox[ + { + { + {0, 2, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0} + } + }, + { + { + {7.125, 14.139}, + {7.125, 19.86}, + {6.875, 19.86}, + {6.875, 14.139}, + {1.952, 12.074}, + {2.048, 11.843}, + {7.0, 13.92} + } + } + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {11.875, 21.363}, + {11.875, 18.356}, + {12.0, 18.303}, + {12.125, 18.356}, + {12.125, 21.363}, + {12.0, 21.415} + } + } + ] + }, + { + FaceForm[{RGBColor[0.749, 0.749, 0.749], Opacity[1.0]}], + FilledCurveBox[ + { + {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, + { + {0, 2, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {1, 3, 3} + } + }, + { + { + {8.292, 19.859}, + {12.0, 21.415}, + {15.707, 19.859}, + {12.0, 18.303} + }, + { + {17.5, 19.527}, + {17.5, 20.192}, + {12.0, 22.5}, + {6.5, 20.192}, + {6.5, 19.528}, + {12.0, 17.219}, + {12.0, 17.219}, + {15.7, 18.772}, + {17.5, 19.527} + } + } + ], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {11.5, 8.5156}, + {11.5, 6.4876}, + {11.5, 5.4026}, + {12.5, 5.8226}, + {12.5, 8.5156}, + {12.0, 8.3056} + } + } + ], + FilledCurveBox[ + { + {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, + { + {0, 2, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0} + } + }, + { + { + {21.5, 6.4873}, + {17.5, 4.8083}, + {17.5, 9.5283}, + {21.5, 11.207} + }, + { + {21.5, 12.711}, + {21.5, 12.291}, + {17.0, 10.403}, + {16.5, 10.613}, + {16.5, 10.194}, + {15.707, 9.8613}, + {16.5, 9.5283}, + {16.5, 4.8083}, + {16.5, 4.8093}, + {16.5, 4.3903}, + {15.707, 4.0573}, + {17.0, 3.5143}, + {22.5, 5.8223}, + {22.5, 12.291} + } + } + ], + FilledCurveBox[ + { + {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, + { + {0, 2, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0} + } + }, + { + { + {6.5, 4.8086}, + {2.5, 6.4876}, + {2.5, 11.207}, + {6.5, 9.5286} + }, + { + {7.5, 9.1096}, + {7.5, 9.1096}, + {7.5, 9.5286}, + {8.292, 9.8616}, + {7.5, 10.194}, + {7.5, 10.614}, + {7.0, 10.404}, + {2.5, 12.291}, + {2.5, 12.711}, + {1.5, 12.292}, + {1.5, 5.8226}, + {7.0, 3.5146}, + {8.293, 4.0576}, + {7.5, 4.3906} + } + } + ], + FilledCurveBox[ + { + {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, + {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, + { + {0, 2, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0} + } + }, + { + { + {3.2925, 17.762}, + {7.0005, 19.318}, + {10.708, 17.762}, + {7.0005, 16.206} + }, + { + {6.5005, 10.612}, + {2.5005, 12.291}, + {2.5005, 17.01}, + {6.5005, 15.332} + }, + { + {7.5005, 10.193}, + {7.5005, 10.612}, + {7.5005, 15.332}, + {12.0, 17.22}, + {12.5, 17.01}, + {12.5, 18.095}, + {7.0005, 20.403}, + {1.5005, 18.095}, + {1.5005, 11.626}, + {7.0005, 9.3182}, + {8.2935, 9.8612} + } + } + ], + FilledCurveBox[ + { + {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, + {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, + { + {0, 2, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0} + } + }, + { + { + {21.5, 12.291}, + {17.5, 10.612}, + {17.5, 15.332}, + {21.5, 17.01} + }, + { + {13.293, 17.762}, + {17.0, 19.318}, + {20.708, 17.762}, + {17.0, 16.207} + }, + { + {17.0, 20.403}, + {11.5, 18.095}, + {11.5, 17.01}, + {12.0, 17.22}, + {16.5, 15.332}, + {16.5, 10.612}, + {16.5, 10.194}, + {15.706, 9.861}, + {17.0, 9.318}, + {22.5, 11.626}, + {22.5, 18.095} + } + } + ], + FilledCurveBox[ + { + {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, + {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, + { + {0, 2, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0} + } + }, + { + { + {16.5, 4.3906}, + {12.5, 2.7116}, + {12.5, 7.4316}, + {16.5, 9.1096} + }, + { + {11.5, 2.7116}, + {7.4995, 4.3906}, + {7.4995, 9.1096}, + {11.5, 7.4316} + }, + { + {16.5, 10.614}, + {16.5, 10.195}, + {12.0, 8.3056}, + {8.2915, 9.8616}, + {7.4995, 10.194}, + {7.4995, 10.615}, + {6.4995, 10.195}, + {6.4995, 3.7256}, + {12.0, 1.4176}, + {17.5, 3.7256}, + {17.5, 10.195} + } + } + ] + }, + { + FaceForm[{RGBColor[0.965, 0.765, 0.749], Opacity[1.0]}], + FilledCurveBox[ + {{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, + { + { + {12.0, 17.662}, + {16.945, 15.586}, + {16.945, 9.9376}, + {12.0, 7.8636}, + {7.055, 9.9376}, + {7.055, 15.586} + } + } + ] + }, + { + FaceForm[{RGBColor[0.91, 0.655, 0.635], Opacity[1.0]}], + FilledCurveBox[ + { + { + {0, 2, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0}, + {0, 1, 0} + } + }, + { + { + {12.125, 17.763}, + {11.875, 17.763}, + {11.875, 12.041}, + {6.952, 9.9757}, + {7.048, 9.7447}, + {12.0, 11.823}, + {16.952, 9.7447}, + {17.048, 9.9757}, + {12.125, 12.041} + } + } + ] + }, + { + FaceForm[{RGBColor[0.867, 0.067, 0.0], Opacity[1.0]}], + FilledCurveBox[ + { + {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, + {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, + {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}, + {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}} + }, + { + { + {12.5, 8.5146}, + {12.5, 13.234}, + {16.5, 14.912}, + {16.5, 10.193} + }, + { + {7.5, 14.912}, + {11.5, 13.234}, + {11.5, 8.5146}, + {7.5, 10.193} + }, + { + {15.708, 15.664}, + {12.0, 14.109}, + {8.292, 15.664}, + {12.0, 17.221} + }, + { + {12.0, 18.305}, + {6.5, 15.996}, + {6.5, 9.5286}, + {12.0, 7.2206}, + {17.5, 9.5286}, + {17.5, 15.996} + } + } + ] + } + }, + { + ImageSize -> 12, + AspectRatio -> Automatic, + ImageSize -> {24.0, 24.0}, + PlotRange -> {{0.0, 24.0}, {0.0, 24.0}} + } + ] + }, + Alignment -> {Right, Bottom} + ] + ]) } ], Cell[ StyleData[ - "LocalDirectoryInput", - StyleDefinitions -> StyleData["Input"] + "MainGuideChooser", + StyleDefinitions -> StyleData["PacletDirectoryChooser"] ], - CellFrameLabels -> { - { - None, - Cell[ - BoxData[ - ButtonBox[ - "\"Choose\"", - FrameMargins -> {{5, 5}, {0, 0}}, - BaseStyle -> {"Panel", FontSize -> 12}, - Evaluator -> Automatic, - Method -> "Queued", - ButtonFunction :> - With[ { RSNB`nb$ = ButtonNotebook[], RSNB`$cp$ = $ContextPath }, - Quiet[ - Block[ + CellGroupingRules -> "NormalGrouping" + ], + Cell[ + StyleData["MainGuideChooserTemplate"], + TemplateBoxOptions -> { + DisplayFunction -> + (Function[ + FrameBox[ + TagBox[ + GridBox[ + { + { + PaneSelectorBox[ { - $ContextPath = RSNB`$cp$, - ResourceSystemClient`$AsyncronousResourceInformationUpdates = - False, - DefinitionNotebookClient`$ButtonCodeID = None - }, - Internal`WithLocalSettings[ - DefinitionNotebookClient`$ButtonsDisabled = True; - - Once[ - ReleaseHold[ - CurrentValue[RSNB`nb$, {TaggingRules, "CompatibilityTest"}] + True -> + RowBox[ + { + TemplateBox[{}, "PacletDirectoryIconTemplate"], + StyleBox["/", FontColor -> GrayLevel[0.5]] + } ], - "KernelSession" - ]; - - Needs["DefinitionNotebookClient`"], - Annotation[ - - DefinitionNotebookClient`$ButtonCodeID = - 4898876371082581810; - - DefinitionNotebookClient`CheckForUpdates[ - RSNB`nb$, - ReleaseHold[ - DefinitionNotebookClient`$ButtonCode = - HoldForm[ - If[ $VersionNumber >= 13.0, - DefinitionNotebookClient`LocalFileInputDialog[ - "Paclet", - ParentCell[EvaluationCell[]], - "Type" -> "Directory" + False -> + RowBox[ + { + TemplateBox[{}, "FileManagerNBIconTemplate"], + StyleBox["/", ShowContents -> False] + } + ] + }, + Dynamic[ + CurrentValue[EvaluationCell[], {TaggingRules, "Relative"}] + ] + ], + InputFieldBox[ + Dynamic[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "MainGuidePageString"} + ] + ], + String, + FieldHint -> "Choose a guide page", + BaseStyle -> {FontSize -> 12, FontColor -> GrayLevel[0.25]}, + ImageSize -> {Full, 24}, + BaselinePosition -> Baseline, + FrameMargins -> {{3, 3}, {1, 1}} + ], + ButtonBox[ + StyleBox[ + "\"Browse\[Ellipsis]\"", + "Text", + FontSize -> 12, + StripOnInput -> False + ], + ButtonFunction :> + With[ + { + RSNB`nbo = EvaluationNotebook[], + RSNB`cell = EvaluationCell[] + }, + WithCleanup[ + NotebookDelete[Cells[RSNB`cell, AttachedCell -> True]]; + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + True, + Module[ { RSNB`initial$, RSNB`res$ }, + + RSNB`initial$ = + SelectFirst[ + { + FileNameJoin[ + { + With[ + { + RSNB`cell$ = + First[ + Cells[ + RSNB`nbo, + CellStyle -> "PacletDirectoryChooser", + CellTags -> "PacletManifestPanel" + ], + $Failed + ] + }, + Replace[ + { + CurrentValue[ + RSNB`cell$, + {TaggingRules, "PacletDirectoryType"} + ], + CurrentValue[RSNB`cell$, {TaggingRules, "PacletDirectory"}] + }, + { + {"Notebook", Blank[]} :> Quiet[NotebookDirectory[RSNB`nbo]], + {"Custom", Pattern[RSNB`dir, Blank[]]} :> RSNB`dir + } + ] + ], + "Documentation", + $Language, + "Guides" + } ], - MessageDialog[ - "This feature requires Wolfram Language version 13 or later." + With[ + { + RSNB`cell$ = + First[ + Cells[ + RSNB`nbo, + CellStyle -> "PacletDirectoryChooser", + CellTags -> "PacletManifestPanel" + ], + $Failed + ] + }, + Replace[ + { + CurrentValue[ + RSNB`cell$, + {TaggingRules, "PacletDirectoryType"} + ], + CurrentValue[RSNB`cell$, {TaggingRules, "PacletDirectory"}] + }, + { + {"Notebook", Blank[]} :> Quiet[NotebookDirectory[RSNB`nbo]], + {"Custom", Pattern[RSNB`dir, Blank[]]} :> RSNB`dir + } + ] + ], + Quiet[NotebookDirectory[RSNB`nbo]] + }, + DirectoryQ, + Directory[] + ]; + + RSNB`res$ = SystemDialogInput["FileOpen", RSNB`initial$]; + + If[ And[ + StringQ[ + With[ + { + RSNB`cell$ = + First[ + Cells[ + RSNB`nbo, + CellStyle -> "PacletDirectoryChooser", + CellTags -> "PacletManifestPanel" + ], + $Failed + ] + }, + Replace[ + { + CurrentValue[ + RSNB`cell$, + {TaggingRules, "PacletDirectoryType"} + ], + CurrentValue[RSNB`cell$, {TaggingRules, "PacletDirectory"}] + }, + { + {"Notebook", Blank[]} :> Quiet[NotebookDirectory[RSNB`nbo]], + {"Custom", Pattern[RSNB`dir, Blank[]]} :> RSNB`dir + } + ] + ] + ], + StringQ[RSNB`res$], + StringStartsQ[ + RSNB`res$, + With[ + { + RSNB`cell$ = + First[ + Cells[ + RSNB`nbo, + CellStyle -> "PacletDirectoryChooser", + CellTags -> "PacletManifestPanel" + ], + $Failed + ] + }, + Replace[ + { + CurrentValue[ + RSNB`cell$, + {TaggingRules, "PacletDirectoryType"} + ], + CurrentValue[RSNB`cell$, {TaggingRules, "PacletDirectory"}] + }, + { + {"Notebook", Blank[]} :> Quiet[NotebookDirectory[RSNB`nbo]], + {"Custom", Pattern[RSNB`dir, Blank[]]} :> RSNB`dir + } + ] ] ] - ] + ], + + RSNB`res$ = + StringReplace[ + StringDelete[ + RSNB`res$, + StringExpression[ + StartOfString, + With[ + { + RSNB`cell$ = + First[ + Cells[ + RSNB`nbo, + CellStyle -> "PacletDirectoryChooser", + CellTags -> "PacletManifestPanel" + ], + $Failed + ] + }, + Replace[ + { + CurrentValue[ + RSNB`cell$, + {TaggingRules, "PacletDirectoryType"} + ], + CurrentValue[RSNB`cell$, {TaggingRules, "PacletDirectory"}] + }, + { + {"Notebook", Blank[]} :> Quiet[NotebookDirectory[RSNB`nbo]], + {"Custom", Pattern[RSNB`dir, Blank[]]} :> RSNB`dir + } + ] + ], + Alternatives[$PathnameSeparator, ""] + ] + ], + "\\" -> "/" + ]; + + CurrentValue[RSNB`cell, {TaggingRules, "Relative"}] = True, + CurrentValue[RSNB`cell, {TaggingRules, "Relative"}] = False + ]; + + If[ StringQ[RSNB`res$], + CurrentValue[ + RSNB`cell, + {TaggingRules, "MainGuidePageString"} + ] = + RSNB`res$ + ] + ], + CurrentValue[RSNB`cell, {TaggingRules, "Refreshing"}] = + False + ] + ], + Method -> "Queued", + ImageSize -> {Automatic, 24}, + Enabled -> + Dynamic[ + Not[ + CurrentValue[ + EvaluationCell[], + {TaggingRules, "Refreshing"} ] - ], - DefinitionNotebookClient`ButtonCodeID[4898876371082581810] + ] ], - DefinitionNotebookClient`$ButtonsDisabled = False; - ]; + Appearance -> Automatic, + Evaluator -> Automatic ] - ] - ], - Appearance :> - FEPrivate`FrontEndResource[ - "FEExpressions", - "GrayButtonNinePatchAppearance" - ] - ] + } + }, + GridBoxAlignment -> {"Columns" -> {{Automatic}}, "Rows" -> {{Center}}}, + AutoDelete -> False, + GridBoxItemSize -> {"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, + GridBoxSpacings -> {"ColumnsIndexed" -> {2 -> 0.2}, "Rows" -> {{Automatic}}}, + BaseStyle -> {"Text"} + ], + "Grid" + ], + Background -> GrayLevel[0.98], + FrameMargins -> 10, + FrameStyle -> GrayLevel[0.8], + ImageSize -> {Scaled[1], Automatic}, + StripOnInput -> False ] - ] - }, - {None, None} - } - ], - Cell[StyleData["Item"], DefaultNewCellStyle -> "Item"], - Cell[ - StyleData["ButtonText"], - FontFamily -> "Sans Serif", - FontSize -> 11, - FontWeight -> Bold, - FontColor -> RGBColor[0.459, 0.459, 0.459] - ], - Cell[ - StyleData["InlineFormula"], - HyphenationOptions -> {"HyphenationCharacter" -> "\[Continuation]"}, - LanguageCategory -> "Formula", - AutoSpacing -> True, - ScriptLevel -> 1, - SingleLetterItalics -> False, - SpanMaxSize -> 1, - StyleMenuListing -> None, - FontFamily -> "Source Sans Pro", - FontSize -> 1.0 * Inherited, - ButtonBoxOptions -> {Appearance -> {Automatic, None}}, - FractionBoxOptions -> {BaseStyle -> {SpanMaxSize -> Automatic}}, - GridBoxOptions -> { - GridBoxItemSize -> { - "Columns" -> {{Automatic}}, - "ColumnsIndexed" -> { }, - "Rows" -> {{1.0}}, - "RowsIndexed" -> { } - } + ]) } ], Cell[ - StyleData["Input"], - CellProlog :> - First[ - { - Quiet[ - Block[{$ContextPath}, Once[ReleaseHold[CurrentValue[#1, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; If[$VersionNumber >= 12.2, Needs["DefinitionNotebookClient`"], Needs["ResourceSystemClient`DefinitionNotebook`"]]; DefinitionNotebookClient`LoadDefinitionNotebook["Paclet", #1]; ] &[ - InputNotebook[] - ] - ] - } - ] - ], - Cell[ - StyleData["Code"], - CellProlog :> - First[ - { - Quiet[ - Block[{$ContextPath}, Once[ReleaseHold[CurrentValue[#1, {TaggingRules, "CompatibilityTest"}]], "KernelSession"]; If[$VersionNumber >= 12.2, Needs["DefinitionNotebookClient`"], Needs["ResourceSystemClient`DefinitionNotebook`"]]; DefinitionNotebookClient`LoadDefinitionNotebook["Paclet", #1]; ] &[ - InputNotebook[] - ] - ] - } - ] - ], - Cell[ - StyleData["DockedCell"], - CellFrameColor -> GrayLevel[0.75], - Background -> GrayLevel[16/17] - ], - Cell[ - StyleData["DisclosureDetails"], - CellMargins -> {{94, Inherited}, {10, 0}}, - FontSize -> 12, - FontColor -> GrayLevel[0.5] + StyleData["AttachedMessage"], + Deletable -> True, + CellMargins -> {{60, 40}, {15, 5}} ] }, Visible -> False,