(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Wolfram 15.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       154,          7]
NotebookDataLength[     41664,       1086]
NotebookOptionsPosition[     32942,        924]
NotebookOutlinePosition[     35177,        976]
CellTagsIndexPosition[     35100,        971]
WindowTitle->ClearChainCache
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[GridBox[{
   {GridBox[{
      {
       ItemBox[Cell[BoxData[
         RowBox[{
          TemplateBox[{12},
           "Spacer1"], Cell[
          "WOLFRAM INSTITUTE/ PUZZLES SYMBOL", "PacletNameCell",
           TextAlignment->Center,ExpressionUUID->
           "f25a3001-03c4-4931-80d0-401881229e1a"], 
          TemplateBox[{8},
           "Spacer1"]}]],
         TextAlignment->Center,ExpressionUUID->
         "7704376a-eedb-433e-9ca3-8aea66d1e92c"],
        Background->LightDarkSwitched[
          RGBColor[0.490196, 0.576471, 0.690196]],
        ItemSize->Full], ""}
     },
     GridBoxAlignment->{"Rows" -> {{Center}}},
     GridBoxItemSize->{"Columns" -> {Full, 
         Scaled[0.02]}, "Rows" -> {{2.5}}}], Cell[TextData[{
     Cell[BoxData[
      TagBox[
       ActionMenuBox[
        FrameBox[Cell[TextData[{
          "See Also",
          " ",
          Cell[BoxData[
           GraphicsBox[
            {GrayLevel[0.66667], Thickness[0.13], 
             LineBox[{{-1.8, 0.5}, {0, 0}, {1.8, 0.5}}]},
            AspectRatio->1,
            ImageSize->20,
            PlotRange->{{-3, 4}, {-1, 1}}]],ExpressionUUID->
           "d62cc694-7776-42ca-898d-2a403b8538cb"]
         }],ExpressionUUID->"208c9e88-fe7f-4c44-bce6-c28256d113ae"],
         StripOnInput->False],{
        StyleBox[
          "\"ClearSystemCache\"", "SeeAlsoRelated", StripOnInput -> False] :> 
         Documentation`HelpLookup["paclet:ref/ClearSystemCache"], Delimiter, 
         StyleBox[
          "\"Functions\"", "SeeAlsoSection", FontSize -> 14, FontSlant -> 
           "Italic", StripOnInput -> False] :> 
         NotebookFind[EvaluationNotebook[], "SeeAlsoSection", All, CellStyle],
          StyleBox[
          StyleBox[
           "\"$ChainCacheDirectory\"", "SeeAlsoRelated", StripOnInput -> 
            False], "SeeAlsoRelated", StripOnInput -> False] :> 
         Documentation`HelpLookup[
          "paclet:WolframInstitute/Puzzles/ref/$ChainCacheDirectory"], 
         StyleBox[
          StyleBox[
           "\"$ChainCacheDuration\"", "SeeAlsoRelated", StripOnInput -> 
            False], "SeeAlsoRelated", StripOnInput -> False] :> 
         Documentation`HelpLookup[
          "paclet:WolframInstitute/Puzzles/ref/$ChainCacheDuration"], 
         StyleBox[
          StyleBox[
           "\"$ChainNetworkEnabled\"", "SeeAlsoRelated", StripOnInput -> 
            False], "SeeAlsoRelated", StripOnInput -> False] :> 
         Documentation`HelpLookup[
          "paclet:WolframInstitute/Puzzles/ref/$ChainNetworkEnabled"], 
         StyleBox[
          StyleBox[
           "\"ChainExplorerQuery\"", "SeeAlsoRelated", StripOnInput -> False],
            "SeeAlsoRelated", StripOnInput -> False] :> 
         Documentation`HelpLookup[
          "paclet:WolframInstitute/Puzzles/ref/ChainExplorerQuery"]},
        Appearance->None,
        MenuAppearance->Automatic,
        MenuStyle->"SeeAlso"],
       MouseAppearanceTag["LinkHand"]]],
      LineSpacing->{1.4, 0},ExpressionUUID->
      "5eae72a6-f9c4-42f7-9130-578a14f616d4"],
     "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
\[ThickSpace]",
     Cell[BoxData[
      TagBox[
       ActionMenuBox[
        FrameBox[Cell[TextData[{
          "Related Guides",
          " ",
          Cell[BoxData[
           GraphicsBox[
            {GrayLevel[0.66667], Thickness[0.13], 
             LineBox[{{-1.8, 0.5}, {0, 0}, {1.8, 0.5}}]},
            AspectRatio->1,
            ImageSize->20,
            PlotRange->{{-3, 4}, {-1, 1}}]],ExpressionUUID->
           "d2713f3e-6493-4a57-b7c6-2580bbcc28c2"]
         }],ExpressionUUID->"52680a84-04df-4411-a1fc-e0d01e2618f8"],
         StripOnInput->False],{
        "\"Chain\"" :> 
         Documentation`HelpLookup[
          "paclet:WolframInstitute/Puzzles/guide/Chain"]},
        Appearance->None,
        MenuAppearance->Automatic,
        MenuStyle->"MoreAbout"],
       MouseAppearanceTag["LinkHand"]]],
      LineSpacing->{1.4, 0},ExpressionUUID->
      "28f03fd8-79fd-454a-8e23-138ee95a0f76"],
     "\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\[ThickSpace]\
\[ThickSpace]",
     Cell[BoxData[
      TagBox[
       ActionMenuBox[
        FrameBox[Cell[TextData[{
          "URL",
          " ",
          Cell[BoxData[
           GraphicsBox[
            {GrayLevel[0.66667], Thickness[0.13], 
             LineBox[{{-1.8, 0.5}, {0, 0}, {1.8, 0.5}}]},
            AspectRatio->1,
            ImageSize->20,
            PlotRange->{{-3, 4}, {-1, 1}}]],ExpressionUUID->
           "c368aab5-41ef-418b-8907-baaed8674029"]
         }],ExpressionUUID->"cedc7e23-8cc7-4e94-a0d0-65b4c8ff5c81"],
         StripOnInput->False],{
        "\"WolframInstitute/Puzzles/ref/ClearChainCache\"" :> None, 
         "\"Copy Wolfram Documentation Center URL\"" :> 
         CopyToClipboard["WolframInstitute/Puzzles/ref/ClearChainCache"], 
         Delimiter, "\"Copy web URL\"" :> 
         Module[{DocumentationSearch`Private`nb$}, 
           DocumentationSearch`Private`nb$ = 
            NotebookPut[
             Notebook[{
               Cell[BoxData[
                 MakeBoxes[
                  Hyperlink[
                   "http://reference.wolfram.com/language/WolframInstitute/\
Puzzles/ref/ClearChainCache.html"], StandardForm]], "Input", 
                 TextClipboardType -> "PlainText"]}, Visible -> False]]; 
           SelectionMove[DocumentationSearch`Private`nb$, All, Notebook]; 
           FrontEndTokenExecute[DocumentationSearch`Private`nb$, "Copy"]; 
           NotebookClose[DocumentationSearch`Private`nb$]; Null], 
         "\"Go to web URL\"" :> 
         FrontEndExecute[{
           NotebookLocate[{
             URL[If[TrueQ[False], 
                 "http://reference.wolfram.com/system-modeler/", 
                 "http://reference.wolfram.com/language/"] <> 
               "WolframInstitute/Puzzles/ref/ClearChainCache" <> ".html"], 
              None}]}]},
        Appearance->None,
        MenuAppearance->Automatic,
        MenuStyle->"URLMenu"],
       MouseAppearanceTag["LinkHand"]]],
      LineSpacing->{1.4, 0},ExpressionUUID->
      "063ffd74-056a-40ca-9a89-fb3e6081d815"]
    }], "AnchorBar",
     CacheGraphics->False,ExpressionUUID->
     "4bec1625-de72-49c6-91cf-6ec973379fea"]}
  }]], "AnchorBarGrid",
 CellID->1,ExpressionUUID->"e55aa6ca-6a55-4d49-9f83-cb50cf2ce36c"],

