(* 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[     42987,       1126]
NotebookOptionsPosition[     34416,        967]
NotebookOutlinePosition[     36500,       1016]
CellTagsIndexPosition[     36422,       1011]
WindowTitle->$ChainCacheDuration
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->
           "787160c5-df0c-42e3-b783-deecfc500237"], 
          TemplateBox[{8},
           "Spacer1"]}]],
         TextAlignment->Center,ExpressionUUID->
         "7431ef0b-ac0b-4e20-93ce-b7c249d4e998"],
        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->
           "a082f792-8126-48e2-b7d2-7437028239bc"]
         }],ExpressionUUID->"d08380eb-7b54-49ea-9dcb-d2b046ccc14a"],
         StripOnInput->False],{
        StyleBox[
          "\"$ChainCacheDirectory\"", "SeeAlsoRelated", StripOnInput -> 
           False] :> Documentation`HelpLookup[
          "paclet:WolframInstitute/Puzzles/ref/$ChainCacheDirectory"], 
         StyleBox[
          "\"$ChainNetworkEnabled\"", "SeeAlsoRelated", StripOnInput -> 
           False] :> Documentation`HelpLookup[
          "paclet:WolframInstitute/Puzzles/ref/$ChainNetworkEnabled"], 
         StyleBox[
          "\"ClearChainCache\"", "SeeAlsoRelated", StripOnInput -> False] :> 
         Documentation`HelpLookup[
          "paclet:WolframInstitute/Puzzles/ref/ClearChainCache"], 
         StyleBox[
          "\"ChainExplorerQuery\"", "SeeAlsoRelated", StripOnInput -> False] :> 
         Documentation`HelpLookup[
          "paclet:WolframInstitute/Puzzles/ref/ChainExplorerQuery"], 
         StyleBox[
          "\"ChainAddressSummary\"", "SeeAlsoRelated", StripOnInput -> False] :> 
         Documentation`HelpLookup[
          "paclet:WolframInstitute/Puzzles/ref/ChainAddressSummary"]},
        Appearance->None,
        MenuAppearance->Automatic,
        MenuStyle->"SeeAlso"],
       MouseAppearanceTag["LinkHand"]]],
      LineSpacing->{1.4, 0},ExpressionUUID->
      "b093eb72-b9ad-474b-a599-02df073751c8"],
     "\[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->
           "f950cd35-7b10-455a-a0b6-e85f34dbe21b"]
         }],ExpressionUUID->"b010fe04-f335-4d04-b062-980d95f7c8bd"],
         StripOnInput->False],{
        "\"Chain\"" :> 
         Documentation`HelpLookup[
          "paclet:WolframInstitute/Puzzles/guide/Chain"]},
        Appearance->None,
        MenuAppearance->Automatic,
        MenuStyle->"MoreAbout"],
       MouseAppearanceTag["LinkHand"]]],
      LineSpacing->{1.4, 0},ExpressionUUID->
      "c8be69c5-0592-4855-bf31-03929375c1ac"],
     "\[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->
           "1a67c11b-8360-402a-8296-33a6b17318ad"]
         }],ExpressionUUID->"483a431c-9180-45db-913e-52bd19eca878"],
         StripOnInput->False],{
        "\"WolframInstitute/Puzzles/ref/$ChainCacheDuration\"" :> None, 
         "\"Copy Wolfram Documentation Center URL\"" :> 
         CopyToClipboard["WolframInstitute/Puzzles/ref/$ChainCacheDuration"], 
         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/$ChainCacheDuration.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/$ChainCacheDuration" <> ".html"],
               None}]}]},
        Appearance->None,
        MenuAppearance->Automatic,
        MenuStyle->"URLMenu"],
       MouseAppearanceTag["LinkHand"]]],
      LineSpacing->{1.4, 0},ExpressionUUID->
      "243a181a-046c-4cac-bb11-811fbc342ee3"]
    }], "AnchorBar",
     CacheGraphics->False,ExpressionUUID->
     "60aab1b9-6aef-46d7-9b36-a87362bb9eed"]}
  }]], "AnchorBarGrid",
 CellID->1,ExpressionUUID->"41813600-8a3a-4ea7-a619-82719c713dcf"],

Cell["WolframInstitute`Puzzles`", "ContextNameCell",ExpressionUUID->"32877a62-0f3d-4815-bfba-5720ae9eb242"],