Cell["WolframInstitute`Puzzles`", "ContextNameCell",ExpressionUUID->"4c56405f-2eb8-4c51-ace7-17400f370ae8"],

Cell[CellGroupData[{

Cell[BoxData[GridBox[{
   {Cell[TextData[{
     Cell[
     "ClearChainCache", "ObjectName",ExpressionUUID->
      "762994fb-557c-488b-8a54-b902a419841d"],
     Cell[BoxData[
      TemplateBox[{8},
       "Spacer1"]],ExpressionUUID->"90992ac1-88df-4230-88b9-b13e443de642"],
     Cell[BoxData[
     ""], "ObjectNameTranslation",ExpressionUUID->
      "f732d2b0-a88f-4e30-8613-1a2c43750a4e"]
    }],ExpressionUUID->"34eb8009-baa9-4029-83d8-2f3aba70cb42"], 
    "\[SpanFromLeft]"}
  }]], "ObjectNameGrid",ExpressionUUID->"05f1178d-6fc9-42cc-be64-\
8622fab1647a"],

Cell[BoxData[GridBox[{
   {"", Cell[TextData[{
     Cell[BoxData[
      RowBox[{
       TemplateBox[{
         Cell[
          TextData["ClearChainCache"]], 
         "paclet:WolframInstitute/Puzzles/ref/ClearChainCache", 
         "WolframInstitute/Puzzles Package Symbol"},
        "PackageLink",
        BaseStyle->"InlineFormula"], "[", "]"}]], "InlineFormula",
      FontFamily->"Source Sans Pro",
      FontSize->0.9 Inherited,ExpressionUUID->
      "ce18f41c-b2d5-4377-a5ad-a7a9d80eeb1e"],
     "\[LineSeparator]",
     "deletes every cached explorer response and gives the number of records \
deleted."
    }],ExpressionUUID->"44b563c6-5de8-4008-b967-0477ef549f97"]},
   {"", Cell[TextData[{
     Cell[BoxData[
      RowBox[{
       TemplateBox[{
         Cell[
          TextData["ClearChainCache"]], 
         "paclet:WolframInstitute/Puzzles/ref/ClearChainCache", 
         "WolframInstitute/Puzzles Package Symbol"},
        "PackageLink",
        BaseStyle->"InlineFormula"], "[", 
       StyleBox["backend", "TI"], "]"}]], "InlineFormula",
      FontFamily->"Source Sans Pro",
      FontSize->0.9 Inherited,ExpressionUUID->
      "f456bbe0-8178-48e3-aba2-042d600208d2"],
     "\[LineSeparator]",
     "deletes only the records cached for ",
     StyleBox["backend", "TI"],
     "."
    }],ExpressionUUID->"8b07b17a-617a-4d09-858a-0b4b46ff62a5"]}
  }]], "Usage",ExpressionUUID->"3f267eea-fcb4-419d-acc9-c1486c96e294"]
}, Open  ]],