Cell[CellGroupData[{

Cell[BoxData[GridBox[{
   {Cell[TextData[{
     Cell[
     "$ChainCacheDuration", "ObjectName",ExpressionUUID->
      "3f81c437-e143-4750-9633-a42fc75755a3"],
     Cell[BoxData[
      TemplateBox[{8},
       "Spacer1"]],ExpressionUUID->"ef5ec7c6-7876-4a56-88b3-50d0788a5f6d"],
     Cell[BoxData[
     ""], "ObjectNameTranslation",ExpressionUUID->
      "7bd809fb-3073-48cb-b9e8-02d267176ad2"]
    }],ExpressionUUID->"348a87f6-1e3c-420c-95b0-32ed9c896890"], 
    "\[SpanFromLeft]"}
  }]], "ObjectNameGrid",ExpressionUUID->"7a1acd14-3b46-492e-aaa1-\
8d36a0e4341c"],

Cell[BoxData[GridBox[{
   {"", Cell[TextData[{
     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->
      "0b2831d5-33a9-4ba5-bfb4-f26f08f98f52"],
     "\[LineSeparator]",
     "is the time for which a cached explorer response is reused before the \
backend is asked again."
    }],ExpressionUUID->"59f2f79f-8f5b-4266-a163-2e2af51622e7"]}
  }]], "Usage",ExpressionUUID->"d7d78d29-7290-41ab-be53-acb2d28227e5"]
}, 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->"7d2c85d8-e930-44c4-8afc-219e11ba8c9e"],
  Cell[BoxData[
   TemplateBox[{1},
    "Spacer1"]],ExpressionUUID->"667c0b14-cd3b-40b5-98d2-0ef0293046f7"],
  "Details and Options"
 }], "NotesFrameText",ExpressionUUID->
  "7011f2c7-dd2b-426a-80c5-f413bbb40c37"]],ExpressionUUID->"6040371d-0ada-\
4303-a851-571e345a96f1"]], "NotesSection",
 ShowGroupOpener->"Thumbnail",
 WholeCellGroupOpener->True,
 CellGroupingRules->{"SectionGrouping", 50},
 CacheGraphics->False,
 CellID->1325082061,ExpressionUUID->"c69c4b50-f1cd-4172-b41b-0d230a7c4ecc"],

Cell[TextData[{
 "The value is a ",
 Cell[BoxData[
  TemplateBox[{
    Cell[
     TextData["Quantity"]], "paclet:ref/Quantity"},
   "RefLink",
   BaseStyle->"InlineFormula"]], "InlineFormula",
  FontFamily->"Source Sans Pro",
  FontSize->0.9 Inherited,ExpressionUUID->
  "d8de90f4-8511-4e33-af69-f6b37de4181e"],
 " of time, and the default is one hour."
}], "Notes",ExpressionUUID->"e0947449-b1c1-456a-9a06-5eaca7ea2b4d"],

Cell["\<\
A record older than this is treated as a cache miss, so it is refetched \
rather than served stale.\
\>", "Notes",ExpressionUUID->"add160b1-dcc2-4138-993b-a553f03f6637"],

Cell[TextData[{
 Cell[BoxData[
  RowBox[{"Quantity", "[", 
   RowBox[{"0", ",", " ", "\<\"Seconds\"\>"}], "]"}]], "InlineFormula",
  FontFamily->"Source Sans Pro",
  FontSize->0.9 Inherited,ExpressionUUID->
  "9b0d2d75-d43c-4c86-9f01-35fa5cfc6497"],
 " disables reuse without disabling storage: every read goes to the backend \
and every response is still written to ",
 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->
  "1cbacc89-007f-4745-a9bc-97b5c3951bb5"],
 "."
}], "Notes",ExpressionUUID->"d83f28d5-734c-43ff-9f71-6be6ddeaead7"],

Cell[TextData[{
 "With ",
 Cell[BoxData[
  TemplateBox[{
    Cell[
     TextData["$ChainNetworkEnabled"]], 
    "paclet:WolframInstitute/Puzzles/ref/$ChainNetworkEnabled", 
    "WolframInstitute/Puzzles Package Symbol"},
   "PackageLink",
   BaseStyle->"InlineFormula"]], "InlineFormula",
  FontFamily->"Source Sans Pro",
  FontSize->0.9 Inherited,ExpressionUUID->
  "19286d40-3ca4-4202-a7ae-37c8a695f8de"],
 " set to ",
 Cell[BoxData["False"], "InlineFormula",
  FontFamily->"Source Sans Pro",
  FontSize->0.9 Inherited,ExpressionUUID->
  "9f1edc3f-9abf-437d-b923-123790f19170"],
 ", an expired record gives a ",
 Cell[BoxData["Failure"], "InlineFormula",
  FontFamily->"Source Sans Pro",
  FontSize->0.9 Inherited,ExpressionUUID->
  "203f7f4e-3447-4181-ace4-347383e3756d"],
 " tagged ",
 Cell[BoxData["\<\"ChainNetworkDisabled\"\>"], "InlineFormula",
  FontFamily->"Source Sans Pro",
  FontSize->0.9 Inherited,ExpressionUUID->
  "da5ab2c8-7d26-48c8-a1be-56587a0a4ad4"],
 " rather than a stale answer. Raising the duration is how a captured \
response is replayed later."
}], "Notes",ExpressionUUID->"74c3d51d-bf22-4370-8453-2e600e9e22f1"],

Cell[TextData[{
 "The ",
 Cell[BoxData["\<\"Retrieved\"\>"], "InlineFormula",
  FontFamily->"Source Sans Pro",
  FontSize->0.9 Inherited,ExpressionUUID->
  "c4d60a7a-7891-498c-928c-c1c5c4d6ce3c"],
 " field of a summary is the time the stored response was fetched, not the \
time of the call, so staleness is always visible in the result."
}], "Notes",ExpressionUUID->"02aaeab7-c6e8-415a-be14-b469d0996a42"],

Cell["\<\
Confirmed chain history does not change, but a balance does. The default \
trades a possibly hour-old balance for not hammering a public explorer during \
a sweep.\
\>", "Notes",ExpressionUUID->"9e6de870-366d-49d4-a2df-19a4d0da9f0a"]
}, Closed]],

Cell["", "PageDelimiter",ExpressionUUID->"9a0f388e-0eca-4a99-8cee-b026793c2834"],

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->"cc81d1e8-fc91-4e4c-88df-4d79e218aa9b"],
 Cell[BoxData[
  TemplateBox[{1},
   "Spacer1"]],ExpressionUUID->"4289672a-8e77-44e9-8104-e9cf8f152f7d"],
 "Examples",
 "\[NonBreakingSpace]\[NonBreakingSpace]",
 Cell["(10)", "ExampleCount",ExpressionUUID->
  "2e35ed55-6151-4865-914c-80e348f405db"]
}], "PrimaryExamplesSection",
 WholeCellGroupOpener->True,
 CacheGraphics->False,
 CellID->1248779837,ExpressionUUID->"ca0c7e86-5343-4437-babf-e71fb69c3ce1"],

Cell[BoxData[
 RowBox[{"Needs", "[", "\"\<WolframInstitute`Puzzles`\>\"", "]"}]], "Input", \
"ExampleInitialization",
 CellLabel->"In[1]:=",
 CellID->1969679695,ExpressionUUID->"619c0ab2-cbe6-4d29-92d2-2d11f1d8d3f8"],

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->
  "c981de96-fe49-4dc1-a929-ec8d8ee85b92"],
 Cell[BoxData[
  TemplateBox[{1},
   "Spacer1"]],ExpressionUUID->"be723add-ddd4-4ccf-8f4f-b869e998fb26"],
 "Basic Examples",
 "\[NonBreakingSpace]\[NonBreakingSpace]",
 Cell["(3)", "ExampleCount",ExpressionUUID->
  "7864e0d4-95c0-4b68-b3b0-07712b9847c4"]
}], "ExampleSection", "ExampleSection",
 WholeCellGroupOpener->True,
 CacheGraphics->False,
 CellID->885038328,ExpressionUUID->"1a2c0912-844a-448d-9c0b-e89eb66d0be1"],

Cell["The default:", "ExampleText",
 CellTags->
  "TextAnnotation",ExpressionUUID->"39365575-2bef-4294-ab7e-308aea77c595"],

Cell[CellGroupData[{

Cell[BoxData["$ChainCacheDuration"], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"71295891-f463-412d-950e-26cc57f1ccfc"],

Cell[BoxData[
 TemplateBox[{"1", "\"h\"", "hour", "\"Hours\""},
  "Quantity"]], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"7ba76229-0909-4296-bf20-36673ab96e9a"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[Cell[
  "\t", "ExampleDelimiter",ExpressionUUID->
   "7fd7b785-d05a-4153-b37c-1e11bc53df1f"],
  $Line = 0; Null]], "ExampleDelimiter",ExpressionUUID->"0e5cf3a8-29d1-4584-\
961f-54c3f5925024"],

Cell["\<\
Within the duration a second read is served from disk, so it is fast and the \
timestamp does not move:\
\>", "ExampleText",ExpressionUUID->"7b0f295f-d877-4010-8f2e-0c0dd70be4e1"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{
   "ChainAddressSummary", "[", "\"\<1BgGZ9tcN4rm9KBzDn7KprQz87SZ26SAMH\>\"", 
    "]"}], "[", "\"\<Retrieved\>\"", "]"}], " ", "===", " ", 
  RowBox[{
   RowBox[{
   "ChainAddressSummary", "[", "\"\<1BgGZ9tcN4rm9KBzDn7KprQz87SZ26SAMH\>\"", 
    "]"}], "[", "\"\<Retrieved\>\"", "]"}]}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"d7f7b3f3-39b0-4415-b466-70c16c5c5f0b"],

Cell[BoxData["True"], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"e2dc790b-c2e7-4639-93f5-471c3012c372"]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[Cell[
  "\t", "ExampleDelimiter",ExpressionUUID->
   "f649bdd9-c71b-4826-a3b5-63af1180477d"],
  $Line = 0; Null]], "ExampleDelimiter",ExpressionUUID->"330f35e0-ff27-4c36-\
8c27-1fc8dea570bc"],

Cell["\<\
A cached read takes about two milliseconds, against about a second for a live \
one:\
\>", "ExampleText",ExpressionUUID->"06d65b6c-8621-445d-b3e3-83018e722fbb"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"First", " ", "@", " ", 
  RowBox[{"AbsoluteTiming", " ", "@", " ", 
   RowBox[{
   "ChainAddressSummary", "[", "\"\<1BgGZ9tcN4rm9KBzDn7KprQz87SZ26SAMH\>\"", 
    "]"}]}]}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"038a29e2-6e40-4190-9ad8-b462d9c8a9df"],

Cell[BoxData["0.005132`"], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"e3726817-99f3-476e-81ca-9f972acf815f"]
}, 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->
  "8a1865c7-d546-4914-b4ca-f2be849eae96"],
 Cell[BoxData[
  TemplateBox[{1},
   "Spacer1"]],ExpressionUUID->"70e4384e-d07c-4f5a-8c59-707621695d05"],
 "Scope",
 "\[NonBreakingSpace]\[NonBreakingSpace]",
 Cell["(3)", "ExampleCount",ExpressionUUID->
  "e56b4f9a-7665-4d3f-aba3-0f951c06536a"]
}], "ExampleSection", "ExampleSection",
 WholeCellGroupOpener->True,
 CacheGraphics->False,
 CellID->1293636265,ExpressionUUID->"d135eaf5-cd92-4619-ad2b-38d5b19494b5"],