Cell[CellGroupData[{

Cell[TextData[Cell[BoxData[Cell[TextData[{
  Cell[BoxData[
   DynamicBox[ToBoxes[
     If[CurrentValue[
        EvaluationCell[], "CellGroupOpen"] =!= Closed, 
      Style[
       Graphics[{
         Thickness[0.18], 
         RGBColor[0.8509803921568627, 0.396078431372549, 0], 
         Line[{{-1.8, 0.5}, {0, 0}, {1.8, 0.5}}]}, AspectRatio -> 1, 
        PlotRange -> {{-3, 4}, {-1, 1}}, ImageSize -> 20], Magnification -> 
       0.68 Inherited], 
      Rotate[
       Style[
        Graphics[{
          Thickness[0.18], 
          RGBColor[0.8509803921568627, 0.396078431372549, 0], 
          Line[{{-1.8, 0.5}, {0, 0}, {1.8, 0.5}}]}, AspectRatio -> 1, 
         PlotRange -> {{-3, 4}, {-1, 1}}, ImageSize -> 20], Magnification -> 
        0.68 Inherited], Rational[1, 2] Pi, {-1.65, -1}]]],
    ImageSizeCache->{
     13.600000000000001`, {-0.1685058593749993, 13.768505859375}}]],
   ExpressionUUID->"8999fe76-f231-4c13-b291-ecbbe673b50b"],
  Cell[BoxData[
   TemplateBox[{1},
    "Spacer1"]],ExpressionUUID->"71804cf8-b5fe-4ace-b9b3-0beee0464f78"],
  "Details and Options"
 }], "NotesFrameText",ExpressionUUID->
  "57e324d8-db0e-42ef-ab2a-c5e8f09b30c7"]],ExpressionUUID->"163f55c7-4424-\
4f11-8a12-6d37de4775eb"]], "NotesSection",
 ShowGroupOpener->"Thumbnail",
 WholeCellGroupOpener->True,
 CellGroupingRules->{"SectionGrouping", 50},
 CacheGraphics->False,
 CellID->246038011,ExpressionUUID->"cbc66f8a-bb19-410a-a4a8-f50639526ffd"],

Cell["\<\
The result is an Integer count of the records removed, so a clear can be \
logged.\
\>", "Notes",ExpressionUUID->"1b84f396-9ff3-463b-ba51-0780cb3333f0"],

Cell[TextData[{
 "Records are the ",
 Cell[".wxf", "InlineCode",
  FontFamily->"Source Sans Pro",ExpressionUUID->
  "4510d9c2-2ac8-412f-8b66-6a9dcaac86c0"],
 " files under ",
 Cell[BoxData[
  TemplateBox[{
    Cell[
     TextData["$ChainCacheDirectory"]], 
    "paclet:WolframInstitute/Puzzles/ref/$ChainCacheDirectory", 
    "WolframInstitute/Puzzles Package Symbol"},
   "PackageLink",
   BaseStyle->"InlineFormula"]], "InlineFormula",
  FontFamily->"Source Sans Pro",
  FontSize->0.9 Inherited,ExpressionUUID->
  "3b2afe03-2b4f-43b4-b4bb-711c61aa0dbf"],
 ", one per backend, property and address."
}], "Notes",ExpressionUUID->"ff3352bb-0da3-4530-ad18-f40622eeca7d"],

Cell["\<\
Clearing for a single backend removes that backend's subdirectory contents \
and leaves the others intact, which is what a rate-limited or misbehaving \
explorer calls for.\
\>", "Notes",ExpressionUUID->"d3b00b05-d6ed-42ea-94fe-5aaf95439d5c"],

Cell[TextData[{
 StyleBox["backend", "TI"],
 " must be a key of ",
 Cell[BoxData[
  TemplateBox[{
    Cell[
     TextData["$ChainExplorers"]], 
    "paclet:WolframInstitute/Puzzles/ref/$ChainExplorers", 
    "WolframInstitute/Puzzles Package Symbol"},
   "PackageLink",
   BaseStyle->"InlineFormula"]], "InlineFormula",
  FontFamily->"Source Sans Pro",
  FontSize->0.9 Inherited,ExpressionUUID->
  "816cf014-73df-4317-8435-553048d3f7ca"],
 ". Any other argument is left unevaluated."
}], "Notes",ExpressionUUID->"29838f70-e70a-4bb8-ba79-61c6c7195faf"],

Cell[TextData[{
 "Nothing cached gives ",
 Cell[BoxData["0"], "InlineFormula",
  FontFamily->"Source Sans Pro",
  FontSize->0.9 Inherited,ExpressionUUID->
  "111f9779-ee91-437c-91fb-a615f93b5db5"],
 " rather than a failure: an empty cache is a state, not an error."
}], "Notes",ExpressionUUID->"540a87bb-1011-433d-b0f2-36174044ca8f"],

Cell["\<\
The directories themselves are left in place, only the records go.\
\>", "Notes",ExpressionUUID->"1486e969-93e0-492e-904f-47bab2d4b0a7"]
}, Closed]],

Cell["", "PageDelimiter",ExpressionUUID->"a6c8cc28-a67a-47b7-aa97-c4ef4dc4d16c"],

Cell[CellGroupData[{

Cell[TextData[{
 Cell[BoxData[
  DynamicBox[ToBoxes[
    If[
     MatchQ[
      CurrentValue[
       EvaluationNotebook[], {
       TaggingRules, "Openers", "PrimaryExamplesSection"}, Open], 
      Alternatives[True, Open]], 
     Style[
      Graphics[{
        Thickness[0.18], 
        RGBColor[0.8509803921568627, 0.396078431372549, 0], 
        Line[{{-1.8, 0.5}, {0, 0}, {1.8, 0.5}}]}, AspectRatio -> 1, 
       PlotRange -> {{-3, 4}, {-1, 1}}, ImageSize -> 20], Magnification -> 
      0.68 Inherited], 
     Rotate[
      Style[
       Graphics[{
         Thickness[0.18], 
         RGBColor[0.8509803921568627, 0.396078431372549, 0], 
         Line[{{-1.8, 0.5}, {0, 0}, {1.8, 0.5}}]}, AspectRatio -> 1, 
        PlotRange -> {{-3, 4}, {-1, 1}}, ImageSize -> 20], Magnification -> 
       0.68 Inherited], Rational[1, 2] Pi, {-1.65, -1}]]],
   ImageSizeCache->{
    13.600000000000001`, {4.251494140625001, 9.348505859375}}]],
  ExpressionUUID->"e8402900-f3f0-44a8-a1f8-6e156a9f1d4f"],
 Cell[BoxData[
  TemplateBox[{1},
   "Spacer1"]],ExpressionUUID->"f5778fcc-e7c7-45ee-8c20-cb9226da10e6"],
 "Examples",
 "\[NonBreakingSpace]\[NonBreakingSpace]",
 Cell["(10)", "ExampleCount",ExpressionUUID->
  "6625b4e6-5845-4e95-8b0e-743c53f743a0"]
}], "PrimaryExamplesSection",
 WholeCellGroupOpener->True,
 CacheGraphics->False,
 CellID->1254830402,ExpressionUUID->"67961caf-d02f-459f-828b-b11b3237de5f"],

Cell[BoxData[
 RowBox[{"Needs", "[", "\"\<WolframInstitute`Puzzles`\>\"", "]"}]], "Input", \
"ExampleInitialization",
 CellLabel->"In[1]:=",
 CellID->1969679695,ExpressionUUID->"90b0cf4b-5fd7-4f02-81b1-4a6b25e8043a"],

Cell[CellGroupData[{

Cell[TextData[{
 Cell[BoxData[
  DynamicBox[ToBoxes[
    If[CurrentValue[
       EvaluationCell[], "CellGroupOpen"] =!= Closed, 
     Style[
      Graphics[{
        Thickness[0.18], 
        RGBColor[0.8509803921568627, 0.396078431372549, 0], 
        Line[{{-1.8, 0.5}, {0, 0}, {1.8, 0.5}}]}, AspectRatio -> 1, 
       PlotRange -> {{-3, 4}, {-1, 1}}, ImageSize -> 20], Magnification -> 
      0.68 Inherited], 
     Rotate[
      Style[
       Graphics[{
         Thickness[0.18], 
         RGBColor[0.8509803921568627, 0.396078431372549, 0], 
         Line[{{-1.8, 0.5}, {0, 0}, {1.8, 0.5}}]}, AspectRatio -> 1, 
        PlotRange -> {{-3, 4}, {-1, 1}}, ImageSize -> 20], Magnification -> 
       0.68 Inherited], Rational[1, 2] Pi, {-1.65, -1}]]]]],ExpressionUUID->
  "9bef2ba5-c9e2-495e-b056-af28706cea31"],
 Cell[BoxData[
  TemplateBox[{1},
   "Spacer1"]],ExpressionUUID->"5888b580-f01e-4bdd-b625-db794175a1d0"],
 "Basic Examples",
 "\[NonBreakingSpace]\[NonBreakingSpace]",
 Cell["(3)", "ExampleCount",ExpressionUUID->
  "356970e8-2b09-474f-aa02-33e009b09a0c"]
}], "ExampleSection", "ExampleSection",
 WholeCellGroupOpener->True,
 CacheGraphics->False,
 CellID->1645152874,ExpressionUUID->"7d93deeb-bc8c-405f-a380-60e5578db916"],

Cell["Clearing everything, and counting what went:", "ExampleText",
 CellTags->
  "TextAnnotation",ExpressionUUID->"da64ba04-9bb7-433b-86e8-f6f55c71b0fd"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ClearChainCache", "[", "]"}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"7b516475-8a71-4851-9050-e68255cd1a64"],

Cell[BoxData["0"], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"f92b9e11-8f37-4261-977f-985bcb90da8d"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[Cell[
  "\t", "ExampleDelimiter",ExpressionUUID->
   "af94c457-e43c-40ae-ad93-5c6f70b34aed"],
  $Line = 0; Null]], "ExampleDelimiter",ExpressionUUID->"8e2a5918-5844-4759-\
924a-8e44251067ee"],

Cell["An empty cache clears to zero rather than failing:", "ExampleText",ExpressionUUID->"cbf1027e-3381-42d0-9d80-a2fc46182668"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ClearChainCache", "[", "]"}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"bd9f4d97-2a96-4ac4-bcef-b953ab36d8c5"],

Cell[BoxData["0"], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"a5b9de49-bbe3-4008-a126-737f5c13d08e"]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[Cell[
  "\t", "ExampleDelimiter",ExpressionUUID->
   "33990c71-0ab1-4c47-a002-6db1997a2635"],
  $Line = 0; Null]], "ExampleDelimiter",ExpressionUUID->"894981ef-2164-43b9-\
a8bf-3884d9ca160d"],

Cell["After a query there is one record per backend that answered:", \
"ExampleText",ExpressionUUID->"6deef488-2484-4ff9-86aa-492869d38d08"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"ClearChainCache", "[", "]"}], ";", " ", 
  RowBox[{
  "ChainAddressBalance", "[", "\"\<1BgGZ9tcN4rm9KBzDn7KprQz87SZ26SAMH\>\"", 
   "]"}], ";", " ", 
  RowBox[{"ClearChainCache", "[", "]"}]}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"b2e18179-dba2-4f48-acbe-6561f6d97821"],

Cell[BoxData["1"], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"884d64dd-924d-42d3-8a2a-078fa1700d57"]
}, Open  ]]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell[TextData[{
 Cell[BoxData[
  DynamicBox[ToBoxes[
    If[CurrentValue[
       EvaluationCell[], "CellGroupOpen"] =!= Closed, 
     Style[
      Graphics[{
        Thickness[0.18], 
        RGBColor[0.8509803921568627, 0.396078431372549, 0], 
        Line[{{-1.8, 0.5}, {0, 0}, {1.8, 0.5}}]}, AspectRatio -> 1, 
       PlotRange -> {{-3, 4}, {-1, 1}}, ImageSize -> 20], Magnification -> 
      0.68 Inherited], 
     Rotate[
      Style[
       Graphics[{
         Thickness[0.18], 
         RGBColor[0.8509803921568627, 0.396078431372549, 0], 
         Line[{{-1.8, 0.5}, {0, 0}, {1.8, 0.5}}]}, AspectRatio -> 1, 
        PlotRange -> {{-3, 4}, {-1, 1}}, ImageSize -> 20], Magnification -> 
       0.68 Inherited], Rational[1, 2] Pi, {-1.65, -1}]]]]],ExpressionUUID->
  "a0f2fe9b-4241-478a-b43a-0038465bdeda"],
 Cell[BoxData[
  TemplateBox[{1},
   "Spacer1"]],ExpressionUUID->"79b2bd75-d97f-47cf-b856-db94c56c14ec"],
 "Scope",
 "\[NonBreakingSpace]\[NonBreakingSpace]",
 Cell["(3)", "ExampleCount",ExpressionUUID->
  "e667227a-fdae-41aa-91b5-e4c80ab731ea"]
}], "ExampleSection", "ExampleSection",
 WholeCellGroupOpener->True,
 CacheGraphics->False,
 CellID->1293636265,ExpressionUUID->"618f7c1a-f089-40e5-9c4d-36941ee73771"],

Cell["A single backend can be cleared on its own:", "ExampleText",ExpressionUUID->"1f485e4d-189c-4cce-8f7e-32ddfd98ebe6"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"ClearChainCache", "[", "]"}], ";", " ", 
  RowBox[{
  "ChainAddressCrossCheck", "[", "\"\<1BgGZ9tcN4rm9KBzDn7KprQz87SZ26SAMH\>\"",
    "]"}], ";", " ", 
  RowBox[{"ClearChainCache", "[", "\"\<BlockCypher\>\"", "]"}]}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"d9f40830-e8cb-4ba4-b154-d343b407cf9d"],