Cell["Setting it to zero makes every read reach the backend:", "ExampleText",ExpressionUUID->"a4e15b43-8c95-416e-a830-e01b96035de1"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Block", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"$ChainCacheDuration", " ", "=", " ", 
     RowBox[{"Quantity", "[", 
      RowBox[{"0", ",", " ", "\"\<Seconds\>\""}], "]"}]}], "}"}], ",", " ", 
   RowBox[{
    RowBox[{
    "ChainAddressSummary", "[", "\"\<1BgGZ9tcN4rm9KBzDn7KprQz87SZ26SAMH\>\"", 
     "]"}], "[", "\"\<Backend\>\"", "]"}]}], "]"}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"08d53e87-c176-453d-9c9f-5c93119969a4"],

Cell[BoxData["\<\"MempoolSpace\"\>"], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"df5eaa62-1048-47c1-96bf-5306d72174c3"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[Cell[
  "\t", "ExampleDelimiter",ExpressionUUID->
   "e3c84768-bb3f-44c0-84b7-f368c790bfa0"],
  $Line = 0; Null]], "ExampleDelimiter",ExpressionUUID->"e878d4bf-d706-4c24-\
adb9-b97d6cbf9944"],

Cell["\<\
A long duration replays an old capture rather than asking again:\
\>", "ExampleText",ExpressionUUID->"c33b93d0-a3ef-4827-96f2-9f209f6726bb"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Block", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"$ChainCacheDuration", " ", "=", " ", 
      RowBox[{"Quantity", "[", 
       RowBox[{"365", ",", " ", "\"\<Days\>\""}], "]"}]}], ",", " ", 
     RowBox[{"$ChainNetworkEnabled", " ", "=", " ", "False"}]}], "}"}], ",", 
   " ", 
   RowBox[{
   "ChainAddressBalance", "[", "\"\<1BgGZ9tcN4rm9KBzDn7KprQz87SZ26SAMH\>\"", 
    "]"}]}], "]"}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"f4d0cc4e-5fa0-477b-9437-673b1ec33fa5"],

Cell[BoxData[
 TemplateBox[{"0", 
   RowBox[{"\[VeryThinSpace]", 
     FormBox["\" sat\"", TraditionalForm]}], "satoshis", "\"Satoshis\""},
  "QuantityPostfix"]], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"af53f7d4-9a86-4a3b-894b-32cab40446f8"]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[Cell[
  "\t", "ExampleDelimiter",ExpressionUUID->
   "14d76ce6-b49a-42c3-8d80-151fe24f013e"],
  $Line = 0; Null]], "ExampleDelimiter",ExpressionUUID->"3c613c69-3ec7-4ba0-\
baf2-51c6f1c71aa1"],

Cell[TextData[{
 "Zero duration with the network off is a ",
 Cell[BoxData["Failure"], "InlineFormula",
  FontFamily->"Source Sans Pro",
  FontSize->0.9 Inherited,ExpressionUUID->
  "61edce8f-9474-4071-acad-22631d4b718a"],
 ", because nothing may be reused and nothing may be fetched:"
}], "ExampleText",ExpressionUUID->"4b4e5e77-64da-4573-a6d6-580c2aa8600b"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Block", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"$ChainCacheDuration", " ", "=", " ", 
      RowBox[{"Quantity", "[", 
       RowBox[{"0", ",", " ", "\"\<Seconds\>\""}], "]"}]}], ",", " ", 
     RowBox[{"$ChainNetworkEnabled", " ", "=", " ", "False"}]}], "}"}], ",", 
   " ", 
   RowBox[{
    RowBox[{"ChainExplorerQuery", "[", 
     RowBox[{"\"\<MempoolSpace\>\"", ",", " ", "\"\<AddressSummary\>\"", ",", 
      " ", "\"\<1BgGZ9tcN4rm9KBzDn7KprQz87SZ26SAMH\>\""}], "]"}], "[", 
    RowBox[{"[", "1", "]"}], "]"}]}], "]"}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"54264882-bccf-4485-afe3-e6a62e0cd773"],

Cell[BoxData["\<\"ChainNetworkDisabled\"\>"], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"7dff06e1-c7aa-4c11-807d-d1b4ffde112e"]
}, 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->
  "198f0c33-b5e9-4f4d-ac90-359b26db6139"],
 Cell[BoxData[
  TemplateBox[{1},
   "Spacer1"]],ExpressionUUID->"3a46ce10-685c-4aaa-96c9-3a3ddced4c3f"],
 "Properties & Relations",
 "\[NonBreakingSpace]\[NonBreakingSpace]",
 Cell["(2)", "ExampleCount",ExpressionUUID->
  "89f191ea-d90c-4ac6-bf9c-9a3e5f40aa19"]
}], "ExampleSection", "ExampleSection",
 WholeCellGroupOpener->True,
 CacheGraphics->False,
 CellID->2123667759,ExpressionUUID->"2cda0409-0df1-47a9-914f-be0a0ad69162"],

Cell[TextData[{
 "The records the duration applies to live in ",
 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->
  "4aceeada-77b3-45ed-b156-13e02a99584c"],
 ":"
}], "ExampleText",ExpressionUUID->"19db5923-db2b-4260-82a7-bc1f05674be0"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Length", " ", "@", " ", 
  RowBox[{"FileNames", "[", 
   RowBox[{"\"\<*.wxf\>\"", ",", " ", "$ChainCacheDirectory", ",", " ", 
    "Infinity"}], "]"}]}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"a43af179-866a-40c2-b908-8bd7e2b65c99"],