Cell[BoxData["1"], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"640c9851-b4d1-4cd8-9bc2-348bf7be961e"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[Cell[
  "\t", "ExampleDelimiter",ExpressionUUID->
   "14f0384e-fc1f-4e5a-b316-3fb7deaaac1c"],
  $Line = 0; Null]], "ExampleDelimiter",ExpressionUUID->"71ef9139-2e56-4895-\
b627-25c105e1dd0d"],

Cell["The other backends' records survive that:", "ExampleText",ExpressionUUID->"a708564e-226c-4da1-b39f-37f6f5dcdb07"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"ClearChainCache", "[", "]"}], ";", " ", 
  RowBox[{
  "ChainAddressCrossCheck", "[", "\"\<1BgGZ9tcN4rm9KBzDn7KprQz87SZ26SAMH\>\"",
    "]"}], ";", " ", 
  RowBox[{"ClearChainCache", "[", "\"\<BlockCypher\>\"", "]"}], ";", " ", 
  RowBox[{"ClearChainCache", "[", "]"}]}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"68d73f47-15b1-4c91-a5bf-79ff5b8d46af"],

Cell[BoxData["2"], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"cb251d38-61e9-4607-aa42-9392d445cb9d"]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[Cell[
  "\t", "ExampleDelimiter",ExpressionUUID->
   "828490cd-2d85-4a68-aca3-fd01c294d903"],
  $Line = 0; Null]], "ExampleDelimiter",ExpressionUUID->"dbf0d65e-536c-4295-\
bffb-1590b586d7c5"],

Cell["\<\
An argument that is not a registered backend is left unevaluated:\
\>", "ExampleText",ExpressionUUID->"70de9b67-74a2-4fad-b809-20aa76e929ce"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ClearChainCache", "[", "\"\<NoSuchBackend\>\"", "]"}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"ae1305ab-1c84-41ff-b5cf-051b5ef7bd70"],

Cell[BoxData[
 RowBox[{"ClearChainCache", "[", "\<\"NoSuchBackend\"\>", "]"}]], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"b9605c8a-2623-47fe-a417-0ac3be4013d6"]
}, Open  ]]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell[TextData[{
 Cell[BoxData[
  DynamicBox[ToBoxes[
    If[CurrentValue[
       EvaluationCell[], "CellGroupOpen"] =!= Closed, 
     Style[
      Graphics[{
        Thickness[0.18], 
        RGBColor[0.8509803921568627, 0.396078431372549, 0], 
        Line[{{-1.8, 0.5}, {0, 0}, {1.8, 0.5}}]}, AspectRatio -> 1, 
       PlotRange -> {{-3, 4}, {-1, 1}}, ImageSize -> 20], Magnification -> 
      0.68 Inherited], 
     Rotate[
      Style[
       Graphics[{
         Thickness[0.18], 
         RGBColor[0.8509803921568627, 0.396078431372549, 0], 
         Line[{{-1.8, 0.5}, {0, 0}, {1.8, 0.5}}]}, AspectRatio -> 1, 
        PlotRange -> {{-3, 4}, {-1, 1}}, ImageSize -> 20], Magnification -> 
       0.68 Inherited], Rational[1, 2] Pi, {-1.65, -1}]]]]],ExpressionUUID->
  "bf6a8660-27cd-4928-acca-3d0d7c2b11b0"],
 Cell[BoxData[
  TemplateBox[{1},
   "Spacer1"]],ExpressionUUID->"d984b6a8-38db-4e33-ae9a-245ce970a085"],
 "Properties & Relations",
 "\[NonBreakingSpace]\[NonBreakingSpace]",
 Cell["(2)", "ExampleCount",ExpressionUUID->
  "c3aa1a09-871c-4d0d-b8a7-b9da0a67187d"]
}], "ExampleSection", "ExampleSection",
 WholeCellGroupOpener->True,
 CacheGraphics->False,
 CellID->2123667759,ExpressionUUID->"70e4484d-9ab5-4bfa-8bda-c2051f8951fa"],

Cell[TextData[{
 "The records it deletes are the files under ",
 Cell[BoxData[
  TemplateBox[{
    Cell[
     TextData["$ChainCacheDirectory"]], 
    "paclet:WolframInstitute/Puzzles/ref/$ChainCacheDirectory", 
    "WolframInstitute/Puzzles Package Symbol"},
   "PackageLink",
   BaseStyle->"InlineFormula"]], "InlineFormula",
  FontFamily->"Source Sans Pro",
  FontSize->0.9 Inherited,ExpressionUUID->
  "48cca8d4-1509-4d3e-8fb5-1b9af7a4d0c2"],
 ":"
}], "ExampleText",ExpressionUUID->"a3bdbd8b-38b2-4ad8-8c04-af7596ac91e4"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"ClearChainCache", "[", "]"}], ";", " ", 
  RowBox[{
  "ChainAddressBalance", "[", "\"\<1BgGZ9tcN4rm9KBzDn7KprQz87SZ26SAMH\>\"", 
   "]"}], ";", " ", 
  RowBox[{"Length", " ", "@", " ", 
   RowBox[{"FileNames", "[", 
    RowBox[{"\"\<*.wxf\>\"", ",", " ", "$ChainCacheDirectory", ",", " ", 
     "Infinity"}], "]"}]}]}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"5d51f00e-b95e-4c6d-9fde-b7e046581ddc"],

Cell[BoxData["1"], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"abcf557a-6a14-4cec-8d1a-200ae3a25c27"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[Cell[
  "\t", "ExampleDelimiter",ExpressionUUID->
   "b482d1ea-6901-488a-b90e-6fcfe6c9b03d"],
  $Line = 0; Null]], "ExampleDelimiter",ExpressionUUID->"d4cf44f8-04f5-4c6e-\
becf-06954c084503"],

Cell["\<\
Clearing forces the next read to reach the backend, which fails when the \
network is off:\
\>", "ExampleText",ExpressionUUID->"855a2897-4c8a-42ec-bd43-d86c74014d31"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"ClearChainCache", "[", "]"}], ";", " ", 
  RowBox[{"Block", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"$ChainNetworkEnabled", " ", "=", " ", "False"}], "}"}], ",", 
    " ", 
    RowBox[{"FailureQ", " ", "@", " ", 
     RowBox[{
     "ChainAddressBalance", "[", "\"\<1BgGZ9tcN4rm9KBzDn7KprQz87SZ26SAMH\>\"",
       "]"}]}]}], "]"}]}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"2a98b719-78a0-42cb-a61d-e39937593dc6"],

Cell[BoxData["True"], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"8de51c1f-5dbe-41cc-8a95-e25464c75f62"]
}, Open  ]]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell[TextData[{
 Cell[BoxData[
  DynamicBox[ToBoxes[
    If[CurrentValue[
       EvaluationCell[], "CellGroupOpen"] =!= Closed, 
     Style[
      Graphics[{
        Thickness[0.18], 
        RGBColor[0.8509803921568627, 0.396078431372549, 0], 
        Line[{{-1.8, 0.5}, {0, 0}, {1.8, 0.5}}]}, AspectRatio -> 1, 
       PlotRange -> {{-3, 4}, {-1, 1}}, ImageSize -> 20], Magnification -> 
      0.68 Inherited], 
     Rotate[
      Style[
       Graphics[{
         Thickness[0.18], 
         RGBColor[0.8509803921568627, 0.396078431372549, 0], 
         Line[{{-1.8, 0.5}, {0, 0}, {1.8, 0.5}}]}, AspectRatio -> 1, 
        PlotRange -> {{-3, 4}, {-1, 1}}, ImageSize -> 20], Magnification -> 
       0.68 Inherited], Rational[1, 2] Pi, {-1.65, -1}]]]]],ExpressionUUID->
  "906b7f52-f311-48e8-bf60-adfdc1335d96"],
 Cell[BoxData[
  TemplateBox[{1},
   "Spacer1"]],ExpressionUUID->"15d034ba-c1d4-4953-9eb1-fe0908620724"],
 "Possible Issues",
 "\[NonBreakingSpace]\[NonBreakingSpace]",
 Cell["(2)", "ExampleCount",ExpressionUUID->
  "b05be518-2060-4f5f-ad01-9d24d84a8559"]
}], "ExampleSection", "ExampleSection",
 WholeCellGroupOpener->True,
 CacheGraphics->False,
 CellID->1305812373,ExpressionUUID->"9ce3abfb-fba3-4edf-b920-16ffaa85954b"],

Cell[TextData[{
 "Clearing is not the way to refresh a stale answer during normal work. \
Lowering ",
 Cell[BoxData[
  TemplateBox[{
    Cell[
     TextData["$ChainCacheDuration"]], 
    "paclet:WolframInstitute/Puzzles/ref/$ChainCacheDuration", 
    "WolframInstitute/Puzzles Package Symbol"},
   "PackageLink",
   BaseStyle->"InlineFormula"]], "InlineFormula",
  FontFamily->"Source Sans Pro",
  FontSize->0.9 Inherited,ExpressionUUID->
  "88fcf50c-a5c4-4ada-8462-437dd052d088"],
 " or passing ",
 Cell[BoxData[
  RowBox[{"\<\"Cache\"\>", " ", "->", " ", "False"}]], "InlineFormula",
  FontFamily->"Source Sans Pro",
  FontSize->0.9 Inherited,ExpressionUUID->
  "26032a6a-2ab2-4798-8897-31bfcc1761ff"],
 " refetches one call without discarding the rest:"
}], "ExampleText",ExpressionUUID->"2f07544e-46e0-44ed-93f6-8f49f4b2c6a5"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ChainAddressBalance", "[", 
  RowBox[{"\"\<1BgGZ9tcN4rm9KBzDn7KprQz87SZ26SAMH\>\"", ",", " ", 
   RowBox[{"\"\<Cache\>\"", " ", "->", " ", "False"}]}], "]"}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"b0caef77-c5df-4f64-b118-c546eb94b4b1"],