Cell[BoxData["1"], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"5c9825c0-e958-4a85-8217-15bad3beede8"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[Cell[
  "\t", "ExampleDelimiter",ExpressionUUID->
   "2b3eb3d3-ae82-42da-a943-d7acb85eb5ec"],
  $Line = 0; Null]], "ExampleDelimiter",ExpressionUUID->"bf0209c3-522a-4b80-\
af4f-bd65756c6cbe"],

Cell[TextData[{
 "The ",
 Cell[BoxData[
  RowBox[{"\<\"Cache\"\>", " ", "->", " ", "False"}]], "InlineFormula",
  FontFamily->"Source Sans Pro",
  FontSize->0.9 Inherited,ExpressionUUID->
  "d7fa906c-d81e-4fd6-9ad9-542b3867b314"],
 " option of a single call bypasses the duration for that call alone:"
}], "ExampleText",ExpressionUUID->"4407b17f-6b77-47f1-936a-53a87ed251b2"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"ChainAddressSummary", "[", 
   RowBox[{"\"\<1BgGZ9tcN4rm9KBzDn7KprQz87SZ26SAMH\>\"", ",", " ", 
    RowBox[{"\"\<Cache\>\"", " ", "->", " ", "False"}]}], "]"}], 
  "[", "\"\<Backend\>\"", "]"}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"a367e76c-0fe4-4070-a549-81d48e9007d2"],

Cell[BoxData["\<\"MempoolSpace\"\>"], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"f048b8f3-33fa-44d8-883a-e89220b8e57d"]
}, 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->
  "d952afe1-825e-4243-9302-088d692e5d7d"],
 Cell[BoxData[
  TemplateBox[{1},
   "Spacer1"]],ExpressionUUID->"f8a3cd81-90b4-4149-8b31-6de51f412888"],
 "Possible Issues",
 "\[NonBreakingSpace]\[NonBreakingSpace]",
 Cell["(2)", "ExampleCount",ExpressionUUID->
  "781ac42c-eb7d-4bec-9f90-de7c06ecbdea"]
}], "ExampleSection", "ExampleSection",
 WholeCellGroupOpener->True,
 CacheGraphics->False,
 CellID->1305812373,ExpressionUUID->"8cc440ef-e5fd-4535-ba2a-3693a1734847"],

Cell[TextData[{
 "An answer can be up to a whole duration old, and the ",
 Cell[BoxData["\<\"Retrieved\"\>"], "InlineFormula",
  FontFamily->"Source Sans Pro",
  FontSize->0.9 Inherited,ExpressionUUID->
  "a2545fd8-ccc1-41de-aab8-ab1967a7f716"],
 " field is the only thing that says so:"
}], "ExampleText",ExpressionUUID->"993a234c-0be1-4d80-851e-602dff50c60c"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"DateDifference", "[", 
  RowBox[{
   RowBox[{
    RowBox[{
    "ChainAddressSummary", "[", "\"\<1BgGZ9tcN4rm9KBzDn7KprQz87SZ26SAMH\>\"", 
     "]"}], "[", "\"\<Retrieved\>\"", "]"}], ",", " ", "Now", ",", 
   " ", "\"\<Second\>\""}], "]"}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"10ba6853-4bf8-45e7-8a41-b6f2cc9aa3de"],

Cell[BoxData[
 TemplateBox[{
  "0.8381989999999999999`6.374892130911338", "\"s\"", "seconds", 
   "\"Seconds\""},
  "Quantity"]], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"50d26edb-ad11-4c1a-bad6-ceb4d6caa57e"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[Cell[
  "\t", "ExampleDelimiter",ExpressionUUID->
   "14ecb6c2-51ce-434b-8444-ef034d11a547"],
  $Line = 0; Null]], "ExampleDelimiter",ExpressionUUID->"7a25bb42-7f82-4943-\
9fa1-0b9da3dd4863"],

Cell[TextData[{
 "Lengthening the duration does not revive a record already dropped by ",
 Cell[BoxData[
  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->
  "365975f7-4f0c-4990-b224-8b19cd588723"],
 ":"
}], "ExampleText",ExpressionUUID->"fe7bec79-e0b8-41d1-a817-34d330f55f6c"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"ClearChainCache", "[", "]"}], ";", " ", 
  RowBox[{"Block", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{"$ChainCacheDuration", " ", "=", " ", 
       RowBox[{"Quantity", "[", 
        RowBox[{"365", ",", " ", "\"\<Days\>\""}], "]"}]}], ",", " ", 
      RowBox[{"$ChainNetworkEnabled", " ", "=", " ", "False"}]}], "}"}], ",", 
    " ", 
    RowBox[{"FailureQ", " ", "@", " ", 
     RowBox[{
     "ChainAddressBalance", "[", "\"\<1BgGZ9tcN4rm9KBzDn7KprQz87SZ26SAMH\>\"",
       "]"}]}]}], "]"}]}]], "Input",
 CellProlog:>Needs["WolframInstitute`Puzzles`"],
 CellLabel->"In[1]:=",ExpressionUUID->"d72732ce-4cc7-4399-80d5-ff21fdda46ec"],

Cell[BoxData["True"], "Output",
 CellLabel->"Out[1]= ",ExpressionUUID->"c9f8a90d-d039-47ae-8e8f-af441c3ed50c"]
}, Open  ]]
}, Open  ]]
}, Closed]]
}, Open  ]],