Cell[BoxData[
 TemplateBox[{"0", 
   RowBox[{"\[VeryThinSpace]", 
     FormBox["\" sat\"", TraditionalForm]}], "satoshis", "\"Satoshis\""},
  "QuantityPostfix"]], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"0d468890-f30a-477f-a03e-56ec90a74895"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[Cell[
  "\t", "ExampleDelimiter",ExpressionUUID->
   "58b3ca08-cb41-4990-b686-14e9a973bd79"],
  $Line = 0; Null]], "ExampleDelimiter",ExpressionUUID->"f3020065-fce0-425f-\
968e-6e72c38f6b65"],

Cell[TextData[{
 "The cache is shared between sessions, so clearing it affects any other \
kernel using the same ",
 Cell[BoxData[
  TemplateBox[{
    Cell[
     TextData["$ChainCacheDirectory"]], 
    "paclet:WolframInstitute/Puzzles/ref/$ChainCacheDirectory", 
    "WolframInstitute/Puzzles Package Symbol"},
   "PackageLink",
   BaseStyle->"InlineFormula"]], "InlineFormula",
  FontFamily->"Source Sans Pro",
  FontSize->0.9 Inherited,ExpressionUUID->
  "d06fe8b3-3ec1-4967-ae7a-195406fe3fa8"],
 ":"
}], "ExampleText",ExpressionUUID->"2c06bfbf-5bce-4dfe-aeb4-7562617a6d9b"],

Cell[CellGroupData[{

Cell[BoxData["$ChainCacheDirectory"], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"07d0cdbc-d892-4177-8ee1-523cf5b883dd"],

Cell[BoxData["\<\"/Users/swish/Library/Wolfram/ApplicationData/\
WolframInstitute/Puzzles/ChainCache\"\>"], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"0947aa45-dc63-4655-9800-d7396cb171dc"]
}, Open  ]]
}, Open  ]]
}, Closed]]
}, Open  ]],

Cell[BoxData[GridBox[{
   {
    DynamicBox[FEPrivate`ImportImage[
      FrontEnd`FileName[{"Documentation", "FooterIcons"}, 
       "RelatedFunction.png"]]], GridBox[{
      {
       StyleBox[
        RowBox[{"See", " ", "Also"}], "SeeAlsoSection"]},
      {Cell[TextData[{
        Cell[BoxData[
         TemplateBox[{
           Cell[
            TextData["$ChainCacheDirectory"]], 
           "paclet:WolframInstitute/Puzzles/ref/$ChainCacheDirectory", 
           "WolframInstitute/Puzzles Package Symbol"},
          "PackageLink",
          BaseStyle->"InlineFormula"]], "InlineFormula",
         FontFamily->"Source Sans Pro",ExpressionUUID->
         "4f21758c-dc69-4462-8998-eb9cab0857fa"],
        "\[NonBreakingSpace]",
        StyleBox[
        "\[MediumSpace]\[FilledVerySmallSquare]\[MediumSpace]", 
         "InlineSeparator"],
        " ",
        Cell[BoxData[
         TemplateBox[{
           Cell[
            TextData["$ChainCacheDuration"]], 
           "paclet:WolframInstitute/Puzzles/ref/$ChainCacheDuration", 
           "WolframInstitute/Puzzles Package Symbol"},
          "PackageLink",
          BaseStyle->"InlineFormula"]], "InlineFormula",
         FontFamily->"Source Sans Pro",ExpressionUUID->
         "9766fabb-7053-40ff-8bac-948cac103712"],
        "\[NonBreakingSpace]",
        StyleBox[
        "\[MediumSpace]\[FilledVerySmallSquare]\[MediumSpace]", 
         "InlineSeparator"],
        " ",
        Cell[BoxData[
         TemplateBox[{
           Cell[
            TextData["$ChainNetworkEnabled"]], 
           "paclet:WolframInstitute/Puzzles/ref/$ChainNetworkEnabled", 
           "WolframInstitute/Puzzles Package Symbol"},
          "PackageLink",
          BaseStyle->"InlineFormula"]], "InlineFormula",
         FontFamily->"Source Sans Pro",ExpressionUUID->
         "3042c9ef-5228-4803-a70c-5a975a866cbb"],
        "\[NonBreakingSpace]",
        StyleBox[
        "\[MediumSpace]\[FilledVerySmallSquare]\[MediumSpace]", 
         "InlineSeparator"],
        " ",
        Cell[BoxData[
         TemplateBox[{
           Cell[
            TextData["ChainExplorerQuery"]], 
           "paclet:WolframInstitute/Puzzles/ref/ChainExplorerQuery", 
           "WolframInstitute/Puzzles Package Symbol"},
          "PackageLink",
          BaseStyle->"InlineFormula"]], "InlineFormula",
         FontFamily->"Source Sans Pro",ExpressionUUID->
         "3fd67a2c-2bab-4949-840a-d16e8734b76c"],
        "\[NonBreakingSpace]",
        StyleBox[
        "\[MediumSpace]\[FilledVerySmallSquare]\[MediumSpace]", 
         "InlineSeparator"],
        " ",
        Cell[BoxData[
         TemplateBox[{
           Cell[
            TextData["ClearSystemCache"]], "paclet:ref/ClearSystemCache"},
          "RefLink",
          BaseStyle->"InlineFormula"]], "InlineFormula",
         FontFamily->"Source Sans Pro",ExpressionUUID->
         "8f6bb9bf-33c8-42ab-b755-5be9c36b3045"]
       }], "SeeAlso",ExpressionUUID->"a993e285-dba2-44c9-8193-d78c2e85e0ec"]}
     }]}
  }]], "SeeAlsoSection",ExpressionUUID->"0c03cde4-31e2-4b30-9eae-\
9c2ccd193146"],

Cell[BoxData[GridBox[{
   {
    DynamicBox[FEPrivate`ImportImage[
      FrontEnd`FileName[{"Documentation", "FooterIcons"}, 
       "RelatedGuide.png"]]], GridBox[{
      {
       StyleBox[
        RowBox[{"Related", " ", "Guides"}], "MoreAboutSection"]},
      {
       RowBox[{"\[FilledVerySmallSquare]", Cell[BoxData[
         TemplateBox[{
           Cell[
            TextData["Chain"]], "paclet:WolframInstitute/Puzzles/guide/Chain"},
          "RefLinkPlain",
          BaseStyle->{"MoreAbout"}]], "MoreAbout",ExpressionUUID->
         "018d990b-8226-473c-b1ed-37f8ed2c883b"]}]}
     }]}
  }]], "MoreAboutSection",ExpressionUUID->"5412d9ce-1225-450b-8c41-\
fba1e7a34987"],