Cell[BoxData[GridBox[{
   {
    DynamicBox[FEPrivate`ImportImage[
      FrontEnd`FileName[{"Documentation", "FooterIcons"}, 
       "RelatedFunction.png"]],
     ImageSizeCache->{50., {26.47265625, 33.52734375}}], 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->
         "7c90759e-8952-45ba-9fdc-739f6593ac06"],
        "\[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->
         "a6ce6407-57fb-4334-b076-31ee97a7c8b8"],
        "\[NonBreakingSpace]",
        StyleBox[
        "\[MediumSpace]\[FilledVerySmallSquare]\[MediumSpace]", 
         "InlineSeparator"],
        " ",
        Cell[BoxData[
         TemplateBox[{
           Cell[
            TextData["ClearChainCache"]], 
           "paclet:WolframInstitute/Puzzles/ref/ClearChainCache", 
           "WolframInstitute/Puzzles Package Symbol"},
          "PackageLink",
          BaseStyle->"InlineFormula"]], "InlineFormula",
         FontFamily->"Source Sans Pro",ExpressionUUID->
         "d871fb77-3fcb-450a-b6fd-ef41e1edc00f"],
        "\[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->
         "d86f5a0a-35a0-4fae-bd6d-713d369cbb60"],
        "\[NonBreakingSpace]",
        StyleBox[
        "\[MediumSpace]\[FilledVerySmallSquare]\[MediumSpace]", 
         "InlineSeparator"],
        " ",
        Cell[BoxData[
         TemplateBox[{
           Cell[
            TextData["ChainAddressSummary"]], 
           "paclet:WolframInstitute/Puzzles/ref/ChainAddressSummary", 
           "WolframInstitute/Puzzles Package Symbol"},
          "PackageLink",
          BaseStyle->"InlineFormula"]], "InlineFormula",
         FontFamily->"Source Sans Pro",ExpressionUUID->
         "d2ebbe4d-77dc-4502-ba8b-533ac8639b5e"]
       }], "SeeAlso",ExpressionUUID->"073b685f-218e-4316-8142-614ba8f5a458"]}
     }]}
  }]], "SeeAlsoSection",ExpressionUUID->"8be909a7-57ec-4efb-ae1f-\
47f59ef2c04e"],

Cell[BoxData[GridBox[{
   {
    DynamicBox[FEPrivate`ImportImage[
      FrontEnd`FileName[{"Documentation", "FooterIcons"}, "RelatedGuide.png"]],
     ImageSizeCache->{50., {26.47265625, 33.52734375}}], GridBox[{
      {
       StyleBox[
        RowBox[{"Related", " ", "Guides"}], "MoreAboutSection"]},
      {
       RowBox[{"\[FilledVerySmallSquare]", Cell[BoxData[
         TemplateBox[{
           Cell[
            TextData["Chain"]], "paclet:WolframInstitute/Puzzles/guide/Chain"},
          "RefLinkPlain",
          BaseStyle->{"MoreAbout"}]], "MoreAbout",ExpressionUUID->
         "eb30bca5-c84c-4637-8d4e-3bc50603b73d"]}]}
     }]}
  }]], "MoreAboutSection",ExpressionUUID->"de38dd33-1600-4996-a318-\
24c29293cbda"],

Cell[" ", "FooterCell",ExpressionUUID->"ce8b99da-d98f-4004-9803-59dca96eab94"]
},
Saveable->False,
ScreenStyleEnvironment->"Working",
WindowSize->{900, 830},
WindowMargins->{{0, Automatic}, {Automatic, 0}},
WindowTitle->"$ChainCacheDuration",
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, 54.627427}", 
    "history" -> {"XX", "", "", ""}, "context" -> "WolframInstitute`Puzzles`",
     "keywords" -> {}, "specialkeywords" -> {}, 
    "tutorialcollectionlinks" -> {}, "index" -> True, "label" -> 
    "Wolfram Institute/ Puzzles Symbol", "language" -> "en", "paclet" -> 
    "WolframInstitute/Puzzles", "status" -> "None", "summary" -> 
    "PackageLink[$ChainCacheDuration, paclet : \
WolframInstitute/Puzzles/ref/$ChainCacheDuration, WolframInstitute/Puzzles \
Package Symbol] is the time for which a cached explorer response is reused \
before the backend is asked again.", "synonyms" -> {}, "tabletags" -> {}, 
    "title" -> "$ChainCacheDuration", "titlemodifier" -> "", 
    "metadescription" -> "", "windowtitle" -> "$ChainCacheDuration", "type" -> 
    "Symbol", "uri" -> "WolframInstitute/Puzzles/ref/$ChainCacheDuration", 
    "WorkflowDockedCell" -> ""}, "SearchTextTranslated" -> ""},