Cell[" ", "FooterCell",ExpressionUUID->"f417aaea-a0f5-4a3a-8a34-7bd32f519d45"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{900, 830},
WindowMargins->{{0, Automatic}, {Automatic, 0}},
WindowTitle->"ClearChainCache",
TaggingRules->{
 "ModificationHighlight" -> False, "ColorType" -> "", "LinkTrails" -> "", 
  "ExampleCounter" -> 1, 
  "Openers" -> {
   "PrimaryExamplesSection" -> Open, "ExampleSection" -> {"0" -> Open}, 
    "AllOptsTable" -> Closed}, "NewStyles" -> True, 
  "CitationPopupData" -> $Failed, "ShowCitation" -> False, "HasOptions" -> 
  True, "RootCaptions" -> "", "HeaderCoreAreaLink" -> {}, 
  "Metadata" -> {
   "built" -> "{2026, 8, 27, 0, 11, 34.612465}", 
    "history" -> {"XX", "", "", ""}, "context" -> "WolframInstitute`Puzzles`",
     "keywords" -> {}, "specialkeywords" -> {}, 
    "tutorialcollectionlinks" -> {}, "index" -> True, "label" -> 
    "Wolfram Institute/ Puzzles Symbol", "language" -> "en", "paclet" -> 
    "WolframInstitute/Puzzles", "status" -> "None", "summary" -> 
    "PackageLink[ClearChainCache, paclet : \
WolframInstitute/Puzzles/ref/ClearChainCache, WolframInstitute/Puzzles \
Package Symbol][] deletes every cached explorer response and gives the number \
of records deleted. PackageLink[ClearChainCache, paclet : \
WolframInstitute/Puzzles/ref/ClearChainCache, WolframInstitute/Puzzles \
Package Symbol][backend] deletes only the records cached for backend.", 
    "synonyms" -> {}, "tabletags" -> {}, "title" -> "ClearChainCache", 
    "titlemodifier" -> "", "metadescription" -> "", "windowtitle" -> 
    "ClearChainCache", "type" -> "Symbol", "uri" -> 
    "WolframInstitute/Puzzles/ref/ClearChainCache", "WorkflowDockedCell" -> 
    ""}, "SearchTextTranslated" -> ""},
CellContext->CellGroup,
FrontEndVersion->"15.0 for Mac OS X ARM (64-bit) (May 19, 2026)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "Reference.nb"],
ExpressionUUID->"132ef26b-e8db-4a50-850a-703e91cef4e7"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
 "TextAnnotation"->{
  Cell[15684, 421, 154, 2, 70, "ExampleText",ExpressionUUID->"da64ba04-9bb7-433b-86e8-f6f55c71b0fd",
   CellTags->"TextAnnotation"]}
 }
*)
(*CellTagsIndex
CellTagsIndex->{
 {"TextAnnotation", 34943, 965}
 }
*)
(*NotebookFileOutline
Notebook[{
Cell[583, 21, 6360, 154, 70, "AnchorBarGrid",ExpressionUUID->"e55aa6ca-6a55-4d49-9f83-cb50cf2ce36c",
 CellID->1],
Cell[6946, 177, 107, 0, 70, "ContextNameCell",ExpressionUUID->"4c56405f-2eb8-4c51-ace7-17400f370ae8"],
Cell[CellGroupData[{
Cell[7078, 181, 558, 14, 70, "ObjectNameGrid",ExpressionUUID->"05f1178d-6fc9-42cc-be64-8622fab1647a"],
Cell[7639, 197, 1430, 37, 70, "Usage",ExpressionUUID->"3f267eea-fcb4-419d-acc9-c1486c96e294"]
}, Open  ]],
Cell[CellGroupData[{
Cell[9106, 239, 1443, 34, 70, "NotesSection",ExpressionUUID->"cbc66f8a-bb19-410a-a4a8-f50639526ffd",
 CellGroupingRules->{"SectionGrouping", 50},
 CellID->246038011],
Cell[10552, 275, 162, 3, 70, "Notes",ExpressionUUID->"1b84f396-9ff3-463b-ba51-0780cb3333f0"],
Cell[10717, 280, 668, 18, 70, "Notes",ExpressionUUID->"ff3352bb-0da3-4530-ad18-f40622eeca7d"],
Cell[11388, 300, 252, 4, 70, "Notes",ExpressionUUID->"d3b00b05-d6ed-42ea-94fe-5aaf95439d5c"],
Cell[11643, 306, 551, 15, 70, "Notes",ExpressionUUID->"29838f70-e70a-4bb8-ba79-61c6c7195faf"],
Cell[12197, 323, 333, 7, 70, "Notes",ExpressionUUID->"540a87bb-1011-433d-b0f2-36174044ca8f"],
Cell[12533, 332, 146, 2, 70, "Notes",ExpressionUUID->"1486e969-93e0-492e-904f-47bab2d4b0a7"]
}, Closed]],
Cell[12694, 337, 80, 0, 70, "PageDelimiter",ExpressionUUID->"a6c8cc28-a67a-47b7-aa97-c4ef4dc4d16c"],
Cell[CellGroupData[{
Cell[12799, 341, 1402, 37, 70, "PrimaryExamplesSection",ExpressionUUID->"67961caf-d02f-459f-828b-b11b3237de5f",
 CellID->1254830402],
Cell[14204, 380, 216, 4, 70, "Input",ExpressionUUID->"90b0cf4b-5fd7-4f02-81b1-4a6b25e8043a",
 CellID->1969679695],
Cell[CellGroupData[{
Cell[14445, 388, 1236, 31, 70, "ExampleSection",ExpressionUUID->"7d93deeb-bc8c-405f-a380-60e5578db916",
 CellID->1645152874],
Cell[15684, 421, 154, 2, 70, "ExampleText",ExpressionUUID->"da64ba04-9bb7-433b-86e8-f6f55c71b0fd",
 CellTags->"TextAnnotation"],
Cell[CellGroupData[{
Cell[15863, 427, 190, 3, 70, "Input",ExpressionUUID->"7b516475-8a71-4851-9050-e68255cd1a64"],
Cell[16056, 432, 107, 1, 70, "Output",ExpressionUUID->"f92b9e11-8f37-4261-977f-985bcb90da8d"]
}, Open  ]],
Cell[CellGroupData[{
Cell[16200, 438, 224, 5, 70, "ExampleDelimiter",ExpressionUUID->"8e2a5918-5844-4759-924a-8e44251067ee"],
Cell[16427, 445, 128, 0, 70, "ExampleText",ExpressionUUID->"cbf1027e-3381-42d0-9d80-a2fc46182668"],
Cell[CellGroupData[{
Cell[16580, 449, 190, 3, 70, "Input",ExpressionUUID->"bd9f4d97-2a96-4ac4-bcef-b953ab36d8c5"],
Cell[16773, 454, 107, 1, 70, "Output",ExpressionUUID->"a5b9de49-bbe3-4008-a126-737f5c13d08e"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[16929, 461, 224, 5, 70, "ExampleDelimiter",ExpressionUUID->"894981ef-2164-43b9-a8bf-3884d9ca160d"],
Cell[17156, 468, 140, 1, 70, "ExampleText",ExpressionUUID->"6deef488-2484-4ff9-86aa-492869d38d08"],
Cell[CellGroupData[{
Cell[17321, 473, 364, 8, 70, "Input",ExpressionUUID->"b2e18179-dba2-4f48-acbe-6561f6d97821"],
Cell[17688, 483, 107, 1, 70, "Output",ExpressionUUID->"884d64dd-924d-42d3-8a2a-078fa1700d57"]
}, Open  ]]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[17856, 491, 1227, 31, 70, "ExampleSection",ExpressionUUID->"618f7c1a-f089-40e5-9c4d-36941ee73771",
 CellID->1293636265],
Cell[19086, 524, 121, 0, 70, "ExampleText",ExpressionUUID->"1f485e4d-189c-4cce-8f7e-32ddfd98ebe6"],
Cell[CellGroupData[{
Cell[19232, 528, 390, 8, 70, "Input",ExpressionUUID->"d9f40830-e8cb-4ba4-b154-d343b407cf9d"],
Cell[19625, 538, 107, 1, 70, "Output",ExpressionUUID->"640c9851-b4d1-4cd8-9bc2-348bf7be961e"]
}, Open  ]],
Cell[CellGroupData[{
Cell[19769, 544, 224, 5, 70, "ExampleDelimiter",ExpressionUUID->"71ef9139-2e56-4895-b627-25c105e1dd0d"],
Cell[19996, 551, 119, 0, 70, "ExampleText",ExpressionUUID->"a708564e-226c-4da1-b39f-37f6f5dcdb07"],
Cell[CellGroupData[{
Cell[20140, 555, 442, 9, 70, "Input",ExpressionUUID->"68d73f47-15b1-4c91-a5bf-79ff5b8d46af"],
Cell[20585, 566, 107, 1, 70, "Output",ExpressionUUID->"cb251d38-61e9-4607-aa42-9392d445cb9d"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[20741, 573, 224, 5, 70, "ExampleDelimiter",ExpressionUUID->"dbf0d65e-536c-4295-bffb-1590b586d7c5"],
Cell[20968, 580, 151, 2, 70, "ExampleText",ExpressionUUID->"70de9b67-74a2-4fad-b809-20aa76e929ce"],
Cell[CellGroupData[{
Cell[21144, 586, 215, 3, 70, "Input",ExpressionUUID->"ae1305ab-1c84-41ff-b5cf-051b5ef7bd70"],
Cell[21362, 591, 168, 2, 70, "Output",ExpressionUUID->"b9605c8a-2623-47fe-a417-0ac3be4013d6"]
}, Open  ]]
}, Open  ]]
}, Closed]],
Cell[CellGroupData[{
Cell[21591, 600, 1244, 31, 70, "ExampleSection",ExpressionUUID->"70e4484d-9ab5-4bfa-8bda-c2051f8951fa",
 CellID->2123667759],
Cell[22838, 633, 524, 14, 70, "ExampleText",ExpressionUUID->"a3bdbd8b-38b2-4ad8-8c04-af7596ac91e4"],
Cell[CellGroupData[{
Cell[23387, 651, 491, 11, 70, "Input",ExpressionUUID->"5d51f00e-b95e-4c6d-9fde-b7e046581ddc"],
Cell[23881, 664, 107, 1, 70, "Output",ExpressionUUID->"abcf557a-6a14-4cec-8d1a-200ae3a25c27"]
}, Open  ]],
Cell[CellGroupData[{
Cell[24025, 670, 224, 5, 70, "ExampleDelimiter",ExpressionUUID->"d4cf44f8-04f5-4c6e-becf-06954c084503"],
Cell[24252, 677, 176, 3, 70, "ExampleText",ExpressionUUID->"855a2897-4c8a-42ec-bd43-d86c74014d31"],
Cell[CellGroupData[{
Cell[24453, 684, 513, 13, 70, "Input",ExpressionUUID->"2a98b719-78a0-42cb-a61d-e39937593dc6"],
Cell[24969, 699, 110, 1, 70, "Output",ExpressionUUID->"8de51c1f-5dbe-41cc-8a95-e25464c75f62"]
}, Open  ]]
}, Open  ]]
}, Closed]],
Cell[CellGroupData[{
Cell[25140, 707, 1237, 31, 70, "ExampleSection",ExpressionUUID->"9ce3abfb-fba3-4edf-b920-16ffaa85954b",
 CellID->1305812373],
Cell[26380, 740, 830, 21, 70, "ExampleText",ExpressionUUID->"2f07544e-46e0-44ed-93f6-8f49f4b2c6a5"],
Cell[CellGroupData[{
Cell[27235, 765, 319, 5, 70, "Input",ExpressionUUID->"b0caef77-c5df-4f64-b118-c546eb94b4b1"],
Cell[27557, 772, 251, 5, 70, "Output",ExpressionUUID->"0d468890-f30a-477f-a03e-56ec90a74895"]
}, Open  ]],
Cell[CellGroupData[{
Cell[27845, 782, 224, 5, 70, "ExampleDelimiter",ExpressionUUID->"f3020065-fce0-425f-968e-6e72c38f6b65"],
Cell[28072, 789, 576, 15, 70, "ExampleText",ExpressionUUID->"2c06bfbf-5bce-4dfe-aeb4-7562617a6d9b"],
Cell[CellGroupData[{
Cell[28673, 808, 173, 2, 70, "Input",ExpressionUUID->"07d0cdbc-d892-4177-8ee1-523cf5b883dd"],
Cell[28849, 812, 196, 2, 70, "Output",ExpressionUUID->"0947aa45-dc63-4655-9800-d7396cb171dc"]
}, Open  ]]
}, Open  ]]
}, Closed]]
}, Open  ]],
Cell[29096, 820, 3080, 80, 70, "SeeAlsoSection",ExpressionUUID->"0c03cde4-31e2-4b30-9eae-9c2ccd193146"],
Cell[32179, 902, 678, 18, 70, "MoreAboutSection",ExpressionUUID->"5412d9ce-1225-450b-8c41-fba1e7a34987"],
Cell[32860, 922, 78, 0, 70, "FooterCell",ExpressionUUID->"f417aaea-a0f5-4a3a-8a34-7bd32f519d45"]
}
]
*)

(* End of internal cache information *)