CellContext->CellGroup,
FrontEndVersion->"15.0 for Mac OS X ARM (64-bit) (May 19, 2026)",
StyleDefinitions->FrontEnd`FileName[{"Wolfram"}, "Reference.nb"],
ExpressionUUID->"3d3ce870-c68d-487a-8ac6-8855bed1ab84"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
 "TextAnnotation"->{
  Cell[15614, 419, 122, 2, 70, "ExampleText",ExpressionUUID->"39365575-2bef-4294-ab7e-308aea77c595",
   CellTags->"TextAnnotation"]}
 }
*)
(*CellTagsIndex
CellTagsIndex->{
 {"TextAnnotation", 36265, 1005}
 }
*)
(*NotebookFileOutline
Notebook[{
Cell[587, 21, 5878, 143, 70, "AnchorBarGrid",ExpressionUUID->"41813600-8a3a-4ea7-a619-82719c713dcf",
 CellID->1],
Cell[6468, 166, 107, 0, 70, "ContextNameCell",ExpressionUUID->"32877a62-0f3d-4815-bfba-5720ae9eb242"],
Cell[CellGroupData[{
Cell[6600, 170, 562, 14, 70, "ObjectNameGrid",ExpressionUUID->"7a1acd14-3b46-492e-aaa1-8d36a0e4341c"],
Cell[7165, 186, 733, 17, 70, "Usage",ExpressionUUID->"d7d78d29-7290-41ab-be53-acb2d28227e5"]
}, Open  ]],
Cell[CellGroupData[{
Cell[7935, 208, 1444, 34, 70, "NotesSection",ExpressionUUID->"c69c4b50-f1cd-4172-b41b-0d230a7c4ecc",
 CellGroupingRules->{"SectionGrouping", 50},
 CellID->1325082061],
Cell[9382, 244, 421, 12, 70, "Notes",ExpressionUUID->"e0947449-b1c1-456a-9a06-5eaca7ea2b4d"],
Cell[9806, 258, 179, 3, 70, "Notes",ExpressionUUID->"add160b1-dcc2-4138-993b-a553f03f6637"],
Cell[9988, 263, 824, 21, 70, "Notes",ExpressionUUID->"d83f28d5-734c-43ff-9f71-6be6ddeaead7"],
Cell[10815, 286, 1140, 30, 70, "Notes",ExpressionUUID->"74c3d51d-bf22-4370-8453-2e600e9e22f1"],
Cell[11958, 318, 406, 8, 70, "Notes",ExpressionUUID->"02aaeab7-c6e8-415a-be14-b469d0996a42"],
Cell[12367, 328, 243, 4, 70, "Notes",ExpressionUUID->"9e6de870-366d-49d4-a2df-19a4d0da9f0a"]
}, Closed]],
Cell[12625, 335, 80, 0, 70, "PageDelimiter",ExpressionUUID->"9a0f388e-0eca-4a99-8cee-b026793c2834"],
Cell[CellGroupData[{
Cell[12730, 339, 1402, 37, 70, "PrimaryExamplesSection",ExpressionUUID->"ca0c7e86-5343-4437-babf-e71fb69c3ce1",
 CellID->1248779837],
Cell[14135, 378, 216, 4, 70, "Input",ExpressionUUID->"619c0ab2-cbe6-4d29-92d2-2d11f1d8d3f8",
 CellID->1969679695],
Cell[CellGroupData[{
Cell[14376, 386, 1235, 31, 70, "ExampleSection",ExpressionUUID->"1a2c0912-844a-448d-9c0b-e89eb66d0be1",
 CellID->885038328],
Cell[15614, 419, 122, 2, 70, "ExampleText",ExpressionUUID->"39365575-2bef-4294-ab7e-308aea77c595",
 CellTags->"TextAnnotation"],
Cell[CellGroupData[{
Cell[15761, 425, 172, 2, 70, "Input",ExpressionUUID->"71295891-f463-412d-950e-26cc57f1ccfc"],
Cell[15936, 429, 168, 3, 70, "Output",ExpressionUUID->"7ba76229-0909-4296-bf20-36673ab96e9a"]
}, Open  ]],
Cell[CellGroupData[{
Cell[16141, 437, 224, 5, 70, "ExampleDelimiter",ExpressionUUID->"0e5cf3a8-29d1-4584-961f-54c3f5925024"],
Cell[16368, 444, 189, 3, 70, "ExampleText",ExpressionUUID->"7b0f295f-d877-4010-8f2e-0c0dd70be4e1"],
Cell[CellGroupData[{
Cell[16582, 451, 470, 11, 70, "Input",ExpressionUUID->"d7f7b3f3-39b0-4415-b466-70c16c5c5f0b"],
Cell[17055, 464, 110, 1, 70, "Output",ExpressionUUID->"e2dc790b-c2e7-4639-93f5-471c3012c372"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[17214, 471, 224, 5, 70, "ExampleDelimiter",ExpressionUUID->"330f35e0-ff27-4c36-8c27-1fc8dea570bc"],
Cell[17441, 478, 170, 3, 70, "ExampleText",ExpressionUUID->"06d65b6c-8621-445d-b3e3-83018e722fbb"],
Cell[CellGroupData[{
Cell[17636, 485, 333, 7, 70, "Input",ExpressionUUID->"038a29e2-6e40-4190-9ad8-b462d9c8a9df"],
Cell[17972, 494, 115, 1, 70, "Output",ExpressionUUID->"e3726817-99f3-476e-81ca-9f972acf815f"]
}, Open  ]]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[18148, 502, 1227, 31, 70, "ExampleSection",ExpressionUUID->"d135eaf5-cd92-4619-ad2b-38d5b19494b5",
 CellID->1293636265],
Cell[19378, 535, 132, 0, 70, "ExampleText",ExpressionUUID->"a4e15b43-8c95-416e-a830-e01b96035de1"],
Cell[CellGroupData[{
Cell[19535, 539, 517, 12, 70, "Input",ExpressionUUID->"08d53e87-c176-453d-9c9f-5c93119969a4"],
Cell[20055, 553, 126, 1, 70, "Output",ExpressionUUID->"df5eaa62-1048-47c1-96bf-5306d72174c3"]
}, Open  ]],
Cell[CellGroupData[{
Cell[20218, 559, 224, 5, 70, "ExampleDelimiter",ExpressionUUID->"e878d4bf-d706-4c24-adb9-b97d6cbf9944"],
Cell[20445, 566, 150, 2, 70, "ExampleText",ExpressionUUID->"c33b93d0-a3ef-4827-96f2-9f209f6726bb"],
Cell[CellGroupData[{
Cell[20620, 572, 566, 14, 70, "Input",ExpressionUUID->"f4d0cc4e-5fa0-477b-9437-673b1ec33fa5"],
Cell[21189, 588, 251, 5, 70, "Output",ExpressionUUID->"af53f7d4-9a86-4a3b-894b-32cab40446f8"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[21489, 599, 224, 5, 70, "ExampleDelimiter",ExpressionUUID->"3c613c69-3ec7-4ba0-baf2-51c6f1c71aa1"],
Cell[21716, 606, 359, 7, 70, "ExampleText",ExpressionUUID->"4b4e5e77-64da-4573-a6d6-580c2aa8600b"],
Cell[CellGroupData[{
Cell[22100, 617, 705, 16, 70, "Input",ExpressionUUID->"54264882-bccf-4485-afe3-e6a62e0cd773"],
Cell[22808, 635, 134, 1, 70, "Output",ExpressionUUID->"7dff06e1-c7aa-4c11-807d-d1b4ffde112e"]
}, Open  ]]
}, Open  ]]
}, Closed]],
Cell[CellGroupData[{
Cell[23003, 643, 1244, 31, 70, "ExampleSection",ExpressionUUID->"2cda0409-0df1-47a9-914f-be0a0ad69162",
 CellID->2123667759],
Cell[24250, 676, 525, 14, 70, "ExampleText",ExpressionUUID->"19db5923-db2b-4260-82a7-bc1f05674be0"],
Cell[CellGroupData[{
Cell[24800, 694, 314, 6, 70, "Input",ExpressionUUID->"a43af179-866a-40c2-b908-8bd7e2b65c99"],
Cell[25117, 702, 107, 1, 70, "Output",ExpressionUUID->"5c9825c0-e958-4a85-8217-15bad3beede8"]
}, Open  ]],
Cell[CellGroupData[{
Cell[25261, 708, 224, 5, 70, "ExampleDelimiter",ExpressionUUID->"bf0209c3-522a-4b80-af4f-bd65756c6cbe"],
Cell[25488, 715, 375, 8, 70, "ExampleText",ExpressionUUID->"4407b17f-6b77-47f1-936a-53a87ed251b2"],
Cell[CellGroupData[{
Cell[25888, 727, 366, 7, 70, "Input",ExpressionUUID->"a367e76c-0fe4-4070-a549-81d48e9007d2"],
Cell[26257, 736, 126, 1, 70, "Output",ExpressionUUID->"f048b8f3-33fa-44d8-883a-e89220b8e57d"]
}, Open  ]]
}, Open  ]]
}, Closed]],
Cell[CellGroupData[{
Cell[26444, 744, 1237, 31, 70, "ExampleSection",ExpressionUUID->"8cc440ef-e5fd-4535-ba2a-3693a1734847",
 CellID->1305812373],
Cell[27684, 777, 361, 7, 70, "ExampleText",ExpressionUUID->"993a234c-0be1-4d80-851e-602dff50c60c"],
Cell[CellGroupData[{
Cell[28070, 788, 401, 9, 70, "Input",ExpressionUUID->"10ba6853-4bf8-45e7-8a41-b6f2cc9aa3de"],
Cell[28474, 799, 218, 5, 70, "Output",ExpressionUUID->"50d26edb-ad11-4c1a-bad6-ceb4d6caa57e"]
}, Open  ]],
Cell[CellGroupData[{
Cell[28729, 809, 224, 5, 70, "ExampleDelimiter",ExpressionUUID->"7a25bb42-7f82-4943-9fa1-0b9da3dd4863"],
Cell[28956, 816, 540, 14, 70, "ExampleText",ExpressionUUID->"fe7bec79-e0b8-41d1-a817-34d330f55f6c"],
Cell[CellGroupData[{
Cell[29521, 834, 687, 17, 70, "Input",ExpressionUUID->"d72732ce-4cc7-4399-80d5-ff21fdda46ec"],
Cell[30211, 853, 110, 1, 70, "Output",ExpressionUUID->"c9f8a90d-d039-47ae-8e8f-af441c3ed50c"]
}, Open  ]]
}, Open  ]]
}, Closed]]
}, Open  ]],
Cell[30372, 860, 3230, 83, 70, "SeeAlsoSection",ExpressionUUID->"8be909a7-57ec-4efb-ae1f-47f59ef2c04e"],
Cell[33605, 945, 726, 18, 70, "MoreAboutSection",ExpressionUUID->"de38dd33-1600-4996-a318-24c29293cbda"],
Cell[34334, 965, 78, 0, 70, "FooterCell",ExpressionUUID->"ce8b99da-d98f-4004-9803-59dca96eab94"]
}
]
*)

(* End of internal cache information *)

