(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 13.1' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 1074869, 24441] NotebookOptionsPosition[ 880434, 20649] NotebookOutlinePosition[ 1022518, 23313] CellTagsIndexPosition[ 1020617, 23263] WindowTitle->FromISOTimestamp | Definition Notebook WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["FromISOTimestamp", "Title", CellTags->{"Name", "TemplateCell", "Title"}, CellID->421705929], Cell["Parse a string in ISO 8601 format to a DateObject", "Text", CellTags->{"Description", "TemplateCell"}, CellID->549920672], Cell[CellGroupData[{ Cell[TextData[{ "Definition", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Function", Cell[ BoxData[ FrameBox[ Cell[ "Define your function using the name you gave in the Title line \ above. You can add input cells and extra code to define additional input \ cases or prerequisites. All definitions, including dependencies, will be \ included in the generated resource function.\n\nThis section should be \ evaluated before creating the Examples section below.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoFunction"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Function"}, DefaultNewCellStyle->"Input", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[CellGroupData[{ Cell["Patterns", "Subsection", CellChangeTimes->{{3.7796339129227858`*^9, 3.77963391386889*^9}}, CellLabel->"In[98]:=", CellID->988763296], Cell["Shorthand for an optional pattern:", "Text", CellChangeTimes->{{3.779664618979169*^9, 3.779664630406233*^9}}, CellID->525310088], Cell[BoxData[ RowBox[{ RowBox[{"zeroOrOne", "[", "patt_", "]"}], ":=", RowBox[{"Repeated", "[", RowBox[{"patt", ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}]}], "]"}]}]], "Input", CellChangeTimes->{{3.779622462026763*^9, 3.779622474812626*^9}}, CellLabel->"In[1]:=", CellID->488821573], Cell[CellGroupData[{ Cell["Timezone", "Subsubsection", CellChangeTimes->{{3.779657105861624*^9, 3.7796571069171343`*^9}}, CellLabel->"In[2]:=", CellID->92067984], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{ "matches", " ", "a", " ", "timezone", " ", "suffix", " ", "like", " ", "\"\<+08:00\>\"", " ", "or", " ", "\"\\""}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"timeZonePattern", "=", RowBox[{"(", RowBox[{"timeZoneString", ":", RowBox[{"zeroOrOne", "[", RowBox[{"Alternatives", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"StringExpression", "[", "\[IndentingNewLine]", RowBox[{"(*", " ", "Sign", " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"zeroOrOne", "[", RowBox[{"\"\<+\>\"", "|", "\"\<-\>\""}], "]"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"Hours", " ", "offset"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"timeZoneHour", ":", RowBox[{"Repeated", "[", RowBox[{"DigitCharacter", ",", RowBox[{"{", "2", "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"zeroOrOne", "[", RowBox[{"StringExpression", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"\"\<:\>\"", "|", "\"\<\>\""}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"Minute", " ", "offset"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"timeZoneMinute", ":", RowBox[{"Repeated", "[", RowBox[{"DigitCharacter", ",", RowBox[{"{", "2", "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}], "]"}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"Zulu", " ", RowBox[{"(", "UTC", ")"}]}], " ", "*)"}], "\[IndentingNewLine]", "\"\\""}], "\[IndentingNewLine]", "]"}], "]"}]}], ")"}]}], ";"}]}]], "Input", CellChangeTimes->{{3.779625756803967*^9, 3.779625761081026*^9}, { 3.779625852628338*^9, 3.7796258635513353`*^9}, {3.779625968208901*^9, 3.7796259798112793`*^9}, {3.779627096664227*^9, 3.779627143203786*^9}, { 3.779633597215014*^9, 3.779633629039339*^9}, {3.779633764635912*^9, 3.7796337793166447`*^9}}, CellLabel->"In[1]:=", CellID->277020559] }, Open ]], Cell[CellGroupData[{ Cell["Duration", "Subsubsection", CellChangeTimes->{{3.779657113416264*^9, 3.779657114134121*^9}}, CellLabel->"In[2]:=", CellID->836551079], Cell[BoxData[ RowBox[{ RowBox[{"durationNumberPattern", "=", RowBox[{ RowBox[{"Alternatives", "[", RowBox[{ "DigitCharacter", ",", "\"\<.\>\"", ",", "\"\<,\>\"", ",", "\"\<+\>\"", ",", "\"\<-\>\""}], "]"}], ".."}]}], ";"}]], "Input", CellChangeTimes->{{3.779656856276464*^9, 3.7796568758968077`*^9}, { 3.77965695913736*^9, 3.779656959175046*^9}, {3.779657064274819*^9, 3.779657069312997*^9}}, CellLabel->"In[1]:=", CellID->320871925], Cell[BoxData[ RowBox[{ RowBox[{"isoDurationPattern", "=", RowBox[{"StringExpression", "[", "\[IndentingNewLine]", RowBox[{ "StartOfString", ",", "\[IndentingNewLine]", "\"\\"", ",", "\[IndentingNewLine]", RowBox[{"zeroOrOne", "[", RowBox[{ RowBox[{"years", ":", "durationNumberPattern"}], "~~", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"zeroOrOne", "[", RowBox[{ RowBox[{"months", ":", "durationNumberPattern"}], "~~", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"zeroOrOne", "[", RowBox[{ RowBox[{"weeks", ":", "durationNumberPattern"}], "~~", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"zeroOrOne", "[", RowBox[{ RowBox[{"days", ":", "durationNumberPattern"}], "~~", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"zeroOrOne", "[", RowBox[{"StringExpression", "[", "\[IndentingNewLine]", RowBox[{"\"\\"", ",", "\[IndentingNewLine]", RowBox[{"zeroOrOne", "[", RowBox[{ RowBox[{"hours", ":", "durationNumberPattern"}], "~~", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"zeroOrOne", "[", RowBox[{ RowBox[{"minutes", ":", "durationNumberPattern"}], "~~", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"zeroOrOne", "[", RowBox[{ RowBox[{"seconds", ":", "durationNumberPattern"}], "~~", "\"\\""}], "]"}]}], "\[IndentingNewLine]", "]"}], "]"}], ",", "\[IndentingNewLine]", "EndOfString"}], "\[IndentingNewLine]", "]"}]}], ";"}]], "Input", CellChangeTimes->{{3.779656447518766*^9, 3.779656533183402*^9}, { 3.7796565841852837`*^9, 3.779656626936984*^9}, {3.7796567259355583`*^9, 3.779656771382636*^9}, {3.779656910661948*^9, 3.779656913747828*^9}, { 3.779656956104253*^9, 3.779656974113324*^9}, {3.779657117219367*^9, 3.7796571241677217`*^9}, {3.779657491282217*^9, 3.779657497576396*^9}}, CellLabel->"In[2]:=", CellID->914604303] }, Open ]], Cell[CellGroupData[{ Cell["Timestamp", "Subsubsection", CellChangeTimes->{{3.779657109679109*^9, 3.77965711081602*^9}}, CellLabel->"In[3]:=", CellID->322814721], Cell[BoxData[ RowBox[{ RowBox[{"(*", " ", RowBox[{"matches", " ", "an", " ", "ISO", " ", "8601", " ", RowBox[{"date", "/", "time"}], " ", "string"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"isoTimestampPattern", "=", RowBox[{"Longest", "@", RowBox[{"StringExpression", "[", "\[IndentingNewLine]", RowBox[{"StartOfString", ",", "\[IndentingNewLine]", RowBox[{"(*", " ", "Date", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"zeroOrOne", "@", RowBox[{"StringExpression", "[", "\[IndentingNewLine]", RowBox[{"(*", " ", "Year", " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"year", ":", RowBox[{"Alternatives", "[", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"Standard", " ", "4"}], "-", RowBox[{"digit", " ", "year"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Repeated", "[", RowBox[{"DigitCharacter", ",", RowBox[{"{", RowBox[{"4", ",", "4"}], "}"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"Extended", " ", "year"}], ",", " ", RowBox[{"4", "-", RowBox[{ "6", " ", "digits", " ", "prefixed", " ", "with", " ", "mandatory", " ", "sign"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"StringExpression", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"\"\<+\>\"", "|", "\"\<-\>\""}], ",", "\[IndentingNewLine]", RowBox[{"Repeated", "[", RowBox[{"DigitCharacter", ",", RowBox[{"{", RowBox[{"4", ",", "6"}], "}"}]}], "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"zeroOrOne", "[", RowBox[{"StringExpression", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"zeroOrOne", "[", "\"\<-\>\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Alternatives", "[", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"Month", " ", "and", " ", "day"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"StringExpression", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"month", ":", RowBox[{"Repeated", "[", RowBox[{"DigitCharacter", ",", RowBox[{"{", "2", "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"zeroOrOne", "[", RowBox[{"StringExpression", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"zeroOrOne", "[", "\"\<-\>\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"day", ":", RowBox[{"Repeated", "[", RowBox[{"DigitCharacter", ",", RowBox[{"{", "2", "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}], "]"}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "Week", " ", "number", " ", "and", " ", "weekday", " ", "number"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"StringExpression", "[", "\[IndentingNewLine]", RowBox[{"\"\\"", ",", "\[IndentingNewLine]", RowBox[{"weekNumber", ":", RowBox[{"Repeated", "[", RowBox[{"DigitCharacter", ",", RowBox[{"{", "2", "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"zeroOrOne", "[", "\"\<-\>\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"weekDay", ":", RowBox[{"Repeated", "[", RowBox[{"DigitCharacter", ",", RowBox[{"{", RowBox[{"0", ",", "1"}], "}"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"Ordinal", " ", "day", " ", RowBox[{"(", RowBox[{ "days", " ", "since", " ", "start", " ", "of", " ", "year"}], ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"StringExpression", "[", "\[IndentingNewLine]", RowBox[{"ordinalDay", ":", RowBox[{"Repeated", "[", RowBox[{"DigitCharacter", ",", RowBox[{"{", "3", "}"}]}], "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}], "]"}]}], "\[IndentingNewLine]", "]"}]}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", "Time", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"zeroOrOne", "@", RowBox[{"StringExpression", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"zeroOrOne", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"StringExpression", "[", "\[IndentingNewLine]", RowBox[{"(*", " ", "Hour", " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"hour", ":", RowBox[{"Repeated", "[", RowBox[{"DigitCharacter", ",", RowBox[{"{", "2", "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"zeroOrOne", "[", RowBox[{"StringExpression", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"\"\<:\>\"", "|", "\"\<\>\""}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", "Minute", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"minute", ":", RowBox[{"Repeated", "[", RowBox[{"DigitCharacter", ",", RowBox[{"{", "2", "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"zeroOrOne", "[", RowBox[{"StringExpression", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"\"\<:\>\"", "|", "\"\<\>\""}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", "Second", " ", "*)"}], "\[IndentingNewLine]", RowBox[{"second", ":", RowBox[{"Repeated", "[", RowBox[{"DigitCharacter", ",", RowBox[{"{", "2", "}"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"Second", " ", "fraction"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"secondFraction", ":", RowBox[{"zeroOrOne", "[", RowBox[{"StringExpression", "[", "\[IndentingNewLine]", RowBox[{"\"\<.\>\"", ",", "\[IndentingNewLine]", RowBox[{"Repeated", "[", "DigitCharacter", "]"}]}], "\[IndentingNewLine]", "]"}], "]"}]}]}], "\[IndentingNewLine]", "]"}], "]"}]}], "\[IndentingNewLine]", "]"}], "]"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"Time", " ", "zone", " ", "suffix"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"timeZoneString", ":", RowBox[{"(", RowBox[{"timeZonePattern", "//.", RowBox[{ RowBox[{ RowBox[{"Verbatim", "[", "Pattern", "]"}], "[", RowBox[{"name_", ",", "patt_"}], "]"}], "\[RuleDelayed]", "patt"}]}], ")"}]}]}], "\[IndentingNewLine]", "]"}]}], "\[IndentingNewLine]", "]"}]}], ",", "\[IndentingNewLine]", "EndOfString"}], "\[IndentingNewLine]", "]"}]}]}], ";"}]}]], "Input", CellChangeTimes->{{3.779622331723262*^9, 3.7796224051999683`*^9}, { 3.7796224779797363`*^9, 3.779622575722053*^9}, 3.779622621415903*^9, { 3.7796229123638372`*^9, 3.779622916418055*^9}, {3.7796229589749517`*^9, 3.7796229610698147`*^9}, {3.7796229954131804`*^9, 3.779623052142103*^9}, { 3.779623090510054*^9, 3.77962315193707*^9}, {3.779623187108817*^9, 3.779623188463217*^9}, {3.779623366815817*^9, 3.779623369145363*^9}, { 3.779623425901614*^9, 3.779623519358118*^9}, {3.7796235823903027`*^9, 3.779623593516868*^9}, {3.779623919905849*^9, 3.779623954521269*^9}, { 3.7796244514047747`*^9, 3.779624467601983*^9}, {3.779624636315502*^9, 3.7796247060150757`*^9}, {3.779624749151803*^9, 3.779624769811737*^9}, { 3.779624827912199*^9, 3.779624864781172*^9}, {3.779624982422234*^9, 3.779625017202379*^9}, {3.7796256071057568`*^9, 3.779625634070503*^9}, { 3.779625707710877*^9, 3.7796257542166367`*^9}, {3.779625878842701*^9, 3.779625900354969*^9}, {3.779626507235098*^9, 3.7796265167610188`*^9}, { 3.779626629249095*^9, 3.779626629684558*^9}, {3.779627082778734*^9, 3.779627093842499*^9}, {3.779627559210853*^9, 3.779627559906753*^9}, { 3.779633498150337*^9, 3.7796335874603777`*^9}, {3.779633797202548*^9, 3.7796338169138527`*^9}, 3.77963384833317*^9, {3.779650092542139*^9, 3.779650103727891*^9}, {3.779650945679924*^9, 3.779650960968566*^9}}, CellLabel->"In[1]:=", CellID->806270639] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Supporting functions", "Subsection", 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}, CellChangeTimes->{{3.779633888029743*^9, 3.779633898358069*^9}}, CellTags->"TabNext", CellLabel->"In[11]:=", CellID->294285759], Cell[CellGroupData[{ Cell["Patterns", "Subsubsection", CellChangeTimes->{{3.779664517336931*^9, 3.779664518222041*^9}}, CellLabel->"In[1]:=", CellID->952277054], Cell[TextData[{ "This converts a pattern (e.g. ", Cell[BoxData[ RowBox[{"myValue", ":", "_"}]], "Input", CellChangeTimes->{{3.779664530193561*^9, 3.779664530205893*^9}}], ") into a delayed rule (e.g. ", Cell[BoxData[ RowBox[{ RowBox[{"myValue", ":", "_"}], "\[RuleDelayed]", RowBox[{"Rule", "[", RowBox[{"\"\\"", ",", "myValue"}], "]"}]}]], "Input", CellChangeTimes->{{3.7796645397805157`*^9, 3.77966454665035*^9}}], ")" }], "Text", CellChangeTimes->{{3.779664524126171*^9, 3.779664551569848*^9}}, CellID->159042456], Cell[BoxData[ RowBox[{ RowBox[{"patternRule", "[", "pattern_", "]"}], ":=", RowBox[{"pattern", "\[RuleDelayed]", RowBox[{"Evaluate", "@", RowBox[{"Cases", "[", RowBox[{"pattern", ",", RowBox[{ RowBox[{ RowBox[{"Verbatim", "[", "Pattern", "]"}], "[", RowBox[{"name_", ",", "___"}], "]"}], "\[RuleDelayed]", RowBox[{"(", RowBox[{ RowBox[{"Capitalize", "[", RowBox[{ RowBox[{ RowBox[{"StringSplit", "[", RowBox[{ RowBox[{"ToString", "@", "name"}], ",", "\"\<`\>\""}], "]"}], "[", RowBox[{"[", RowBox[{"-", "1"}], "]"}], "]"}], ",", " ", "\"\\""}], "]"}], "\[Rule]", "name"}], ")"}]}], ",", "All"}], "]"}]}]}]}]], "Input", CellChangeTimes->{{3.7795888705208187`*^9, 3.7795888887657967`*^9}, { 3.779633639514757*^9, 3.77963375383596*^9}, {3.77963393640702*^9, 3.779633937655077*^9}, {3.779664521661819*^9, 3.779664522957135*^9}, { 3.779791170480529*^9, 3.779791180008827*^9}, {3.779791302335031*^9, 3.779791303668707*^9}}, CellID->61008692] }, Open ]], Cell[CellGroupData[{ Cell["Intermediate form", "Subsubsection", CellChangeTimes->{{3.7796644872786493`*^9, 3.7796644947544203`*^9}}, CellLabel->"In[2]:=", CellID->830564704], Cell["\<\ This breaks up a timestamp string into its components and returns them in an \ association.\ \>", "Text", CellChangeTimes->{{3.779664499715158*^9, 3.779664506555189*^9}}, CellID->378615357], Cell[BoxData[ RowBox[{ RowBox[{"isoIntermediateForm", "[", "str_", "]"}], ":=", RowBox[{"DeleteCases", "[", RowBox[{ RowBox[{"SelectFirst", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"Association", "/@", RowBox[{"StringCases", "[", RowBox[{"str", ",", RowBox[{"patternRule", "@", "isoTimestampPattern"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"Values", "/*", "StringJoin", "/*", "StringLength", "/*", RowBox[{"GreaterThan", "[", "0", "]"}]}], ",", "\[IndentingNewLine]", "$Failed"}], "\[IndentingNewLine]", "]"}], ",", "\"\<\>\""}], "]"}]}]], "Input", CellChangeTimes->{{3.779625041051054*^9, 3.7796250440736647`*^9}, { 3.779625092020595*^9, 3.779625097094252*^9}, 3.7796251606039953`*^9, { 3.779625258447062*^9, 3.779625259335229*^9}, 3.779625411978525*^9, { 3.7796334018436832`*^9, 3.779633472452299*^9}, 3.7796338388656397`*^9, { 3.779650060541342*^9, 3.779650063029695*^9}, {3.779650147532649*^9, 3.77965014964402*^9}, {3.7796644971218967`*^9, 3.77966449854879*^9}}, CellLabel->"In[1]:=", CellID->523303485] }, Open ]], Cell[CellGroupData[{ Cell["Timezone suffix", "Subsubsection", CellChangeTimes->{{3.7796644246255827`*^9, 3.779664426427408*^9}}, CellLabel->"In[2]:=", CellID->716612324], Cell["\<\ This parses an ISO timezone suffix (e.g. \[OpenCurlyDoubleQuote]+08:00\ \[CloseCurlyDoubleQuote] or \[OpenCurlyDoubleQuote]Z\[CloseCurlyDoubleQuote]) \ to a UTC offset in hours.\ \>", "Text", CellChangeTimes->{{3.779664431434442*^9, 3.7796644351353807`*^9}}, CellID->687967790], Cell[BoxData[ RowBox[{ RowBox[{"parseTimeZone", "[", RowBox[{"str_", ",", "defaultTZ_"}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"preparse", "=", RowBox[{"Switch", "[", "\[IndentingNewLine]", RowBox[{ "str", ",", "\[IndentingNewLine]", "\"\<\>\"", ",", "defaultTZ", ",", "\[IndentingNewLine]", "\"\\"", ",", "0", ",", "\[IndentingNewLine]", "_", ",", RowBox[{"Association", "/@", RowBox[{"StringCases", "[", RowBox[{"str", ",", RowBox[{"patternRule", "@", RowBox[{"Longest", "@", "timeZonePattern"}]}], ",", "1"}], "]"}]}]}], "\[IndentingNewLine]", "]"}]}], ",", "\[IndentingNewLine]", "sign", ",", "\[IndentingNewLine]", "offsetAbs"}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{"NumberQ", "@", "preparse"}], ",", RowBox[{"Return", "@", "preparse"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "@", "preparse"}], "\[LessEqual]", "0"}], ",", RowBox[{"Return", "@", "$Failed"}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"preparse", "=", RowBox[{"preparse", "[", RowBox[{"[", "1", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"!", RowBox[{"StringQ", "@", RowBox[{"preparse", "[", "\"\\"", "]"}]}]}], "||", RowBox[{ RowBox[{"StringLength", "[", RowBox[{"preparse", "[", "\"\\"", "]"}], "]"}], "=!=", "2"}]}], ",", "\[IndentingNewLine]", RowBox[{"Return", "@", "$Failed"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"sign", "=", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"StringTake", "[", RowBox[{ RowBox[{"preparse", "[", "\"\\"", "]"}], ",", "1"}], "]"}], "===", "\"\<-\>\""}], ",", RowBox[{"-", "1"}], ",", RowBox[{"+", "1"}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"offsetAbs", "=", RowBox[{"ToExpression", "[", RowBox[{"preparse", "[", "\"\\"", "]"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"If", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"KeyExistsQ", "[", RowBox[{"preparse", ",", "\"\\""}], "]"}], "&&", RowBox[{ RowBox[{"StringLength", "[", RowBox[{"preparse", "[", "\"\\"", "]"}], "]"}], "===", "2"}]}], ",", "\[IndentingNewLine]", RowBox[{"offsetAbs", "+=", FractionBox[ RowBox[{"ToExpression", "[", RowBox[{"preparse", "[", "\"\\"", "]"}], "]"}], "60"]}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"Return", "@", RowBox[{"N", "[", RowBox[{"offsetAbs", "*", "sign"}], "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input", CellChangeTimes->{{3.7796257246361837`*^9, 3.77962573349673*^9}, { 3.779625774570498*^9, 3.779625819788608*^9}, {3.7796259100206413`*^9, 3.7796259475799437`*^9}, {3.779626048519155*^9, 3.779626074138831*^9}, { 3.779626130592008*^9, 3.779626222409368*^9}, {3.779626641107965*^9, 3.7796270695023403`*^9}, {3.7796271273556547`*^9, 3.779627128019579*^9}, { 3.7796271595195503`*^9, 3.7796271904918118`*^9}, {3.779627320838314*^9, 3.779627363251627*^9}, {3.779628008948584*^9, 3.779628009918044*^9}, { 3.779628097854795*^9, 3.77962810139643*^9}, {3.779628300254417*^9, 3.7796283489248447`*^9}, {3.779628379467133*^9, 3.779628381540716*^9}, { 3.7796296742029533`*^9, 3.779629677688945*^9}, {3.779630063902668*^9, 3.779630069174295*^9}, {3.77963331661967*^9, 3.779633355870536*^9}, { 3.779649722654203*^9, 3.779649759413486*^9}, {3.779664429106606*^9, 3.779664430554824*^9}}, CellLabel->"In[1]:=", CellID->554667320] }, Open ]], Cell[CellGroupData[{ Cell["Duration", "Subsubsection", CellChangeTimes->{{3.779664418433757*^9, 3.7796644192646303`*^9}}, CellLabel->"In[2]:=", CellID->836551080], Cell["\<\ This parses an ISO duration string in time-unit designator format to a mixed \ Quantity.\ \>", "Text", CellChangeTimes->{{3.779664407589964*^9, 3.7796644542165327`*^9}}, CellID->880418064], Cell[BoxData[ RowBox[{ RowBox[{"parseISODuration", "[", "str_String", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"parseFailure", "=", RowBox[{"Failure", "[", RowBox[{"\"\\"", ",", RowBox[{"<|", RowBox[{ RowBox[{"\"\\"", "\[RuleDelayed]", RowBox[{"FromISOTimestamp", "::", "invdur"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", "str", "}"}]}], ",", RowBox[{"\"\\"", "\[Rule]", "str"}]}], "|>"}]}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"matches", "=", RowBox[{"Association", "/@", RowBox[{"StringCases", "[", RowBox[{"StringCases", "[", RowBox[{ RowBox[{"str", "//", RowBox[{"StringReplace", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"FromCharacterCode", "[", "8722", "]"}], "\[Rule]", "\"\<-\>\""}], ",", RowBox[{"(*", " ", RowBox[{"U", "+", RowBox[{ "2212", " ", "minus", " ", "sign", " ", "to", " ", "hyphen"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\"\<,\>\"", "\[Rule]", "\"\<.\>\""}]}], RowBox[{"(*", " ", RowBox[{ "comma", " ", "decimal", " ", "separator", " ", "to", " ", "period"}], " ", "*)"}], "\[IndentingNewLine]", "}"}], "]"}]}], ",", RowBox[{"patternRule", "[", "isoDurationPattern", "]"}]}], "]"}], "]"}]}]}], ",", "\[IndentingNewLine]", "match"}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "@", "matches"}], "===", "0"}], ",", RowBox[{"Return", "@", "parseFailure"}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"match", "=", RowBox[{"ToExpression", "/@", RowBox[{"DeleteCases", "[", RowBox[{ RowBox[{"matches", "[", RowBox[{"[", "1", "]"}], "]"}], ",", "\"\<\>\""}], "]"}]}]}], ";", "\[IndentingNewLine]", RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Length", "@", "match"}], "===", "0"}], ",", RowBox[{"Return", "@", "parseFailure"}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"Quantity", "[", RowBox[{ RowBox[{"MixedMagnitude", "[", RowBox[{"Values", "@", "match"}], "]"}], ",", RowBox[{"MixedUnit", "[", RowBox[{"Keys", "@", "match"}], "]"}]}], "]"}], "/.", RowBox[{"{", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"if", " ", RowBox[{"there", "'"}], "s", " ", "only", " ", "a", " ", "single", " ", "unit"}], ",", " ", RowBox[{ "simplify", " ", "the", " ", "quantity", " ", "to", " ", "remove", " ", "the", " ", "unnecessary", " ", RowBox[{"MixedMagnitude", "/", "MixedUnit"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Quantity", "[", RowBox[{ RowBox[{"MixedMagnitude", "[", RowBox[{"{", "magnitude_", "}"}], "]"}], ",", RowBox[{"MixedUnit", "[", RowBox[{"{", "unit_", "}"}], "]"}]}], "]"}], "\[RuleDelayed]", RowBox[{"Quantity", "[", RowBox[{"magnitude", ",", "unit"}], "]"}]}], "\[IndentingNewLine]", "}"}]}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input", CellChangeTimes->{{3.779657037490061*^9, 3.779657045292639*^9}, { 3.779657079682054*^9, 3.779657082644191*^9}, {3.779657130175067*^9, 3.779657226338166*^9}, 3.77965730902347*^9, {3.779657352112978*^9, 3.7796574375245647`*^9}, {3.779657750493911*^9, 3.77965775391932*^9}, { 3.779664343638204*^9, 3.779664378633562*^9}, 3.779664415370101*^9, { 3.779667467793528*^9, 3.779667507475171*^9}, {3.779668989175859*^9, 3.779668991886764*^9}}, CellLabel->"In[1]:=", CellID->44165364] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Main function", "Subsection", CellChangeTimes->{{3.77963394177499*^9, 3.779633946465662*^9}}, CellLabel->"In[2]:=", CellID->99087902], Cell[CellGroupData[{ Cell["Options", "Subsubsection", CellChangeTimes->{{3.7796339512141657`*^9, 3.779633951777979*^9}}, CellLabel->"In[1]:=", CellID->721339644], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"Options", "[", "FromISOTimestamp", "]"}], "=", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"CalendarType", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", RowBox[{"DateFormat", "\[Rule]", "Automatic"}], ",", "\[IndentingNewLine]", RowBox[{"TimeZone", "\[RuleDelayed]", "$TimeZone"}]}], "\[IndentingNewLine]", "}"}]}], ";"}]], "Input", CellChangeTimes->{{3.77963001139784*^9, 3.779630026576194*^9}, 3.779631507224049*^9, {3.779653018529711*^9, 3.779653024870905*^9}}, CellLabel->"In[1]:=", CellID->113203256] }, Open ]], Cell[CellGroupData[{ Cell["Messages", "Subsubsection", CellChangeTimes->{{3.779633956418235*^9, 3.779633958052897*^9}}, CellLabel->"In[2]:=", CellID->232530928], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"FromISOTimestamp", "::", "invstr"}], "=", "\"\\""}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"FromISOTimestamp", "::", "invdur"}], "=", "\"\\""}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"FromISOTimestamp", "::", "invtz"}], "=", "\"\\""}], ";"}]}], "Input", CellChangeTimes->{{3.779627875100316*^9, 3.7796278991376953`*^9}, { 3.77963008253366*^9, 3.7796300974374733`*^9}, {3.779630154001392*^9, 3.779630196660418*^9}, {3.779632380048326*^9, 3.779632390283868*^9}, { 3.779632460857966*^9, 3.779632530778262*^9}, {3.779632659022336*^9, 3.779632671451024*^9}, {3.779657714413805*^9, 3.779657729379169*^9}}, CellLabel->"In[1]:=", CellID->86841919] }, Open ]], Cell[CellGroupData[{ Cell["Main definition", "Subsubsection", CellChangeTimes->{{3.7796339659733953`*^9, 3.7796339742643414`*^9}, { 3.7796340164403877`*^9, 3.779634029442588*^9}}, CellLabel->"In[4]:=", CellID->42521496], Cell[BoxData[ RowBox[{ RowBox[{"FromISOTimestamp", "[", RowBox[{"str_String", ",", RowBox[{"granularity", ":", RowBox[{"(", RowBox[{"_", "?", RowBox[{"(", RowBox[{"Not", "@*", "OptionQ"}], ")"}]}], ")"}], ":", "Automatic"}], ",", RowBox[{"OptionsPattern", "[", "]"}]}], "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "\[IndentingNewLine]", RowBox[{ "intermediate", ",", "\[IndentingNewLine]", "yearJan4", ",", "\[IndentingNewLine]", RowBox[{"numberOfDaysInYear", "=", RowBox[{"(", RowBox[{ RowBox[{"DayCount", "[", RowBox[{ RowBox[{"DateObject", "[", RowBox[{"{", RowBox[{"#", ",", "1", ",", "1"}], "}"}], "]"}], ",", RowBox[{"DateObject", "[", RowBox[{"{", RowBox[{"#", ",", "12", ",", "32"}], "}"}], "]"}]}], "]"}], "&"}], ")"}]}], ",", "\[IndentingNewLine]", "lookupOrder", ",", "\[IndentingNewLine]", "dateSpec", ",", "\[IndentingNewLine]", "dateObject", ",", "\[IndentingNewLine]", RowBox[{"dateObjectGranularity", "=", "granularity"}]}], "\[IndentingNewLine]", "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "if", " ", "the", " ", "string", " ", "starts", " ", "with", " ", "\"\\""}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"StringStartsQ", "[", RowBox[{"str", ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"then", " ", RowBox[{"it", "'"}], "s", " ", "a", " ", "duration"}], ";", " ", RowBox[{"parse", " ", "it", " ", "with", " ", "parseISODuration"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Return", "@", RowBox[{"parseISODuration", "@", "str"}]}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "parse", " ", "the", " ", "string", " ", "to", " ", "an", " ", "intermediate", " ", "form", " ", "with", " ", "isoIntermediateForm"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"intermediate", "=", RowBox[{"isoIntermediateForm", "[", RowBox[{"str", "//", RowBox[{"StringReplace", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"FromCharacterCode", "[", "8722", "]"}], "\[Rule]", "\"\<-\>\""}], ",", RowBox[{"(*", " ", RowBox[{"U", "+", RowBox[{ "2212", " ", "minus", " ", "sign", " ", "to", " ", "hyphen"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"\"\<,\>\"", "\[Rule]", "\"\<.\>\""}]}], RowBox[{"(*", " ", RowBox[{ "comma", " ", "decimal", " ", "separator", " ", "to", " ", "period"}], " ", "*)"}], "\[IndentingNewLine]", "}"}], "]"}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"If", "[", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "if", " ", "the", " ", "string", " ", "parsing", " ", "stage", " ", "failed"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FailureQ", "@", "intermediate"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"return", " ", "a", " ", "Failure"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Return", "@", RowBox[{"Failure", "[", RowBox[{"\"\\"", ",", RowBox[{"<|", RowBox[{ RowBox[{"\"\\"", "\[RuleDelayed]", RowBox[{"FromISOTimestamp", "::", "invstr"}]}], ",", RowBox[{"\"\\"", "\[Rule]", RowBox[{"{", "str", "}"}]}], ",", RowBox[{"\"\\"", "\[Rule]", "str"}]}], "|>"}]}], "]"}]}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "convert", " ", "all", " ", "component", " ", "strings", " ", "except", " ", "TimeZoneString", " ", "to", " ", "numbers"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "ToExpression", " ", "is", " ", "safe", " ", "to", " ", "use", " ", "here", " ", "because", " ", RowBox[{"we", "'"}], "ve", " ", "very", " ", "carefully", " ", "filtered", " ", "the", " ", "contents", " ", "of", " ", "the", " ", "strings"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"intermediate", "=", RowBox[{"intermediate", "//", RowBox[{"MapAt", "[", RowBox[{"ToExpression", ",", RowBox[{ RowBox[{"Key", "/*", "List"}], "/@", RowBox[{"Complement", "[", RowBox[{ RowBox[{"Keys", "@", "intermediate"}], ",", RowBox[{"{", "\"\\"", "}"}]}], "]"}]}]}], "]"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"If", "[", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"if", " ", RowBox[{"there", "'"}], "s", " ", "a", " ", "year", " ", "component", " ", "and", " ", RowBox[{"it", "'"}], "s", " ", "0", " ", "or", " ", "less"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"KeyExistsQ", "[", RowBox[{"intermediate", ",", "\"\\""}], "]"}], "&&", RowBox[{ RowBox[{"intermediate", "[", "\"\\"", "]"}], "\[LessEqual]", "0"}]}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "then", " ", "subtract", " ", "1", " ", "from", " ", "it", " ", RowBox[{"(", RowBox[{ RowBox[{ "because", " ", "in", " ", "ISO", " ", "8601", " ", "format"}], ",", " ", RowBox[{ "year", " ", "0000", " ", "means", " ", "1", " ", "BCE"}]}], ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"intermediate", "[", "\"\\"", "]"}], "-=", "1"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"intermediate", "[", "\"\\"", "]"}], "=", RowBox[{"If", "[", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"if", " ", RowBox[{"there", "'"}], "s", " ", "a", " ", "time", " ", "zone", " ", "suffix", " ", "string", " ", RowBox[{"(", RowBox[{ RowBox[{"e", ".", "g", ".", " ", "\"\<+08:00\>\""}], " ", "or", " ", "\"\\""}], ")"}], " ", "specified"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"KeyExistsQ", "[", RowBox[{"intermediate", ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "then", " ", "parse", " ", "it", " ", "to", " ", "a", " ", "UTC", " ", "offset", " ", "number"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"parseTimeZone", "[", RowBox[{ RowBox[{"intermediate", "[", "\"\\"", "]"}], ",", RowBox[{"OptionValue", "[", "TimeZone", "]"}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "else", " ", "use", " ", "the", " ", "value", " ", "of", " ", "the", " ", "TimeZone", " ", "option"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"OptionValue", "[", "TimeZone", "]"}]}], "\[IndentingNewLine]", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"If", "[", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "if", " ", "the", " ", "parsing", " ", "of", " ", "the", " ", "time", " ", "zone", " ", "suffix", " ", "string", " ", "failed"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"FailureQ", "@", RowBox[{"intermediate", "[", "\"\\"", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "then", " ", "issue", " ", "a", " ", "message", " ", "and", " ", "fallback", " ", "to", " ", "the", " ", "value", " ", "of", " ", "the", " ", "TimeZone", " ", "option"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(", "\[IndentingNewLine]", RowBox[{ RowBox[{"Message", "[", RowBox[{ RowBox[{"FromISOTimestamp", "::", "invtz"}], ",", RowBox[{"intermediate", "[", "\"\\"", "]"}], ",", RowBox[{"OptionValue", "[", "TimeZone", "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"intermediate", "[", "\"\\"", "]"}], "=", RowBox[{"OptionValue", "[", "TimeZone", "]"}]}]}], "\[IndentingNewLine]", ")"}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"If", "[", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "if", " ", "the", " ", "second", " ", "is", " ", "fractional"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"KeyExistsQ", "[", RowBox[{"intermediate", ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "then", " ", "add", " ", "the", " ", "fractional", " ", "and", " ", "integer", " ", "parts"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"intermediate", "[", "\"\\"", "]"}], "+=", RowBox[{"intermediate", "[", "\"\\"", "]"}]}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"If", "[", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"if", " ", RowBox[{"there", "'"}], "s", " ", "an", " ", "ISO", " ", "week", " ", "number", " ", "specified"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"KeyExistsQ", "[", RowBox[{"intermediate", ",", "\"\\""}], "]"}], ",", RowBox[{"(", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "then", " ", "convert", " ", "it", " ", "into", " ", "an", " ", "ordinal", " ", "day", " ", "number"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"formula", " ", "from", " ", RowBox[{"https", ":"}]}], "//", RowBox[{ RowBox[{ RowBox[{ RowBox[{"en", ".", "wikipedia", ".", "org"}], "/", "wiki"}], "/", "ISO_week"}], "_date"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"yearJan4", "=", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"intermediate", "[", "\"\\"", "]"}], ",", "1", ",", "4"}], "}"}], ",", RowBox[{"TimeZone", "\[Rule]", RowBox[{"intermediate", "[", "\"\\"", "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"intermediate", "[", "\"\\"", "]"}], "=", RowBox[{"Lookup", "[", RowBox[{"intermediate", ",", "\"\\"", ",", "1"}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{ RowBox[{"intermediate", "[", "\"\\"", "]"}], "=", RowBox[{ RowBox[{ RowBox[{"intermediate", "[", "\"\\"", "]"}], "*", "7"}], "+", RowBox[{"intermediate", "[", "\"\\"", "]"}], "-", RowBox[{"(", RowBox[{ RowBox[{"DateValue", "[", RowBox[{"yearJan4", ",", "\"\\""}], "]"}], "+", "3"}], ")"}]}]}], ";"}], "\[IndentingNewLine]", ")"}]}], "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "this", " ", "is", " ", "the", " ", "order", " ", "in", " ", "which", " ", "date", " ", "components", " ", "will", " ", "be", " ", "supplied", " ", "to", " ", RowBox[{"DateObject", "[", RowBox[{"{", "...", "}"}], "]"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{ "strings", " ", "in", " ", "here", " ", "get", " ", "replaced", " ", "with", " ", "the", " ", "corresponding", " ", "value", " ", "from", " ", "the", " ", "`intermediate`", " ", "association"}], ";", " ", RowBox[{"other", " ", "values", " ", RowBox[{"(", RowBox[{"e", ".", "g", ".", " ", "numbers"}], ")"}], " ", "go", " ", "into", " ", "DateObject", " ", "verbatim"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"lookupOrder", "=", RowBox[{"Which", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"KeyExistsQ", "[", RowBox[{"intermediate", ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ "\"\\"", ",", "1", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", "True", ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}], "\[IndentingNewLine]", "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{ "replace", " ", "strings", " ", "with", " ", "the", " ", "corresponding", " ", "value", " ", "from", " ", "`intermediate`"}], ",", " ", RowBox[{"using", " ", "Null", " ", "if", " ", "the", " ", "key", " ", RowBox[{"doesn", "'"}], "t", " ", "exist"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"dateSpec", "=", RowBox[{"lookupOrder", "/.", RowBox[{"key_String", "\[RuleDelayed]", RowBox[{"Lookup", "[", RowBox[{"intermediate", ",", "key", ",", "Null"}], "]"}]}]}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "trim", " ", "Nulls", " ", "from", " ", "the", " ", "end", " ", "of", " ", "the", " ", "list", " ", RowBox[{"(", RowBox[{ "so", " ", "that", " ", "DateObject", " ", "can", " ", "autodetect", " ", "the", " ", "granularity"}], " "}]}], "*)"}], "\[IndentingNewLine]", RowBox[{"dateSpec", "=", RowBox[{"Drop", "[", RowBox[{"dateSpec", ",", RowBox[{"-", RowBox[{"LengthWhile", "[", RowBox[{ RowBox[{"Reverse", "@", "dateSpec"}], ",", RowBox[{ RowBox[{"#", "===", "Null"}], "&"}]}], "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "replace", " ", "any", " ", "remaining", " ", "Nulls", " ", "with", " ", "0", " ", RowBox[{"(", RowBox[{ RowBox[{"i", ".", "e", ".", " ", "if"}], " ", "year", " ", "and", " ", "hour", " ", "are", " ", "specified", " ", "but", " ", "not", " ", "month", " ", "or", " ", "day"}], " ", ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"dateSpec", "=", RowBox[{"dateSpec", "/.", RowBox[{"Null", "\[Rule]", "0"}]}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"If", "[", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"if", " ", RowBox[{"there", "'"}], "s", " ", "a", " ", "second", " ", "specified", " ", "and", " ", "no", " ", "fraction"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"And", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"KeyExistsQ", "[", RowBox[{"intermediate", ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"KeyFreeQ", "[", RowBox[{"intermediate", ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"dateObjectGranularity", "===", "Automatic"}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "then", " ", "default", " ", "to", " ", "Second", " ", "granularity", " ", RowBox[{"(", RowBox[{ RowBox[{"instead", " ", "of", " ", "DateObject", " ", "default"}], ",", " ", "Instant"}], ")"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"dateObjectGranularity", "=", "\"\\""}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"If", "[", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{"if", " ", RowBox[{"there", "'"}], "s", " ", "no", " ", "year", " ", "specified"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"KeyFreeQ", "[", RowBox[{"intermediate", ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{ RowBox[{"then", " ", RowBox[{"it", "'"}], "s", " ", "a", " ", "time"}], "-", RowBox[{"only", " ", "string"}]}], ",", " ", RowBox[{ "so", " ", "parse", " ", "it", " ", "as", " ", "a", " ", "TimeObject", " ", "and", " ", "return", " ", "that"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Return", "@", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"Drop", "[", RowBox[{"dateSpec", ",", "3"}], "]"}], ",", "dateObjectGranularity", ",", RowBox[{"TimeZone", "\[Rule]", RowBox[{"intermediate", "[", "\"\\"", "]"}]}]}], "]"}]}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "create", " ", "a", " ", "DateObject", " ", "using", " ", "automatic", " ", "granularity"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"dateObject", "=", RowBox[{"DateObject", "[", RowBox[{"dateSpec", ",", RowBox[{"TimeZone", "\[Rule]", RowBox[{"intermediate", "[", "\"\\"", "]"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"If", "[", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{ "if", " ", "the", " ", "date", " ", "is", " ", "specified", " ", "in", " ", "week"}], "-", RowBox[{"only", " ", "format", " ", RowBox[{"(", RowBox[{"e", ".", "g", ".", " ", "\"\<2013W06\>\""}], ")"}]}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"And", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"KeyExistsQ", "[", RowBox[{"intermediate", ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"KeyFreeQ", "[", RowBox[{"intermediate", ",", "\"\\""}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"dateObjectGranularity", "===", "Automatic"}], ",", "\[IndentingNewLine]", RowBox[{ RowBox[{"dateObject", "[", "\"\\"", "]"}], "===", "\"\\""}]}], "\[IndentingNewLine]", "]"}], ",", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ "then", " ", "change", " ", "granularity", " ", "to", " ", "Week"}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"dateObjectGranularity", "=", "\"\\""}], ";"}]}], "\[IndentingNewLine]", "]"}], ";", "\[IndentingNewLine]", "\[IndentingNewLine]", RowBox[{"(*", " ", RowBox[{ RowBox[{"apply", " ", "the", " ", "user"}], "-", RowBox[{"specified", " ", "granularity", " ", RowBox[{"(", RowBox[{"or", " ", "Automatic"}], ")"}], " ", "to", " ", "the", " ", "DateObject"}]}], " ", "*)"}], "\[IndentingNewLine]", RowBox[{"Return", "@", RowBox[{"DateObject", "[", "\[IndentingNewLine]", RowBox[{ "dateObject", ",", "\[IndentingNewLine]", "dateObjectGranularity", ",", "\[IndentingNewLine]", RowBox[{"CalendarType", "\[Rule]", RowBox[{"OptionValue", "[", "CalendarType", "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"DateFormat", "\[Rule]", RowBox[{"OptionValue", "[", "DateFormat", "]"}]}]}], "\[IndentingNewLine]", "]"}]}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input", CellChangeTimes->CompressedData[" 1:eJwd0ltIkwEABeB1kVFK3u3XXG2ruQtuOLCl5cRi3tYitmQ2ESuHaJPuTWus TGI2XGBMURszCLvQjUxDpUlb5lArpTJIhCzC2ZpONKZoxuw//8Phezhvh8Mq PaMqW0+j0SRkYHzAXhbOn91PKFsq4EKkTw8v5BsMsL42MzSCVG0v3wI3FjK4 8EC/kA+P+BqFcPNPZQbM6g4SkaR1rEo29BLVUlhS/Pow/NggKYBBC1sLJ9dt qoSiOS+lQjx+DnKijJfghDSpDeo0q5SHilofQava9xTyiJQuOGTKGYRXpLfG 4deuxO/wT03wN1TGhvmgYI8+AK+1VVMKhtUrsLAkZw0yxZrdUaQ/nIv5sDda boSfQqZroON4rgWepXdS3mtXtcDU2hA7XO4Z64DveJEDsMdtHoX9spkxSGsg fsEpZrgP3onpmqN6/8sgbCKaIqJJzw9ME3A+08yFWSePpcDREno2rKHzKE2n zCooWuunNMeqi2GEM7MUVsnSyyEznaODxrVQMwwrVlDaZeKbMHuqwQYnHXl3 Ibdu5AEcWujrhF5/TA9lxTcn7NZa38DHp11u6Pp7OTyG9ParfQnwC8NNefR5 fNI20mTFDT5M021NgeMiTyrcyYrbCwVVuXnQEi+UJJJq68vTIY8msEHPQ6Ud Ll9lz8O0jgJKputfMoN0dtmRAwcvvnfBItOTt3CpbZa1HbtUt7Nh70qCAcpt ehPMGJ54Bu/LZ15AmeWgfwdpn1KxCOM+n+AwSVdZS1y4RDitUL/B0gybA40f dpFerwsZgQaPxsCh/swywv+WcGxf "], CellLabel->"In[1]:=", CellID->309071988] }, Open ]], Cell[CellGroupData[{ Cell["Listable syntax", "Subsubsection", CellChangeTimes->{{3.7796340359047403`*^9, 3.779634038372396*^9}}, CellLabel->"In[2]:=", CellID->934232748], Cell[BoxData[ RowBox[{ RowBox[{"FromISOTimestamp", "[", RowBox[{ RowBox[{"strs", ":", RowBox[{"{", "__String", "}"}]}], ",", RowBox[{"granularity_", ":", "Automatic"}], ",", RowBox[{"opts", ":", RowBox[{"OptionsPattern", "[", "]"}]}]}], "]"}], ":=", RowBox[{ RowBox[{ RowBox[{"FromISOTimestamp", "[", RowBox[{"#", ",", "granularity", ",", "opts"}], "]"}], "&"}], "/@", "strs"}]}]], "Input", CellChangeTimes->{{3.779634041322875*^9, 3.779634103982325*^9}, { 3.779653966603195*^9, 3.779653968701961*^9}}, CellLabel->"In[1]:=", CellID->824937528] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Documentation", "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Documentation"}, CellTags->{"Documentation", "TemplateSection"}, CellID->429741307], Cell[CellGroupData[{ Cell[TextData[{ "Usage", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Usage", Cell[ BoxData[ FrameBox[ Cell[ TextData[{ "Document input usage cases by first typing an input structure, \ then pressing ", Cell[ BoxData[ StyleBox[ DynamicBox[ ToBoxes[ If[$OperatingSystem === "MacOSX", "\[ReturnKey]", "\[EnterKey]"], StandardForm], SingleEvaluation -> True, Evaluator -> "System"], ShowStringCharacters -> False]]], " to add a brief explanation of the function\[CloseCurlyQuote]s \ behavior for that structure. Pressing ", Cell[ BoxData[ StyleBox[ DynamicBox[ ToBoxes[ If[$OperatingSystem === "MacOSX", "\[ReturnKey]", "\[EnterKey]"], StandardForm], SingleEvaluation -> True, Evaluator -> "System"], ShowStringCharacters -> False]]], " repeatedly will create new cases as needed. Every input usage \ case defined above should be demonstrated explicitly here.\n\nSee existing \ documentation pages for examples."}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoUsage"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Usage"}, DefaultNewCellStyle->{"UsageInputs", FontFamily -> "Source Sans Pro"}, CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", StyleBox["str", "TI"], "]"}]], "UsageInputs", FontFamily->"Source Sans Pro", CellID->367521524], Cell[TextData[{ "parse ISO date/time string ", Cell[BoxData[ StyleBox["str", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " to a ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["DateObject", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/DateObject", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], "." }], "UsageDescription", CellID->861308003] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", RowBox[{ StyleBox["str", "TI"], ",", StyleBox["gran", "TI"]}], "]"}]], "UsageInputs", FontFamily->"Source Sans Pro", CellID->745180296], Cell[TextData[{ "gives the ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["DateObject", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/DateObject", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " of granularity ", Cell[BoxData[ StyleBox["gran", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " corresponding to the ISO date/time string ", Cell[BoxData[ StyleBox["str", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], "." }], "UsageDescription", CellID->79172700] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", RowBox[{ RowBox[{"{", RowBox[{ "\"\<\!\(\*SubscriptBox[StyleBox[\"str\", \"TI\"], StyleBox[\"1\", \ \"TR\"]]\)\>\"", ",", "\"\<\!\(\*SubscriptBox[StyleBox[\"str\", \"TI\"], StyleBox[\"2\", \ \"TR\"]]\)\>\"", ",", "\[Ellipsis]"}], "}"}], ",", "\[Ellipsis]"}], "]"}]], "UsageInputs", FontFamily->"Source Sans Pro", CellID->185002431], Cell[TextData[{ "parses the ISO date/time strings ", Cell[BoxData[ SubscriptBox[ StyleBox["str", "TI"], StyleBox["i", "TI"]]], "InlineFormula", FontFamily->"Source Sans Pro"], ", returning a list." }], "UsageDescription", CellID->226878048] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Details & Options", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Notes", Cell[ BoxData[ FrameBox[ Cell[ "Give a detailed explanation of how the function is used and \ configured (e.g. acceptable input types, result formats, options \ specifications, background information). This section may include multiple \ cells, bullet lists, tables, hyperlinks and additional styles/structures as \ needed.\n\nAdd any other information that may be relevant, such as when the \ function was first discovered or how and why it is used within a given field. \ Include all relevant background or contextual information related to the \ function, its development, and its usage.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoNotes"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Notes"}, DefaultNewCellStyle->"Notes", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236], Cell[TextData[{ Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], " parses the most common formats described in ISO 8601." }], "Notes", CellTags->"TabNext", CellID->395719005], Cell[TextData[{ Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], " accepts the same options as ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["DateObject", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/DateObject", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], "." }], "Notes", CellID->604326395], Cell[TextData[{ "By default, ", Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], " will return a ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["DateObject", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/DateObject", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " with the granularity implied by the input." }], "Notes", CellID->789621090], Cell[TextData[{ "If ", Cell[BoxData[ StyleBox["str", "TI"]], "InlineFormula", FontFamily->"Source Sans Pro"], " describes a dateless time value, ", Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], " will return a ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["TimeObject", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/TimeObject", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], "." }], "Notes", CellID->841502435], Cell[TextData[{ "If a timezone is not specified in the input string, ", Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], " will use the value of the ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["TimeZone", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/TimeZone", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " option if set, falling back to ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["$TimeZone", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/$TimeZone", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " otherwise." }], "Notes", CellID->58549768], Cell[TextData[{ Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], " supports dates specified in the calendar, ordinal, and weekday formats \ described in ISO 8601." }], "Notes", CellID->80130221], Cell[TextData[{ Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], " does not support the format with truncated (\"implied\") leading \ components described in some editions of ISO 8601." }], "Notes", CellID->234368236], Cell[TextData[{ "ISO 8601-formatted durations (strings starting with the letter \"P\") in \ \"time-unit designator\" format are parsed to ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Quantity", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Quantity", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " objects." }], "Notes", CellID->626608952] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Examples", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Examples", Cell[ BoxData[ FrameBox[ Cell[ TextData[{ "Demonstrate the function\[CloseCurlyQuote]s usage, starting with \ the most basic use case and describing each example in a preceding text cell.\ \n\nWithin a group, individual examples can be delimited by inserting page \ breaks between them (either using ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"[Right-click]\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False], StyleBox[ "\" \[FilledRightTriangle] \"", FontFamily -> "Source Sans Pro", FontSize -> 13.86, FontColor -> GrayLevel[0.5], StripOnInput -> False], StyleBox[ "\"Insert Page Break\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], " between cells or through the menu using ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"Insert\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False], StyleBox[ "\" \[FilledRightTriangle] \"", FontFamily -> "Source Sans Pro", FontSize -> 13.86, FontColor -> GrayLevel[0.5], StripOnInput -> False], StyleBox[ "\"Page Break\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontColor -> GrayLevel[0.286275], FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], ").\n\nExamples should be grouped into Subsection and \ Subsubsection cells similarly to existing documentation pages. Here are some \ typical Subsection names and the types of examples they normally contain:\n \ ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Basic Examples: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "most basic function usage\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Scope: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "input and display conventions, standard computational attributes \ (e.g. threading over lists)\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Options: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "available options and parameters for the function\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Applications: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "standard industry or academic applications\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Properties and Relations: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "how the function relates to other functions\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Possible Issues: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "limitations or unexpected behavior a user might experience\n ", Cell[ BoxData[ StyleBox[ TemplateBox[{ StyleBox[ "\"\[FilledSmallSquare] \"", FontColor -> RGBColor[0.8, 0.043, 0.008], StripOnInput -> False], StyleBox[ "\"Neat Examples: \"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontSize -> 14, StripOnInput -> False]}, "RowDefault"], ShowStringCharacters -> False]]], "particularly interesting, unconventional, or otherwise unique \ usage"}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoExamples"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Examples"}, CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[CellGroupData[{ Cell["Basic Examples", "Subsection", TaggingRules->{}, CellID->904125756], Cell["Parse a timestamp string in ISO 8601 format:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7796536964155073`*^9, 3.779653702647415*^9}, { 3.779653769662531*^9, 3.779653771547264*^9}}, CellID->92725275], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", "\"\<2007-04-05T12:30:23-02:00\>\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779653704466799*^9, 3.7796537164067163`*^9}}, CellLabel->"In[1]:=", CellID->129751837], Cell[BoxData[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Thu 5 Apr 2007 12:30:23\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "2.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ "2007", ",", "4", ",", "5", ",", "12", ",", "30", ",", "23"}], "}"}], ",", "\"Second\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "2.`"}]}], "]"}]}, "DateObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.779647908855476*^9, {3.779653707346526*^9, 3.779653716693879*^9}, 3.7796576590063457`*^9}, CellLabel->"Out[1]=", CellID->785766534] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107562], Cell["Parse a timestamp with manually-specified granularity:", "Text", TaggingRules->{}, CellChangeTimes->{{3.779653766455089*^9, 3.779653780432919*^9}}, CellID->119140869], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\<2007-04-05T12:30:23-02:00\>\"", ",", "\"\\""}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779653783870186*^9, 3.779653791354125*^9}}, CellLabel->"In[1]:=", CellID->757418145], Cell[BoxData[ TemplateBox[{ RowBox[{ StyleBox[ "\"Month: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Apr 2007\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"2007", ",", "4"}], "}"}], ",", "\"Month\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "2.`"}]}], "]"}]}, "DateObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{{3.779653785425767*^9, 3.779653791735085*^9}}, CellLabel->"Out[1]=", CellID->34520394] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107563], Cell["Parse a timestamp describing a dateless time:", "Text", TaggingRules->{}, CellChangeTimes->{{3.779653766455089*^9, 3.779653780432919*^9}, { 3.779653823924913*^9, 3.779653828916903*^9}}, CellID->924755776], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", "\"\<20:27:51Z\>\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779653783870186*^9, 3.779653791354125*^9}, { 3.7796538348907127`*^9, 3.77965385267933*^9}}, CellLabel->"In[1]:=", CellID->81695737], Cell[BoxData[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"20:27:51\"", StyleBox["\"GMT\"", FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"20", ",", "27", ",", "51"}], "}"}], ",", "\"Second\"", ",", "0.`"}], "]"}]}, "TimeObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{{3.779653785425767*^9, 3.779653791735085*^9}, { 3.779653845155357*^9, 3.7796538530020733`*^9}}, CellLabel->"Out[1]=", CellID->306655507] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Scope", "Subsection", TaggingRules->{}, CellID->204653245], Cell["Parse a timestamp in local time:", "Text", TaggingRules->{}, CellChangeTimes->{{3.779654001530809*^9, 3.779654019061996*^9}}, CellID->775762905], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", "\"\<20:27:51\>\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{3.779654025432666*^9}, CellLabel->"In[1]:=", CellID->971903604], Cell[BoxData[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"20:27:51\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"20", ",", "27", ",", "51"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.7796540258610277`*^9}, CellLabel->"Out[1]=", CellID->250458852] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107564], Cell["\<\ Parse a timestamp in ordinal date format (specifying the number of days since \ the start of the year):\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.779654032094338*^9, 3.7796540516352243`*^9}, { 3.779654144277801*^9, 3.7796541751920357`*^9}}, CellID->141029357], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", "\"\<1988-175\>\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779654070735784*^9, 3.779654096778266*^9}, { 3.779654133243824*^9, 3.779654136743082*^9}}, CellLabel->"In[1]:=", CellID->265819557], Cell[BoxData[ TemplateBox[{ RowBox[{ StyleBox["\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Thu 23 Jun 1988\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1988", ",", "6", ",", "23"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{{3.779654087207946*^9, 3.779654096986293*^9}, { 3.7796541342576714`*^9, 3.779654136982173*^9}}, CellLabel->"Out[1]=", CellID->735507481] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107565], Cell["Parse a timestamp describing a week:", "Text", TaggingRules->{}, CellChangeTimes->{{3.779654179879389*^9, 3.779654187048224*^9}}, CellID->485764392], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", "\"\<2026-W33\>\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779654199669503*^9, 3.77965420738758*^9}}, CellLabel->"In[1]:=", CellID->230668771], Cell[BoxData[ TemplateBox[{ RowBox[{ StyleBox[ "\"Week beginning: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Mon 10 Aug 2026\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"2026", ",", "8", ",", "10"}], "}"}], ",", "\"Week\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.779654207758068*^9}, CellLabel->"Out[1]=", CellID->584743996] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107566], Cell["Parse a list of timestamp strings:", "Text", TaggingRules->{}, CellChangeTimes->{{3.779653800866981*^9, 3.779653805452567*^9}}, CellID->146732873], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ "\"\<2007-04-05T12:30:23-02:00\>\"", ",", "\[IndentingNewLine]", "\"\<1985-W15-5\>\"", ",", "\[IndentingNewLine]", "\"\<20:27Z\>\""}], "\[IndentingNewLine]", "}"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779653806812996*^9, 3.779653811908494*^9}, { 3.7796538684315367`*^9, 3.779653888114111*^9}, {3.779653976132516*^9, 3.779653985348776*^9}}, CellLabel->"In[1]:=", CellID->939752010], Cell[BoxData[ RowBox[{"{", RowBox[{ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Thu 5 Apr 2007 12:30:23\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "2.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"2007", ",", "4", ",", "5", ",", "12", ",", "30", ",", "23"}], "}"}], ",", "\"Second\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "2.`"}]}], "]"}]}, "DateObject", Editable->False], ",", TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Fri 12 Apr 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False], ",", TemplateBox[{ RowBox[{ StyleBox[ "\"Minute: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"20:27\"", StyleBox["\"GMT\"", FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"20", ",", "27"}], "}"}], ",", "\"Minute\"", ",", "0.`"}], "]"}]}, "TimeObject", Editable->False]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{ 3.779647908988551*^9, 3.779653888636168*^9, {3.779653955348613*^9, 3.779653985705976*^9}}, CellLabel->"Out[1]=", CellID->493344408] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107567], Cell["Parse a string describing a duration of time:", "Text", TaggingRules->{}, CellChangeTimes->{{3.779657663334301*^9, 3.779657668753131*^9}, { 3.779657761027547*^9, 3.7796577665845747`*^9}, {3.779658326979148*^9, 3.779658331463966*^9}}, CellID->388072085], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", "\"\\"", "]"}]], "Input",\ TaggingRules->{}, CellChangeTimes->{{3.779657775353619*^9, 3.7796577779720078`*^9}}, CellLabel->"In[1]:=", CellID->448308195], Cell[BoxData[ TemplateBox[{"3", "6", "4", "12", "30", "5", RowBox[{"\[ThinSpace]", "\"yr\""}], RowBox[{"\[ThinSpace]", "\"mo\""}], RowBox[{"\[ThinSpace]", "\"days\""}], RowBox[{"\[ThinSpace]", "\"h\""}], RowBox[{"\[ThinSpace]", "\"min\""}], RowBox[{"\[ThinSpace]", "\"s\""}], "years,months,days,hours,minutes,seconds", RowBox[{"{", RowBox[{ "\"Years\"", ",", "\"Months\"", ",", "\"Days\"", ",", "\"Hours\"", ",", "\"Minutes\"", ",", "\"Seconds\""}], "}"}]}, "QuantityMixedUnit6"]], "Output", TaggingRules->{}, CellChangeTimes->{3.7796577783959923`*^9, 3.7796583329331713`*^9}, CellLabel->"Out[1]=", CellID->26420496] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Options", "Subsection", TaggingRules->{}, CellID->890561554], Cell[CellGroupData[{ Cell["CalendarType", "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.779655184726699*^9, 3.779655186377762*^9}}, CellID->101105612], Cell["Specify a nondefault calendar system to use in the output:", "Text", TaggingRules->{}, CellChangeTimes->{{3.77965518789191*^9, 3.779655210825272*^9}}, CellID->224671337], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\<2001-04-18\>\"", ",", RowBox[{"CalendarType", "\[Rule]", "\"\\""}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779655215412614*^9, 3.779655227597879*^9}}, CellLabel->"In[1]:=", CellID->756459172], Cell[BoxData[ TemplateBox[{ RowBox[{ StyleBox["\"Day: \"", FontWeight -> Plain, FontColor -> GrayLevel[0.5]], "\"Yom Revi'i 25 Nisan 5761\"", StyleBox[ RowBox[{"\[ThinSpace]", RowBox[{"(", "\[InvisibleSpace]", RowBox[{"\"Jewish\"", "\"calendar\""}], "\[InvisibleSpace]", ")"}]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"5761", ",", "1", ",", "25"}], "}"}], ",", "\"Day\"", ",", "\"Jewish\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.7796552281710577`*^9}, CellLabel->"Out[1]=", CellID->625821338] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["DateFormat", "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.779655242406048*^9, 3.77965524634511*^9}}, CellID->329971317], Cell["Specify a custom format to display the output in:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7796552479052563`*^9, 3.779655265829669*^9}, { 3.779655975890086*^9, 3.779655977843191*^9}}, CellID->105282035], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\<2007-04-05T12:30:23-02:00\>\"", ",", RowBox[{"DateFormat", "\[Rule]", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\<:\>\"", ",", "\"\\"", ",", "\"\<:\>\"", ",", "\"\\"", ",", "\"\< (on \>\"", ",", "\"\\"", ",", "\"\< \>\"", ",", "\"\\"", ",", "\"\<, \>\"", ",", "\"\\"", ",", "\"\<)\>\""}], "}"}]}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779655284689454*^9, 3.779655352125193*^9}, { 3.779655386371664*^9, 3.7796553867416887`*^9}}, CellLabel->"In[1]:=", CellID->178031885], Cell[BoxData[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"12:30:23 (on April 05, 2007)\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "2.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ "2007", ",", "4", ",", "5", ",", "12", ",", "30", ",", "23"}], "}"}], ",", "\"Second\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "2.`"}], ",", RowBox[{"{", RowBox[{ "\"Hour\"", ",", "\":\"", ",", "\"Minute\"", ",", "\":\"", ",", "\"Second\"", ",", "\" (on \"", ",", "\"MonthName\"", ",", "\" \"", ",", "\"Day\"", ",", "\", \"", ",", "\"Year\"", ",", "\")\""}], "}"}]}], "]"}]}, "DateObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{{3.779655299475191*^9, 3.77965534393963*^9}, 3.779655387091997*^9, {3.779655972634749*^9, 3.779655979206449*^9}}, CellLabel->"Out[1]=", CellID->433708637] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["TimeZone", "Subsubsection", TaggingRules->{}, CellChangeTimes->{{3.7796547987931557`*^9, 3.779654800971855*^9}}, CellID->263234609], Cell[TextData[{ "By default, timestamps that do not specify a timezone are parsed using the \ value of ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["$TimeZone", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/$TimeZone", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.779654803795999*^9, 3.779654846092758*^9}, 3.779794787187831*^9}, CellID->381562508], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<20:27:51\>\"", "]"}], ",", "$TimeZone"}], "}"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7796548479489603`*^9, 3.779654863411202*^9}}, CellLabel->"In[1]:=", CellID->680644650], Cell[BoxData[ RowBox[{"{", RowBox[{ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"20:27:51\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"20", ",", "27", ",", "51"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable->False], ",", RowBox[{"-", "4.`"}]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7796548563337183`*^9, 3.779654863732263*^9}}, CellLabel->"Out[1]=", CellID->544548066] }, Open ]], Cell["Specify a default timezone to use:", "Text", TaggingRules->{}, CellChangeTimes->{{3.779654865171352*^9, 3.7796548924107637`*^9}}, CellID->555714473], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\<20:27:51\>\"", ",", RowBox[{"TimeZone", "\[Rule]", TemplateBox[{"\"America/New_York\"", RowBox[{"Entity", "[", RowBox[{"\"TimeZone\"", ",", "\"America/New_York\""}], "]"}], "\"Entity[\\\"TimeZone\\\", \\\"America/New_York\\\"]\"", "\"time zone\""}, "Entity"]}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779654896367404*^9, 3.779654926314517*^9}}, CellLabel->"In[2]:=", CellID->440994916], Cell[BoxData[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"20:27:51\"", StyleBox["\"EDT\"", FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"20", ",", "27", ",", "51"}], "}"}], ",", "\"Second\"", ",", "\"America/New_York\""}], "]"}]}, "TimeObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.779654955187847*^9, 3.779655084500596*^9}, CellLabel->"Out[2]=", CellID->716439872] }, Open ]], Cell["Parse to a value explicitly lacking a timezone:", "Text", TaggingRules->{}, CellChangeTimes->{{3.779655103545025*^9, 3.779655123876338*^9}}, CellID->85948537], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\<20:27:51\>\"", ",", RowBox[{"TimeZone", "\[Rule]", "None"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779655129212698*^9, 3.7796551299435*^9}}, CellLabel->"In[3]:=", CellID->823235481], Cell[BoxData[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"20:27:51\""}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"20", ",", "27", ",", "51"}], "}"}], ",", "\"Second\"", ",", "None"}], "]"}]}, "TimeObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.779655130129977*^9}, CellLabel->"Out[3]=", CellID->613409647] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell["Properties and Relations", "Subsection", TaggingRules->{}, CellID->232113220], Cell[TextData[{ Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["DateObject", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/DateObject", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " supports limited parsing of ISO 8601-formatted strings:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.779660884919903*^9, 3.7796609424260597`*^9}, { 3.779663752298421*^9, 3.779663752702284*^9}, 3.7797947988238487`*^9}, CellID->878328425], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"DateObject", "[", "\"\<1988-06-23T12:23:00\>\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{3.7796609463054733`*^9}, CellLabel->"In[1]:=", CellID->951098241], Cell[BoxData[ TemplateBox[{ RowBox[{"\"Thu 23 Jun 1988 12:23:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ "1988", ",", "6", ",", "23", ",", "12", ",", "23", ",", "0"}], "}"}], ",", "\"Instant\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.779660946728509*^9}, CellLabel->"Out[1]=", CellID->620552795] }, Open ]], Cell[TextData[{ Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["DateObject", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/DateObject", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " does not, however, currently support parsing ISO 8601-formatted strings \ that include a timezone value:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.779660950265334*^9, 3.7796610246211433`*^9}, { 3.7796637540607147`*^9, 3.779663754509273*^9}, 3.779794814368854*^9}, CellID->46778517], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"DateObject", "[", "\"\<1988-06-23T12:23:00+02:30\>\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779660923581718*^9, 3.77966093619215*^9}}, CellLabel->"In[2]:=", CellID->336495374], Cell[BoxData[ TemplateBox[{ "DateObject", "str", "\"String \\!\\(\\*RowBox[{\\\"\\\\\\\"1988-06-23T12:23:00+02:30\\\\\\\"\\\ \"}]\\) cannot be interpreted as a date.\"", 2, 191, 55, 28220221285963523654, "Local"}, "MessageTemplate"]], "Message", "MSG", TaggingRules->{}, CellChangeTimes->{3.7796609365987787`*^9, 3.779661025932917*^9}, CellLabel->"During evaluation of In[2]:=", CellID->658309062], Cell[BoxData[ RowBox[{"DateObject", "[", "\<\"1988-06-23T12:23:00+02:30\"\>", "]"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.779660928095275*^9, 3.7796609367300453`*^9}, 3.7796610259519997`*^9}, CellLabel->"Out[2]=", CellID->579763129] }, Open ]], Cell[TextData[{ Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], " supports parsing strings with timezone values:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.779661028392685*^9, 3.7796610417915077`*^9}, 3.779664154319036*^9}, CellID->288349366], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", "\"\<1988-06-23T12:23:00+02:30\>\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779661045511389*^9, 3.7796610478190613`*^9}}, CellLabel->"In[3]:=", CellID->573257212], Cell[BoxData[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Thu 23 Jun 1988 12:23:00\"", StyleBox[ RowBox[{"\"GMT+\"", "\[InvisibleSpace]", StyleBox["2.5`", NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ "1988", ",", "6", ",", "23", ",", "12", ",", "23", ",", "0"}], "}"}], ",", "\"Second\"", ",", "\"Gregorian\"", ",", "2.5`"}], "]"}]}, "DateObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.77966104802394*^9}, CellLabel->"Out[3]=", CellID->891263363] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107568], Cell[TextData[{ Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], " is compatible with the ", Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], ", ", Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], ", ", Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], " and ", Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], " format specifications of ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["DateString", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/DateString", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.779658359830051*^9, 3.7796584522785053`*^9}, { 3.859285642030608*^9, 3.859285643479706*^9}}, CellID->328973766], Cell[BoxData[ RowBox[{ RowBox[{"date", "=", TemplateBox[{ RowBox[{ StyleBox[ "\"Minute: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Thu 23 Jun 1988 12:23\"", StyleBox["\"PDT\"", FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1988", ",", "6", ",", "23", ",", "12", ",", "23"}], "}"}], ",", "\"Minute\"", ",", "\"Gregorian\"", ",", "\"America/Los_Angeles\""}], "]"}]}, "DateObject", Editable->False]}], ";"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779658455418503*^9, 3.77965845683648*^9}, { 3.7796585101526213`*^9, 3.779658534973575*^9}, 3.779658587883707*^9}, CellLabel->"In[1]:=", CellID->445024040], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"DateString", "[", RowBox[{"date", ",", "#"}], "]"}], "&"}], "/@", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}]], "Input",\ TaggingRules->{}, CellChangeTimes->{{3.779658535773159*^9, 3.779658561594674*^9}}, CellLabel->"In[2]:=", CellID->570745602], Cell[BoxData[ RowBox[{"{", RowBox[{"\<\"1988-06-23\"\>", ",", "\<\"1988-W25-4\"\>", ",", "\<\"1988-175\"\>", ",", "\<\"1988-06-23T12:23:00\"\>"}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.779658545495709*^9, 3.779658561986844*^9}, 3.7796585922480383`*^9}, CellLabel->"Out[2]=", CellID->347389610] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", "%", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779658594640849*^9, 3.779658597511593*^9}}, CellLabel->"In[3]:=", CellID->323820404], Cell[BoxData[ RowBox[{"{", RowBox[{ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Thu 23 Jun 1988\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1988", ",", "6", ",", "23"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False], ",", TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Thu 23 Jun 1988\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1988", ",", "6", ",", "23"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False], ",", TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Thu 23 Jun 1988\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1988", ",", "6", ",", "23"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False], ",", TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Thu 23 Jun 1988 12:23:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1988", ",", "6", ",", "23", ",", "12", ",", "23", ",", "0"}], "}"}], ",", "\"Second\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{3.779658597835806*^9}, CellLabel->"Out[3]=", CellID->352089372] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Possible Issues", "Subsection", TaggingRules->{}, CellID->158766396], Cell[TextData[{ "By default, ", Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], " parses ISO 8601-formatted strings containing an integer seconds component \ with ", Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], " granularity, while ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["DateObject", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/DateObject", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " always parses such strings with ", Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], " granularity:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.77966107896889*^9, 3.779661259404711*^9}, 3.779662236135254*^9, {3.779662622086608*^9, 3.779662623613758*^9}, { 3.7796637561360893`*^9, 3.779663756487275*^9}}, CellID->999456285], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Through", "[", RowBox[{ RowBox[{"{", RowBox[{"FromISOTimestamp", ",", "DateObject"}], "}"}], "[", "\"\<1988-06-23T12:23:00\>\"", "]"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779661157633211*^9, 3.779661157924971*^9}, { 3.779661263018734*^9, 3.779661281462892*^9}}, CellLabel->"In[1]:=", CellID->772613760], Cell[BoxData[ RowBox[{"{", RowBox[{ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Thu 23 Jun 1988 12:23:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1988", ",", "6", ",", "23", ",", "12", ",", "23", ",", "0"}], "}"}], ",", "\"Second\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False], ",", TemplateBox[{ RowBox[{"\"Thu 23 Jun 1988 12:23:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1988", ",", "6", ",", "23", ",", "12", ",", "23", ",", "0"}], "}"}], ",", "\"Instant\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{3.7796611481425858`*^9, 3.779661281830806*^9}, CellLabel->"Out[1]=", CellID->318030657] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"#", "[", "\"\\"", "]"}], "&"}], "/@", "%"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779661284039015*^9, 3.7796612887269573`*^9}}, CellLabel->"In[2]:=", CellID->646536777], Cell[BoxData[ RowBox[{"{", RowBox[{"\<\"Second\"\>", ",", "\<\"Instant\"\>"}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{3.779661289024115*^9}, CellLabel->"Out[2]=", CellID->227807468] }, Open ]], Cell[TextData[{ "Force ", Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], " to use ", Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], " granularity:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.779661299349042*^9, 3.7796613115861473`*^9}, { 3.779662214236022*^9, 3.779662224140347*^9}}, CellID->269965045], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\<1988-06-23T12:23:00\>\"", ",", "\"\\""}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779661314715621*^9, 3.7796613179976587`*^9}}, CellLabel->"In[3]:=", CellID->279949213], Cell[BoxData[ TemplateBox[{ RowBox[{"\"Thu 23 Jun 1988 12:23:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ "1988", ",", "6", ",", "23", ",", "12", ",", "23", ",", "0"}], "}"}], ",", "\"Instant\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.779661318235476*^9}, CellLabel->"Out[3]=", CellID->9297189] }, Open ]], Cell[TextData[{ Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], " parses strings containing a fractional seconds component with ", Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], " granularity:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.779661326647458*^9, 3.7796613550726757`*^9}, { 3.779662211855588*^9, 3.779662219912053*^9}}, CellID->120666753], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", "\"\<1988-06-23T12:23:00.123\>\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779661356574705*^9, 3.779661361471055*^9}}, CellLabel->"In[4]:=", CellID->170724445], Cell[BoxData[ TemplateBox[{ RowBox[{"\"Thu 23 Jun 1988 12:23:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ "1988", ",", "6", ",", "23", ",", "12", ",", "23", ",", "0.1230001449584961`"}], "}"}], ",", "\"Instant\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7796613582722273`*^9, 3.7796613617119837`*^9}, 3.7796636002577677`*^9}, CellLabel->"Out[4]=", CellID->407305322] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"%", "[", "\"\\"", "]"}], ",", RowBox[{"%", "[", "\"\\"", "]"}]}], "}"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779661363964336*^9, 3.779661368289662*^9}, { 3.77966359256355*^9, 3.779663598110785*^9}}, CellLabel->"In[5]:=", CellID->791299555], Cell[BoxData[ RowBox[{"{", RowBox[{"123", ",", "\<\"Instant\"\>"}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{3.779661368630291*^9, 3.779663601676696*^9}, CellLabel->"Out[5]=", CellID->430976454] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107569], Cell[TextData[{ "By default, ", Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], " treats times with unspecified timezone as being in local (", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["$TimeZone", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/$TimeZone", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], ") time, while ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["TimeObject", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/TimeObject", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " represents them as explicitly lacking a timezone:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.7796622030526*^9, 3.779662208236067*^9}, { 3.779662241951378*^9, 3.779662367076343*^9}, 3.7796636412824373`*^9}, CellID->937105909], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Through", "[", RowBox[{ RowBox[{"{", RowBox[{"FromISOTimestamp", ",", "TimeObject"}], "}"}], "[", "\"\<10:33:00\>\"", "]"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.77966238846248*^9, 3.779662394611394*^9}, { 3.779662507411845*^9, 3.7796625081831713`*^9}}, CellLabel->"In[1]:=", CellID->715450618], Cell[BoxData[ RowBox[{"{", RowBox[{ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"10:33:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"10", ",", "33", ",", "0"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable->False], ",", TemplateBox[{ RowBox[{"\"10:33:00\""}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"10", ",", "33", ",", "0.`"}], "}"}], ",", "\"Instant\"", ",", "None"}], "]"}]}, "TimeObject", Editable->False]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.779662389150145*^9, 3.779662415261709*^9}, 3.779662509736121*^9}, CellLabel->"Out[1]=", CellID->6256932] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"#", "[", "\"\\"", "]"}], "&"}], "/@", "%"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.77966239840788*^9, 3.77966240571233*^9}}, CellLabel->"In[2]:=", CellID->547014475], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"-", "4.`"}], ",", "None"}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{3.779662416986239*^9}, CellLabel->"Out[2]=", CellID->744632348] }, Open ]], Cell[TextData[{ "Set the option ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["TimeZone", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/TimeZone", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " \[RightArrow] ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["None", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/None", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " on ", Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], " to output explicitly timezone-less values:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.779662428347292*^9, 3.77966248584278*^9}, { 3.779663627242271*^9, 3.779663631975705*^9}, 3.859285656504876*^9}, CellID->151286447], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\<10:33:00\>\"", ",", RowBox[{"TimeZone", "\[Rule]", "None"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7796624899776583`*^9, 3.77966251211516*^9}}, CellLabel->"In[3]:=", CellID->320157594], Cell[BoxData[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"10:33:00\""}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"10", ",", "33", ",", "0"}], "}"}], ",", "\"Second\"", ",", "None"}], "]"}]}, "TimeObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{{3.779662496833633*^9, 3.7796625125053053`*^9}, 3.779662545889628*^9}, CellLabel->"Out[3]=", CellID->878355614] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"%", "[", "\"\\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.77966254048512*^9, 3.779662543019196*^9}}, CellLabel->"In[4]:=", CellID->746086069], Cell[BoxData["None"], "Output", TaggingRules->{}, CellChangeTimes->{{3.779662543323656*^9, 3.7796625471438227`*^9}}, CellLabel->"Out[4]=", CellID->871637840] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107570], Cell[TextData[{ "By default, ", Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], " parses time strings using the granularity implied by the format of the \ string, while ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["TimeObject", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/TimeObject", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " always uses ", Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], " granularity:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.7796625635251417`*^9, 3.7796626642445602`*^9}, 3.779663455676968*^9, {3.779663648625452*^9, 3.7796636511747093`*^9}}, CellID->442867201], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"times", "=", RowBox[{"{", RowBox[{ "\"\<12:34\>\"", ",", "\"\<12:34:56\>\"", ",", "\"\<12:34:56.789\>\""}], "}"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"Dataset", "@", RowBox[{"AssociationMap", "[", RowBox[{ RowBox[{"Function", "[", RowBox[{"f", ",", RowBox[{"AssociationMap", "[", RowBox[{ RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Labeled", "[", RowBox[{"#", ",", RowBox[{"#", "[", "\"\\"", "]"}]}], "]"}], "&"}], ")"}], "[", RowBox[{"f", "[", "#", "]"}], "]"}], "&"}], ",", "times"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"FromISOTimestamp", ",", "TimeObject"}], "}"}]}], "]"}]}]}], "Input", TaggingRules->{}, CellChangeTimes->{{3.779663183553402*^9, 3.779663312351714*^9}, { 3.779663343106119*^9, 3.7796633792162046`*^9}, 3.779663414114887*^9, { 3.779663463932755*^9, 3.779663467692*^9}, {3.7796636649025917`*^9, 3.7796636996199636`*^9}}, CellLabel->"In[1]:=", CellID->386769787], Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzsvd9TW1mW58u9cx9u3Kf7L9xnIni+LzxQb9NMNBPd001nBREdancxkYRd TaYd0clQE2mrgnSoyOwWzrFFufnRTg02ZSKhSE2FqDBKO2UnkjFY/LBKBmRZ qCylLNkCBGlVJY70bOn82uentn6BpPP9hDLD6Oyzzz7naK21195rr/3//cM/ /VXv/9nS0nL+/yb/+yvLP3d8+KFl4K//X/LH3/z8/Pv/9ec/+8f/+PMLP/uv P/vw//+H/0C+/H/+j5aWG/9XS0v+3+8AAAAAAAAAADQLWwAAAAAAAAAAAAAA AAAAAACAuiQLADAEkgJAfQLZBADQQCcAkwMXDwB2ICkA1CeQTQAADXQCMDlw 8QBgB5ICQH0C2QQA0EAnAJMDFw8AdiApANQnkE0AAA10AjA5cPEAYAeSAkB9 AtkEANBAJwCTAxcPAHYgKQDUJ5BNAAANdAIwOXDxAGAHkgJAfQLZBADQQCcA kwMXDwB2ICkA1CeQTQAADXQCMDlw8QBgB5ICQH0C2QQA0EAnAJMDFw8AdiAp ANQnkE0AAA10AjA5cPEAYAeSAkB9AtkEANBAJwCTAxcPAHYgKQDUJ5BNAAAN dAIwOXDxAGAHkgJAfQLZBADQQCcAkwMXDwB2ICkA1CeQTQAADXQCMDlw8QBg B5ICQH0C2QQA0EAnAJMDFw8AdiApANQnkE0AAA10AjA5cPEAYAeSAkB9AtkE ANBAJwCTAxcPAHYgKQDUJ5BNAAANdAIwOXDxAGCnDEnZS+fZMy6TjG+HNldW Vvx5Atu7yUoamSedjGxvBgoVrqwEQpHddKU1AlDXQDZrx146HgltBgpshrbj RZ4ZAHUBdELtOGmdkI6HAv4HhHv3HvhXijzzvTh5P9zD3NxugIdZO+DiAcBO yZKyF7jUm+fGiqZG2ttcvH158EKvinOXHA+2yzEc237XlUsaFfb2XhhbCBTV wnH/Tb74pdsV2y0ATg7IpjHpzdtal5YYvLmiPms3sOi4PKh8AmMaJQGoN6AT jDl5nZAM3NS6joLLAZlXFr9384rmM/dH1N5b2j/nOKf1MEt/PM0AXDwA2ClR UpL3bnAWg5iMuFaB+A1N7S4wt1nq+FP8hkq70Qze8BucvLe9IJ194aZmiwGo TyCbxhTtXF1QdtL2HgiPSFnyBlw80ABAJxhz8johuXLD+IrcffslfzUyRj/z cxcuXKAf2bmFEP3Md29qt467l3smDD6AiwcAO0ySsrd988qnn16+RGsiHZOR vFlQX+cuXZlbfLC5Hdnd3fYv3pQGyM6NRUprIF9h74XLN12LgdB2JLId8C86 pLZceKBnCZIrMu144SZm8UADAdkscnmhOzd45cZtFTdv3nD5ZTe0QvWWzl1y LPo3I5HIZmBl4abj5r3t0q8PwEkDnVDk8ieuE/Yi/ps3bqqvdfvm7bnbDqFu ycWLLArzd+c+vRfin0U6vnnzsvCIBqUb998QX8WFm/cC8XQ6ubu9ePNysdfa zMDFA4AdJklJ+tUjczq6Jb14Y2xxU3Vo94Ggqga1A0Z02Xtwc2zOr1a28duX jFuyXQhu4Bt+rlyTAcBpAdk0RuzO3QwUn2tIh+bE5zO2GCr9agCcPtAJxtSV TtgLufj7GRRnJJPCczi3qHSet68IpXl/MOkX3sKFxYhsvi7k+lQ4cmO36u2u b+DiAcAOm6Qk/Qsul2thYWHxtmPQUFHrkZ4TNLwrpNK9e9u3HQ7HGPlvbps5 8mDztkEISnJOGOj69IYQhwEXDzQUkE3jq4vdOYb73Vv4lO8/feqCfwcaFeiE xtEJUhDs7U3xVpLCFOngivK57grTe7yLl1zh7+WC456qcjHaU39WtEmBiwcA O6VKyp6wnLlEk5G8LWg2v4aCXxFHq/ysbpio4s4tqBT9gzG+vgtjD4htgYsH GhHIpvHVSxix370ntGjMbIPeoJmATmgUnbD7YIxv5mUX1ZSk6DsPjj2QP4hd wSW8wj0haV3hlQfq+gM3jVdZNi1w8QBgp1RJKWWUjCIthtlfUg1e0UeLhYXs EZLbgXtXBC1/TjXAJcUwcCm50oJFgIsHGgrIpvHVxfu9dHNxpZB93L8SCG3v qpOdUyX9kZB/7ubYlStXPv30imPs5tzCgwj0AmgQoBMaRCdsixkzXXKXdveB uECv99ylsQch3r8M3OYnMs9duadooWbil5Wb5c3PNjxw8QBg52RMxj2HELJw eUEjsiPpFw4bjQqmN6XIeY4rt/0K+xP3C+mtzjl4zSpaBLh4oKGAbBpfXT97 3rkrtx/QxcUgMb3yN5BuBTQC0AkNoRNEv/XclUX1g7mnyOF54fKVT8W1jzfE JXrSvVy6rX552wv8JW4GzNWvgYsHADsnYDK2F8VhK40gjQLp3ch2nsiuQWi/ OjuxY04Wh06lXL4khZfAxQONCWTT+OpF0pV/KsVHBRSZxy8MXrp8aVC+HdhN kw2Gg0YEOqEBdEI6IKwsvHBPMwZ0b1O5CZ/APfqCUkhq7wXHArXf+d5uyO8Y 5B8eXDwAgB61NhlxYckw4cpCZUPlye1Fl2tu7vaNsSuSIh68yStRKeXyhUXa MAl7v/YO3i51jx8AThHIZtGL3lu8F9gMRXZ348lkPL4bCjy4cfmC+qbE7tyg Yy5Ed5WSISkrOZbpgboHOqHoRU9dJ4ghlIWlheoWroh7HozNLbpuSg+n4LOd mwtIb0qKYuUqHBy8dGlQkS4VgZoAAD1qajLiK7cl1W6452nJ7G2L+4deLqTD kobvPnVtbgZWeAIr90SbdXkxEFjxByLw9EAjANksDzHM7MIYf19id04jCYM0 5D7InDsCgNMBOqE8Tk4nxB9cMDpXSrcydk8MyUyH/C5qTpE+cc9/W+blqYGL BwDQo3YmI3JPCpm4dOMBc3JlVtLiJqeFxcj6QfhKxjRyhAFQd0A2y0TsZQ3e 5vpKAaPUBOk5/uClErcAA+CkgU4ok5PSCaIvOXgzoD4qxaYOqsJQ90JCYtHe S3ObsiPx0D3X7bExx5UrVxz5dDCLod2I61PuQoPYNAEAoEeNTMamS0wo1fvp nEY+qMoRd40p1WTcQE8ONAKQzTJJC7FeQrpyMd5Jq/60MIAOFw/UO9AJZXIi OoF4cEKrL2tu2iA9hJsaDzmyyDfpstzF07odYZneOYdyB/VmBy4eAOzUwGTI EkY5Fmq10XBc2HdmUEgpnNZgL01tfxPZ2yNf1ag9AFQXyGZ5iM/h3JXFPfk3 WhkCd4UQMgRqgnoHOqE8TkQnpF1CfOdlnb3Uqd3MNZbpxf3CI9JyAGkeCHOF ehdqYuDiAcBOqZKSFrZS1c7jtLc7d5lbNJxXVC7GXE/pADnp3Dny36eKsa+9 7cVPr9zc3FVHy2+KEeqXjIe8xAxd6tAIAOoYyKbB1cnlbztu+LdV5+2FHOdU V6eapMiSJ+1QjHQroO6BTjg9nZDOx0bmL5xfPqhuFzUveUU3T420Uk+drVRa pud4YKCK0v6bYr6WS0U3eG8+4OIBwA6bpOxtBwIrgUBgc/OBsPj309sPNjcD +a83I6Kq4tdQc+p0cMzlmrt987aMmzdvupSb40hRB6pBMymw4bLDtfhgM7S9 Hdq857pB5Ry+vGms5bBpAmhMIJsGVxczil+4dGVu4UGAXH079GCB3uzq8ibV hwqJI+yF5O2RfLq9yL3bUnzamFG3CoC6ADrh9HRC8qa0eZ16li1+Q3Deriwa xE5KfhypZs4f4jcD3N28/amYWfPTkNTIvQc3HWNzi+ReIpHtlXtzVHLQ3hum VFlw8QBgh0lSpM1GtTh3QxwCYwqwp8rzGJkMw21uentvF00nJW4uc+GmydYl g8YGsmnYnTO8cXL1gKLKuMFex4M1yC8BQNWBTjg9nWDk4kXuCZsJFg0GoDZN 4E64INsF4ZwrRPvAyZs6t1TJzuwNDVw8ANhhkhQqpEFLFUqjbWJYiBHqAAxx 4K730opiiC8dWbw9dunCOXU1Fy6N+VnyKYuNvzSHWTzQQEA2ja6ejd+77RjU 6v/oXz394PYVVXMHbz8waWcJNBzQCaenE9Jzgm926bYiW6Y0N3eDJf/nXsQ1 dll5TXLVT29uKs9Wu3jnLjtuB9ShsKYBLh4A7DSKpKST8e1QPtAkH34S2o4n MegOmhzIZqlXJ5ffLXr1vWSkUH5lZWVzexd6BDQQ0AmlXr1+dUI6Hgqs+B/4 CeSyEZ1G7kn3srkd2U2bXmHBxQOAHUgKAPUJZBMAQAOdAEwOXDwA2IGkAFCf QDYBADTQCcDkwMUDgB1ICgD1CWQTAEADnQBMDlw8ANiBpABQn0A2AQA00AnA 5MDFA4AdSAoA9QlkEwBAA50ATA5cPADYgaQAUJ9ANgEANNAJwOTAxQOAHUgK APUJZBMAQAOdAEwOXDwA2IGkAFCfQDYBADTQCcDkwMUDgB1ICgD1CWQTAEAD nQBMDlw8ANiBpABQn0A2AQA00AnA5MDFA4AdSAoA9QlkEwBAA50ATM4WAAAA AAAAAAAAAAAAAAAAAKCOOe0ZRQDqHU5S3gEA6gzIJgCABjoBmBy4eACwA5MB QH0C2QQA0EAnAJMDFw8AdmAyAKhPIJsAABroBGBy4OIBwA5MBgD1CWQTAEAD nQBMDlw8ANhhNxlv3759+fLls2fPgsHgOgCgFIjUENkhEkTkqCRbBtkEoCmB TgAmp2wRgIsHAAuMJmNvb48IYywWy2QyR0dHOQAAM2/evCFS8/r162g0SuSI SBO7LYNsAtB8QCcAk1OJCMDFA4AFFpORTqfX19cPDw9PWyUA0PDs7+8/efKE yFRVunOQTQAaHegEYHJKFQG4eACwUNRkcOOB33///WnrAACaBNL7In2wTCZT YXcOsglAcwCdAExOSSIAFw8AFoxNxtu3b4m9IMVOW/oBaCpIT+zJkyfGCxAg mwCYB+gEYHLYRQAuHgAsGJuMVCq1u7t72nIPQBPy/PnzZDJZdncOsglAkwGd AEwOowjAxQOABWOT8ezZs9evX5+20APQhKTT6Z2dnbK7c5BNAJoM6ARgchhF AC4eACwYm4xgMIhV2wDUAiJZT548+fHHH8vrzkE2AWgyoBOAyWEUAbh4ALBg bDLW19ffvHlTFcnd3E1/4d3+7zOPfza29NNrXvIh/yB/ki/JoapcAoAGgkgW kS+DdQeQTQBMBXQCMDmMIgAXDwAWipqMCgX26Ps3v3sc/dn40l986jH4kAK/ e7xLCldFSwDQEBD5Oj4+Lrs7V+HVIZsA1BvQCcDksIgAXDwAWKipyfhD7FXf v/uMjQX9IYXJKdVSFADUOafYnYNsAlCHQCcAkwMXD4BqUTuT4Q7s/uW/fE1b hH/4t29HFoLzj57fC74gH/IP8if5ki5DTiEnVlFdAFC3EPn64YcfTr47B9kE oD6BTgAmh0UE4OIBwEKNTMbccoQ2BP/kfPgonNQrTA6RAnR5cnq56gGAhuFU unOQTQDqFugEYHLg4gFQLWphMrx/iHdSo3yu1SjLWaSYOIpITieVlHFpABqI k+/OQTYBqGegE4DJgYsHQLWouslIvDr4m8/vcZr/r0fuBSIv2c8lhckp3Lmk ElJV0VMO0rGnT3cIT59GMjpljjLxnXyZpzsRfmQyHY88ffo0lixefyPwMvDw 0dLDR8vrMa182UcvtkJLhQJL69vJEjJq70e3NpcLJwa2EoxtWFrd3ita8UF6 Z3357h23q4DbffdxUOPdHST5N8u/XcXLOkjuSIcJ8aNcLkNe604R8r+TI/aH oCb9dL1AMFL5r+eEu3MnLJsi6fjO8v273Pt237n/uNJXcDoQNUKUxk5Md3aj RBpNbHNHr1691vrsq5rwcnO1UO3DzfBL1VFNoBMETKITCkAEKCACAnDxAKgW VTcZl+fXxZG9b5/mFeyL9P4v59bSe0w6+kEoIY4okqqKlg/ODV8UcO9oa5fH t4b4EkNzhXTPGVfhi6GZSvOPaXAQuzNx1f1Uz92sPmH38E/+zpL/WG4oep/R h789yx2SPu//6qtA0TcRfTjznuLEvpGluK4NWHZ+JJT8YMlo/X3y/sz1i9oM z90P0u+PfrN57Hfoo3GfU3H6eoZ/rUWZCZaf9DvoslNXLLsanhPuzp2wbObJ 7MzYNd/K0JyvwYK7+B8kr0MqpaHEtlD54shPlK3iPh8tU+cGvnIoCpz9/Hcv jJoOnSCj+XWCAERAACIgAy4eANWiuiZjJ/5ajM//t6+f5gr2wnL9Afnz7A3/ q30mq0FOFCshFRoXfuq6mtcrQ3ktNqzpsh1FJiR96Cqon8xcrVy8jKuggOcq 0JYlcfjsa8mifXiLtlEvvh3TsUeWM86AQZ2vVm/pGbIlrSHeveBv9YydnPiM 3DqpGbr1WCzNv1mJ608lY3bkcyrslj1IbJn9Igtlv52DnTvyK5ZXjcRJdudO XjaJ6NFvadh+9frVq/Rru7UcK+kWThf+B8nrkIpoKLHlWZr4SK9+4dyjxVGd Mp95dWqFTlDS5DpBACIgABFQAhcPgGpRXZPx+e+DnKrv/h/fvD7IG4jvXh+I m+yc++Ihi9UgJ5LTuVNIhcaF5RrPqe4yZoIu6fgw3z2LBx/fv+9bj1TdEcu4 7RVpy5LYXLwhH66kDWXsVxbpUNfA8C8v0qbng29043Fej31ImdRPRi70SX++ N/pIVT7yS/3xTIqj+xNy6zNkd9665ZxQGKyh+zF+xFV6s0P8idTcaEwYrBTr JJbl4P7EMClcYHhIcbXhYe4A+RHcLTOWJCYfIW2w7tzJy2Zy+RYvds67cSkM 6GBn2SV0aiYijROxyf8ghyt18RpKbKX6v/jQIms21Spu+uPVOt3Bfv8Xnw1T 8ykfaU2RQCdo0Nw6gQMiIAAR0AAuHgDVorom46fXvJyqv+HdFr9MvDr42Rhv NX7OZjXI6Vx5UqFxScWgljpWc1k2kVC8e5ZJxmOxWDyeLCs0Pe3SdfGOChXn 6658IVIy+PUv1OaGMpSHu193Cd+fdfLWLUzFmVxb1bGUrx6JJ174MlT4KmYX bW6fMqLmm9EPdMYzZcgc7YsXZ+4/lZ5BJjJHvUNxxFKYn6WMh+spd+godv+i EpVlOQiKg5f2OaaOhzGPlYOtDdadO3nZDM7ZuTeqTsSw4+Ze+ZBPGUPFIiZH aa5QXG8x7VE6HmeRtaLCzhdIpqU2V+DiNZzYShyGLgiFf/lVIPosEtraFj6x wiKmo68+eV+o7ePF3fwDpWdJxtaV8zvQCZo0t06ACNBABDSBiwdAtaiiyaCj PnYSMm1GrMY/jn0rJmTmBgyNqkpQVRnGfghD61evFjSNMlbzaIeLcecHr/ju 2cHd6/m/r/K68eBOoZB7/eldp0xfTbgeCyo3c6dwnavup7J2cmfa3Zn85IRb oV5dwvBa7LFbHisx5LyzTvdODyJ3FKcYszzxgdJKyg3lq/UZ0d59sSUs96as J28o9zcvKA3Q68C3X09P3/jFRUeAr+71NXE49MMZ2gxqBcZoGkrZWOUtn6rL n3nMPfdhu31ibpl7MnJbNsQZM+7pxO5OKMycpi0TLWTltkxhi0/SljWubPIu 3sWrQZUnRnojV4ft169O3KcyChQVE3Je8P6coswtWZmjp/cVi1WGnO7H1Iti EfY86R3fBHV86OrEBHdhysVrTrHVqJzueH+wuLufO9zf25d7xfuBMxozJvub q4FAcDsaf6nKZQGdoE1z6wSIAAVEQBu4eABUiyqajMWNP3JK/m8//0Z9lFiN M8KuqT//wv+HP6afJ/foT1SuAkklXGHP5h8NLsprvOtun5tz5mSxmun1uYKK vHVn7jrVPeOj0wUVZxSsPnE3ktM4Rby6nas2TUo8Vao7bi4v6KZWUtNxEtfv irowE5yjTymKuEj87MTvvxKD/2XhLgUO8xnARPP84ltpGThvuV5JVklrdPTo 1cvYN9PSCOoZ5yZVeegXamOt6eIdPJXGI7XmdPJF0mnFTIpq0UH+8ReWchMP Xf2iamnLjnYm1BdsqO7cqcgmtfbf7rq/bjwvziImQcq9G6LKDM9xj+LId2tY s8DFqy5hDJ9F2HNHkbvajbkoc/GaU2y1Kk8+5JZHvS87y/Lx9ENB3e5vivkx zk787kvnyNmBj88ODNmnv45q+gfQCTo0t06ACEhABHSAiwdAtaiiyfiN75k4 7qdZIE5ZDfXnr0bu0oV//gW/uSqp1uCiQg6EO0khSoGK1TzyFUbJrrqDT+/I XDy33MWTJg+uzj2NkyJH8eAdvrNo1zxFfnWx13cU56YQZh7Hc0dHR/kvhNiJ oYnHMW4KMX5HmB649TgpnLd83X71qv3q3R0m/RhedJwZGPsmmLc+m86PdQ2l 7OkvnZFs09AmZ3RePRIXC9gfKg2lfGWB5ScDMy+kg0fuzwRj13cjsDpj5OJl pOAQoTcuVsMj/VPxbPPn2IeFXvZM3pjtCKZs6NacmCy1draMWsM+PPc0KM7V NlJ37lRkM3cUU0TxDA3bJ265fI+fJg9kHRcWMZEW9Q9NrBfKHKWfCi5dfqIw LThcF4ed63GuQMR1nX9314WxGgZhT4oTgfyezgcx93XxNyC5eM0ptlqVB6TE g/Iubj4oLt953tv6reJ7uvPsfqbKGw+doENz6wSIgAREQAe4eABUiyqajC+E gPx/nl7RK/Mivf/3v37AYjJIJdz3X1DLBNQITpabdPFmCipHitUURsnuxo8i snU0ei7e9R2q48lPGWifori62OsT063wXzzm+6BX5ZmEhSsWIjwrJMBiKF8G LlAW5yy/VCGXO0x85bwx5rx1beLW0q7SBgnjlpKhFEcjkw9viN9Pb+UOg4Yu no5ZUYe2cm+BSxEm2bKrMy4hpm54LngQE2dYJpYf61uWKtkyfiK4wJ1I7min IbtzpyKbeY7id5zqYefCW711V1yHxyIm/Iz5xeFlasbsSPgxzAWT9/kuzlX5 e4nz3R1+nLy4sIt1Xr+zo1FPxelWOOpXbDUqVySaeP89C/2n5atnR8pOtfIz Ela0EjpBh+bXCQIQAYiAJnDxAKgWVTQZ00thTsl/8D+XDYoRq/HeVW9Rk9Hv 5EcFSbUGtYlO1oGk/fhYzeTjmfxfQzNJpS+m7eIN3ZI1O8JFtpfp4nHd0LSQ OvDq8tOnwfXgev6zHnwqbG4zdKvyrPFFDeVhfEm2x9CHt15oFVPz4uHM2XxC M2r1RN+N/Ln7ASkiZTo/gEkZyo8D6o1eabPikhYzqkNbuSJcP5+yZe6g75Zo lnx3hPCQq3fjUrrm2tgyqhJuGSZly64+VS0xK5UT686dimyKHGWSweX7c7cm huUxjxeHZwqJ4ljE5IBbDDs0cV8euHSUjCcz+TnB9By/Gvex4upCvCj3uyou 7MLP0v5YHn2546YjASqlAcRWYt89OnymL1/hBae30Nqj5S+HxfrPTAQU/dtr 30bIWUvTQ+I3v3DLe/7QCTqYRCfkIAIQAR3g4gFQLapoMn6/FvsLtrRaz5OZ Lx9Gfr8eoz+KGH4x2Rep1qAq2skSh98LsZpHXGg6pzxZXDy7S6bxDp669U/R uDpdleDiZdz6C38KVGGfUGNDuUdvP0Q+FkeIabMjGZtf0QnNUm4pb5hl7NvA 8mrA7ZQM2bXFpeXViOwiVETKxavSVq2Zp3Naz4S3SpIts99Jxn3q7Vuv3okc RMocrtQxo1LdhQwhfKAvh+txkOBzSQse5nzkq1gl6VFPrDt3KrKpSSYZWb4r ZUS5mp8pYxETYTGs66l2vQd8nNKw6l0fCC5bkHLxDIRdcAmHltNa9ZyIi1cX YluEhJSucGAmLnWVLV2ffa0u896EfEcz6AQdzKMTIAIQAU3g4gFQLapoMv4Q eyUO8cVSRiNiRdl9uSdWRao1KCl3spIz/Eh+MHf0lBut5zaUYXLx5BovI+vR VeriXb2ugf3qrcqHvIwMpWwVAykwxmwlj/boZNlUrrAzE74x3e2BRHOsyFCd pNZkDVOTIwfpZJ50Jr08I+VyVtky90EuLt98J4975+hox6U4S6IiW8bP+BTf NHZorpIdEE+sO3cKspnZmZuYuGq/ej+m9RNPr/OpbvOzaSxiIrpmOi7eUYT7 hbC6ePrCHtN18egxn0ppBLE1hgpd67uVpHJN/OSzJXWZM4r+LXSCDs2sE+RA BCACmsDFA6BaVNFkfP/mzX+5co/T8zN+wzwMxSCnc/WQCkm1BiUVTtZTfs3d zGNfIUpzmFc1VXPx5D1M1VZZfDEhiTqvDIec6kiYg0ym8v3x8ugaysNtemvX roszLMbr8NnXZy3cUOf70iazL5fEAdWzzkfFDSWxd/Jq6TxgQ9fvqDvJy1Iu RJUtK0Th+hRbxF68+vRI7L1X3ZZxw5UMtqyQTLVsTqw7dwqymeYzfgt5ThQc cYGXhXV2LGIilJnwyaUms+y65bw1c3f9GSd6jIGaBsIu/DaGFYGasft05Hal NITY8rwKXftk+MLAR11/ZxlbFVPi01MYv92j+tJdn/xe6GNLu1Gr+rfQCdo0 s06QAxGACGgCFw+AalFFk0EY/l8bnKr/+18/yB59X56AkxPFJd6kQuPCChfv KH6fVnlXhYQJlbt4vFqTLQVKzim3yuKrErq1YkjDsHzTGyrnQ61m8ai8YYXP 9MPNwGpg6WFgafUR+X+UL6pcV75HRZucGfUW8mK//pKKb7m2+kf35x+/9+HH hYzQ/OdMH20lPzj7ye+Uo7LpdZlZsN96HEnmM44epCNBn1N+TLnooJDnkO9g S6XcBzKTVItFBwe+W1eH7Vdp7HSKyOHhqxP5lP7x9btzcy6Xa851N1iS236S 2xyfuGzGhBFmu081kXcU99mlV8MkJuu8sMmXyCV9XAmn7xnvMyq34RPTrXAd xeLCLuqQq7LxHH6tX41dvHoQW1WuiZdL4q5kYnLC8KKUx76QBGP/y4tSbde+ zUfrJVepVtFZ6/knCp2gQVPrBBkQAYiAJnDxAKgW1TUZ689TYsBGkYTq+ojJ nMmHVGhcWBUqmaZ2Ph7yJTWLleHiSfHnM758Kj6ig++IWyerXDzSO9yJxTNH 0ubIpJu6HCn0TY/Sy3O8lhVTJR/FlyfyivI6Y/Z1Gm1Dufu18XAlnwtaIzt0 7Fd0ScsH8tRhw5taET17QXGl+UfLOiE/1C5pxtiDitRh3OONyZ33wirvGtsy DQ7oGBjBlQiKv7kSA1ROsjt38rJJb2M3MXcnuBNLptPx2M7ynRnxVboKIc0s YiKutL04fCuYzD/6g+RTIY4pn0VT2od32MkVOMpImx0Ioz0swp4Wh6lv3S/k 3TxK3tcQ9iYVW43KVekE++hO+EdLhRtQbCfd1Udvcv3Bota+X9AJappbJ9BA BHIQAS3g4gFQLaprMggDv+GTJ//nf737ZLfk6XpyCjmRq4FUVbS86LuJV9q5 I6z8tUudMYWLp7n1uWGvj+pAamhf8eoZFzWcxS0LejynF9YgZXcvdQ9lGtpQ ikEmoa+Gf6IyjvSH39F1X2OP172g7v4+X6y/1mwDlUyMN3aaBN1ae6XSDE0s R/iHQtuywkOJ0bbQXQiFpW2ZMnHNgbSYvYq2TPOKqqaycpLdudyJyyZ5WveV cUQyrrulaTIWMVnXKSPkTjmgtz5XlFBsfW4s7LnkY52KZK+4OcVWq/LDXe97 ek36VkyvcbQobmYt/3Abh2kCnaCg2XWCBESAAyKgAC5es5FJRLYisdRpN8OU VN1khBOZrn/9mtP5PY77z5N77OeSwuQU7lxSCamq6Cl8JnN6g7mkj+ueTdyP 6RQ7uFMY2xcCsQ44p1Ael0W0ViG7AuUnRnxzdMdv6Lprfd09JL96eucutZ8p r0Ijy8rodbvTtZOWghfEbZ1dpW8qsymmZf5wRrRRkvXU+YxxJm9/84LimwJ7 zx79akAWLdM14FBvPyTyal0MRxkyTD2dy8SD7lvX1f1++/Vb99cjdDgHv6zy opht7MgnzqQImwTx74j6RuLgqZjk66pbJ0dH6WhekWpqaRsdnnB37oRls8DR U5/runKzhItD9om768rMe0XFhLAjl8G8kPl2ZJe7rygw5HT5qA4Gq7AfxNdv 2almD03cuVNY3ksJe3OKrU7lh/HNa3QWevKxDLmDyl2nA+6xLlmbP/riW83F mBLQCTQm0Ak8EAERiAANXLymIrLQ3cLROh2Em3fSVN1kEOYfPRcjN/7282+W d75jOYsUI4XFE0klZVy69hwk4/EYIW4wLnWUyaTTymwqR8nCefkzq5Nnpebs vUyEn0XIJ/qyonxrWhykxceRTB80xvOoPifcncudnmweZdJx6fdvsACVRUwO ksJPR6eiA66SOClQ2U8rk85fKhKLV7xk9uSopdjm9l4VKt/aDj9L6OY4PHwd zTdgO7yrX0YD6IQ85tEJtQMi0NBU18WLeKetVqtNB6vVsVaPbkdqwWHTbTRp 9qDVpekuJYKzDquls72Vo72zb9C+sBLRuUpmbcE5aOluFwqft477tuTVpoIO /acnf5ALmg8y4bW1CHTavBU+lxMjFQmuEYKRzGm3pEJqYTIIv/aE6G1SL3+1 vvtSd3iQHCIF6PLk9DK1AwCNw8l353KQTQDqGOgEYHKq6uIl7O0thrR7EjXv ZpdOwlak2S1WT0xxTsw73qpTuNViV3mEW/Zu7cKD02tUQzzFGiK1SNkgrgKf XSzRNx2s7mOqHV7uBbTaNG+qgaiRySD8+zdbtBX4T595/ttvVm/7nvm3v3v6 4hX5kH+QP8mX5BBdkpxYRXUBQN1yKt25HGQTgHoFOgGYnOq6eI5OwZez9Kmw dFusK/U4i5eYHiRt41vcLXpZndw3FovF6lX4HrEFyRdr77Y5xp3jjsE+yYtr tdIzaIlxi+SbdQ/axsftfZ2Sg2hdECb+UitW0hDqkakawzfI5lrLapPyjNut NpvVPttA7pKPc4A77fU4AFAKtTMZBO8f4j+95qXNgfGHFCanVEtRAFDnnFZ3 LgfZBKAugU4AJqcmLl6nox49OTZWHJyn1u3Tjxr02XlXttu2ICuVWHP0Ed/N 4qN8ldiCVfTT6IBP73ifOOG2pnMtlsY0Pqlx7i7h4hXj9cHh+N2n4hareh9S gBQjhauiIgBoCE6xO5eDbAJQf0AnAJNTExev3c42hZSKFGoW0z9mElvehVkn YXra5fFFEhqOTSKy5nEVyjinF7wrmqkjUzFScb4JW74F5/i4c9oVLDgPmdga OXN8fNzl1b0dfkappVM/pjQze77VwPNKyZokzWzalNGemek+fi5v0KXdHobG ZGOFhxgREF5XRP1gEhHhaae2XNP5B+PycsGcmTXPbP5vp2tLzzlPxVa8C9Pc c59dWAkaveFUbMvncXGFSWmPL6jxJjOpRCIRi8USsTUrN1nZbl2JkLuhb0Xj LsiZkeCKZyFfP3mV0y6vulA5d0p+fOJPMRHxLriE39gau+NZ1GS8efOmcpnd Pzy6s/HHX7k2fja+9Jf/wufvIv8gf5IvySFSoPKrANBAEMmqsDsH2QSgmYBO ACaHUQTKcPGYesXC0jOrl3SsY9NWKpyRnyQbl3tLKzaLxgK48+Me2oHIrDm5 7y199Pq38x7vNL3SzTK+otko0avy6t+Dx8q7bQ5lBKeSzNYs32KthWaZtXFh fs+hebWijUmtONQPhHsHKq8wYeOa0mnppp5in9Mza6UfTJ9P6TGlPI7zGlfo HNS6+4hzUHPZYWufbZr29Ly2Tq1ihndB/DXHoNZyxVZ55GoZd8rPJLYOTi+M q2+207nC9Is2NhlPnjw5PKz+SN1e9oh8ql4tAA0EkSwiX8fHx+V15yCbADQZ 0AnA5DCKQOmBmmwuXsrLOQN2j9eu1d+3OKmEITEP7Tm0d3a2U7331vOzYm89 4bWratLEsqI1B8fi4q1Ii+tabbMql4h+IkJjdDzK4CB3F+1WzUScRRtDp9BU eCWqU6T5ROrBaZzZLWtqYrxPKtTa2d3XZ6HcpG75VcT5zcKxvvPnz/fJ3lOn 5LOX7OKlfDLXsZX8BDrp5lOTpGXcaUL1C2xtb6f9wXbXVvFgWWOTEQ6H0+mS t0MFABSFSNbOzs7bt2/L685BNgFoMqATgMlhFIHSZ/FsxGHJqFAWF1w8kT77 9Fok36fPpBJrXs9aTDxFWK6V75fbxe+3vONiL3xQSFpCZZVsHV9JZDMrotvR aV2gwiNbnVpbOLC4eJJrJvT/reMLmiGOYmPsPs3qRM9COxSzeGMymUQikRLJ pDy862Tk4rX2OcnBNac4XdVJHl4mOM3fk2VavJU10Zlt7VsIijUmXDb++9ZB F3UFL3+F9kF61isVWXNau/NXoWb9MoVAzVQilcls2YSfzRa5AQpynPrRpJyF a1rym01ILVmwCy2UwoPLuFPaK2y1u/i0QJnEmk384Z2f1XkHEsYm4+XLl8+f 19F+NwA0DUSy4vH4jz/+WF53DrIJQJMBnQBMDqMIlOziaaJeoCdz8VrHfbpB j6kVIaCx1apoR8onRCq2DnJzfqJX1W33ylt1nisQEfKf2LQCDdlcvPwednZV 1KhlcHxFvjBMqE37Wlkp5lP7cqyNYTpFfA781Jv46M7z2ytEhDVxwpuSJs66 VR4o73DJLiS4eDK/rzjMk7+JrbUtdZGM4P6LbnLpd0qd4lHMp1IPwWi+toCx yXj79u2TJ0/29nS3yAEAlMH+/j6RrDdv3uiJXtHuHGQTgGYCOgGYHHYRqI6L p16MRrl4evlGOERHSdpfgKpFmGjie/iqiTOlByEWqMjFKxBZcQ1alIvDLA5p baAYjqjn4hlfriYunrDuT/dBCUspxSjTbodGlGnCY+Ufu3hnmRUxgLXdYp31 rMRSLJlAS1zCyV8rFdkK+rwe1+y0lfe1xVsu+U7Vp9AsCA7hbLFYTWOTQXj9 +vX6+notIvwBMCfccoNUKmUQjlK0OwfZBKBpgE4AJqckESjdxeuc9a34ZHi9 K6r+sejiWZzG0yNsfhDfgVd5cCrPpXouHn/bW75xea6YboePOxTz8Gvl7NrV SU+szEDNEk4p+hyUBcTpzlYtxJulH2NkQbk2sLW9+7zNseBT7Qav3zAjUlsL TrulU3OLeJWLx3ynxm0Qtq5Q50RVUtRkEJLJJBG9/f3909YBADQ8e3t7pA/2 3Xff/fnPfzaWO8gmAGYAOgGYnFJFoPR0K2z74gkuXqfdZ1zQ2NNZc/bRHfiT d/F4EsHx8+IsJh/UJ17r/KzmA4zZeGflfLDc3C/Mp5Ts+GgnwVGhWGaYiaw4 BrUyn7Z0T2vH4rK6eEGXzH8kzmPfoHV8elrYX7BWLp7iB2YAi8n48ccf0+k0 sRrPnz8n/zg8PKxKZmYATAKRFyI1RHaIBHEDlcSQGSw3YO/OQTYBaESgE4DJ qUQESk+3UlpGzU6b17ig8fZw4izeeCFJxqm5eIVbcvLOTbsrkvfZpFWEig0g OCIu3hXSeWKn6+KJBSzj3q2t4Jo2ejvppSLBlYXZ8UHZ1hXksahLMv1spCfZ 0mp1erao/RdWHJaaunjCTvfa+XloWEwGZzX+9Kc/xePxnZ0dIozrAIBSIFJD ZIdI0Pfff//DDz8UNWSM3TnIJgANCnQCMDlli8Cpu3hipFzfdFB1UJwIU67F q6GLl4psxbSXZYlNFdyBiFXYGE89j+cTCouBneU0hvWU8l289nwm0gpIBR19 /EvSinVkSrciTCm2jq8o/SzhmVfDxdNog/IHZgCjyRANBxFDYjtOe/gHgMaD CA6jFaNtGWQTgGYFOgGYnPJE4NRdvKy4gXiLReG5BGcH+SOdfHbECl08yV/Q m7HJbBXSb7SPe9XPJCjszC15WNK+A52ynKKpNadwU+0LOgGAp+vikdsRNxuw az2rVCwhc3RTK3br+JpWU1NGzzxh5x9at+4zp+ZqXYr6EyuDwnrGKrh4recV HiT1A3MUCdMs0cVTmA8AACNliBhkE4AmBjoBmJyyReD0Xbxs1iVtRNc97Q0m 8tuqbbkcwjKslhaH0DUv3cXLrHkWXAsFPAvCfFO7fZb7asHlcq3E6LBAaYVa e/fg9IIvGInFYhHfglNagUYnkMmsSa3sHHT51oLBoGfaJpbttHn07vq0XTwp 40r+nmz8roX5bJZB7/hgt8JlExbFtZ63O8lDEbJpZiJrC+eF/Cia+wOK7ltL t80XSRT290tsrXnGHU5xiaIQLdnS3udYiyXyRWJbrnF6f8JquHiFeuyz3kIr IrIfmPbOhjLKNhkAgJoC2QQA0EAnAJNTtotXdL6jUJzfRo3FxSPdZ5vUCVfS 55Sy+uv3520603wxW6tOvQJWWXhhYtbabVi8T+ENZLZmNVNA5rGMGzwrITqx eIigiIGLZ5e/HfWDsmu9Pi/l5mhArTH0GJfM+37T2tN0CY/eu7WJtxFx6T5D HmlfvNLv1HC/D2mPxSLAZABQn0A2AQA00AnA5JTp4nWPs3kkXMRjSydb/5nU v+AYVHhjrZ190z5ZCg9pEzS5i9d6fpabERISd7RO84n8M9Pni/h4jhXlDcXW Fqx9aq+gtc82HdFcpRfz2ZTlWwfHPcb5O4LTXKSkpeim2yKCi9etcvEys9xc mvB2hAfVPs1PlfG5Ylr7phV3EPHNnu9WOVit3bZppeuZia1N2wc71Y+ztdM2 bRCGmd8MoU99hXbLLLXZQmJtVrEJIXn7Tm8km+F2JxefUhl3KgVqOset8uZ3 2l1rjA8fJgOA+gSyCQCggU4AJqdEF+9kyO95HQxuBdeCWzFmz6dGZBKRYHAl D2lNpGhr8sVJwXzbixeuNzKJWDC4xt9rrIgTn4iRO83faj7npmLJntFZpHzh CmvBWEJnxi+ytVYoUdW3L6VbyVeaSWwV7pS8U8aWc8BkAFCfQDYBADTQCcDk 1KWLB0DVKXEZqQ4wGQDUJ5BNAAANdAIwOXDxgDmAiwdAMwPZBADQQCcAkwMX D5gDuHgANDOQTQAADXQCMDlw8YA5SPBZVVvh4gHQhEA2AQA00AnA5MDFA+Yg s7W24vP51rYq8fDg4gFQp0A2AQA00AnA5MDFA4AdmIx64TibiqcyudNuBqgb IJugPjjOFTg+7XYA6ARgcuDiAcAOTIYB2fiGx+3xeNz+UIr/Jrrqln9THVLe Hn5Pw7b5aBO6eSf3JJsIyGaNwK+xJLKrI5xuGlnNKA/hSZ4sjasT8FM5FZrv scPFA4CdxjUZtSc72iH4XTa/8hurX1Y2F50asdnIZ9STlddyHPePWG0jI+TY ZFjHexM7UYSukdVa3AwLuVQ0TIimqj1cX8qTBAKQzdpQ1q8xG3VP2nq7Oto4 Orr6raPexuwjlUp2Y1THxYNcnzQNqxNK+qnkvJMjeZOpg81q85zCQGiuYB3D qbqYzWZsTBNKKFw8ANhpWJNxAmQnuxRul/SNzSvr3VE+WptH3u/bmBQm6Fo6 /Ar3Tzxd6EQR+uejtbmd4qyOFLR/24hysL5SSniSQASyWRtK/jVmVqfaWrRp 6x1txll3GQYuHuT6hGlYnVDSTyU70tFijM1fbRtV/A78Had16fIb04QSChcP AHYa1mScANlRffU4sirz1mgfrXcmTB1J2fK6mOshdq3quHjv3uX8U6O2kRHb qPsU7cfGaMEb7RrVbWaZlPAkgQhkszaU+GvMeKX+ZkfPyOTUzNSktV8ct2lp s53atPvJYDSLB7k+WRpWJ5T0U8nOW3t7env7C/SI4tfFfdPb22tThQzXntxq j7YUnAasjWlCCYWLBwA7DWsyToDslNCPG+HHyiSFqVCttIvX0jUpqs7j6Dw1 /m/g4tUDOf5+a+DisT9JIALZrA2l/Ro3hGM9I15ZUFQ2PNlPhLt3o66Fugro r8WDXJ80DasTyv+phPgwmJ6NUw2QzIUm68czYm5ME0ooXDwA2GlYk3ES8LNa lDL023j9OKo/i9fS0iHGaoakKE2li5dJxQkpgThPSjvs6zhLjmX4wPvj6IZ/ fmZmZmpqasYTVp2R5SpLaSh/jUPHOfIzyGQy2UzYxo2XdthCKdI6umk6rcpl QqvefEtmZubd3lBU12SwP0kgAtmsEaX8Go/dA20GPcycfpRmJh7yunnh8K6G iibLzaaiq+IJbm84ri8Xx9kwpwGM5a4UpUGTCq9y7Zj3+KNZKSpMy/+FXJ8o jasTyv6pCCd26S1zeMfZtVSG/6Fnon4P/0v3+PWWvxNy8fCGRxK41aiWxcxb R2Ies9mwx8a11uoOZSjzWDCnGhc5zqZCq/58/aQdU/OrYZ2oyFKEtIzGNJ+E wsUDgJ3GNRkngDCA3+GOH8u/Uc7HyV28ln4+VjNlk60pkM4SR+FUaK7X4+fX ukZDuZS3V7UuaGBmg27LCFdAY0mdxqHVkS5ldUytyvknBzQKdlk1hwbZnyQQ gWzWiJJ+jWKPaJJ50DsX9w9oSZVVJqcS2ah3oEtjtV9b78hGRulYhtwjGkW7 BvxxRcmSlAbPcco/oFoGNWDjJV1/ihNyfUI0rk4o+6ciunh6xXKhKa7ARi7n H+1X/nw7rOp59tTqjKbZa+vqn1+NSoKUXWWxjkImE574hsfaq7GYsK13VOVw liKkZTWm+SQULh4A7DSuyTgBsqujCmUYd3O9HeWIouDitXXwq+4KsZrRebn2 leqhU2jqlaGrF4MrRCPQ1iazB1Mh0XgIwfYa8ZYah8py8bJT/dLV27p6+vtp k9ajvgX2JwlEIJs1oqRfY2iqV/ylj7g3iuZWyfIdTv6Unt7+Xmk1UUvPpHLh XtwrUwVtHV1dXXT/sCdEXXJ1lI4K6JCX7JDvt1KS0iiQ8tK6oK2jQ9Hl1Ng0 AXJ9sjSuTij7p1LUxZPGVymjJPul90zRP/TjuFs62NEzYB3o75WNsEyKcsHm VXVQSbDlcTstBWmm6u4YlYtQKUJaemMqeex1C1w8ANhpXJNxAgiOWH9IGNfj rUmHTZkCjLcyvTMzVk7R+nPvwlznsGNgaqRXoWbfHR+Th58TOc75RwzG1qQl 0oX6JsNc1FcuPtXP9/HarB5l4Q59F486dFwI1Mxlc8fHcb4JHSPx3HGOghyn ZwjCYqe3rd8bFWvKevjbpBtT8pMEIpDNGlHirzFqlfW5OmxT3riep3ccEh3C /kmvJBthj/B9hyzjbsoj1k30RFiM5szF3QVp6p2ShvFzlPM44gkfCyVnBqTE 6FTdJSkNefku2wYfJHYc9U+JX2u5eJDrE6VxdULZP5USXLxCdZNefq4s7p8U hEsmdOKo5sB8iKomF/bP9ObTktCzYJx1JAb6OOXnh2Js3vjxscI6HlO1zBRE q3fKs5EV7zTqFdWCXIhKEtKSG1PJY69b4OIBwE7jmoyTIOPv7Wjr6J8RO3RE gXe1tXX1TylTgAku3mpqg1PmNs8qH4MxuboxpXLxVBgaMskQ9FNdvkKD+Mxa xC/LKAqzuXgaR43TreQ2hGHKHnX05gxvyVR3wfwkgQhks1aU+mvMRUdVQVS9 1qmQarGMuENKz6hytu44zDto1MaXxzOi42fzajQzTruSOTFzgtUTlxeUkioM uMUtV0pSGrT/OBB+pyiul1ETcn3SNLBOKPenUsosXr/iFyqtRKM2FxC+7PCU 4uRQeWWL/LTj4bBGCUH85bNspQlpGY1pPgmFiwcAOw1sMuoJQeV2bRy/8wzI eoPz8ePwZBEj9Y7RxTPw2iS/rGIXT/uoUEjo7/VMhjSO+rll4F31sHdQowPZ rCtSIY0lNr2TfmrQXNxWuFcroDPDLaKTpgly4pRfb6hotsCcEKbVpjH8Ljpo lP9YktKQEocOuOPK0rqbJoCTxoQ6gd3FU/s7Oa2fbkgcEMnPyLtDcdV61yJX KUEKcplUNLTh93rmp2xtSgl9V6qQVtiY5gAuHgDsmNBk1ALRxVvNkb4Ytbim MARX1Ei9Y3TxDJbXdZyQi5fy8rm82rQQ79uEpqfqQDbrkGx8Y8omRl3l6ZkU h99TwpbNBVmQCQYlG+J6HGFxjeYUnhJhVF/eRRSPCnPr0o4tJSkNI/1j5v5k vWFCnVCKi6cKJNY+FB+lwiM5ge3pHZic90b1896WJAWpkHfU2qtcy6ohv6UJ aXmNaTLg4gHAjglNRi2QXLy8Og6LWb16p/JTXVVz8Zi8ttq6eKsq66jJaNPv FlZ7IJv1SzY6JSXN7OHn7NjyIbR0CF6Y6LWNamfalGHs4h2HeJ0j5XMoTQ/A xWsITKgTauDivcvPe3sme7XS2PbY5jV/5axScBwdkSVcyTuPttGp+UlhDUOp s3hw8eTAxQOAHROajFogd/He+fnNEto8BQV8Oi5eiQODrIGagnHpnVqNx6Nh bXTTUQB2IJv1TW6GX6DX4UlxoV5ifrz+1ai+bGSUKfLaBpTpiTQQCuvM4gne Za+46AYuXhNiQp1QGxePJ5ffvc47NWqlst5qz6qzSYG0Krat1+YPURuZCImY 4OJVCFw8ANgxocmoBQoX7zgVcs/nNyXmNPzpuHgtPatKRyvDB5JVkG5FNC5M 0WWgAiCbdUEupbdYR0yQPsPn8BNFr8vL0vOS0m8yJDCX0hz1h1UHM0KGvY6S 1uJRh8Q0gzavcqmfuImnCfuT9YYJdUJNXTyauH+yQ5AigwwnRgEq4qCNNNIi cLyhNQtfqYtnwmgZuHgAsGNCk1ELFC6egpN18aTe2qQs6UPObRXiyHRcPCFZ hNo3pImKW56PatnNXCbLsnodFAWyefocxwsT8h1Tq8okJPnNFHh5Ue85lV+h p9WnzMm3H6FSM/VOqctHPVNTfvG6x26hsGpzPWlbB6orW5rSENMotXTY5Lea 8wibv8PFO3VMqBNCYrIyHatUqosXmh+d9KiHSQi5UWEIVMPFEwSkS5Usl6pA SIM5oBz/DM1bW6ro4rE0pkmBiwcAOyY0GbWgrly86Ly4FrBnZjWay2XjIa/o 3um7eFKK6ZaekY1UYQcecm7YPzU5E6V6pmLGlXzPdGQ+nOJmLnOp6OqUtQdd wWoB2Tx1QtS2VR091nnvRjSVyWRSG94ZaRcF2Yh9yiZGfLX1zvvD2cI2Vbls asMz1dOm6j1m/dQF+t2r4Uzu+JiIUtg/ym+MJUaByjbR67HNRzOk7lw85OkX ryjb4rnU3mPKJm3RZ/VHM7lsljTDRi0sglyfOubQCcdhv9fjLeD3TgqCMOrm vvJ6PJ4QNbFekot3HJ3nf81dAzPevJXjv8+lvFPC+IyUs4iua1UUhRH3Brc/ XTYT97unZrzCTiVivDRprTfMbXxLJNTaIy36q4qLx9SYJgUuHgDsmMNk1BzR xdMMuKqii6fqY2kZAimmS0FXr/4oZaEyf5f2icp81KuT/ToFC8i6mqBMIJt1 QNZt0xEmnn5lqFRm1VA2WiZDMuHIbExpJd6T6venpN5s3DuiW7BtQN6SEpVG YcMsw5bAxTt9zKET+O1FDLBRu/KU5uKl/P2KypXXapuPapsv3VRjkhwde23K fVUU6Ll4jEJaSmOaE7h4ALBjDpNRc8Stz7X2wxLdtx4GF0+zDK/t2/rnVdVr L6DLxb39clPT0TsSyr475pbV9Ohue6o+MX/djl63yuqlNtwDPeqiPSPzxdcV ARYgm3VCJuy19as7VG39I/MpzaDk45R7dEDdS+0ZGPFHNUOkw5PWXlXxDtuU xpK+bNRrVcqdZktKVhrv8nu8e9R6I5xNcUkkTLjwp94wh044nteQHhmTIemn KBjfNmFJ7DvVIcWaguOwf97aq+EidfWOrBqlCst5R9XjN229Ng89e+4eUchy XjzjQsQptcfKu/KEtJTGNCFw8QBgxxwmw5wc53ddDRGoJH5sZDPxcLhwZjia yRqde5zNRKNc0Wg8gx5gNYFs1hfH2VQ0GuJ/6ykGiTrOpDjZICekiq9QPc6l 4lFSdeF/RbZjzpG2CEVz1V77mk0R8Y/Go9FS9QaoNdAJ1YRIUT7xbZT7X5ZR kI6zcVGs9SQkx5ephXiW3JjmAi4eAOzAZABQn0A2AQA00AnA5MDFA4AdmAwA 6hPIJgCABjoBmBy4eACwA5MBQH0C2QQA0EAnAJMDFw8AdmAyAKhPIJsAABro BGBy4OIBwA5MBgD1CWQTAEADnQBMDlw8ANiByQCgPoFsAgBooBOAyYGLBwA7 MBkA1CeQTQAADXQCMDlw8QBgByYDgPoEsgkAoIFOACZnCwAAAAAAAAAAAAAA AAAAAABQx5x2EBwA9Q4nKac99w4AUALZBADQQCcAkwMXDwB2YDIAqE8gmwAA GugEYHLg4gHADkwGAPUJZBMAQAOdAEwOXDwA2IHJAKA+gWwCAGigE4DJgYsH ADvsJuPt27cvX7589uxZMBhcB3UMeUHkNZGXRV5ZrfUtqB2QzeYDsgkqATqh +YBOKAm4eACww2gy9vb2iCKKxWKZTObo6CgH6pU3b96QF/T69etoNEpeGXlx J6B1QS2AbDYZkE1QIdAJTQZ0QqnAxQOAHRaTkU6n19fXDw8PT1sdgtLY399/ 8uQJeX0no3tBdYFsNjGQTVAG0AlNDHQCC3DxAGCnqMngxgO///7709Z/oByI oSfmPpPJnJgGBtUCstncQDZBqUAnNDfQCUWBiwcAO8Ym4+3bt8RekGKnrflA +RCj/+TJE8T5NxyQzaYHsglKAjqh6YFOMAYuHgDsGJuMVCq1u7t72joPVMrz 58+TyeRJ6mFQOZBNMwDZBOxAJ5gB6AQD4OIBwI6xyXj27Nnr169PW+GBSkmn 0zs7Oyeph0HlQDbNAGQTsAOdYAagEwyAiwcAO8YmIxgMYtV2E0Be4pMnT378 8ceTVMWgQiCbZgCyCdiBTjAD0AkGwMUDgB1jk7G+vv7mzZuqaK3N3fQX3u3/ PvP4Z2NLP73mJR/yD/In+ZIcqsolgB7kJZJXifD+xgKyaQYgm4Ad6AQzAJ1g AFw8ANgpajIqVFZH37/53ePoz8aX/uJTj8GHFPjd411SuCoaEqghr/L4+Pgk VTGoEMimSYBsAkagE0wCdIIecPEAYKemJuMPsVd9/+4zNhb0hxQmp1RLSQIa mIyGA7JpEiCbgBHoBJMAnaAHXDwA2KmdyXAHdv/yX76mLcI//Nu3IwvB+UfP 7wVfkA/5B/mTfEmXIaeQE6uoKgEHeZU//PDDSapiUCGQTZMA2QSMQCeYBOgE PeDiAcBOjUzG3HKENgT/5Hz4KJzUK0wOkQJ0eXJ6uaoRaAOT0XBANk0CZBMw Ap1gEqAT9ICLBwA7tTAZ3j/EO6lRPtdqlOUsUkwcRSSnk0rKuDTQAyaj4YBs mgTIJmAEOsEkQCfoARcPAHaqbjISrw7+5vN7nOb/65F7gchL9nNJYXIKdy6p hFRV4sVfBh4+Wnr4aHk9ppU5+ujFVmipUGBpfTtZQm7p/ejW5nLhxMBWgrEN S6vbe2y1v9jaXHq4GVh9tBzUbDZrGWNgMhoOyCYDtZPNo1evXmt99lVNeLm5 Wqj24Wb4peooA5BNwAh0AgPQCc0MXDwA2Km6ybg8vy6O7H37NK9gX6T3fzm3 lt5j0tEPQglxRJFUVdKlw+7hn/ydJf+x3FBEmUQf/vYsd0j6vP+rrwJF2xR9 OPOe4sS+kaX4kV75ZedHQskPloquRN/fvjbwvqLy5Zell2EAJqPhgGwaU1PZ jC6O/ETZKu7z0TJ1buArh6LA2c9/96LEURjIJmAEOsEY6ISmBy4eAOxU12Ts xF+L8fn/9vXTXMFeWK4/IH+eveF/tc+k5siJYiWkQsZLHz77WtLtH96itfWL b8d0NLPljDNgUOer1Vt6Kn1Jy8naC/5WT+1rtTjyS+3KhwKvSinDBkxGwwHZ NKiztrKZyy1NfKRXv3Du0eKoTpnPvIxPhgOyCRiBTjCoEzrBDMDFA4Cd6pqM z38f5FR99//45vVB3kB89/pA3GTn3BcPWawGOZGczp1CKmS57ubiDfnAHW0y Yr+ySIe6BoZ/eZFWwh98ozsj9nrsQ8q4fDJyoU/6873RR6ryCnesiMmQxjDJ x/J+F9XIM85N9jKMwGQ0HJDN05JNUv8XH1pkzaZaxY32v1qn+5Pv/+KzYWr6 4KPiM/gUkE3ACHQCdILJgYsHADvVNRk/veblVP0N77b4ZeLVwc/GeKvxczar QU7nypMKjUsmg1//Qq14KZNxuPt1l/D9WSev58NUxMW1VR2b8eqReOKFL0OF r2J20fr0KWNLvhn9QGdkT5OXY6IBsoyE898krknfOKKsZViByWg4IJunJJuk ZaELQuFffhWIPouEtraFT6ywZufoq0/E8OmPF3fzkWD0pMDYOut0Rg6yCZiB ToBOMDlw8QBgp4omg4762EnItBmxGv849q2YkJkbMDSqKkFVZRj7sTzxgdJe yE3Gq/UZUfN/sSUsfKbsCG8y9jcvKFXx68C3X09P3/jFRYcQFfla8rA+nKEN glaICGUy1JW/CpwRxxuF+bjkQzFApTBWyVKGGZiMhgOyeTqyKetnfrC4u587 3N/bly/n2Zdkk5og2N9cDQSC29H4S8ZUSxyQTcAIdAJ0gsmBiwcAO1U0GYsb f+SU/N9+/o36KLEaZ4RdU3/+hf8Pf0w/T+7Rn6hcBZJKuMKezT8aXFRcLn12 4vdfiWHwssCPAof5XFiioXrxrbQgWu1zaY0THr16GftmWhpLlMVJHoZ+oTZb tMlQV/7qEfUNb0ToMI98MZYyzMBkNByQzdORTWkgRZ7myPLx9MMYf9b+ppgO 4uzE7750jpwd+PjswJB9+uto6RlvIZuAEegE6ASTAxcPAHaqaDJ+43smjvtp FohTVkP9+auRu3Thn3/Bb65KqjW4aHjRcWZg7JtgXg9vOj/WNRmydiydkbT0 0Canfl89EsPm7Q+VJkMeY2/5ycDMC+ngkfszQe333QiszmiZDGXl9CiiaEQU 7htLGYO7VACT0XBANk9FNgkBKc+evEeXjwHL9xX3tn6r+J7uK7qflZYmHbIJ GIFOgE4wOXDxAGCniibjCyEg/5+nV/TKvEjv//2vH7CYDFIJ9/0X1DIBYwIs JuNl4AKle8/yQfu53GHiK+eNMeetaxO3lnaV2pgKj+RNhjgul3x4Q/x+eit3 GNQyGarKNT01pYvHUIbxyeRgMhoQyCb//cnKpiqvwvvvWeg/LV89O1L2IZUf buUsK5BNwAh0Av89dIJZgYsHADtVNBnTS2FOyX/wP5cNihGr8d5Vb1GT0e/k RwVJtYwNKGoyDuNLst12Prz1QquYRpsfzpzNp/ai1hH03cifux+QYjOm80N5 lMn4OKA/bgcXDxQFsslC1WWTnOkeHT7Tl6/wgtNbaO3R8pdSbtszEwFFd+7a txFy1tL0kPjNL9ysHd0cZBMwA53AAnRCEwMXDwB2qmgyfr8W+wu2tFrPk5kv H0Z+vx6jP4oYfjHZF6mWsQHGJmOP3ojn7/IZKUOlR8hvfkWn9kq5pQxalrFv A8urAbdTUunXFpeWVyOaF4GLB4oC2SyJasmmDgkpO9/ATFzqGVq6PvtaXea9 CaMNvBRANgEj0AklAZ3QfMDFA4CdKpqMP8ReiUN8sVRpkecKdl/uiVWRahnP MjIZsnh+UmCM2V4c7dFpo6msWWcmfGO6G+WIhkmZq5mHSqUypp1K5TVTGWZg MhoOyGYxaiOb2lCRWn23klRqhZ98tqQucwbdOVADoBOKAZ3Q5MDFA4CdKpqM 79+8+S9X7nF6fsZvtOa6KOR0rh5SIamW8Sxdk3G4TW9y2nVxhkWNHz77+qyF G/R7X9qe4OWSOLR41vmouMkgml+zdpnp4TX/i3ti3rDCNqksZZiByWg4IJt6 1FY2X4WufTJ8YeCjLmpoRT5i/9s9Sja7Pvm90KWUNl9Gdw7UAugEPaATTAJc PADYqaLJIAz/rw1O1f/9rx9kj74v6VwRcqK4xJtUyH6ijsmgMmgVPtMPNwOr gaWHgaXVR+T/Ub6ocoX1HhV3cWbUW8gQ/fpLKtLj2uof3Z9//N6HHxdyI/Of M320vfjg7Ce/e6VVuXz59lBhH5/IL6l9Wl+wlmEFJqPhgGyejmy+XBI34RJz 8YUXpbTthZwP+19elGq79m0+OC25SrWKTtJeDMgmYAQ6ATrB5MDFA4Cd6pqM 9ecpMWDDOHmyAWIyZ/IhFbKfqG0ydr82HrjjsyJr5EmO/YouaflAnkRreFMr tmUvKAZSfrQsFtBKwhx2D1O1vd9FXUvMG8ZShhGYjIYDsnlKsqnKntdH9zn5 2XPF7sldffSezh8sxkt4qpBNwAh0AnSCyYGLBwA71TUZhIHf8MmT//O/3n2y my71dHIKOZGrgVRV0rm0yRDDLUJfDf9EZSboD5+0ZF9jt9O9oO5ON1+sa6+D o9bKUYGUWpXncolrmnEjFkdYWkvAUoYJmIyGA7J5WrJ5uOt9T69J34rZJI4W xb2b5R9unyx2IJuAEegE6ASTc6IuXiYR2YrEUjW/TjXIpPJkyj27ge4UlEDV TUY4ken61685nd/juP88ucd+LilMTuHOJZWQqkq69KaYoPjDGVFbS3ZE5zPG Kf/9zQuKbwrsPXv0qwFZ3EjXgEO9EY/Iq3UxMGNISsKsU3ku9/Krz2XNe++T GZXvxlKmODAZDQdk8xRl8zC+eY1Oup4fVxlyB5U5bAPusS5Zmz/6Ip8svTQg m4AR6AToBJNzci5eZKG7haN1Oljnzk9quq8139J2W6yMsxvpTkFpVN1kEOYf PRcjN/7282+Wd75jOYsUI4XFE0klZVy6Ruy9TISfRcgn+rKizGO6lW9Fwlvb 0bhuhkyWMsbAZDQckE0WaiubrwqVb22HnyV0h1UOX0fzDdgO7+qXMQSyCRiB TmABOqGJYXXxUkGH1WorjtXqWND0ahJeW4tAp81bmw54ETKxNad9sLu9vbVA Z/f5cZdPq7UJeyfXUHui9KvUw50SUpHgGiEYKXcmEmhQC5NB+LUnRG+Tevmr 9d2XusOD5BApQJcnp5d3XaAHTEbDAdk0CZBNwAh0gkmATtCD1cVLeNpbGLFq znwlfHaxRN90sDYdcCMiHrt2e9sH15RuXsLBuXjtZbl4p32nHF5b4Y21ljUR CXSokckg/Ps3W7QV+E+fef7bb1Zv+575t797+uIV+ZB/kD/Jl+QQXZKcWEVV CThgMhoOyKZJgGwCRqATTAJ0gh7Ms3grVku3pU+iW3T5OqWvLRaLzbWmV4Vn 3G612az22ZN3OlIr45RPZ7E5SFP6qG9s8puvyMU73TsV8dm7y56IBHrUzmQQ vH+I//SalzYHxh9SmJxSLSUJaGAyGg7IpkmAbAJGoBNMAnSCHmWvxVtxcAvO un0NEAgYsbYK/qjVJU3Zxbyim2dx0p6p5OI17BRYapx7P3DxqkpNTQbh9cHh +N2n4hareh9SgBQjhauiHoEamIyGA7JpEiCbgBHoBJMAnaBH2S4eP0nU0unR dyFikXy1EQHhOhH18rdE4WA+BWVqyzXtHB93urxciGNmzTOb/9vp2tLJXBLb WlmYnXbmmV7wrqjzWKZ8DsHBU7psmaCTd/5aB6n7F1y8Tnuq0DjvwqxQ/5rm 7bLfqbxlsRXvAt/02YWVYDGHMpMI+ryz09NSYxT+dSaVSCRisVgitmblplnb rSsR0jq6acVaBfQpajLevHlTub7aPzy6s/HHX7k2fja+9Jf/wufvIv8gf5Iv ySFSoPKrAD3IS4TJaDggm2YAsgnYgU4wA9AJBlTu4nl1XLzUiuBYqRa/qbzC hK2Vj/nsbpXK9Tk9s1Z6CWCfIjdKastzvlPjAoNOH1UqM3uer9S6oPahUk4L f5bdJzZLnMUbdDoGVdV3Tq/IbqCUO5VO8jjOa5zROejV9vMSC47zrRontNqm V8RCXpvW4yihVaAIxibjyZMnh4fVH6nbyx6RT9WrBXqQl0he5fHx8UmqYlAh kE0zANkE7EAnmAHoBANq5+LRiSUVbozqFMGlkvkuGmd2j0vuTIJeXtfS2m3p s0jrA1u6HWIqSyE9ZotlRWv6amuWd+KsCxFZe2QNaG1vp53NdteWNH9Wyp3y Z4z3SbW3dnb39Vmo2rtVZ23JXbfWzs7Odqp54mOBi1drjE1GOBxOp0veDhXU G+Ql7uzsvH379iRVMagQyKYZgGwCdqATzAB0ggG1c/GymUwikUiJZFIe3gEx cvFa+5zk4JpTnOHqJI5XJjjNOzSWad5Ly6wIk28tfY4FafptzSV83+7iPbYi OyCICTDbpQ0OaJez1e7iXcNMYs0m7HjXcn62rDvNszYutLG1byEotd1l479v HXTR5V2DUmqbcY+U/nPLN2vJPxeLOP2YKQRqphKpTEbwCtttW6lMioIcb4DV k/WKscl4+fLl8+d1tN8NKA/yEuPx+I8//niSqhhUCGTTDEA2ATvQCWYAOsGA Grp4JZwiulT8BJa4eu48v+lARFhZxi+m8/HJXlq67cqN5zJr/OwevyddyssX 1UuPGVvopMvL2+OJyAunfIKT1625o16xO5XVoJpNE6NGpRMzQafo37kiysqy mdiWevEhfQtIt1JVjE3G27dvnzx5srenu0UOqH/29/fJS3zz5s1J6mFQOZDN pgeyCUoCOqHpgU4wpr5cvE4Hd0ScWRPWxyl2MUjY+Xkti5afFeNW9nXaPIWy 3k5jF08ooOHiCe2hWRC8zdkt3dkwg4eT8PK31u1YUZ+Y8Fi5Ez3CirwVYcqP DlJloMJ9H4A2xiaD8Pr16/X19VpE+IMTgIvqT6VSiPpoOCCbzQ1kE5QKdEJz A51QlPpy8QR/RHTxbHzyEUWBiI138VoJhf8JkD+ESS9hyk8oXEagppZ/JOwW 0WLz6CbANHg4kQWr1HQVYtuFGxeratdIFWMEXLyaUNRkEJLJJFE7+/v7p63/ QGns7e0Rc//dd9/9+c9/Phn1C6oIZLOJgWyCMoBOaGKgE1hoSBdPnJgzpt3B T/lxpWXbIkjEPHyyFCEoVKM9NGvOPoUXVtLD8dqZ2i6m9xSq6vaWttUBXLya wGIyfvzxx3Q6TazG8+fPyT8ODw+rkpkZ1ALyasgLIq+JvCxuPJDYC0T1NyKQ zSYDsgkqBDqhyYBOKJWGdPGkJJl93uBWcE0bYZGasAl4S4tDK6WmmMzEJjXL yD/yCR6jM6jrdBkFagq3Zhn3bum3PSVVxV9utrT3AxevJrCYjHcFq/GnP/0p Ho/v7OwQRbQO6hjygshrIi/r+++//+GHH2AvGhTIZvMB2QSVAJ3QfEAnlESD unhCOpROlvDFyAK/LULreZfymJT8hF7WZ5CrRIwRNdrzncXFa7cuFG96ftJQ yMDCLS1kBelWagKjyeAgyoeoIGI7TnvoCxSBvCMYi0YHstmUQDZB2UAnNCXQ Cew0pouX3ZoVdlXodmg5eSnZzgDUDgvyBXSpaWF/unYr7UAJl2s9r5j3C4rX 7dS8btE7zdchbghh1wr1TMUSsjQuW7PiCj2Hunxqbdzu1HpzYkaaUiM8gREl mQyaH0G9UnWlCk4FyGbzUfUfCTAV0AnNR9V/JM1Ng7p40jYKeUfMMu1ZS2Ty jlEqEfG5xrtbpe0VOMQFdITBcddaMBhc8dgsovPUKU+dQu+L12mf9UYSqVRi y+WQKnH4jG7b+OGIGVcIFtv0WqRQKJOKBL3jg90tqlV+HmpD8z777Foklslv gBfxTvNunOaEoNAG4uTZfPkbSJFzttY84w5nEBvjlUvZJgMAUFMgmwAAGugE YHLKdvGEtCFG8YoKDFw8u+DB8R6dysVTFMgT80oelxbylXcZagNxVUmfYnaM dvE0UG/Gx3ynPF6HYdu7x+UzbzFnX6tBcYtDK4Yz4dG7CRu7Ww7kwGQAUJ9A NgEANNAJwOSU7eIFp7l4Q82d6bSRkkMqPYzM7Pl2zrWRz+K1T/MTTilnYcat tW9aNgGViczaz6udn+7zNk9Q7cVkfNM2hdfT2j24oJE1hXfxzju9HuegvP5O u2uN+U6Npjgjvtnz3Sqvs7XbNq3tNK+5HJZ25b22W6wLa7oRo6mthT71Fdot s/qJYoAxMBkA1CeQTQAADXQCMDllu3j1RCYWCa6t5FkLRhJFohAzka3gWj4P ZzASY/N0MqmtQvXBrQhjhKPPwRrFmknEglzbSZtixSfXUvlbXSMva20tGCt2 qxyJGClcuEL+FDh3FQGTAUB9AtkEANBAJwCT0xQuXr2REbK4lBDFChoCmAwA 6hPIJgCABjoBmBy4eJUTWfGtRaTZsYjXIYRR2hm2dACNBEwGAPUJZBMAQAOd AEwOXLxKSfE7MrR2dvedP2+hltedd+GRNhswGQDUJ5BNAAANdAIwOXDxKiS1 4mjRwmL3YGuC5gMmA4D6BLIJAKCBTgAmBy5e5WQSW96FaYfd7hgft9vs49Mu Om4TNBMwGQDUJ5BNAAANdAIwOXDxAGAHJgOA+gSyCQCggU4AJgcuHgDsVGIy svENj9vj8bj9oRT/TXTVLf8GVB08dpMA2Ww48NhBTYFOaDjw2KsLXDwA2KnA ZGRHO/h1mm02v/Ibq19eOOedHLGN6GKz2jzRXKXCXzK5aDhPKnd84pdWw9iY kh47aGAgm5BNAGigE6ATTA5cPADYqcRkTHbxmqprZFXxjc2rGJ7KjghqTQ+b P1Op8Jd8B/6O07p0+Y0p6bGDBgayCdkEgAY6ATrB5MDFA4CdikYF9XXXyGpW UXje2tvT29tfoEc0H13cN729vbbVk1fbudUevrV1YDJYG1PSYwcNDGQTsgkA DXQCdILJgYsHADuVmIypHkFT8QNZkjYz1nuhSe7Mno1TDbjIhSbrR9MyN6b8 xw4aC8gmZBMAGugE6ASTAxcPAHYqWb69Mdqj0FR+G6+8Rg31nnBil1+/VDYV j6cynEk5zkT9nvmZmZmpqSmPP6y/BiAXD2943PmSMzPzbu9qNKVxgVz+vjOZ bDbssXGttbpDmUwqnuKJkytnNS5ynE2FVv35+kk7puZXwzpRFsdZUkOGD9E/ jm74+abPeMIpZbVlNKbsxw4aC8gmZBMAGugE6ASTAxcPAHYqMxmcpupwx4/l 33QZqy7RZOgVy4WmuAIbuZx/tL9FQYd1Q3VianWmS1kuT1tX//xqVBp9zK5q FlOeZZOtg45veKy9GosT2npHVQYsx43adY2Gcilvb5vylIGZjXeVNabsxw4a C8gmizhANoF5gE5gEUPohCYGLh4A7FRiMrKrowpNFXcPcN8YDPe9YzAZ2Y1R QV1KirONVr89U7SqPo67pYMdPQPWgf7eLrr4ZEgozqalO/iw+TxCmIpwqKur q4Oqu2NUHmwhhWGIheRNb5mqoDGVPHbQWEA2i4oDZBOYCuiEomIIndDcwMUD gJ3KTMZIQVP1h4RBN17Vd9iME0WVYDIK1U16+bG3uH9SUL4dHuoaqyO86h2Y D1HV5ML+md78Mmd6VO04H2uRy+WOj1N+rv0tNm/8+DgnQY4fH1O1zBT0fu+U ZyMr3mnU2yu0Tx5RLy2mzrdyYDKcKbQ9F5/q58cV26yeshtTyWMHjQVkE7IJ AA10AnSCyYGLBwA7lZiMdxl/b0dbR/+MOEBHtGtXW1tX/5Tx6FQpo4L9ihXJ UmQ7laxY+FJmR4oiXqXo8u14OKxRIjzF2wXZqJ1kMvqnNmTlhRxc5AT1Kmv2 xpT92EFjAdmEbAJAA50AnWBy4OIBwE5FJqNc2E2GWn/mpEOS3g2JWataOmxT 7lA8w5L6K6tVVVFymVQ0tOH3euanbNwQZZemyegYVd2ccKhLfajMxoAmBrIJ 2QSABjoBOsHkwMUDgJ26NxlK/alzKD6qjJJv6+kdmJz3RjO6Cb1K0tKpkHfU 2tuhWo6tazI07IKBNYHJAEogm5BNAGigE6ATTA5cPADYaRaT8S6f1sszKV+0 zdNjm9fUwqxa+jg6IlvAnTdGttGp+cleI5NhMCoIkwEYgGxCNgGggU6ATjA5 cPEAYKeJTAZPLr8bjndq1NpDZU3usHlLugpdSgwqaeu1+UNxKaTkONQLkwFq BmQTsgkADXQCdILJgYsHADvNZzJo4v5J3m4YrpgeVW/bIxXi8yS39c4oI0iO N3pqYDKMGgPMBGQTsgkADXQCdILJgYsHADunYjKEnWu6VnXi7ks1GaH50UlP WKum3GgHr6U1TAa/YU1L1+iqxql8BUJarQHluGJo3tpSRZPB0hhgJiCbkE0A aKAToBNMDlw8ANg5KZNxHPZ7Pd4Cfu9kv6DH3dxXXo/HE6KyapVkMo6j8y28 th2Y8W6ksrwdOs6lvFMDwqFJjbG27KoYsz/i3uD2u8lm4n731Iw3ypfJibud dox6w9nC1jfxkMfaIy0iqIrJYGoMMBOQTcgmADTQCdAJJgcuHgDsnJTJyIxo 5baisVH75pRmMlL+fkXlymu1zUe1xx9XVYm9RPsgaPVjr61Du0wxk6EahzQ0 GUyNASYCsllMHCCbwFxAJxQTQ+iEJgcuHgDsnNio4PxAEZsxGZL0omAX2mbC SlUvxcDLrMlx2D9v7dVQuV29I6tx3TzM797lvKP9qpPaem0e6pyse6RXUaB/ ZD4uRLD0TNJbpvJ2oa1/XnVVo312mBsDzAJkE7IJAA10AnSCyYGLBwA7pxLb X0Ny2VQ8Gg5Huf9lcyxbqhKDkyXlQ3nISTob8+T4MqQEY61lwtIYYAIgm3kg mwAIQCfkgU4wMXDxAGCn2UwGAM0CZBMAQAOdAEwOXDwA2IHJAKA+gWwCAGig E4DJgYsHADswGQDUJ5BNAAANdAIwOXDxAGAHJgOA+gSyCQCggU4AJgcuHgDs wGQAUJ9ANgEANNAJwOTAxQOAHZgMAOoTyCYAgAY6AZgcuHgAsAOTAUB9AtkE ANBAJwCTAxcPAHZgMgCoTyCbAAAa6ARgcrYAAAAAAAAAAAAAAAAAAAAAAHXJ ac8lAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA4H+3BwckAAAAAIL+v+5HqAAA AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAAPwFTnCS+w== "], {{0, 266}, {1185, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> "RGB", Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{592.5, Automatic}, ImageSizeRaw->{1185, 266}, PlotRange->{{0, 1185}, {0, 266}}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.779663212590137*^9, 3.779663235442687*^9}, { 3.7796632696416063`*^9, 3.7796632866107073`*^9}, {3.779663329074708*^9, 3.779663379679907*^9}, 3.7796634145365143`*^9, 3.779663468148789*^9, { 3.7796636659749928`*^9, 3.779663700049197*^9}}, CellLabel->"Out[1]=", CellID->833429214] }, Open ]], Cell[TextData[{ "Force ", Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], " to use ", Cell[BoxData["\"\\""], "InlineFormula", FontFamily->"Source Sans Pro"], " granularity:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.779661299349042*^9, 3.7796613115861473`*^9}, { 3.779662214236022*^9, 3.779662224140347*^9}}, CellID->269965046], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"FromISOTimestamp", "[", RowBox[{"#", ",", "\"\\""}], "]"}], "&"}], "/@", "times"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7796634714572678`*^9, 3.779663501148692*^9}}, CellLabel->"In[2]:=", CellID->891385385], Cell[BoxData[ RowBox[{"{", RowBox[{ TemplateBox[{ RowBox[{ RowBox[{"\"12:34:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"12", ",", "34", ",", "0"}], "}"}], ",", "\"Instant\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable->False], ",", TemplateBox[{ RowBox[{ RowBox[{"\"12:34:56\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"12", ",", "34", ",", "56"}], "}"}], ",", "\"Instant\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable->False], ",", TemplateBox[{ RowBox[{ RowBox[{"\"12:34:56\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"12", ",", "34", ",", "56.78899999999703`"}], "}"}], ",", "\"Instant\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable->False]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7796634789346647`*^9, 3.779663501563348*^9}}, CellLabel->"Out[2]=", CellID->715046958] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"#", "[", "\"\\"", "]"}], "&"}], "/@", "%"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7796635061569767`*^9, 3.779663510328957*^9}}, CellLabel->"In[3]:=", CellID->703078657], Cell[BoxData[ RowBox[{"{", RowBox[{"\<\"Instant\"\>", ",", "\<\"Instant\"\>", ",", "\<\"Instant\"\>"}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{3.779663510561678*^9}, CellLabel->"Out[3]=", CellID->632786188] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107571], Cell[TextData[{ "\"Implied\" leading components are not supported by ", Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.779658627523094*^9, 3.7796586464736843`*^9}, 3.779663707871255*^9, {3.859285666696446*^9, 3.85928567023059*^9}}, CellID->827356785], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", "\"\<--04-05\>\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7796586716483793`*^9, 3.7796586736807823`*^9}}, CellLabel->"In[1]:=", CellID->651599892], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["Failure", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ FrameBox[ StyleBox["\"\[WarningSign]\"", Directive["Message", 35], StripOnInput -> False], ContentPadding -> False, FrameStyle -> None, FrameMargins -> {{0, 0}, {0, 0}}, StripOnInput -> False], GridBox[{{ TagBox[ GridBox[{{ TagBox["\"Message: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"The string \ \\\"\\!\\(\\*TagBox[\\\"\\\\\\\"--04-05\\\\\\\"\\\", Function[Short[Slot[1], \ 5]]]\\)\\\" is not a valid ISO 8601 date/time string.\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[ GridBox[{{ TagBox["\"Tag: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"ParseFailure\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[ GridBox[{{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"--04-05\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ FrameBox[ StyleBox["\"\[WarningSign]\"", Directive["Message", 35], StripOnInput -> False], ContentPadding -> False, FrameStyle -> None, FrameMargins -> {{0, 0}, {0, 0}}, StripOnInput -> False], GridBox[{{ TagBox[ GridBox[{{ TagBox["\"Message: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"The string \ \\\"\\!\\(\\*TagBox[\\\"\\\\\\\"--04-05\\\\\\\"\\\", Function[Short[Slot[1], \ 5]]]\\)\\\" is not a valid ISO 8601 date/time string.\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[ GridBox[{{ TagBox["\"Tag: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"ParseFailure\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[ GridBox[{{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"--04-05\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], Failure[ "ParseFailure", <| "MessageTemplate" :> MessageName[$CellContext`FromISOTimestamp, "invstr"], "MessageParameters" -> {"--04-05"}, "Input" -> "--04-05"|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.779658674079113*^9}, CellLabel->"Out[1]=", CellID->109851228] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107572], Cell["\<\ ISO 8601 treats year 1 BCE as year 0 (and year 2 BCE as year 1, etc.), so \ negative year values in ISO 8601 timestamps and DateObjects will differ in \ appearance, although they represent the same dates:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.779658858869381*^9, 3.7796588825259113`*^9}, { 3.77965894231122*^9, 3.779658964447884*^9}, {3.779659000976746*^9, 3.7796590184068604`*^9}, {3.7796591860087137`*^9, 3.779659204922167*^9}, { 3.779660315505587*^9, 3.779660337694351*^9}}, CellID->252869887], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", "\"\<-0043-03-15\>\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779659023145124*^9, 3.7796590263423986`*^9}, { 3.779659154240273*^9, 3.779659164570463*^9}}, CellLabel->"In[1]:=", CellID->712087668], Cell[BoxData[ TemplateBox[{ RowBox[{ StyleBox["\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Fri 15 Mar -44\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "44"}], ",", "3", ",", "15"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{{3.779659160891404*^9, 3.779659164853964*^9}, 3.779660339562585*^9}, CellLabel->"Out[1]=", CellID->787635419] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107573], Cell[TextData[{ Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["DateObject", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/DateObject", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " and ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["TimeObject", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/TimeObject", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " do not support special handling of the leap second, so timestamps \ including leap seconds will roll over to the next \"0\" second:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.7796586913691607`*^9, 3.779658697165144*^9}, { 3.779658746545533*^9, 3.7796587839095993`*^9}, {3.779660496491123*^9, 3.779660499006921*^9}, {3.859285699349332*^9, 3.859285701645362*^9}}, CellID->731246493], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", RowBox[{ RowBox[{"{", RowBox[{"\"\<23:59:60\>\"", ",", "\"\<00:00:00\>\""}], "}"}], ",", RowBox[{"TimeZone", "\[Rule]", "\"\\""}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779658788409547*^9, 3.779658834309084*^9}}, CellLabel->"In[1]:=", CellID->671562127], Cell[BoxData[ RowBox[{"{", RowBox[{ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"00:00:00\"", StyleBox["\"UTC\"", FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", "\"Second\"", ",", "\"UTC\""}], "]"}]}, "TimeObject", Editable->False], ",", TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"00:00:00\"", StyleBox["\"UTC\"", FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", "\"Second\"", ",", "\"UTC\""}], "]"}]}, "TimeObject", Editable->False]}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7796588073208933`*^9, 3.779658834555501*^9}}, CellLabel->"Out[1]=", CellID->111061111] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"SameQ", "@@", "%"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7796588093138866`*^9, 3.779658813961803*^9}}, CellLabel->"In[2]:=", CellID->432693358], Cell[BoxData["True"], "Output", TaggingRules->{}, CellChangeTimes->{{3.7796588144141827`*^9, 3.779658835575876*^9}}, CellLabel->"Out[2]=", CellID->738293886] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107574], Cell[TextData[{ "Certain \"basic format\" ISO timestamps which can be alternatively parsed \ as either dates or times are always parsed to dates by ", Cell[BoxData["FromISOTimestamp"], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.779660365279113*^9, 3.779660408599551*^9}, { 3.779660442105136*^9, 3.779660503937828*^9}, {3.859285691629757*^9, 3.8592856955982428`*^9}}, CellID->958634028], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", "\"\<171239\>\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779660461386366*^9, 3.779660462961131*^9}, { 3.779660506219472*^9, 3.7796605525906677`*^9}}, CellLabel->"In[1]:=", CellID->218190456], Cell[BoxData[ TemplateBox[{ RowBox[{ StyleBox[ "\"Month: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Mar 1715\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1715", ",", "3"}], "}"}], ",", "\"Month\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7796605140240097`*^9, 3.779660552993247*^9}}, CellLabel->"Out[1]=", CellID->607706096] }, Open ]], Cell["Use \[OpenCurlyDoubleQuote]extended format\[CloseCurlyDoubleQuote] \ timestamps to eliminate ambiguity:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7796605199726*^9, 3.779660535045084*^9}}, CellID->717018711], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", "\"\<17:12:39\>\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779660541462207*^9, 3.779660542973043*^9}}, CellLabel->"In[2]:=", CellID->642590188], Cell[BoxData[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"17:12:39\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"17", ",", "12", ",", "39"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.779660543798245*^9}, CellLabel->"Out[2]=", CellID->987395954] }, Open ]], Cell["\<\ Alternatively, prefix \"basic format\" timestamps with the \"T\" character:\ \>", "Text", TaggingRules->{}, CellChangeTimes->{{3.779660545505691*^9, 3.779660580840899*^9}, { 3.859285710766912*^9, 3.859285720492725*^9}}, CellID->660268209], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", "\"\\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{3.779660586106049*^9}, CellLabel->"In[3]:=", CellID->625430079], Cell[BoxData[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"17:12:39\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"17", ",", "12", ",", "39"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.7796605866904*^9}, CellLabel->"Out[3]=", CellID->946926824] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107575], Cell["\"Alternative format\" duration strings are not supported:", "Text", TaggingRules->{}, CellChangeTimes->{{3.779660676499947*^9, 3.779660685314972*^9}, { 3.859285723012383*^9, 3.859285725509178*^9}}, CellID->737277314], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", "\"\\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779660686268292*^9, 3.77966070186336*^9}}, CellLabel->"In[1]:=", CellID->646353610], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["Failure", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ FrameBox[ StyleBox["\"\[WarningSign]\"", Directive["Message", 35], StripOnInput -> False], ContentPadding -> False, FrameStyle -> None, FrameMargins -> {{0, 0}, {0, 0}}, StripOnInput -> False], GridBox[{{ TagBox[ GridBox[{{ TagBox["\"Message: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"The string \ \\\"\\!\\(\\*TagBox[\\\"\\\\\\\"P0003-06-04T12:30:05\\\\\\\"\\\", \ Function[Short[Slot[1], 5]]]\\)\\\" is not a valid ISO 8601 duration \ string.\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[ GridBox[{{ TagBox["\"Tag: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"ParseFailure\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[ GridBox[{{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"P0003-06-04T12:30:05\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ FrameBox[ StyleBox["\"\[WarningSign]\"", Directive["Message", 35], StripOnInput -> False], ContentPadding -> False, FrameStyle -> None, FrameMargins -> {{0, 0}, {0, 0}}, StripOnInput -> False], GridBox[{{ TagBox[ GridBox[{{ TagBox["\"Message: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"The string \ \\\"\\!\\(\\*TagBox[\\\"\\\\\\\"P0003-06-04T12:30:05\\\\\\\"\\\", \ Function[Short[Slot[1], 5]]]\\)\\\" is not a valid ISO 8601 duration \ string.\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[ GridBox[{{ TagBox["\"Tag: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"ParseFailure\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[ GridBox[{{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"P0003-06-04T12:30:05\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], Failure[ "ParseFailure", <| "MessageTemplate" :> MessageName[$CellContext`FromISOTimestamp, "invdur"], "MessageParameters" -> {"P0003-06-04T12:30:05"}, "Input" -> "P0003-06-04T12:30:05"|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.7796607022832527`*^9}, CellLabel->"Out[1]=", CellID->337402130] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ InterpretationBox[Cell["\t", "ExampleDelimiter"], $Line = 0; Null]], "ExampleDelimiter", TaggingRules->{}, CellID->14107576], Cell["Date/time intervals are not supported:", "Text", TaggingRules->{}, CellChangeTimes->{{3.7796607291403923`*^9, 3.779660733750505*^9}, { 3.779660773394853*^9, 3.779660777040852*^9}}, CellID->85757921], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"FromISOTimestamp", "[", "\"\<2007-03-01T13:00:00Z/2008-05-11T15:30:00Z\>\"", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.779660734415843*^9, 3.779660743985187*^9}}, CellLabel->"In[1]:=", CellID->104224597], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["Failure", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ FrameBox[ StyleBox["\"\[WarningSign]\"", Directive["Message", 35], StripOnInput -> False], ContentPadding -> False, FrameStyle -> None, FrameMargins -> {{0, 0}, {0, 0}}, StripOnInput -> False], GridBox[{{ TagBox[ GridBox[{{ TagBox["\"Message: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"The string \ \\\"\\!\\(\\*TagBox[\\\"\\\\\\\"2007-03-01T13:00:00Z/2008-05-11T15:30:00Z\\\\\ \\\"\\\", Function[Short[Slot[1], 5]]]\\)\\\" is not a valid ISO 8601 \ date/time string.\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[ GridBox[{{ TagBox["\"Tag: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"ParseFailure\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[ GridBox[{{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"2007-03-01T13:00:00Z/2008-05-11T15:30:00Z\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ FrameBox[ StyleBox["\"\[WarningSign]\"", Directive["Message", 35], StripOnInput -> False], ContentPadding -> False, FrameStyle -> None, FrameMargins -> {{0, 0}, {0, 0}}, StripOnInput -> False], GridBox[{{ TagBox[ GridBox[{{ TagBox["\"Message: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"The string \ \\\"\\!\\(\\*TagBox[\\\"\\\\\\\"2007-03-01T13:00:00Z/2008-05-11T15:30:00Z\\\\\ \\\"\\\", Function[Short[Slot[1], 5]]]\\)\\\" is not a valid ISO 8601 \ date/time string.\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[ GridBox[{{ TagBox["\"Tag: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"ParseFailure\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}, { TagBox[ GridBox[{{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ "\"2007-03-01T13:00:00Z/2008-05-11T15:30:00Z\"", "SummaryItem"]}}, GridBoxItemSize -> {"Columns" -> {6.5, All}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, GridBoxSpacings -> {"Columns" -> {{0}}}], "SummaryItem"]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], Failure[ "ParseFailure", <| "MessageTemplate" :> MessageName[$CellContext`FromISOTimestamp, "invstr"], "MessageParameters" -> {"2007-03-01T13:00:00Z/2008-05-11T15:30:00Z"}, "Input" -> "2007-03-01T13:00:00Z/2008-05-11T15:30:00Z"|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", TaggingRules->{}, CellChangeTimes->{3.779660744441969*^9}, CellLabel->"Out[1]=", CellID->906766681] }, Open ]], Cell[TextData[{ "Create an ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Interval", "SymbolsRefLink", ShowStringCharacters->True, FontFamily->"Source Sans Pro"], BaseStyle->Dynamic[ FEPrivate`If[ CurrentValue["MouseOver"], { "Link", FontColor -> RGBColor[0.854902, 0.396078, 0.145098]}, { "Link"}]], ButtonData->"paclet:ref/Interval", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], " representing a date/time interval from a string in ISO 8601 \"start/end\" \ format by splitting at the \"/\" character:" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.779660747635785*^9, 3.77966082555811*^9}, 3.779660856175721*^9, {3.779663757909211*^9, 3.7796637582380857`*^9}, { 3.859285731133685*^9, 3.859285739613103*^9}}, CellID->108565382], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Interval", "@", RowBox[{"FromISOTimestamp", "@", RowBox[{"StringSplit", "[", RowBox[{ "\"\<2007-03-01T13:00:00Z/2008-05-11T15:30:00Z\>\"", ",", "\"\\""}], "]"}]}]}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.7796608282329206`*^9, 3.779660849777925*^9}}, CellLabel->"In[2]:=", CellID->892763539], Cell[BoxData[ RowBox[{"Interval", "[", RowBox[{"{", RowBox[{ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Thu 1 Mar 2007 13:00:00\"", StyleBox["\"GMT\"", FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"2007", ",", "3", ",", "1", ",", "13", ",", "0", ",", "0"}], "}"}], ",", "\"Second\"", ",", "\"Gregorian\"", ",", "0.`"}], "]"}]}, "DateObject", Editable->False], ",", TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Sun 11 May 2008 15:30:00\"", StyleBox["\"GMT\"", FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"2008", ",", "5", ",", "11", ",", "15", ",", "30", ",", "0"}], "}"}], ",", "\"Second\"", ",", "\"Gregorian\"", ",", "0.`"}], "]"}]}, "DateObject", Editable->False]}], "}"}], "]"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.7796608331862783`*^9, 3.77966085009079*^9}}, CellLabel->"Out[2]=", CellID->735402886] }, Open ]] }, Open ]] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell["Source & Additional Information", "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Source & Additional Information"}, CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116], Cell[CellGroupData[{ Cell[TextData[{ "Contributed By", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Contributed By", Cell[ BoxData[ FrameBox[ Cell[ "Enter the name of the person, people or organization that should be \ publicly credited with contributing this function.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoContributedBy"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Contributed By"}, DefaultNewCellStyle->"Text", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell["Jesse Friedman", "Text", CellID->567543531] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Keywords", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Keywords", Cell[ BoxData[ FrameBox[ Cell[ "List relevant terms (e.g. functional areas, algorithm names, related \ concepts) that should be used to include the function in search results.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoKeywords"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Keywords"}, DefaultNewCellStyle->"Item", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425], Cell["date", "Item", CellID->231125018], Cell["time", "Item", CellID->302672188], Cell["timestamp", "Item", CellID->695315937], Cell["parse", "Item", CellID->969240954], Cell["ISO", "Item", CellID->542255894], Cell["8601", "Item", CellID->520579079], Cell["timezone", "Item", CellID->88934290], Cell["time zone", "Item", CellID->320661369] }, Open ]], Cell[CellGroupData[{ Cell["Categories", "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Categories"}, DefaultNewCellStyle->"Item", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[BoxData[ TagBox[GridBox[{ { TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cloud & Deployment"}], "\" \"", "\"Cloud & Deployment\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ "Data Manipulation & Analysis", { False, "Data Manipulation & Analysis"}], "\" \"", "\"Data Manipulation & Analysis\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "External Interfaces & Connections"}], "\" \"", "\"External Interfaces & Connections\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geographic Data & Computation"}], "\" \"", "\"Geographic Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Graphs & Networks"}], "\" \"", "\"Graphs & Networks\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Images"}], "\" \"", "\"Images\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Knowledge Representation & Natural Language"}], "\" \"", "\"Knowledge Representation & Natural Language\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Notebook Documents & Presentation"}], "\" \"", "\"Notebook Documents & Presentation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Repository Tools"}], "\" \"", "\"Repository Tools\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Social, Cultural & Linguistic Data"}], "\" \"", "\"Social, Cultural & Linguistic Data\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Strings & Text"}], "\" \"", "\"Strings & Text\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "System Operation & Setup"}], "\" \"", "\"System Operation & Setup\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "User Interface Construction"}], "\" \"", "\"User Interface Construction\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Wolfram Physics Project"}], "\" \"", "\"Wolfram Physics Project\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Core Language & Structure"}], "\" \"", "\"Core Language & Structure\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Engineering Data & Computation"}], "\" \"", "\"Engineering Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Financial Data & Computation"}], "\" \"", "\"Financial Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Geometry"}], "\" \"", "\"Geometry\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Higher Mathematical Computation"}], "\" \"", "\"Higher Mathematical Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Just For Fun"}], "\" \"", "\"Just For Fun\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Machine Learning"}], "\" \"", "\"Machine Learning\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Programming Utilities"}], "\" \"", "\"Programming Utilities\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ False, {False, "Scientific and Medical Data & Computation"}], "\" \"", "\"Scientific and Medical Data & Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Sound & Video"}], "\" \"", "\"Sound & Video\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Symbolic & Numeric Computation"}], "\" \"", "\"Symbolic & Numeric Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[ "Time-Related Computation", {False, "Time-Related Computation"}], "\" \"", "\"Time-Related Computation\""}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Visualization & Graphics"}], "\" \"", "\"Visualization & Graphics\""}, "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, TaggingRules->{ "CheckboxData" -> "OEM6eJxVT81Kw0AQBrGaiHj24CEnb3mIkFooKJVMX2CbfNXF/\ WNn5rBv70ZR9DTDfL8zND1tSIoDXR1UkkpP1+M75g8s5wu+\ fLYs9LA1YroXE2xSZ8TG0D12QzCusGW6P1qPfkJFsHRj9NXki1Sd9wLP3A4q0dfb3FPzmmNClkI3Yx\ W8xWzBNfOQVgn/ZK5zUgdunhYr5lS3zc44xi/QbuHwF1mLR6c+/A+\ 82wdBThnfpagdQiE9MeqntxM4ap5xLAnU7DTMK+cTnuRg4w=="}, CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->270468172] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Related Symbols", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Related Symbols", Cell[ BoxData[ FrameBox[ Cell[ "List up to twenty documented, system-level Wolfram Language symbols \ related to the function.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoRelatedSymbols"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Related Symbols"}, DefaultNewCellStyle->"Item", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169], Cell["DateObject", "Item", CellID->566904740], Cell["TimeObject", "Item", CellID->630379512], Cell["DateString", "Item", CellID->271793251] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Related Resource Objects", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Related Resource Objects", Cell[ BoxData[ FrameBox[ Cell[ "List the names of published resource objects from any Wolfram \ repository that are related to this function.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoRelatedResourceObjects"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Related Resource Objects"}, DefaultNewCellStyle->"Item", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472], Cell["Resource Name (resources from any Wolfram repository)", "Item", 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->873143661] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Source/Reference Citation", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Source/Reference Citation", Cell[ BoxData[ FrameBox[ Cell[ "Give a bibliographic-style citation for the original source of the \ function and/or its components (e.g. a published paper, algorithm, or code \ repository).", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoSourceReferenceCitation"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Source/Reference Citation"}, DefaultNewCellStyle->"Text", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], Cell["\<\ International Organization for Standardization, \"Data elements and \ interchange formats\[LongDash]Information \ interchange\[LongDash]Representation of dates and times.\" ISO 8601:1988(E), \ June, 1988.\ \>", "Text", CellID->783171781] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Links", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Links", Cell[ BoxData[ FrameBox[ Cell[ "List additional URLs or hyperlinks for external information related \ to the function.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoLinks"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Links"}, DefaultNewCellStyle->"Item", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], Cell[TextData[ButtonBox["Wikipedia\[Dash]ISO 8601", BaseStyle->"Hyperlink", ButtonData->{ URL["https://en.wikipedia.org/wiki/ISO_8601"], None}, ButtonNote->"https://en.wikipedia.org/wiki/ISO_8601"]], "Item", CellID->23878155], Cell[TextData[ButtonBox["Date and Time on the Internet: \ Timestamps\[Dash]Network Working Group", BaseStyle->"Hyperlink", ButtonData->{ URL["https://tools.ietf.org/html/rfc3339"], None}, ButtonNote->"https://tools.ietf.org/html/rfc3339"]], "Item", CellID->768142286] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Tests", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"VerificationTests", Cell[ BoxData[ FrameBox[ Cell[ TextData[{ "Specify an optional list of tests for verifying that the function \ is working properly in any environment. Tests can be specified as \ Input/Output cell pairs or as symbolic ", Cell[ BoxData[ StyleBox[ TagBox[ ButtonBox[ StyleBox[ "VerificationTest", "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/VerificationTest", ContentPadding -> False], MouseAppearanceTag["LinkHand"]], ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"]]], " expressions for including additional options."}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoVerificationTests"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "VerificationTests"}, DefaultNewCellStyle->"Input", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell["These are based on Annex B of ISO 8601:2000(E).", "Text", CellChangeTimes->{{3.779651070105867*^9, 3.779651080078289*^9}, 3.779651219366246*^9, {3.779664732245091*^9, 3.779664733879127*^9}}, CellID->896371680], Cell[CellGroupData[{ Cell["Dates", "Subsubsection", CellChangeTimes->{{3.7796492535938683`*^9, 3.779649254590865*^9}, { 3.77965050643342*^9, 3.779650506875141*^9}, 3.779651218372529*^9}, CellLabel->"In[1]:=", CellID->424498660], Cell["Calendar date:", "Text", CellChangeTimes->{{3.779649392259447*^9, 3.779649397999856*^9}}, CellID->685405470], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<19850412\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779651473052249*^9, 3.7796515113020372`*^9}}, CellLabel->"In[1]:=", CellID->404158921], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"19850412\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Fri 12 Apr 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Fri 12 Apr 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.014637`4.315967070663919", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 63, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["19850412"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 4, 12}, "Day", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 4, 12}, "Day", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.014637`4.315967070663919, "Seconds"], "CPUTimeUsed" -> Quantity[0.006746999999997172, "Seconds"], "MemoryUsed" -> Quantity[232, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.77965155965936*^9, 3.779651668597991*^9, 3.7796528346050777`*^9, 3.779664862252883*^9, 3.779667631325293*^9}, CellLabel->"Out[1]=", CellID->274707360] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<1985-04-12\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{3.779651570420095*^9}, CellLabel->"In[2]:=", CellID->342302634], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"1985-04-12\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Fri 12 Apr 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Fri 12 Apr 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.003221`3.6585057226516833", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 64, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985-04-12"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 4, 12}, "Day", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 4, 12}, "Day", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.003221`3.6585057226516833, "Seconds"], "CPUTimeUsed" -> Quantity[0.0030269999999887887`, "Seconds"], "MemoryUsed" -> Quantity[296, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779651668779674*^9, 3.779652834733927*^9, 3.779664862335808*^9, 3.779667631469739*^9}, CellLabel->"Out[2]=", CellID->111405672] }, Open ]], Cell["Ordinal date:", "Text", CellChangeTimes->{{3.779649401382498*^9, 3.7796494031138697`*^9}}, CellID->366613245], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<1985102\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779651570420095*^9, 3.779651580380533*^9}}, CellLabel->"In[3]:=", CellID->243605427], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"1985102\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Fri 12 Apr 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Fri 12 Apr 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002158`3.4845664381788835", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 65, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985102"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 4, 12}, "Day", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 4, 12}, "Day", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002158`3.4845664381788835, "Seconds"], "CPUTimeUsed" -> Quantity[0.0021089999999901465`, "Seconds"], "MemoryUsed" -> Quantity[232, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779651668868272*^9, 3.779652834857257*^9, 3.7796648624400797`*^9, 3.77966763155025*^9}, CellLabel->"Out[3]=", CellID->724339315] }, Open ]], Cell["Week date:", "Text", CellChangeTimes->{{3.779649406630479*^9, 3.779649434971835*^9}}, CellID->512904443], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<1985W155\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779651570420095*^9, 3.7796515912854757`*^9}}, CellLabel->"In[4]:=", CellID->155880285], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"1985W155\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Fri 12 Apr 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Fri 12 Apr 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.009071`4.108170164775483", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 66, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985W155"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 4, 12}, "Day", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 4, 12}, "Day", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.009071`4.108170164775483, "Seconds"], "CPUTimeUsed" -> Quantity[0.005393999999995458, "Seconds"], "MemoryUsed" -> Quantity[232, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779651668953466*^9, 3.779652834977766*^9, 3.779664862532816*^9, 3.779667631634748*^9}, CellLabel->"Out[4]=", CellID->177766040] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<1985-W15-5\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779651570420095*^9, 3.779651597421776*^9}}, CellLabel->"In[5]:=", CellID->452630924], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"1985-W15-5\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Fri 12 Apr 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Fri 12 Apr 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.0025849999999999999`3.562975545261953", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 67, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985-W15-5"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 4, 12}, "Day", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 4, 12}, "Day", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.0025849999999999999`3.562975545261953, "Seconds"], "CPUTimeUsed" -> Quantity[0.002517999999994913, "Seconds"], "MemoryUsed" -> Quantity[232, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779651669057479*^9, 3.7796528351121597`*^9, 3.7796648626302423`*^9, 3.779667631713044*^9}, CellLabel->"Out[5]=", CellID->71038173] }, Open ]], Cell["Calendar week:", "Text", CellChangeTimes->{{3.77964944107892*^9, 3.77964944305881*^9}}, CellID->230793326], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<1985W15\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "8"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779651570420095*^9, 3.779651621412397*^9}}, CellLabel->"In[6]:=", CellID->359049414], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"1985W15\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Week beginning: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Mon 8 Apr 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "8"}], "}"}], ",", "\"Week\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Week beginning: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Mon 8 Apr 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "8"}], "}"}], ",", "\"Week\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.004753`3.8274828121267483", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 68, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985W15"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 4, 8}, "Week", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 4, 8}, "Week", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.004753`3.8274828121267483, "Seconds"], "CPUTimeUsed" -> Quantity[0.003854000000004021, "Seconds"], "MemoryUsed" -> Quantity[232, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7796516691424417`*^9, 3.77965283524037*^9, 3.779664862728161*^9, 3.779667631798767*^9}, CellLabel->"Out[6]=", CellID->678770065] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<1985-W15\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "8"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779651570420095*^9, 3.779651629329616*^9}}, CellLabel->"In[7]:=", CellID->945957456], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"1985-W15\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Week beginning: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Mon 8 Apr 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "8"}], "}"}], ",", "\"Week\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Week beginning: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Mon 8 Apr 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "8"}], "}"}], ",", "\"Week\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.003019`3.6303781108550917", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 69, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985-W15"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 4, 8}, "Week", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 4, 8}, "Week", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.003019`3.6303781108550917, "Seconds"], "CPUTimeUsed" -> Quantity[0.0029360000000053788`, "Seconds"], "MemoryUsed" -> Quantity[232, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779651669227194*^9, 3.779652835361947*^9, 3.779664862823107*^9, 3.779667631881401*^9}, CellLabel->"Out[7]=", CellID->745098557] }, Open ]], Cell["Calendar month:", "Text", CellChangeTimes->{{3.779649550074315*^9, 3.7796495522577877`*^9}}, CellID->765689285], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<1985-04\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779651570420095*^9, 3.7796516496090183`*^9}}, CellLabel->"In[8]:=", CellID->378665178], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"1985-04\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Month: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Apr 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4"}], "}"}], ",", "\"Month\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Month: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Apr 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4"}], "}"}], ",", "\"Month\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002027`3.4573687465250003", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 70, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985-04"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 4}, "Month", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 4}, "Month", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002027`3.4573687465250003, "Seconds"], "CPUTimeUsed" -> Quantity[0.001984999999997683, "Seconds"], "MemoryUsed" -> Quantity[224, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779651669316235*^9, 3.779652835519966*^9, 3.7796648629190397`*^9, 3.7796676319654818`*^9}, CellLabel->"Out[8]=", CellID->473372575] }, Open ]], Cell["Calendar year:", "Text", CellChangeTimes->{{3.779649550074315*^9, 3.7796495522577877`*^9}, { 3.77965017245168*^9, 3.779650172955676*^9}}, CellID->719641120], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<1985\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", "1985", "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779651570420095*^9, 3.779651662329919*^9}}, CellLabel->"In[9]:=", CellID->950880085], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"1985\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Year: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", "1985", "}"}], ",", "\"Year\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Year: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", "1985", "}"}], ",", "\"Year\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002167`3.48637390915181", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 71, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985}, "Year", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985}, "Year", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002167`3.48637390915181, "Seconds"], "CPUTimeUsed" -> Quantity[0.002131000000005656, "Seconds"], "MemoryUsed" -> Quantity[216, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7796516694052343`*^9, 3.779652836196313*^9, 3.779664863057*^9, 3.779667632044333*^9}, CellLabel->"Out[9]=", CellID->806669276] }, Open ]], Cell["Calendar date:", "Text", CellChangeTimes->{{3.779650243998769*^9, 3.779650247051778*^9}, 3.7796505457132597`*^9}, CellID->685405471], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<+0119850412\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"11985", ",", "4", ",", "12"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796517328946447`*^9, 3.7796517420453157`*^9}}, CellLabel->"In[10]:=", CellID->126846642], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"+0119850412\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Fri 12 Apr 11985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"11985", ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Fri 12 Apr 11985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"11985", ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002247`3.5021180702511203", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 72, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["+0119850412"]], "ExpectedOutput" -> HoldForm[ DateObject[{11985, 4, 12}, "Day", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{11985, 4, 12}, "Day", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002247`3.5021180702511203, "Seconds"], "CPUTimeUsed" -> Quantity[0.00217999999999563, "Seconds"], "MemoryUsed" -> Quantity[232, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779651804093377*^9, 3.77965283640386*^9, 3.77966486315653*^9, 3.7796676321302233`*^9}, CellLabel->"Out[10]=", CellID->295055476] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<+011985-04-12\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"11985", ",", "4", ",", "12"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{3.77965176382966*^9}, CellLabel->"In[11]:=", CellID->55568484], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{ "FromISOTimestamp", "[", "\"+011985-04-12\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Fri 12 Apr 11985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"11985", ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Fri 12 Apr 11985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"11985", ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002282`3.5088306379141874", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 73, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["+011985-04-12"]], "ExpectedOutput" -> HoldForm[ DateObject[{11985, 4, 12}, "Day", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{11985, 4, 12}, "Day", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002282`3.5088306379141874, "Seconds"], "CPUTimeUsed" -> Quantity[0.0022140000000021587`, "Seconds"], "MemoryUsed" -> Quantity[232, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779651804276898*^9, 3.779652836559381*^9, 3.779654779085498*^9, 3.779664863265091*^9, 3.779667632270665*^9}, CellLabel->"Out[11]=", CellID->459537700] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<-0000020412\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "3"}], ",", "4", ",", "12"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779651782204073*^9, 3.7796517896053333`*^9}, { 3.779654776714218*^9, 3.7796547767932243`*^9}}, CellLabel->"In[12]:=", CellID->151540560], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"-0000020412\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Sun 12 Apr -3\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "3"}], ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Sun 12 Apr -3\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "3"}], ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.003611`3.7081424862588164", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 74, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["-0000020412"]], "ExpectedOutput" -> HoldForm[ DateObject[{-3, 4, 12}, "Day", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{-3, 4, 12}, "Day", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.003611`3.7081424862588164, "Seconds"], "CPUTimeUsed" -> Quantity[0.003467000000000553, "Seconds"], "MemoryUsed" -> Quantity[216, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779651804366489*^9, 3.779652836773554*^9, 3.7796547770719633`*^9, 3.779664863365218*^9, 3.7796676323757963`*^9}, CellLabel->"Out[12]=", CellID->815752927] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<-0002-04-12\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "3"}], ",", "4", ",", "12"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779651782204073*^9, 3.779651800331388*^9}, { 3.779654775379829*^9, 3.779654775941144*^9}}, CellLabel->"In[13]:=", CellID->436718228], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"-0002-04-12\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Sun 12 Apr -3\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "3"}], ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Sun 12 Apr -3\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "3"}], ",", "4", ",", "12"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002065`3.465435053824412", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 75, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["-0002-04-12"]], "ExpectedOutput" -> HoldForm[ DateObject[{-3, 4, 12}, "Day", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{-3, 4, 12}, "Day", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002065`3.465435053824412, "Seconds"], "CPUTimeUsed" -> Quantity[0.002040999999998405, "Seconds"], "MemoryUsed" -> Quantity[216, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{ 3.7796518044828367`*^9, 3.7796528369079447`*^9, {3.779654763752658*^9, 3.7796547781514387`*^9}, 3.779664863505637*^9, 3.779667632458748*^9}, CellLabel->"Out[13]=", CellID->433861487] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Time of day", "Subsubsection", CellChangeTimes->{{3.77965054882898*^9, 3.7796505521916733`*^9}, { 3.779651209906723*^9, 3.779651212310403*^9}}, CellLabel->"In[14]:=", CellID->388539239], Cell["Local time of day:", "Text", CellChangeTimes->{{3.779650559433228*^9, 3.779650565554727*^9}, { 3.779651810226698*^9, 3.779651810649987*^9}}, CellID->517278672], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779651813841271*^9, 3.779651825311523*^9}, { 3.779652164680901*^9, 3.779652166039713*^9}}, CellLabel->"In[1]:=", CellID->347439000], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"T152746\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002393`3.5294576964454274", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 76, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["T152746"]], "ExpectedOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", -4.]], "ActualOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002393`3.5294576964454274, "Seconds"], "CPUTimeUsed" -> Quantity[0.0023529999999993834`, "Seconds"], "MemoryUsed" -> Quantity[208, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{{3.779652159968513*^9, 3.77965219568777*^9}, 3.779652837073588*^9, 3.7796648636673326`*^9, 3.77966763255866*^9}, CellLabel->"Out[1]=", CellID->699609952] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<15:27:46\>\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{ 3.7796518327068567`*^9, {3.779652168087914*^9, 3.7796521688333178`*^9}}, CellLabel->"In[2]:=", CellID->334053352], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"15:27:46\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.001925`3.434945731676513", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 77, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["15:27:46"]], "ExpectedOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", -4.]], "ActualOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.001925`3.434945731676513, "Seconds"], "CPUTimeUsed" -> Quantity[0.001941000000002191, "Seconds"], "MemoryUsed" -> Quantity[208, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652195852281*^9, 3.7796528372193127`*^9, 3.779664863770605*^9, 3.779667632627496*^9}, CellLabel->"Out[2]=", CellID->224117106] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "28"}], "}"}], ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796518327068567`*^9, 3.779651858211528*^9}, { 3.7796521728368998`*^9, 3.7796521737019587`*^9}}, CellLabel->"In[3]:=", CellID->419367841], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"T1528\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Minute: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:28\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "28"}], "}"}], ",", "\"Minute\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Minute: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:28\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "28"}], "}"}], ",", "\"Minute\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.001989`3.4491497809564273", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 78, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["T1528"]], "ExpectedOutput" -> HoldForm[ TimeObject[{15, 28}, "Minute", -4.]], "ActualOutput" -> HoldForm[ TimeObject[{15, 28}, "Minute", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.001989`3.4491497809564273, "Seconds"], "CPUTimeUsed" -> Quantity[0.0019439999999946167`, "Seconds"], "MemoryUsed" -> Quantity[264, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7796521959416447`*^9, 3.779652837624782*^9, 3.779664863893282*^9, 3.779667632714822*^9}, CellLabel->"Out[3]=", CellID->58246765] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<15:28\>\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "28"}], "}"}], ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{3.7796521815419273`*^9}, CellLabel->"In[4]:=", CellID->745756171], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"15:28\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Minute: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:28\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "28"}], "}"}], ",", "\"Minute\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Minute: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:28\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "28"}], "}"}], ",", "\"Minute\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002317`3.5154410316219673", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 79, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["15:28"]], "ExpectedOutput" -> HoldForm[ TimeObject[{15, 28}, "Minute", -4.]], "ActualOutput" -> HoldForm[ TimeObject[{15, 28}, "Minute", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002317`3.5154410316219673, "Seconds"], "CPUTimeUsed" -> Quantity[0.0022630000000063433`, "Seconds"], "MemoryUsed" -> Quantity[200, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7796521960394917`*^9, 3.779652837796297*^9, 3.7796648639928207`*^9, 3.7796676328238487`*^9}, CellLabel->"Out[4]=", CellID->734873366] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<15\>\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "28"}], "}"}], ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796521815419273`*^9, 3.779652188948687*^9}}, CellLabel->"In[5]:=", CellID->742880936], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"15\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Hour: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"3 pm\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", "15", "}"}], ",", "\"Hour\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Hour: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"3 pm\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", "15", "}"}], ",", "\"Hour\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.00343`3.6858091178747645", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 80, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["15"]], "ExpectedOutput" -> HoldForm[ TimeObject[{15}, "Hour", -4.]], "ActualOutput" -> HoldForm[ TimeObject[{15}, "Hour", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.00343`3.6858091178747645, "Seconds"], "CPUTimeUsed" -> Quantity[0.0032659999999964384`, "Seconds"], "MemoryUsed" -> Quantity[192, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652196138516*^9, 3.77965283791705*^9, 3.779664864157715*^9, 3.7796676329092484`*^9}, CellLabel->"Out[5]=", CellID->142600171] }, Open ]], Cell["Local time with decimal fractions:", "Text", CellChangeTimes->{{3.779650695284379*^9, 3.779650698800446*^9}, 3.779650800356127*^9}, CellID->568984181], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<152735.5\>\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "35.5"}], "}"}], ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779652220100605*^9, 3.7796522308431396`*^9}}, CellLabel->"In[6]:=", CellID->193011743], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"152735.5\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ RowBox[{"\"15:27:35\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "35.5`"}], "}"}], ",", "\"Instant\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ RowBox[{"\"15:27:35\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "35.5`"}], "}"}], ",", "\"Instant\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002462`3.5418030464272916", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 81, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["152735.5"]], "ExpectedOutput" -> HoldForm[ TimeObject[{15, 27, 35.5}, "Instant", -4.]], "ActualOutput" -> HoldForm[ TimeObject[{15, 27, 35.5}, "Instant", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002462`3.5418030464272916, "Seconds"], "CPUTimeUsed" -> Quantity[0.002346000000002846, "Seconds"], "MemoryUsed" -> Quantity[224, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7796522315961123`*^9, 3.779652838044591*^9, 3.779664864324129*^9, 3.7796676329940453`*^9}, CellLabel->"Out[6]=", CellID->428812341] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<15:27:35.5\>\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "35.5"}], "}"}], ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{3.779652241773348*^9}, CellLabel->"In[7]:=", CellID->325240450], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"15:27:35.5\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ RowBox[{"\"15:27:35\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "35.5`"}], "}"}], ",", "\"Instant\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ RowBox[{"\"15:27:35\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "35.5`"}], "}"}], ",", "\"Instant\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.003493`3.6937135834696364", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 82, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["15:27:35.5"]], "ExpectedOutput" -> HoldForm[ TimeObject[{15, 27, 35.5}, "Instant", -4.]], "ActualOutput" -> HoldForm[ TimeObject[{15, 27, 35.5}, "Instant", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.003493`3.6937135834696364, "Seconds"], "CPUTimeUsed" -> Quantity[0.0030679999999989604`, "Seconds"], "MemoryUsed" -> Quantity[224, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.77965224229287*^9, 3.77965283817896*^9, 3.77966486457975*^9, 3.7796676330780783`*^9}, CellLabel->"Out[7]=", CellID->782573776] }, Open ]], Cell["Midnight:", "Text", CellChangeTimes->{{3.779650837640987*^9, 3.7796508391589622`*^9}}, CellID->488582756], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779652251015609*^9, 3.77965225432261*^9}, { 3.779652312807303*^9, 3.779652317465026*^9}}, CellLabel->"In[8]:=", CellID->646877386], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"T000000\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"00:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"00:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.00215`3.4829534577475973", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 83, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["T000000"]], "ExpectedOutput" -> HoldForm[ TimeObject[{0, 0, 0}, "Second", -4.]], "ActualOutput" -> HoldForm[ TimeObject[{0, 0, 0}, "Second", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.00215`3.4829534577475973, "Seconds"], "CPUTimeUsed" -> Quantity[0.0020899999999954844`, "Seconds"], "MemoryUsed" -> Quantity[208, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{{3.779652317927341*^9, 3.779652343924128*^9}, 3.7796528382830133`*^9, 3.7796648648212757`*^9, 3.779667633162559*^9}, CellLabel->"Out[8]=", CellID->738218848] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<00:00:00\>\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779652325299328*^9, 3.77965232704392*^9}}, CellLabel->"In[9]:=", CellID->995303634], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"00:00:00\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"00:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"00:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002149`3.4827514133234354", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 84, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["00:00:00"]], "ExpectedOutput" -> HoldForm[ TimeObject[{0, 0, 0}, "Second", -4.]], "ActualOutput" -> HoldForm[ TimeObject[{0, 0, 0}, "Second", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002149`3.4827514133234354, "Seconds"], "CPUTimeUsed" -> Quantity[0.0020990000000011833`, "Seconds"], "MemoryUsed" -> Quantity[208, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652344090066*^9, 3.779652838378256*^9, 3.77966486493082*^9, 3.779667633284099*^9}, CellLabel->"Out[9]=", CellID->821108129] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{3.779652335280614*^9}, CellLabel->"In[10]:=", CellID->934970347], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"T240000\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"00:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"00:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002119`3.476645954542789", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 85, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["T240000"]], "ExpectedOutput" -> HoldForm[ TimeObject[{0, 0, 0}, "Second", -4.]], "ActualOutput" -> HoldForm[ TimeObject[{0, 0, 0}, "Second", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002119`3.476645954542789, "Seconds"], "CPUTimeUsed" -> Quantity[0.0020740000000003533`, "Seconds"], "MemoryUsed" -> Quantity[208, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7796523442054234`*^9, 3.779652838482212*^9, 3.779664865085741*^9, 3.7796676333601313`*^9}, CellLabel->"Out[10]=", CellID->418245009] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<24:00:00\>\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{3.779652340198407*^9}, CellLabel->"In[11]:=", CellID->718261524], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"24:00:00\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"00:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"00:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"0", ",", "0", ",", "0"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002159`3.48476764016622", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 86, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["24:00:00"]], "ExpectedOutput" -> HoldForm[ TimeObject[{0, 0, 0}, "Second", -4.]], "ActualOutput" -> HoldForm[ TimeObject[{0, 0, 0}, "Second", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002159`3.48476764016622, "Seconds"], "CPUTimeUsed" -> Quantity[0.0021149999999963143`, "Seconds"], "MemoryUsed" -> Quantity[208, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7796523443032084`*^9, 3.779652838607622*^9, 3.779664865335956*^9, 3.7796676334291162`*^9}, CellLabel->"Out[11]=", CellID->348620911] }, Open ]], Cell["UTC:", "Text", CellChangeTimes->{{3.77965088726297*^9, 3.7796508889076853`*^9}}, CellID->131955105], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"23", ",", "20", ",", "30"}], "}"}], ",", "\"\\"", ",", "0."}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796523546515827`*^9, 3.779652369785741*^9}}, CellLabel->"In[12]:=", CellID->655251242], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"T232030Z\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"23:20:30\"", StyleBox["\"GMT\"", FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"23", ",", "20", ",", "30"}], "}"}], ",", "\"Second\"", ",", "0.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"23:20:30\"", StyleBox["\"GMT\"", FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"23", ",", "20", ",", "30"}], "}"}], ",", "\"Second\"", ",", "0.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002313`3.5146906306026136", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 87, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["T232030Z"]], "ExpectedOutput" -> HoldForm[ TimeObject[{23, 20, 30}, "Second", 0.]], "ActualOutput" -> HoldForm[ TimeObject[{23, 20, 30}, "Second", 0.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002313`3.5146906306026136, "Seconds"], "CPUTimeUsed" -> Quantity[0.002299000000000717, "Seconds"], "MemoryUsed" -> Quantity[192, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652424482685*^9, 3.779652838741536*^9, 3.779664865440545*^9, 3.779667633508548*^9}, CellLabel->"Out[12]=", CellID->762031425] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<23:20:30Z\>\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"23", ",", "20", ",", "30"}], "}"}], ",", "\"\\"", ",", "0."}], "]"}]}], "]"}]], "Input", CellChangeTimes->{3.779652379288295*^9}, CellLabel->"In[13]:=", CellID->425138670], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"23:20:30Z\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"23:20:30\"", StyleBox["\"GMT\"", FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"23", ",", "20", ",", "30"}], "}"}], ",", "\"Second\"", ",", "0.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"23:20:30\"", StyleBox["\"GMT\"", FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"23", ",", "20", ",", "30"}], "}"}], ",", "\"Second\"", ",", "0.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002285`3.509401202237863", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 88, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["23:20:30Z"]], "ExpectedOutput" -> HoldForm[ TimeObject[{23, 20, 30}, "Second", 0.]], "ActualOutput" -> HoldForm[ TimeObject[{23, 20, 30}, "Second", 0.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002285`3.509401202237863, "Seconds"], "CPUTimeUsed" -> Quantity[0.0022440000000045757`, "Seconds"], "MemoryUsed" -> Quantity[192, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652424668401*^9, 3.779652838888475*^9, 3.7796648655772047`*^9, 3.77966763358842*^9}, CellLabel->"Out[13]=", CellID->780553253] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<2320Z\>\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"23", ",", "20"}], "}"}], ",", "\"\\"", ",", "0."}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796523546515827`*^9, 3.779652406893738*^9}}, CellLabel->"In[14]:=", CellID->571269475], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"2320Z\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Minute: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"23:20\"", StyleBox["\"GMT\"", FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"23", ",", "20"}], "}"}], ",", "\"Minute\"", ",", "0.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Minute: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"23:20\"", StyleBox["\"GMT\"", FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"23", ",", "20"}], "}"}], ",", "\"Minute\"", ",", "0.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002155`3.4839622723287444", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 89, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["2320Z"]], "ExpectedOutput" -> HoldForm[ TimeObject[{23, 20}, "Minute", 0.]], "ActualOutput" -> HoldForm[ TimeObject[{23, 20}, "Minute", 0.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002155`3.4839622723287444, "Seconds"], "CPUTimeUsed" -> Quantity[0.0020810000000039963`, "Seconds"], "MemoryUsed" -> Quantity[184, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652424833909*^9, 3.7796528389887457`*^9, 3.779664865709886*^9, 3.7796676336644497`*^9}, CellLabel->"Out[14]=", CellID->153368917] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<23:20Z\>\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"23", ",", "20"}], "}"}], ",", "\"\\"", ",", "0."}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779652379288295*^9, 3.7796524082086897`*^9}}, CellLabel->"In[15]:=", CellID->254235309], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"23:20Z\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Minute: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"23:20\"", StyleBox["\"GMT\"", FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"23", ",", "20"}], "}"}], ",", "\"Minute\"", ",", "0.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Minute: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"23:20\"", StyleBox["\"GMT\"", FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"23", ",", "20"}], "}"}], ",", "\"Minute\"", ",", "0.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002343`3.5202872864289567", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 90, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["23:20Z"]], "ExpectedOutput" -> HoldForm[ TimeObject[{23, 20}, "Minute", 0.]], "ActualOutput" -> HoldForm[ TimeObject[{23, 20}, "Minute", 0.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002343`3.5202872864289567, "Seconds"], "CPUTimeUsed" -> Quantity[0.002260000000006812, "Seconds"], "MemoryUsed" -> Quantity[248, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652424931971*^9, 3.7796528390915527`*^9, 3.779664865920081*^9, 3.779667633749835*^9}, CellLabel->"Out[15]=", CellID->454532287] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<23Z\>\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", "23", "}"}], ",", "\"\\"", ",", "0."}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779652379288295*^9, 3.7796524188822737`*^9}}, CellLabel->"In[16]:=", CellID->711455005], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"23Z\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Hour: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"11 pm\"", StyleBox["\"GMT\"", FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", "23", "}"}], ",", "\"Hour\"", ",", "0.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Hour: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"11 pm\"", StyleBox["\"GMT\"", FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", "23", "}"}], ",", "\"Hour\"", ",", "0.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.003581`3.704519318843893", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 91, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["23Z"]], "ExpectedOutput" -> HoldForm[ TimeObject[{23}, "Hour", 0.]], "ActualOutput" -> HoldForm[ TimeObject[{23}, "Hour", 0.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.003581`3.704519318843893, "Seconds"], "CPUTimeUsed" -> Quantity[0.0034500000000008413`, "Seconds"], "MemoryUsed" -> Quantity[176, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7796524250981827`*^9, 3.779652839189509*^9, 3.779664866047545*^9, 3.779667633824239*^9}, CellLabel->"Out[16]=", CellID->376527310] }, Open ]], Cell["UTC offset:", "Text", CellChangeTimes->{{3.779651061799428*^9, 3.7796510892828913`*^9}}, CellID->637871162], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"\\"", ",", "1."}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796524562201138`*^9, 3.779652460844082*^9}}, CellLabel->"In[17]:=", CellID->214851337], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{ "FromISOTimestamp", "[", "\"T152746+0100\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT+\"", "\[InvisibleSpace]", StyleBox[ "1.`", NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", "1.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT+\"", "\[InvisibleSpace]", StyleBox[ "1.`", NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", "1.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.003926`3.7444652930959794", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 92, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["T152746+0100"]], "ExpectedOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", 1.]], "ActualOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", 1.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.003926`3.7444652930959794, "Seconds"], "CPUTimeUsed" -> Quantity[0.0031079999999903407`, "Seconds"], "MemoryUsed" -> Quantity[192, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652540218231*^9, 3.779652839299766*^9, 3.7796648661606483`*^9, 3.779667633894849*^9}, CellLabel->"Out[17]=", CellID->671155659] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<15:27:46+01:00\>\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"\\"", ",", "1."}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796524562201138`*^9, 3.779652479448881*^9}}, CellLabel->"In[18]:=", CellID->358111396], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{ "FromISOTimestamp", "[", "\"15:27:46+01:00\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT+\"", "\[InvisibleSpace]", StyleBox[ "1.`", NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", "1.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT+\"", "\[InvisibleSpace]", StyleBox[ "1.`", NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", "1.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.003134`3.646613989964563", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 93, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["15:27:46+01:00"]], "ExpectedOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", 1.]], "ActualOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", 1.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.003134`3.646613989964563, "Seconds"], "CPUTimeUsed" -> Quantity[0.003039000000001124, "Seconds"], "MemoryUsed" -> Quantity[192, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7796525403857613`*^9, 3.779652839407008*^9, 3.779664866420363*^9, 3.779667633976108*^9}, CellLabel->"Out[18]=", CellID->281753123] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"\\"", ",", "1."}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796524562201138`*^9, 3.7796524832549667`*^9}}, CellLabel->"In[19]:=", CellID->885532502], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"T152746+01\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT+\"", "\[InvisibleSpace]", StyleBox[ "1.`", NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", "1.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT+\"", "\[InvisibleSpace]", StyleBox[ "1.`", NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", "1.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002702`3.582200342518004", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 94, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["T152746+01"]], "ExpectedOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", 1.]], "ActualOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", 1.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002702`3.582200342518004, "Seconds"], "CPUTimeUsed" -> Quantity[0.0026839999999950237`, "Seconds"], "MemoryUsed" -> Quantity[192, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.77965254051782*^9, 3.779652839532011*^9, 3.7796648665740757`*^9, 3.779667634051979*^9}, CellLabel->"Out[19]=", CellID->524100985] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<15:27:46+01\>\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"\\"", ",", "1."}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796524562201138`*^9, 3.779652487137491*^9}}, CellLabel->"In[20]:=", CellID->47501919], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"15:27:46+01\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT+\"", "\[InvisibleSpace]", StyleBox[ "1.`", NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", "1.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT+\"", "\[InvisibleSpace]", StyleBox[ "1.`", NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", "1.`"}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.003034`3.632530574282703", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 95, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["15:27:46+01"]], "ExpectedOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", 1.]], "ActualOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", 1.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.003034`3.632530574282703, "Seconds"], "CPUTimeUsed" -> Quantity[0.0029579999999924667`, "Seconds"], "MemoryUsed" -> Quantity[192, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652540618074*^9, 3.779652839642454*^9, 3.779664866764534*^9, 3.779667634126486*^9}, CellLabel->"Out[20]=", CellID->79105371] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"\\"", ",", RowBox[{"-", "5."}]}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796524562201138`*^9, 3.7796525093858433`*^9}}, CellLabel->"In[21]:=", CellID->78787671], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{ "FromISOTimestamp", "[", "\"T152746-0500\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "5.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "5.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "5.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "5.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.00466`3.8189009145219917", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 96, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["T152746-0500"]], "ExpectedOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", -5.]], "ActualOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", -5.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.00466`3.8189009145219917, "Seconds"], "CPUTimeUsed" -> Quantity[0.004415000000001612, "Seconds"], "MemoryUsed" -> Quantity[208, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652540717724*^9, 3.779652839754312*^9, 3.779664866872986*^9, 3.77966763420438*^9}, CellLabel->"Out[21]=", CellID->41746163] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<15:27:46-05:00\>\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"\\"", ",", RowBox[{"-", "5."}]}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796524562201138`*^9, 3.779652522612143*^9}}, CellLabel->"In[22]:=", CellID->519058627], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{ "FromISOTimestamp", "[", "\"15:27:46-05:00\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "5.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "5.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "5.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "5.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002684`3.579297509328946", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 97, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["15:27:46-05:00"]], "ExpectedOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", -5.]], "ActualOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", -5.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002684`3.579297509328946, "Seconds"], "CPUTimeUsed" -> Quantity[0.0026620000000008304`, "Seconds"], "MemoryUsed" -> Quantity[208, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652540818132*^9, 3.7796528399397783`*^9, 3.779664867045693*^9, 3.779667634323868*^9}, CellLabel->"Out[22]=", CellID->980637653] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"\\"", ",", RowBox[{"-", "5."}]}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796524562201138`*^9, 3.779652530611463*^9}}, CellLabel->"In[23]:=", CellID->925687430], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"T152746-05\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "5.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "5.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "5.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "5.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002656`3.5747430685279715", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 98, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["T152746-05"]], "ExpectedOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", -5.]], "ActualOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", -5.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002656`3.5747430685279715, "Seconds"], "CPUTimeUsed" -> Quantity[0.0025979999999918846`, "Seconds"], "MemoryUsed" -> Quantity[272, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7796525409166307`*^9, 3.779652840064705*^9, 3.779664867251882*^9, 3.779667634411333*^9}, CellLabel->"Out[23]=", CellID->683447799] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<15:27:46-05\>\"", "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"\\"", ",", RowBox[{"-", "5."}]}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796524562201138`*^9, 3.7796525341416693`*^9}}, CellLabel->"In[24]:=", CellID->783548925], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"15:27:46-05\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "5.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "5.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"15:27:46\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "5.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"15", ",", "27", ",", "46"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "5.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002799`3.5975178962981524", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 99, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["15:27:46-05"]], "ExpectedOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", -5.]], "ActualOutput" -> HoldForm[ TimeObject[{15, 27, 46}, "Second", -5.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002799`3.5975178962981524, "Seconds"], "CPUTimeUsed" -> Quantity[0.002729000000002202, "Seconds"], "MemoryUsed" -> Quantity[208, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7796525411183157`*^9, 3.779652840215103*^9, 3.779664867495729*^9, 3.779667634483081*^9}, CellLabel->"Out[24]=", CellID->137407385] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Combinations of date and time of day", "Subsubsection", CellChangeTimes->{{3.779651199090866*^9, 3.779651206049611*^9}}, CellLabel->"In[25]:=", CellID->122759479], Cell["Combinations of calendar date and local time of day:", "Text", CellChangeTimes->{{3.7796512503934383`*^9, 3.7796512573693*^9}}, CellID->757667888], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<19850412T101530\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12", ",", "10", ",", "15", ",", "30"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796525540867023`*^9, 3.779652560527014*^9}}, CellLabel->"In[1]:=", CellID->360092489], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{ "FromISOTimestamp", "[", "\"19850412T101530\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"Fri 12 \"", "\[Ellipsis]", "\"10:15:30\""}], StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"Fri 12 \"", "\[Ellipsis]", "\"10:15:30\""}], StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002193`3.4915536295095126", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 100, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["19850412T101530"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 4, 12, 10, 15, 30}, "Second", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 4, 12, 10, 15, 30}, "Second", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002193`3.4915536295095126, "Seconds"], "CPUTimeUsed" -> Quantity[0.002138999999999669, "Seconds"], "MemoryUsed" -> Quantity[256, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7796526431323977`*^9, 3.779652840397353*^9, 3.7796648676070833`*^9, 3.779667634605256*^9}, CellLabel->"Out[1]=", CellID->957368024] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<1985-04-12T10:15:30\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12", ",", "10", ",", "15", ",", "30"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796525540867023`*^9, 3.779652568233629*^9}}, CellLabel->"In[2]:=", CellID->660869668], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{ "FromISOTimestamp", "[", "\"1985-04-12T10:15:30\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"Fri 12 \"", "\[Ellipsis]", "\"10:15:30\""}], StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"Fri 12 \"", "\[Ellipsis]", "\"10:15:30\""}], StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.001948`3.4401039503745885", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 101, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985-04-12T10:15:30"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 4, 12, 10, 15, 30}, "Second", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 4, 12, 10, 15, 30}, "Second", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.001948`3.4401039503745885, "Seconds"], "CPUTimeUsed" -> Quantity[0.0019429999999971415`, "Seconds"], "MemoryUsed" -> Quantity[256, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652643295045*^9, 3.779652840557006*^9, 3.779664867778216*^9, 3.779667634711411*^9}, CellLabel->"Out[2]=", CellID->676696798] }, Open ]], Cell["Combinations of ordinal date and local time of day:", "Text", CellChangeTimes->{{3.7796512596494627`*^9, 3.779651267522005*^9}}, CellID->380190004], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<1985102T235030\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12", ",", "23", ",", "50", ",", "30"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796525540867023`*^9, 3.779652609342288*^9}}, CellLabel->"In[3]:=", CellID->452362241], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{ "FromISOTimestamp", "[", "\"1985102T235030\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"Fri 12 \"", "\[Ellipsis]", "\"23:50:30\""}], StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"Fri 12 \"", "\[Ellipsis]", "\"23:50:30\""}], StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002461`3.5416266115347965", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 102, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985102T235030"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 4, 12, 23, 50, 30}, "Second", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 4, 12, 23, 50, 30}, "Second", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002461`3.5416266115347965, "Seconds"], "CPUTimeUsed" -> Quantity[0.002375000000000682, "Seconds"], "MemoryUsed" -> Quantity[256, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652643382967*^9, 3.77965284067413*^9, 3.779664868070422*^9, 3.779667634812457*^9}, CellLabel->"Out[3]=", CellID->783979461] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<1985-102T23:50:30\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12", ",", "23", ",", "50", ",", "30"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796525540867023`*^9, 3.779652617879278*^9}}, CellLabel->"In[4]:=", CellID->285649669], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{ "FromISOTimestamp", "[", "\"1985-102T23:50:30\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"Fri 12 \"", "\[Ellipsis]", "\"23:50:30\""}], StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"Fri 12 \"", "\[Ellipsis]", "\"23:50:30\""}], StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.003615`3.7086232994625417", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 103, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985-102T23:50:30"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 4, 12, 23, 50, 30}, "Second", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 4, 12, 23, 50, 30}, "Second", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.003615`3.7086232994625417, "Seconds"], "CPUTimeUsed" -> Quantity[0.002904000000000906, "Seconds"], "MemoryUsed" -> Quantity[256, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652643540978*^9, 3.779652840825136*^9, 3.779664868223444*^9, 3.7796676349099083`*^9}, CellLabel->"Out[4]=", CellID->913709698] }, Open ]], Cell["Combinations of week date and local time of day:", "Text", CellChangeTimes->{{3.779651293517796*^9, 3.779651300175312*^9}}, CellID->138973699], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<1985W155T235030\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12", ",", "23", ",", "50", ",", "30"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796525540867023`*^9, 3.779652633144565*^9}}, CellLabel->"In[5]:=", CellID->476902447], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{ "FromISOTimestamp", "[", "\"1985W155T235030\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"Fri 12 \"", "\[Ellipsis]", "\"23:50:30\""}], StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"Fri 12 \"", "\[Ellipsis]", "\"23:50:30\""}], StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.003697`3.718364448405097", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 104, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985W155T235030"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 4, 12, 23, 50, 30}, "Second", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 4, 12, 23, 50, 30}, "Second", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.003697`3.718364448405097, "Seconds"], "CPUTimeUsed" -> Quantity[0.0033540000000158443`, "Seconds"], "MemoryUsed" -> Quantity[256, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652643635973*^9, 3.779652841026807*^9, 3.7796648683777313`*^9, 3.7796676349956083`*^9}, CellLabel->"Out[5]=", CellID->923233192] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\<1985-W15-5T23:50:30\>\"", "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12", ",", "23", ",", "50", ",", "30"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{3.779652637515999*^9}, CellLabel->"In[6]:=", CellID->648083304], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{ "FromISOTimestamp", "[", "\"1985-W15-5T23:50:30\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"Fri 12 \"", "\[Ellipsis]", "\"23:50:30\""}], StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"Fri 12 \"", "\[Ellipsis]", "\"23:50:30\""}], StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.003046`3.6342448968320156", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 105, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985-W15-5T23:50:30"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 4, 12, 23, 50, 30}, "Second", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 4, 12, 23, 50, 30}, "Second", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.003046`3.6342448968320156, "Seconds"], "CPUTimeUsed" -> Quantity[0.0029500000000126647`, "Seconds"], "MemoryUsed" -> Quantity[256, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652643727989*^9, 3.7796528411422987`*^9, 3.779664868621098*^9, 3.779667635075712*^9}, CellLabel->"Out[6]=", CellID->757322453] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Durations", "Subsubsection", CellChangeTimes->{{3.77965780005398*^9, 3.779657800912998*^9}}, CellLabel->"In[7]:=", CellID->878973792], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Quantity", "[", RowBox[{ RowBox[{"MixedMagnitude", "[", RowBox[{"{", RowBox[{"2", ",", "10", ",", "15", ",", "10", ",", "20", ",", "30"}], "}"}], "]"}], ",", RowBox[{"MixedUnit", "[", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}], "]"}]}], "]"}]}], "\[IndentingNewLine]", "]"}]], "Input", CellChangeTimes->{{3.779657830349702*^9, 3.779657837172606*^9}}, CellLabel->"In[1]:=", CellID->630724559], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{ "FromISOTimestamp", "[", "\"P2Y10M15DT10H20M30S\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{"2", "10", "15", "10", "20", "30", RowBox[{"\[ThinSpace]", "\"yr\""}], RowBox[{"\[ThinSpace]", "\"mo\""}], RowBox[{"\[ThinSpace]", "\"days\""}], RowBox[{"\[ThinSpace]", "\"h\""}], RowBox[{"\[ThinSpace]", "\"min\""}], RowBox[{"\[ThinSpace]", "\"s\""}], "years,months,days,hours,minutes,seconds", RowBox[{"{", RowBox[{ "\"Years\"", ",", "\"Months\"", ",", "\"Days\"", ",", "\"Hours\"", ",", "\"Minutes\"", ",", "\"Seconds\""}], "}"}]}, "QuantityMixedUnit6"], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{"2", "10", "15", "10", "20", "30", RowBox[{"\[ThinSpace]", "\"yr\""}], RowBox[{"\[ThinSpace]", "\"mo\""}], RowBox[{"\[ThinSpace]", "\"days\""}], RowBox[{"\[ThinSpace]", "\"h\""}], RowBox[{"\[ThinSpace]", "\"min\""}], RowBox[{"\[ThinSpace]", "\"s\""}], "years,months,days,hours,minutes,seconds", RowBox[{"{", RowBox[{ "\"Years\"", ",", "\"Months\"", ",", "\"Days\"", ",", "\"Hours\"", ",", "\"Minutes\"", ",", "\"Seconds\""}], "}"}]}, "QuantityMixedUnit6"], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.004228`3.7766499764673824", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 106, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["P2Y10M15DT10H20M30S"]], "ExpectedOutput" -> HoldForm[ Quantity[ MixedMagnitude[{2, 10, 15, 10, 20, 30}], MixedUnit[{ "Years", "Months", "Days", "Hours", "Minutes", "Seconds"}]]], "ActualOutput" -> HoldForm[ Quantity[ MixedMagnitude[{2, 10, 15, 10, 20, 30}], MixedUnit[{ "Years", "Months", "Days", "Hours", "Minutes", "Seconds"}]]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.004228`3.7766499764673824, "Seconds"], "CPUTimeUsed" -> Quantity[0.0031890000000061036`, "Seconds"], "MemoryUsed" -> Quantity[552, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779657838389303*^9, 3.779664868733554*^9, 3.779667635214259*^9}, CellLabel->"Out[1]=", CellID->305072664] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Quantity", "[", RowBox[{ RowBox[{"MixedMagnitude", "[", RowBox[{"{", RowBox[{"1", ",", "6"}], "}"}], "]"}], ",", RowBox[{"MixedUnit", "[", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}], "]"}]}], "]"}]}], "\[IndentingNewLine]", "]"}]], "Input", CellChangeTimes->{{3.7796582704846983`*^9, 3.779658275527937*^9}}, CellLabel->"In[2]:=", CellID->644578909], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"P1Y6M\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{"1", "6", RowBox[{"\[ThinSpace]", "\"yr\""}], RowBox[{"\[ThinSpace]", "\"mo\""}], "years,months", RowBox[{"{", RowBox[{"\"Years\"", ",", "\"Months\""}], "}"}]}, "QuantityMixedUnit2"], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{"1", "6", RowBox[{"\[ThinSpace]", "\"yr\""}], RowBox[{"\[ThinSpace]", "\"mo\""}], "years,months", RowBox[{"{", RowBox[{"\"Years\"", ",", "\"Months\""}], "}"}]}, "QuantityMixedUnit2"], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002225`3.4978450131489423", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 107, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["P1Y6M"]], "ExpectedOutput" -> HoldForm[ Quantity[ MixedMagnitude[{1, 6}], MixedUnit[{"Years", "Months"}]]], "ActualOutput" -> HoldForm[ Quantity[ MixedMagnitude[{1, 6}], MixedUnit[{"Years", "Months"}]]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002225`3.4978450131489423, "Seconds"], "CPUTimeUsed" -> Quantity[0.00219100000001049, "Seconds"], "MemoryUsed" -> Quantity[664, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779658315877719*^9, 3.779664868827367*^9, 3.779667635408762*^9}, CellLabel->"Out[2]=", CellID->643192792] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Quantity", "[", RowBox[{"72", ",", "\"\\""}], "]"}]}], "\[IndentingNewLine]", "]"}]], "Input", CellChangeTimes->{{3.7796582704846983`*^9, 3.7796582918798723`*^9}, { 3.7796677451600657`*^9, 3.779667748459345*^9}}, CellLabel->"In[2]:=", CellID->866741494], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", "\"PT72H\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{"72", "\"h\"", "hours", "\"Hours\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{"72", "\"h\"", "hours", "\"Hours\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.009487`4.127643898412672", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 123, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["PT72H"]], "ExpectedOutput" -> HoldForm[ Quantity[72, "Hours"]], "ActualOutput" -> HoldForm[ Quantity[72, "Hours"]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.009487`4.127643898412672, "Seconds"], "CPUTimeUsed" -> Quantity[0.008683000000004881, "Seconds"], "MemoryUsed" -> Quantity[88, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779658316125601*^9, 3.7796648689563007`*^9, 3.779667635540777*^9, 3.7796677498197193`*^9}, CellLabel->"Out[2]=", CellID->708149213] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"FromISOTimestamp", "[", "\"\\"", "]"}], ",", "\[IndentingNewLine]", RowBox[{"Quantity", "[", RowBox[{ RowBox[{"MixedMagnitude", "[", RowBox[{"{", RowBox[{"1", ",", "2", ",", "15", ",", "12"}], "}"}], "]"}], ",", RowBox[{"MixedUnit", "[", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}], "]"}]}], "]"}]}], "\[IndentingNewLine]", "]"}]], "Input", CellChangeTimes->{{3.779658299707556*^9, 3.7796583061232567`*^9}}, CellLabel->"In[4]:=", CellID->356282897], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{ "FromISOTimestamp", "[", "\"P1Y2M15DT12H\"", "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{"1", "2", "15", "12", RowBox[{"\[ThinSpace]", "\"yr\""}], RowBox[{"\[ThinSpace]", "\"mo\""}], RowBox[{"\[ThinSpace]", "\"days\""}], RowBox[{"\[ThinSpace]", "\"h\""}], "years,months,days,hours", RowBox[{"{", RowBox[{ "\"Years\"", ",", "\"Months\"", ",", "\"Days\"", ",", "\"Hours\""}], "}"}]}, "QuantityMixedUnit4"], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{"1", "2", "15", "12", RowBox[{"\[ThinSpace]", "\"yr\""}], RowBox[{"\[ThinSpace]", "\"mo\""}], RowBox[{"\[ThinSpace]", "\"days\""}], RowBox[{"\[ThinSpace]", "\"h\""}], "years,months,days,hours", RowBox[{"{", RowBox[{ "\"Years\"", ",", "\"Months\"", ",", "\"Days\"", ",", "\"Hours\""}], "}"}]}, "QuantityMixedUnit4"], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.001816`3.409630842017058", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 109, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["P1Y2M15DT12H"]], "ExpectedOutput" -> HoldForm[ Quantity[ MixedMagnitude[{1, 2, 15, 12}], MixedUnit[{"Years", "Months", "Days", "Hours"}]]], "ActualOutput" -> HoldForm[ Quantity[ MixedMagnitude[{1, 2, 15, 12}], MixedUnit[{"Years", "Months", "Days", "Hours"}]]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.001816`3.409630842017058, "Seconds"], "CPUTimeUsed" -> Quantity[0.0017100000000027649`, "Seconds"], "MemoryUsed" -> Quantity[520, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7796583162668877`*^9, 3.779664869125181*^9, 3.779667635662004*^9}, CellLabel->"Out[4]=", CellID->964589987] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Forced granularity", "Subsubsection", CellChangeTimes->{{3.7796516852159033`*^9, 3.779651688876787*^9}}, CellLabel->"In[5]:=", CellID->875208264], Cell["Dates:", "Text", CellChangeTimes->{{3.779652725540298*^9, 3.77965272819411*^9}}, CellID->465670750], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\<1985\>\"", ",", "\"\\""}], "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", "1985", "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796526518534117`*^9, 3.7796526624214497`*^9}}, CellLabel->"In[1]:=", CellID->19647684], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"1985\"", ",", "\"Year\""}], "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Year: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", "1985", "}"}], ",", "\"Year\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Year: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", "1985", "}"}], ",", "\"Year\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002581`3.5623030023758604", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 110, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985", "Year"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985}, "Year", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985}, "Year", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002581`3.5623030023758604, "Seconds"], "CPUTimeUsed" -> Quantity[0.002532000000002199, "Seconds"], "MemoryUsed" -> Quantity[216, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7796527201697474`*^9, 3.779652841275415*^9, 3.7796648694234133`*^9, 3.7796676358100452`*^9}, CellLabel->"Out[1]=", CellID->75236935] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\<1985\>\"", ",", "\"\\""}], "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", "1985", "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796526518534117`*^9, 3.779652683642809*^9}}, CellLabel->"In[2]:=", CellID->141100838], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"1985\"", ",", "\"Month\""}], "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Month: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Jan 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "1"}], "}"}], ",", "\"Month\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Month: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Jan 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "1"}], "}"}], ",", "\"Month\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002918`3.6156002853894247", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 111, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985", "Month"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 1}, "Month", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 1}, "Month", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002918`3.6156002853894247, "Seconds"], "CPUTimeUsed" -> Quantity[0.002821999999994773, "Seconds"], "MemoryUsed" -> Quantity[224, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652684100444*^9, 3.779652720425973*^9, 3.779652841406979*^9, 3.779664869578889*^9, 3.779667635930369*^9}, CellLabel->"Out[2]=", CellID->611370867] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\<1985\>\"", ",", "\"\\""}], "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", "1985", "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796526518534117`*^9, 3.779652689233572*^9}}, CellLabel->"In[3]:=", CellID->709571286], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"1985\"", ",", "\"Day\""}], "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Tue 1 Jan 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "1", ",", "1"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Day: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Tue 1 Jan 1985\""}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "1", ",", "1"}], "}"}], ",", "\"Day\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002566`3.559771649870901", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 112, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985", "Day"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 1, 1}, "Day", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 1, 1}, "Day", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002566`3.559771649870901, "Seconds"], "CPUTimeUsed" -> Quantity[0.002439000000009628, "Seconds"], "MemoryUsed" -> Quantity[232, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.77965272057617*^9, 3.7796528415434723`*^9, 3.779664869734145*^9, 3.7796676360116673`*^9}, CellLabel->"Out[3]=", CellID->233051186] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\<1985\>\"", ",", "\"\\""}], "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", "1985", "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796526518534117`*^9, 3.779652693039425*^9}}, CellLabel->"In[4]:=", CellID->741528469], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"1985\"", ",", "\"Hour\""}], "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Hour: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Tue 1 Jan 1985 12 am\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "1", ",", "1", ",", "0"}], "}"}], ",", "\"Hour\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Hour: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Tue 1 Jan 1985 12 am\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "1", ",", "1", ",", "0"}], "}"}], ",", "\"Hour\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002407`3.5319910881070196", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 113, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985", "Hour"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 1, 1, 0}, "Hour", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 1, 1, 0}, "Hour", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002407`3.5319910881070196, "Seconds"], "CPUTimeUsed" -> Quantity[0.0023309999999980846`, "Seconds"], "MemoryUsed" -> Quantity[240, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7796527207314777`*^9, 3.77965284166882*^9, 3.779664869949382*^9, 3.779667636094743*^9}, CellLabel->"Out[4]=", CellID->467298399] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\<1985\>\"", ",", "\"\\""}], "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", "1985", "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796526518534117`*^9, 3.7796526624214497`*^9}, { 3.779652695578315*^9, 3.77965269647808*^9}}, CellLabel->"In[5]:=", CellID->304028188], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"1985\"", ",", "\"Minute\""}], "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Minute: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Tue 1 Jan 1985 00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "1", ",", "1", ",", "0", ",", "0"}], "}"}], ",", "\"Minute\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Minute: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], "\"Tue 1 Jan 1985 00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "1", ",", "1", ",", "0", ",", "0"}], "}"}], ",", "\"Minute\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002187`3.490363780869629", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 114, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985", "Minute"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 1, 1, 0, 0}, "Minute", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 1, 1, 0, 0}, "Minute", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002187`3.490363780869629, "Seconds"], "CPUTimeUsed" -> Quantity[0.0021459999999962065`, "Seconds"], "MemoryUsed" -> Quantity[248, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652720859808*^9, 3.779652841806548*^9, 3.779664870119234*^9, 3.779667636180525*^9}, CellLabel->"Out[5]=", CellID->270302221] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\<1985\>\"", ",", "\"\\""}], "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", "1985", "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796526518534117`*^9, 3.7796526624214497`*^9}, { 3.779652699126272*^9, 3.7796526997697897`*^9}}, CellLabel->"In[6]:=", CellID->501953171], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"1985\"", ",", "\"Second\""}], "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"Tue 1 J\"", "\[Ellipsis]", "\"00:00:00\""}], StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"Tue 1 J\"", "\[Ellipsis]", "\"00:00:00\""}], StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002646`3.5731048376834744", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 115, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985", "Second"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 1, 1, 0, 0, 0}, "Second", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 1, 1, 0, 0, 0}, "Second", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002646`3.5731048376834744, "Seconds"], "CPUTimeUsed" -> Quantity[0.0026119999999991705`, "Seconds"], "MemoryUsed" -> Quantity[256, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652720967272*^9, 3.779652841933333*^9, 3.7796648703294163`*^9, 3.779667636285305*^9}, CellLabel->"Out[6]=", CellID->746621044] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\<1985\>\"", ",", "\"\\""}], "]"}], ",", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", "1985", "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796526518534117`*^9, 3.7796526624214497`*^9}, { 3.779652702932643*^9, 3.779652703868902*^9}}, CellLabel->"In[7]:=", CellID->16345853], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"1985\"", ",", "\"Instant\""}], "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{"\"Tue 1 Jan 1985 00:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "1", ",", "1", ",", "0", ",", "0", ",", "0"}], "}"}], ",", "\"Instant\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{"\"Tue 1 Jan 1985 00:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "1", ",", "1", ",", "0", ",", "0", ",", "0"}], "}"}], ",", "\"Instant\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002543`3.5558613580076988", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 116, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["1985", "Instant"]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 1, 1, 0, 0, 0}, "Instant", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 1, 1, 0, 0, 0}, "Instant", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002543`3.5558613580076988, "Seconds"], "CPUTimeUsed" -> Quantity[0.0024599999999992406`, "Seconds"], "MemoryUsed" -> Quantity[256, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.77965272107895*^9, 3.7796528421958447`*^9, 3.779664870491269*^9, 3.779667636446117*^9}, CellLabel->"Out[7]=", CellID->486069415] }, Open ]], Cell["Times:", "Text", CellChangeTimes->{{3.7796527321083803`*^9, 3.779652732816272*^9}}, CellID->797892019], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", "8", "}"}], ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.7796527393244963`*^9, 3.779652759781742*^9}}, CellLabel->"In[8]:=", CellID->362086361], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"T08\"", ",", "\"Hour\""}], "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Hour: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"8 am\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", "8", "}"}], ",", "\"Hour\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Hour: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"8 am\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", "8", "}"}], ",", "\"Hour\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.001932`3.436522119911469", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 117, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["T08", "Hour"]], "ExpectedOutput" -> HoldForm[ TimeObject[{8}, "Hour", -4.]], "ActualOutput" -> HoldForm[ TimeObject[{8}, "Hour", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.001932`3.436522119911469, "Seconds"], "CPUTimeUsed" -> Quantity[0.001928000000006591, "Seconds"], "MemoryUsed" -> Quantity[256, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{{3.779652762769167*^9, 3.779652782115996*^9}, 3.779652842399518*^9, 3.7796648706532183`*^9, 3.779667636542121*^9}, CellLabel->"Out[8]=", CellID->743314657] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", "8", "}"}], ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779652767463778*^9, 3.779652770544072*^9}}, CellLabel->"In[9]:=", CellID->613130542], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"T08\"", ",", "\"Minute\""}], "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Minute: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"08:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"8", ",", "0"}], "}"}], ",", "\"Minute\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Minute: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"08:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"8", ",", "0"}], "}"}], ",", "\"Minute\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002308`3.5137508023156876", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 118, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["T08", "Minute"]], "ExpectedOutput" -> HoldForm[ TimeObject[{8, 0}, "Minute", -4.]], "ActualOutput" -> HoldForm[ TimeObject[{8, 0}, "Minute", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002308`3.5137508023156876, "Seconds"], "CPUTimeUsed" -> Quantity[0.002283000000005586, "Seconds"], "MemoryUsed" -> Quantity[200, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652782314863*^9, 3.779652842565052*^9, 3.779664870828413*^9, 3.7796676366167183`*^9}, CellLabel->"Out[9]=", CellID->860202713] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", "8", "}"}], ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779652771405615*^9, 3.779652774635223*^9}}, CellLabel->"In[10]:=", CellID->503717495], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"T08\"", ",", "\"Second\""}], "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"08:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"8", ",", "0", ",", "0"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"08:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"8", ",", "0", ",", "0"}], "}"}], ",", "\"Second\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002382`3.5274567549787523", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 119, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["T08", "Second"]], "ExpectedOutput" -> HoldForm[ TimeObject[{8, 0, 0}, "Second", -4.]], "ActualOutput" -> HoldForm[ TimeObject[{8, 0, 0}, "Second", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002382`3.5274567549787523, "Seconds"], "CPUTimeUsed" -> Quantity[0.0023709999999965703`, "Seconds"], "MemoryUsed" -> Quantity[208, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.77965278242758*^9, 3.7796528427808733`*^9, 3.7796648709480457`*^9, 3.779667636688293*^9}, CellLabel->"Out[10]=", CellID->901682446] }, Open ]], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", RowBox[{ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"\\"", ",", "\"\\""}], "]"}], ",", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", "8", "}"}], ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "]"}]], "Input", CellChangeTimes->{{3.779652771405615*^9, 3.779652780643265*^9}}, CellLabel->"In[11]:=", CellID->990352759], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", RowBox[{"\"T08\"", ",", "\"Instant\""}], "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ RowBox[{"\"08:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"8", ",", "0", ",", "0"}], "}"}], ",", "\"Instant\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{ RowBox[{"\"08:00:00\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}]}], RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"8", ",", "0", ",", "0"}], "}"}], ",", "\"Instant\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "TimeObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.002319`3.5158157464699795", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 120, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp["T08", "Instant"]], "ExpectedOutput" -> HoldForm[ TimeObject[{8, 0, 0}, "Instant", -4.]], "ActualOutput" -> HoldForm[ TimeObject[{8, 0, 0}, "Instant", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.002319`3.5158157464699795, "Seconds"], "CPUTimeUsed" -> Quantity[0.002213000000011789, "Seconds"], "MemoryUsed" -> Quantity[208, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.779652782555635*^9, 3.7796528429961557`*^9, 3.779664871162057*^9, 3.779667636759145*^9}, CellLabel->"Out[11]=", CellID->423206310] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Listable syntax", "Subsubsection", CellChangeTimes->{{3.779653927576558*^9, 3.779653929614949*^9}}, CellLabel->"In[12]:=", CellID->433166199], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"FromISOTimestamp", "[", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ "\"\<2007-04-05T12:30:23-02:00\>\"", ",", "\[IndentingNewLine]", "\"\<1985-W15-5\>\"", ",", "\[IndentingNewLine]", "\"\<20:27Z\>\"", ",", "\[IndentingNewLine]", "\"\\""}], "\[IndentingNewLine]", "}"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", "\[IndentingNewLine]", RowBox[{ RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"2007", ",", "4", ",", "5", ",", "12", ",", "30", ",", "23"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", RowBox[{"-", "2."}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", RowBox[{"-", "4."}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"TimeObject", "[", RowBox[{ RowBox[{"{", RowBox[{"20", ",", "27"}], "}"}], ",", "\"\\"", ",", "0."}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Quantity", "[", RowBox[{ RowBox[{"MixedMagnitude", "[", RowBox[{"{", RowBox[{"3", ",", "6", ",", "4", ",", "12", ",", "30", ",", "5"}], "}"}], "]"}], ",", RowBox[{"MixedUnit", "[", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}], "]"}]}], "]"}]}], "\[IndentingNewLine]", "}"}]}], "\[IndentingNewLine]", "]"}]], "Input", CellChangeTimes->{{3.779664803688507*^9, 3.7796648196923018`*^9}}, CellLabel->"In[1]:=", CellID->363541110], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", RowBox[{"{", RowBox[{ RowBox[{"\"2007-04-\"", "\[Ellipsis]", "\"23-02:00\""}], ",", RowBox[{"\[LeftSkeleton]", "2", "\[RightSkeleton]"}], ",", RowBox[{"\"\"", "\[Ellipsis]", "\"\""}]}], "}"}], "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"{", RowBox[{ FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"Thu 5\"", "\[Ellipsis]", "\"30:23\""}], StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "2.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], ",", FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], ",", RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}], ",", TemplateBox[{"3", "6", "4", "12", "30", "5", RowBox[{"\[ThinSpace]", "\"yr\""}], RowBox[{"\[ThinSpace]", "\"mo\""}], RowBox[{"\[ThinSpace]", "\"days\""}], RowBox[{"\[ThinSpace]", "\"h\""}], RowBox[{"\[ThinSpace]", "\"min\""}], RowBox[{"\[ThinSpace]", "\"s\""}], "years,months,days,hours,minutes,seconds", RowBox[{"{", RowBox[{"\"Years\"", ",", "\"Months\"", ",", "\"Days\"", ",", "\"Hours\"", ",", "\"Minutes\"", ",", "\"Seconds\""}], "}"}]}, "QuantityMixedUnit6"]}], "}"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"{", RowBox[{ FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{ StyleBox[ "\"Second: \"", FontColor -> GrayLevel[0.5], FontWeight -> Plain], RowBox[{"\"Thu 5\"", "\[Ellipsis]", "\"30:23\""}], StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "2.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], ",", FrameBox[ GridBox[{{ DynamicBox[ FEPrivate`FrontEndResource[ "FEExpressions", "DateObjectIcon"], ImageSizeCache -> {15., {3., 12.}}], StyleBox[ RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}], "Text", FontFamily -> "Arial", FontSize -> 11, FontWeight -> Bold, FontColor -> Hue[0.55, 0.32, 0.38], ShowStringCharacters -> False]}}, AutoDelete -> False, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.3}}}, BaselinePosition -> {1, 2}], Background -> Hue[0.11, 0, 0.97], FrameMargins -> {{7, 7}, {3, 3}}, FrameStyle -> Hue[0.57, 0, 0.82], RoundingRadius -> 4, BaselinePosition -> Baseline, BaseStyle -> {FontFamily -> "Courier"}], ",", RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}], ",", TemplateBox[{"3", "6", "4", "12", "30", "5", RowBox[{"\[ThinSpace]", "\"yr\""}], RowBox[{"\[ThinSpace]", "\"mo\""}], RowBox[{"\[ThinSpace]", "\"days\""}], RowBox[{"\[ThinSpace]", "\"h\""}], RowBox[{"\[ThinSpace]", "\"min\""}], RowBox[{"\[ThinSpace]", "\"s\""}], "years,months,days,hours,minutes,seconds", RowBox[{"{", RowBox[{"\"Years\"", ",", "\"Months\"", ",", "\"Days\"", ",", "\"Hours\"", ",", "\"Minutes\"", ",", "\"Seconds\""}], "}"}]}, "QuantityMixedUnit6"]}], "}"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.012389`4.243551250777153", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 121, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp[{ "2007-04-05T12:30:23-02:00", "1985-W15-5", "20:27Z", "P3Y6M4DT12H30M5S"}]], "ExpectedOutput" -> HoldForm[{ DateObject[{2007, 4, 5, 12, 30, 23}, "Second", "Gregorian", -2.], DateObject[{1985, 4, 12}, "Day", "Gregorian", -4.], TimeObject[{20, 27}, "Minute", 0.], Quantity[ MixedMagnitude[{3, 6, 4, 12, 30, 5}], MixedUnit[{ "Years", "Months", "Days", "Hours", "Minutes", "Seconds"}]]}], "ActualOutput" -> HoldForm[{ DateObject[{2007, 4, 5, 12, 30, 23}, "Second", "Gregorian", -2.], DateObject[{1985, 4, 12}, "Day", "Gregorian", -4.], TimeObject[{20, 27}, "Minute", 0.], Quantity[ MixedMagnitude[{3, 6, 4, 12, 30, 5}], MixedUnit[{ "Years", "Months", "Days", "Hours", "Minutes", "Seconds"}]]}], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.012389`4.243551250777153, "Seconds"], "CPUTimeUsed" -> Quantity[0.012180000000000746`, "Seconds"], "MemoryUsed" -> Quantity[1208, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{3.7796648207676888`*^9, 3.779664871589094*^9, 3.779667636880259*^9}, CellLabel->"Out[1]=", CellID->319580096] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Different separator characters", "Subsubsection", CellChangeTimes->{{3.779651331334002*^9, 3.779651342891288*^9}}, CellLabel->"In[2]:=", CellID->926885230], Cell["U+2212 minus sign and comma decimal separator:", "Text", CellChangeTimes->{{3.7796514206896*^9, 3.779651446062932*^9}}, CellID->90195236], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"VerificationTest", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"FromISOTimestamp", "[", RowBox[{"StringReplace", "[", RowBox[{"\"\<1985*04*12T23:50:30,5\>\"", ",", RowBox[{"\"\<*\>\"", "\[Rule]", RowBox[{"FromCharacterCode", "[", "8722", "]"}]}]}], "]"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{ "1985", ",", "4", ",", "12", ",", "23", ",", "50", ",", "30.5"}], "}"}], ",", "\"\\"", ",", "\"\\"", ",", "$TimeZone"}], "]"}]}], "\[IndentingNewLine]", "]"}]], "Input", CellChangeTimes->{{3.77965280033875*^9, 3.77965282566243*^9}}, CellLabel->"In[1]:=", CellID->184001852], Cell[BoxData[ InterpretationBox[ RowBox[{ TagBox["TestResultObject", "SummaryHead"], "[", DynamicModuleBox[{Typeset`open$$ = False, Typeset`embedState$$ = "Ready"}, TemplateBox[{ PaneSelectorBox[{False -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquarePlusIconMedium"]], ButtonFunction :> (Typeset`open$$ = True), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}], True -> GridBox[{{ PaneBox[ ButtonBox[ DynamicBox[ FEPrivate`FrontEndResource[ "FEBitmaps", "SquareMinusIconMedium"]], ButtonFunction :> (Typeset`open$$ = False), Appearance -> None, Evaluator -> Automatic, Method -> "Preemptive"], Alignment -> {Center, Center}, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], GraphicsBox[{ InsetBox[ BoxData[ FormBox[ PaneBox[ DynamicBox[ FEPrivate`FrontEndResource[ "MUnitExpressions", "SuccessIcon"]], Alignment -> Center, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}]], TraditionalForm]]]}, PlotRange -> {{0, 1}, {0, 1}}, Background -> GrayLevel[0.93], Axes -> False, AspectRatio -> 1, ImageSize -> Dynamic[{ Automatic, 3.5 (CurrentValue["FontCapHeight"]/AbsoluteCurrentValue[ Magnification])}], Frame -> True, FrameTicks -> None, FrameStyle -> Directive[ Thickness[Tiny], GrayLevel[0.55]]], GridBox[{{ RowBox[{ TagBox["\"Outcome: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["\"Success\"", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Test ID: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox["None", "SummaryItem"]}]}, { RowBox[{ TagBox["\"Input: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ RowBox[{"FromISOTimestamp", "[", RowBox[{"StringReplace", "[", RowBox[{ RowBox[{"\"1\"", "\[Ellipsis]", "\",5\""}], ",", RowBox[{"\[LeftSkeleton]", "1", "\[RightSkeleton]"}]}], "]"}], "]"}], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Expected output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{"\"Fri 12 Apr 1985 23:50:30\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12", ",", "23", ",", "50", ",", "30.5`"}], "}"}], ",", "\"Instant\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Actual output: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ RowBox[{"\"Fri 12 Apr 1985 23:50:30\"", StyleBox[ RowBox[{"\"GMT\"", "\[InvisibleSpace]", StyleBox[ RowBox[{"-", "4.`"}], NumberMarks -> False, StripOnInput -> False]}], FontColor -> GrayLevel[0.5]]}], RowBox[{"DateObject", "[", RowBox[{ RowBox[{"{", RowBox[{"1985", ",", "4", ",", "12", ",", "23", ",", "50", ",", "30.5`"}], "}"}], ",", "\"Instant\"", ",", "\"Gregorian\"", ",", RowBox[{"-", "4.`"}]}], "]"}]}, "DateObject", Editable -> False], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}, { RowBox[{ TagBox["\"Time taken: \"", "SummaryItemAnnotation"], "\[InvisibleSpace]", TagBox[ PaneBox[ TagBox[ TemplateBox[{ "0.004144`3.7679347445691707", "\"s\"", "seconds", "\"Seconds\""}, "Quantity", SyntaxForm -> Mod], Short[#, Rational[2, 3]]& ], ImageSize -> {{1, 500}, Automatic}, BaselinePosition -> Baseline, ContentPadding -> False, FrameMargins -> 0, StripOnInput -> True], "SummaryItem"]}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Automatic}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{2}}, "Rows" -> {{Automatic}}}, BaseStyle -> { ShowStringCharacters -> False, NumberMarks -> False, PrintPrecision -> 3, ShowSyntaxStyles -> False}]}}, GridBoxAlignment -> {"Rows" -> {{Top}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, BaselinePosition -> {1, 1}]}, Dynamic[Typeset`open$$], ImageSize -> Automatic]}, "SummaryPanel"], DynamicModuleValues:>{}], "]"}], TestResultObject[<| "TestClass" -> None, "TestIndex" -> 122, "TestID" -> None, "Outcome" -> "Success", "Input" -> HoldForm[ $CellContext`FromISOTimestamp[ StringReplace[ "1985*04*12T23:50:30,5", "*" -> FromCharacterCode[8722]]]], "ExpectedOutput" -> HoldForm[ DateObject[{1985, 4, 12, 23, 50, 30.5}, "Instant", "Gregorian", -4.]], "ActualOutput" -> HoldForm[ DateObject[{1985, 4, 12, 23, 50, 30.5}, "Instant", "Gregorian", -4.]], "ExpectedMessages" -> {}, "ActualMessages" -> {}, "AbsoluteTimeUsed" -> Quantity[0.004144`3.7679347445691707, "Seconds"], "CPUTimeUsed" -> Quantity[0.003735000000006039, "Seconds"], "MemoryUsed" -> Quantity[336, "Bytes"]|>], Editable->False, SelectWithContents->True, Selectable->False]], "Output", CellChangeTimes->{{3.779652828766053*^9, 3.7796528433546143`*^9}, 3.779664871884623*^9, 3.779667636996073*^9}, CellLabel->"Out[1]=", CellID->430290197] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Compatibility", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Compatibility", Cell[ BoxData[ FrameBox[ Cell[ "Specify any known compatibilities for your resource to ensure it is \ discoverable on the correct platforms.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibility"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsection", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Compatibility"}, CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[CellGroupData[{ Cell[TextData[{ "Wolfram Language Version", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityWolframLanguageVersionRequired", Cell[ BoxData[ FrameBox[ Cell[ "Enter required Wolfram Language Version (e.g. 12.1+).", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> { "SectionMoreInfoCompatibilityWolframLanguageVersionRequired"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{ "TemplateGroupName" -> "CompatibilityWolframLanguageVersionRequired"}, DefaultNewCellStyle->"Text", FontSize->16, CellTags->{ "CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell["12.3+", "Text", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Operating System", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityOperatingSystem", Cell[ BoxData[ FrameBox[ Cell[ "Select all operating systems where your resource is expected to \ function properly.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibilityOperatingSystem"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{"TemplateGroupName" -> "CompatibilityOperatingSystem"}, DefaultNewCellStyle->"Item", FontSize->16, CellTags->{ "CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[BoxData[ TagBox[GridBox[{ { TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Windows", {False, "Windows"}], "\" \"", "\"Windows\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["MacOSX", {False, "MacOSX"}], "\" \"", "\"Mac\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Unix", {False, "Unix"}], "\" \"", "\"Unix\""}, "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, TaggingRules->{ "CheckboxData" -> "OEM6eJxNkNuKwkAMhsEerLDsE/gKfQipCoJLF7PL7m0PUQenM8Mkg87bmwot3iX5/\ 3w5bIoSMuCoEfI6sAtcwrK6YnfD/pxQelTEsPxTprd3gvyr6Wr4h/\ TXqIc0HhgHmmznBaWnIKDZPgWzkkj/\ BJmLL9iELL69deg5wrqyg2tYtUorjrUUJTEXiCRDZcnasbLmxX6fTsWuV9y0EmX7RhPOwmqLGt+\ V8VKrw2CoSkr4PBhG77xYRjCsNiZCaAnlIx8nJBt8hz/RIRT7YLrR8wRtF2wJ"}, CellTags->{ "CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->589765368] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Required Features", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityFeatures", Cell[ BoxData[ FrameBox[ Cell[ TextData[{"Choose any other features that are ", Cell[ BoxData[ StyleBox[ StyleBox["required", "TI"], ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"]]], " in order to use your resource."}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibilityFeatures"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{"TemplateGroupName" -> "CompatibilityFeatures"}, DefaultNewCellStyle->"Item", FontSize->16, CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[BoxData[ TagBox[GridBox[{ { TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Notebooks"}], "\" \"", "\"Notebooks\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Parallel Kernels"}], "\" \"", "\"Parallel Kernels\""}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[False, {False, "Cloud Access"}], "\" \"", "\"Cloud Access\""}, "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, TaggingRules->{ "CheckboxData" -> "OEM6eJxlUM1qwzAMHmuzJlDKLrv3BfIQIVugrKyl2gs4jsJMFdtY8sFvP2eDkLHb96cPSU1ZQw\ GSCOHpEsVHqWHXfqG+4zA+8PZsOCvFSXDicfPLx0fe3mKeqD6cYO/cnVdwcZ+vKigipOM7BovE/\ 5Ulu2/JxeHYaI3Mf1kN5TU4j0ESvLRu8kpMb8hI6lBJDJgTu4sX4+\ xP33pDLt8GI6rPqOgUMS5G9YqEa2c+21GcLLebGg4nKxh8yJG5GKrGJog9Y37G/\ obsYtD4mTxC2UWr58w3NfBx2Q=="}, CellTags->{ "CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->851691753] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Environments", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityEvaluationEnvironment", Cell[ BoxData[ FrameBox[ Cell[ TextData[{ "Select all evaluation environments where your resource is expected \ to be compatible. See ", Cell[ BoxData[ StyleBox[ TagBox[ ButtonBox[ StyleBox[ "$EvaluationEnvironment", "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/$EvaluationEnvironment", ContentPadding -> False], MouseAppearanceTag["LinkHand"]], ShowStringCharacters -> True, FontFamily -> "Source Sans Pro"]]], " for more details."}], "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibilityEvaluationEnvironment"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{"TemplateGroupName" -> "CompatibilityEvaluationEnvironment"}, DefaultNewCellStyle->"Item", FontSize->16, CellTags->{ "CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[BoxData[ TagBox[GridBox[{ { TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Session", {False, "Session"}], "\" \"", TemplateBox[{ "\"Session\"", "\"Local or cloud interactive session\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox["WebEvaluation", {False, "WebEvaluation"}], "\" \"", TemplateBox[{ "\"WebEvaluation\"", "\"Cloud evaluation initiated by an HTTP request\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox["BatchJob", {False, "BatchJob"}], "\" \"", TemplateBox[{"\"BatchJob\"", "\"Remote batch job\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Script", {False, "Script"}], "\" \"", TemplateBox[{"\"Script\"", "\"Script run in batch mode\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox["WebAPI", {False, "WebAPI"}], "\" \"", TemplateBox[{ "\"WebAPI\"", "\"API called through an HTTP request\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]}, {"\<\"\"\>"} }, DefaultBaseStyle->"Column", GridBoxAlignment->{"Columns" -> {{Left}}}, GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Column"], TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox["Subkernel", {False, "Subkernel"}], "\" \"", TemplateBox[{"\"Subkernel\"", "\"Parallel or grid subkernel\""}, "PrettyTooltipTemplate"]}, "RowDefault"], StripOnInput->False, FontSize->12]}, { StyleBox[ TemplateBox[{ CheckboxBox["Scheduled", {False, "Scheduled"}], "\" \"", TemplateBox[{"\"Scheduled\"", "\"Scheduled task\""}, "PrettyTooltipTemplate"]}, "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, TaggingRules->{ "CheckboxData" -> "OEM6eJxdUdFqwzAMhK1tEtj2EXvPR3RpChmDlmqw58RRialjG0su5O/\ nlMTJ9mRJd9yd5H2awxZ4UAi7k2frOYek6FDcsL0mtPmSxJAAEkmjYQfCScuQgW9u6DQqeP3BprzXy\ tf8YIR2f64CQ3TYeoUtpB81i+7TNMGpYuxp1r0+0eYSKIv+XERkNpzeOF8FWMqI/\ sv0t120p6jTu9KO0ZcyonGb9V7p2RmLjgd4L0xvg08jleRhcS31XTqje9TjgU92nNEouj4EpWUruW5\ CtT3WijAC2QEVrpHxl4zyvabiOYe3SjM66wLlsXG210M4C2Ewe7kgGe8Efg82xD96LUbOL+VQrkA=\ "}, CellTags->{ "CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->71422750] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Cloud Support", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"CompatibilityCloudSupport", Cell[ BoxData[ FrameBox[ Cell[ "Specify whether your resource is expected to work in the public \ cloud.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoCompatibilityCloudSupport"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Subsubsection", Editable->False, Deletable->False, CellMargins->{{Inherited, Inherited}, {4, 6}}, TaggingRules->{"TemplateGroupName" -> "CompatibilityCloudSupport"}, DefaultNewCellStyle->"Text", FontSize->16, CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[BoxData[ TagBox[GridBox[{ { TagBox[GridBox[{ { StyleBox[ TemplateBox[{ CheckboxBox[True, {False, True}], "\" \"", "\"Supported in cloud\""}, "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, TaggingRules->{ "CheckboxData" -> "OEM6eJxNjkEKwkAMRVGqVhAX7tx5gR5Cq0JBqBgvUNsUB6eTYZIsentnQMVdyH/vJ/\ u8gBnIaBHmtYpXKWBRPrF9YddPOLsYFs7uQTFyleDA320/\ 5eym0duAek9BsNsZt2stafc18msgj0FG2JY0+EbMw1gjY5mgjxbv1V4MOU6N/\ 82cnzojzSNOs3NjGX/B8ogW/5P0NFkdHJeTAtaVEww+RCQVw+\ JAZLFxBaxuyKShxfvoEfKzujYRb6FXWpA="}, CellTags->{ "CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->131115484] }, Closed]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Author Notes", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Author Notes", Cell[ BoxData[ FrameBox[ Cell[ "This section, when used, will appear near the bottom of the \ published resource. Content displayed in this section can include background, \ possible improvements, additional information and/or implementation details \ that are otherwise beyond the scope of the function documentation.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoAuthorNotes"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Author Notes"}, DefaultNewCellStyle->"Text", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], Cell["Additional information about limitations, issues, etc.", "Text", 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->958952487] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Submission Notes", Cell[BoxData[ PaneSelectorBox[{True-> TemplateBox[{"Submission Notes", Cell[ BoxData[ FrameBox[ Cell[ "Enter any additional information that you would like to communicate \ to the reviewer here. This section will not be included in the published \ resource.", "MoreInfoText"], Background -> GrayLevel[0.95], FrameMargins -> 20, FrameStyle -> GrayLevel[0.9], RoundingRadius -> 5, ImageSize -> { Scaled[0.65], Automatic}]], "MoreInfoText", Deletable -> True, CellTags -> {"SectionMoreInfoSubmissionNotes"}, CellMargins -> {{66, 66}, {15, 15}}]}, "MoreInfoOpenerButtonTemplate"]}, Dynamic[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "ResourceCreateNotebook"}]], ImageSize->Automatic]]] }], "Section", Editable->False, Deletable->False, TaggingRules->{"TemplateGroupName" -> "Submission Notes"}, DefaultNewCellStyle->"Text", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765], Cell["Additional information for the reviewer.", "Text", 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->604291542] }, Open ]] }, Open ]] }, WindowSize->Automatic, WindowMargins->Automatic, WindowTitle->"FromISOTimestamp | Definition Notebook", TaggingRules->{"CompatibilityTest" -> HoldComplete[ BinaryDeserialize[ BaseDecode[ "OEM6eJzVWVtT20YUrjEQBhxaMulMkyc98EAyadJpO9NL2iauDcQdIMCa9JW1dGQ0rHeV3RWg\ X9a/17MrydhGciTbTFNPJsja1XfOnut3LH9JPWqJQSgi7u3ehBKUCgT3a2rlJApA+/nLS2qp4+P/\ 9Sb38M/K7seIMrW5/QGkWT+KBj2Q0refnbdmB6EDOMGLRiuSErj+QFkE/\ hfq0e4VXlFtnhIaekJc4q7lg0Bp1ejSfj/g/dOIgSKNU1Aiki504xDIcptqimouv+\ cuFGq58icT7qXZlgButwTXcKOPqb7w60UnPwLwFNnJ5JFYaRi0WIBqn7fBD3gwqu757SOOUSp7LG+\ rWj6KGEPFXt5dTAWcQh9VBYma+kE/ktY0w+O+KavUKYRCBVrIOAFMcFQKVLf+\ q6m1PRqwSKJnaurhMXUZ6A5XmjJGvinS0F+\ dxdgzmbXRFWOeWSdaYjz8JQIjr35IQ3uGiLvmSX8lkUyeFBrXKkeVCeuNBIuELNDmNmFCt2qkdk6Wf\ v195MbS63WrPMavIs/KKv/\ cXy6wUp2AkbfeFtfcJoFSv5RFzS7eRxrdCJ5JqHX0NKMuNDGuFgi7YZKuDYzG4CHuxjvBPHQkBiZXf\ 5QFPpbBFQKeXyVlYV8CfpPqwRlXaTnIsUa7KjoNQ+DeGb+\ g3GPgtYAxNdUwi5IwxUb4tbKVXITFipcikK0uDPAAGoy4fSmicH5QzN1Gk5krLAdXGNBft3BTX8gA1\ LetC3Ave+IGb2/e3jbSSSNbs982UR6NmLb5zXWOpuTL7BaBJDdzXV26mg0doS674iz08Dqt+\ 8VeXgD4mIPreONBlgJr+0z0KDu/MC1t1KLqp7Ji90G/\ CzwPeFKIyqfrHuVu3LoQgQvtgDLRH1WskSomNXZJ7K9YlCm/\ zFOd4uqWXTU9icDHCPDU5FFqAeZlAk+\ wXQzPOy5gBCxrKStdGdnUnrNKVGl22UUWdCkNUd9XVYH3quRYSmUmpY5ZKLPnEVwP7Zlr4yRB1GFVl\ bcjBQfQp27c6XMhk+qU+VotG2/kJ9/rspJycCcSb1oazilmWo1dUqsH+\ KQtjHtV7dYHnZWxcYkLSyVMiQ3UHLAuUgXqPtQtzEak0JY1r5rdnbbJS6ufetDBmt3HSF3rcCss/\ oSR60OtCw6eApeue9mJ1LAz3IHt3Vp7KH5EZk3tVm6DlAseuJQdSxECWsvyuVl1HlE0f4hYSotho6m\ UcAPLvU9Us3Juh6m2JEb144GJobWmJSNdsRg4GyZkk1igQ9DUM/\ NBOoGRtVagkwHkSbLj1Sn4IE10O9nSbXVZjFdGhE6olUxPwxkqGUGXD9Dmd0bPL+zn+\ VucCeYZVqZMEhX4/fNClGqEvhrONAb/YyESDoGXtA/ERYdU4+1nhZhJt8uLg0TYzET+3kROZ/\ YlrVeGz88E9Zmx+OP5vVCB1t+HtFl4/k6hHpPEvjht/ydMfqZqgQDffbJeTVLn1tzOtQz+\ VSHMfVD2YqXHzDMzUX9RiD8fM6+KW5aK/1bOHv8tAZ9Lyc+Idv9ceA7iShpi/ZnMkHl49+\ uS7SqXbc+s6ox0uzPlN/bsx3HMtiicFDuddi8UdpH0ex7nlCTdtbHf2yfeAuUz8R/sZ+etcc9oqyP/\ 1LoXgXJ4qqpjqBiVytHC6YHj2i7iOb4UA4c6HK5BOmmHeeEogf8G4Pi4KcIocAY0NkjOtZCIpBy4CT\ F2wHvptIUTi8i5DtSFgdYydmikxQAPizZgseMKjrgaw8/RYwrhboqrgxC39hhk0t/cTg/\ 1dHpYy6aH8TlCbaLrk2YjJJVx4TBiHTj5bmz4CqLgfdhDgg6L1CGioG9x+\ xY6tG9AO9zDs2EcDuvRetMalxpasHaEJNB0BOvNVRIPeoKRp8nbn0PKEUyeJ9+Snkce5811pZ/+\ KouXDOV2vNqeXMp9D7QyIujZnSeKiMG4/\ WyabbVsUI30dbWyR5mC4Y6npzAQV7A7CHW8e0ORJGTUV01ufdzMGR2GbTwVmCj3d8A9cd0NNHoiRcl\ 98fkvn3IKDA=="]]], "CreationTimestamp" -> 3.869139359324638`16.340189361656*^9, "DefinitionNotebookFramework" -> "DefinitionNotebookClient", "ResourceCreateNotebook" -> True, "ResourceType" -> "Function", "RuntimeConfiguration" -> { "LoadingMethod" -> "Paclet", "PacletName" -> "FunctionResource", "Contexts" -> { "FunctionResource`", "FunctionResource`DefinitionNotebook`"}, "DefaultContentMethod" -> "Legacy"}, "ToolsOpen" -> False, "UpdatedTimestamp" -> 3.869139359428976`16.340189361667715*^9, "VersionInformation" -> {"ResourceVersion" -> "2.0.0"}, "TemplateVersion" -> "1.6.4", "StatusMessage" -> "", "SubmissionReviewData" -> {"Review" -> False}}, CreateCellID->True, FrontEndVersion->"13.1 for Linux x86 (64-bit) (June 16, 2022)", StyleDefinitions->Notebook[{ Cell[ StyleData[StyleDefinitions -> "Default.nb"]], Cell[ StyleData[All, "Working"], DockedCells -> { Cell[ BoxData[ TemplateBox[{}, "MainGridTemplate"]], "DockedCell", CellMargins -> {{-10, -10}, {-8, -8}}, CellFrame -> 0, Background -> RGBColor[0.921569, 0.341176, 0.105882], 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]]]}, PrivateNotebookOptions -> { "FileOutlineCache" -> False, "SafeFileOpen" -> "IgnoreCache"}, CellLabelAutoDelete -> False, CodeAssistOptions -> {"AutoDetectHyperlinks" -> False}, AutoQuoteCharacters -> {}], Cell["Hint Styles", "Section"], Cell[ StyleData["MoreInfoText", StyleDefinitions -> StyleData["Text"]], FontColor -> GrayLevel[0.25]], Cell[ StyleData["ErrorText", StyleDefinitions -> StyleData["Text"]], ShowCellBracket -> False, CellMargins -> {{66, Inherited}, {10, 10}}, CellElementSpacings -> {"CellMinHeight" -> 0, "ClosedCellHeight" -> 0}, FontWeight -> Bold, FontColor -> RGBColor[1, 0, 0]], Cell[ StyleData["WarningText", StyleDefinitions -> StyleData["Text"]], ShowCellBracket -> False, CellMargins -> {{66, 35}, {0, 0}}, FontSize -> 14, GridBoxOptions -> {BaseStyle -> {}}], Cell["Template Boxes", "Section"], Cell[ StyleData["MoreInfoOpenerIconTemplate"], TemplateBoxOptions -> { DisplayFunction -> (PaneSelectorBox[{False -> GraphicsBox[{ Thickness[0.09090909090909091], StyleBox[{ JoinedCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJJIGYC4vinF5RuVyo58OlumvteXcIBxj//Pfjx0tky Dh8v+SYJzFB0kGAJ49MtUnBYIKV/V4UNRis5GHKskYl6IuPwCaxO2eEcWJ+E QwLYHBUHfrC5InD+7CMKG4oy+OH81TJRKdb32eD6+w991YjpZ4CbD1L2s+6L Pcz+R1Ui69wfvrKHuQ/Gh7kfxvdLEoiw3CIM178BbA8f3PwJYJoDbn9JxsS3 NfZMcPcV2HJdX1zw1x7mfhgf5j8YH+Z/mH5Y+MDMh4UfzH5Y+MLchx7+ANUf raY= "], CurveClosed -> {1}]}, { JoinForm[{"Miter", 3.25}], Thickness[0.04581818181818182], RGBColor[0.627441, 0.627441, 0.627441, 1.]}, StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{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}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGCQBGIQLTQ3t12zRcShJLdco9dU3mHepS6LtrvCcP4+Xv/m N77CDovcOdKu58g7FPjtSo+5KuTw57fmw+zb8g5K/ao+Z2KEHHRuqOoxqCo4 1OhH27UoCDnsSqhWX5aN4K+ZPvXO8oMI/txz6yeuFFeE67fRSpTaE6sIN79j 1cqy+5MV4fZf1fp0iemUItx9v7PEGkWeKjrA3A/jf+Fa9FHHQBTOX+1ud9n/ oChcv3mwk84kczG4+Yfi3FqvrBWD29+RcmLj1xdicPfB+DD3w/gw/8H0w/wP Mx8WPjD7YeEHcx8sfNHDHwBu/qSR "], CompressedData[" 1:eJxTTMoPSmViYGCQB2IQvf+bus9hGwmHDp1Dj7Lq+R1g/C8aMf2HvvI4TGr/ 8PXaHQEMPkz934jyRxrThRx4jt4OchAXgPMDH16pmH8JwZ97RmCl6XRBOP9D W/9jplQhOF+/1m7LFGNhOJ/l29N9k18i+AUfW5kZ2kXg/Ple3+bO/C4K5+fN DQ4+fUAMzt9xf9q57xnicH6N4AF++Q8IvqPzywC3cgk4PyFkivMkFkk4/4bL wedMMyQdDs1vE5FYJOBwYaHqp4u3EPzQT5dO7vwk5SCxtot3p4WYw73/Kfef X5RxYLv4XzxkhpjDona/Xv0OBH+hx9ZwiywJOB/mHxgf5l8Y30/526VcIyR+ 5Tb7vkQhON/3fNmadRME4fxHts2x9mcF4HxYfKDHLwCFIt67 "]}]}, { FaceForm[ RGBColor[0.627441, 0.627441, 0.627441, 1.]]}, StripOnInput -> False]}, ImageSize -> {11., 11.}, PlotRange -> {{0., 11.}, {0., 11.}}, AspectRatio -> Automatic], True -> GraphicsBox[{ Thickness[0.09090909090909091], StyleBox[{ JoinedCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJJIGYC4vinF5RuVyo58OlumvteXcIBxj//Pfjx0tky Dh8v+SYJzFB0kGAJ49MtUnBYIKV/V4UNRis5GHKskYl6IuPwCaxO2eEcWJ+E QwLYHBUHfrC5InD+7CMKG4oy+OH81TJRKdb32eD6+w991YjpZ4CbD1L2s+6L Pcz+R1Ui69wfvrKHuQ/Gh7kfxvdLEoiw3CIM178BbA8f3PwJYJoDbn9JxsS3 NfZMcPcV2HJdX1zw1x7mfhgf5j8YH+Z/mH5Y+MDMh4UfzH5Y+MLchx7+ANUf raY= "], CurveClosed -> {1}]}, { JoinForm[{"Miter", 3.25}], Thickness[0.04581818181818182], RGBColor[0.5, 0.5, 0.5, 1.]}, StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJJIGYC4vinF5RuVyo58OlumvteXcIBxj//Pfjx0tky Dh8v+SYJzFB0kGAJ49MtUnBYIKV/V4UNRis5GHKskYl6IuPwCaxO2eEcWJ+E QwLYHBUHfrC5InD+7CMKG4oy+OH81TJRKdb32eD6+w991YjpZ4CbD1L2s+6L Pcz+R1Ui69wfvrKHuQ/Gh7kfxvdLEoiw3CIM178BbA8f3PwJYJoDbn9JxsS3 NfZMcPcV2HJdX1zw1x7mfhgf5j8YH+Z/mH5Y+MDMh4UfzH5Y+MLchx7+ANUf raY= "]]}, { FaceForm[ RGBColor[0.5, 0.5, 0.5, 1.]]}, StripOnInput -> False], StyleBox[{ FilledCurveBox[{{{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}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {1, 3, 3}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGCQBGIQLTQ3t12zRcShJLdco9dU3mHepS6LtrvCcP4+Xv/m N77CDovcOdKu58g7FPjtSo+5KuTw57fmw+zb8g5K/ao+Z2KEHHRuqOoxqCo4 1OhH27UoCDnsSqhWX5aN4K+ZPvXO8oMI/txz6yeuFFeE67fRSpTaE6sIN79j 1cqy+5MV4fZf1fp0iemUItx9v7PEGkWeKjrA3A/jf+Fa9FHHQBTOX+1ud9n/ oChcv3mwk84kczG4+Yfi3FqvrBWD29+RcmLj1xdicPfB+DD3w/gw/8H0w/wP Mx8WPjD7YeEHcx8sfNHDHwBu/qSR "], CompressedData[" 1:eJxTTMoPSmViYGCQB2IQvf+bus9hGwmHDp1Dj7Lq+R1g/C8aMf2HvvI4TGr/ 8PXaHQEMPkz934jyRxrThRx4jt4OchAXgPMDH16pmH8JwZ97RmCl6XRBOP9D W/9jplQhOF+/1m7LFGNhOJ/l29N9k18i+AUfW5kZ2kXg/Ple3+bO/C4K5+fN DQ4+fUAMzt9xf9q57xnicH6N4AF++Q8IvqPzywC3cgk4PyFkivMkFkk4/4bL wedMMyQdDs1vE5FYJOBwYaHqp4u3EPzQT5dO7vwk5SCxtot3p4WYw73/Kfef X5RxYLv4XzxkhpjDona/Xv0OBH+hx9ZwiywJOB/mHxgf5l8Y30/526VcIyR+ 5Tb7vkQhON/3fNmadRME4fxHts2x9mcF4HxYfKDHLwCFIt67 "]}]}, { FaceForm[ RGBColor[0.999985, 0.999985, 0.999985, 1.]]}, StripOnInput -> False]}, ImageSize -> {11., 11.}, PlotRange -> {{0., 11.}, {0., 11.}}, AspectRatio -> Automatic]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0]& )}], Cell[ StyleData["MoreInfoOpenerButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (AdjustmentBox[ DynamicModuleBox[{ RSNB`mPosRegion$$, RSNB`attachPos$$, RSNB`offsetPos$$, RSNB`horizontalRegion$$, RSNB`verticalRegion$$, RSNB`chooseAttachLocation$$}, TagBox[ TemplateBox[{ TemplateBox[{}, "MoreInfoOpenerIconTemplate"], "\"Click for more information\""}, "PrettyTooltipTemplate"], EventHandlerTag[{"MouseDown" :> AttachCell[ ParentBox[ EvaluationBox[]], #2, RSNB`chooseAttachLocation$$[], RemovalConditions -> {"EvaluatorQuit", "MouseClickOutside"}], Method -> "Preemptive", PassEventsDown -> Automatic, PassEventsUp -> True}]], DynamicModuleValues :> {{DownValues[RSNB`mPosRegion$$] = {HoldPattern[ RSNB`mPosRegion$$[]] :> RSNB`mPosRegion$$[ Ceiling[MousePosition["WindowScaled"] 3]], HoldPattern[ RSNB`mPosRegion$$[ Pattern[RSNB`reg, { Blank[Integer], Blank[Integer]}]]] :> RSNB`reg, HoldPattern[ RSNB`mPosRegion$$[ BlankNullSequence[]]] :> None}}, { DownValues[RSNB`attachPos$$] = {HoldPattern[ RSNB`attachPos$$[{ Pattern[RSNB`h$, Blank[Integer]], Pattern[RSNB`v$, Blank[Integer]]}]] :> { RSNB`horizontalRegion$$[RSNB`h$], RSNB`verticalRegion$$[RSNB`v$]}}}, { DownValues[RSNB`offsetPos$$] = {HoldPattern[ RSNB`offsetPos$$[{ Pattern[RSNB`h$, Blank[Integer]], Pattern[RSNB`v$, Blank[Integer]]}]] :> { RSNB`horizontalRegion$$[4 - RSNB`h$], RSNB`verticalRegion$$[4 - RSNB`v$]}}}, { DownValues[RSNB`horizontalRegion$$] = {HoldPattern[ RSNB`horizontalRegion$$[1]] :> Left, HoldPattern[ RSNB`horizontalRegion$$[2]] :> Center, HoldPattern[ RSNB`horizontalRegion$$[3]] :> Right}}, { DownValues[RSNB`verticalRegion$$] = {HoldPattern[ RSNB`verticalRegion$$[1]] :> Top, HoldPattern[ RSNB`verticalRegion$$[2]] :> Top, HoldPattern[ RSNB`verticalRegion$$[3]] :> Top}}, { DownValues[RSNB`chooseAttachLocation$$] = {HoldPattern[ RSNB`chooseAttachLocation$$[]] :> With[{RSNB`p$ = RSNB`mPosRegion$$[]}, Apply[Sequence, { RSNB`offsetPos$$[RSNB`p$], {-30, 30}, RSNB`attachPos$$[RSNB`p$]}]]}}}], BoxBaselineShift -> -0.5, BoxMargins -> 0.2]& )}], Cell[ StyleData["InlineMoreInfoOpenerButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (AdjustmentBox[ DynamicModuleBox[{ RSNB`mPosRegion$$, RSNB`attachPos$$, RSNB`offsetPos$$, RSNB`horizontalRegion$$, RSNB`verticalRegion$$, RSNB`chooseAttachLocation$$}, TagBox[ TemplateBox[{ TemplateBox[{}, "MoreInfoOpenerIconTemplate"], #4}, "PrettyTooltipTemplate"], EventHandlerTag[{"MouseDown" :> AttachCell[ ParentBox[ EvaluationBox[]], #2, RSNB`chooseAttachLocation$$[], RemovalConditions -> {"EvaluatorQuit", "MouseClickOutside"}], Method -> "Preemptive", PassEventsDown -> Automatic, PassEventsUp -> True}]], DynamicModuleValues :> {{DownValues[RSNB`mPosRegion$$] = {HoldPattern[ RSNB`mPosRegion$$[]] :> RSNB`mPosRegion$$[ Ceiling[MousePosition["WindowScaled"] 3]], HoldPattern[ RSNB`mPosRegion$$[ Pattern[RSNB`reg, { Blank[Integer], Blank[Integer]}]]] :> RSNB`reg, HoldPattern[ RSNB`mPosRegion$$[ BlankNullSequence[]]] :> None}}, { DownValues[RSNB`attachPos$$] = {HoldPattern[ RSNB`attachPos$$[{ Pattern[RSNB`h$, Blank[Integer]], Pattern[RSNB`v$, Blank[Integer]]}]] :> { RSNB`horizontalRegion$$[RSNB`h$], RSNB`verticalRegion$$[RSNB`v$]}}}, { DownValues[RSNB`offsetPos$$] = {HoldPattern[ RSNB`offsetPos$$[{ Pattern[RSNB`h$, Blank[Integer]], Pattern[RSNB`v$, Blank[Integer]]}]] :> { RSNB`horizontalRegion$$[4 - RSNB`h$], RSNB`verticalRegion$$[4 - RSNB`v$]}}}, { DownValues[RSNB`horizontalRegion$$] = {HoldPattern[ RSNB`horizontalRegion$$[1]] :> Left, HoldPattern[ RSNB`horizontalRegion$$[2]] :> Center, HoldPattern[ RSNB`horizontalRegion$$[3]] :> Right}}, { DownValues[RSNB`verticalRegion$$] = {HoldPattern[ RSNB`verticalRegion$$[1]] :> Top, HoldPattern[ RSNB`verticalRegion$$[2]] :> Top, HoldPattern[ RSNB`verticalRegion$$[3]] :> Top}}, { DownValues[RSNB`chooseAttachLocation$$] = {HoldPattern[ RSNB`chooseAttachLocation$$[]] :> With[{RSNB`p$ = RSNB`mPosRegion$$[]}, Apply[Sequence, { RSNB`offsetPos$$[RSNB`p$], {-30, 30}, RSNB`attachPos$$[RSNB`p$]}]]}}}], BoxBaselineShift -> -0.5, BoxMargins -> 0.2]& )}], Cell[ StyleData["ClickToCopyTemplate"], TemplateBoxOptions -> { DisplayFunction -> (PaneSelectorBox[{False -> TagBox[ GridBox[{{#, ButtonBox[ GraphicsBox[{ GrayLevel[0.85], Thickness[ NCache[2/45, 0.044444444444444446`]], FilledCurveBox[{{{0, 2, 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}, {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, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 18.}, { 9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, {16.5, 4.5}, { 16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, {15.75, 17.25}, { 15.75, 5.25}, {6.75, 5.25}, {6.75, 17.25}, {8.25, 17.25}, { 8.25, 18.}}, {{9.75, 17.25}, {12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], 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}}}, {{{8.25, 14.25}, { 14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{8.25, 12.}, { 14.25, 12.}, {14.25, 11.25}, {8.25, 11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25, 9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 6.75}}}]}, ImageSize -> 12], ButtonFunction :> Null, Appearance -> { "Default" -> None, "Hover" -> None, "Pressed" -> None}, Evaluator -> Automatic, Method -> "Preemptive"]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.4}}}], "Grid"], True -> DynamicModuleBox[{RSNB`clickTime$$ = 0., RSNB`timeout$$ = 3.}, TagBox[ GridBox[{{#, TagBox[ ButtonBox[ DynamicBox[ ToBoxes[ Refresh[ If[AbsoluteTime[] - RSNB`clickTime$$ > RSNB`timeout$$, RawBoxes[ TemplateBox[{ PaneSelectorBox[{False -> GraphicsBox[{ GrayLevel[0.65], Thickness[ NCache[2/45, 0.044444444444444446`]], FilledCurveBox[{{{0, 2, 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}, {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, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 18.}, {9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, { 16.5, 4.5}, {16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, { 15.75, 17.25}, {15.75, 5.25}, {6.75, 5.25}, {6.75, 17.25}, {8.25, 17.25}, {8.25, 18.}}, {{9.75, 17.25}, { 12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], 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}}}, {{{8.25, 14.25}, {14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{ 8.25, 12.}, {14.25, 12.}, {14.25, 11.25}, {8.25, 11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25, 9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 6.75}}}]}, ImageSize -> 12], True -> GraphicsBox[{ RGBColor[0.988235, 0.419608, 0.203922], Thickness[ NCache[2/45, 0.044444444444444446`]], FilledCurveBox[{{{0, 2, 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}, {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, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 18.}, {9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, { 16.5, 4.5}, {16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, { 15.75, 17.25}, {15.75, 5.25}, {6.75, 5.25}, {6.75, 17.25}, {8.25, 17.25}, {8.25, 18.}}, {{9.75, 17.25}, { 12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], 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}}}, {{{8.25, 14.25}, {14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{ 8.25, 12.}, {14.25, 12.}, {14.25, 11.25}, {8.25, 11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25, 9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 6.75}}}]}, ImageSize -> 12]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0], "\"Click to copy to the clipboard\""}, "PrettyTooltipTemplate"]], RawBoxes[ TemplateBox[{ GraphicsBox[{ RGBColor[0, NCache[2/3, 0.6666666666666666], 0], Thickness[ NCache[2/45, 0.044444444444444446`]], FilledCurveBox[{{{0, 2, 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}, {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, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, {{{10.5, 18.75}, {10.5, 18.}, {9., 18.}, {9., 15.75}, {13.5, 15.75}, {13.5, 18.}, {12., 18.}, {12., 18.75}}, {{6., 18.}, {6., 4.5}, { 16.5, 4.5}, {16.5, 18.}, {14.25, 18.}, {14.25, 17.25}, { 15.75, 17.25}, {15.75, 5.25}, {6.75, 5.25}, {6.75, 17.25}, {8.25, 17.25}, {8.25, 18.}}, {{9.75, 17.25}, { 12.75, 17.25}, {12.75, 16.5}, {9.75, 16.5}}}], 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}}}, {{{8.25, 14.25}, {14.25, 14.25}, {14.25, 13.5}, {8.25, 13.5}}, {{ 8.25, 12.}, {14.25, 12.}, {14.25, 11.25}, {8.25, 11.25}}, {{8.25, 9.75}, {14.25, 9.75}, {14.25, 9.}, {8.25, 9.}}, {{8.25, 7.5}, {14.25, 7.5}, {14.25, 6.75}, {8.25, 6.75}}}]}, ImageSize -> 12], "\"Copied\""}, "PrettyTooltipTemplate"]]], UpdateInterval -> 1, TrackedSymbols :> {RSNB`clickTime$$}], StandardForm], Evaluator -> "System"], ButtonFunction :> (RSNB`clickTime$$ = AbsoluteTime[]; CopyToClipboard[ BinaryDeserialize[ BaseDecode[#2], Defer]]), Appearance -> { "Default" -> None, "Hover" -> None, "Pressed" -> None}, Method -> "Queued", Evaluator -> "System"], MouseAppearanceTag["LinkHand"]]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.4}}}], "Grid"], DynamicModuleValues :> {}]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0]& )}], Cell[ StyleData["PrettyTooltipTemplate"], TemplateBoxOptions -> {DisplayFunction -> (TagBox[ TooltipBox[#, FrameBox[ StyleBox[#2, "Text", FontColor -> RGBColor[0.537255, 0.537255, 0.537255], FontSize -> 12, FontWeight -> "Plain", FontTracking -> "Plain", StripOnInput -> False], Background -> RGBColor[0.960784, 0.960784, 0.960784], FrameStyle -> RGBColor[0.898039, 0.898039, 0.898039], FrameMargins -> 8, StripOnInput -> False], TooltipDelay -> 0.1, TooltipStyle -> {Background -> None, CellFrame -> 0}], Annotation[#, Framed[ Style[ RSNB`$$tooltip, "Text", FontColor -> RGBColor[0.537255, 0.537255, 0.537255], FontSize -> 12, FontWeight -> "Plain", FontTracking -> "Plain"], Background -> RGBColor[0.960784, 0.960784, 0.960784], FrameStyle -> RGBColor[0.898039, 0.898039, 0.898039], FrameMargins -> 8], "Tooltip"]& ]& )}], Cell[ StyleData["ToolsGridTemplate"], TemplateBoxOptions -> {DisplayFunction -> (StyleBox[ TagBox[ GridBox[{{ FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ "\"Template Input\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Format selection automatically using appropriate \ documentation styles\""}, "PrettyTooltipTemplate"], 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 = 2790153672590285854; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Template Input"; DefinitionNotebookClient`TemplateInput[]]]], DefinitionNotebookClient`ButtonCodeID[ 2790153672590285854]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ "\"Literal Input\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Format selection as literal Wolfram Language code\""}, "PrettyTooltipTemplate"], 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 = 4138174468017918531; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Literal Input"; DefinitionNotebookClient`LiteralInput[]]]], DefinitionNotebookClient`ButtonCodeID[ 4138174468017918531]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ "\"Insert Delimiter\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Insert example delimiter\""}, "PrettyTooltipTemplate"], 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 = 1887802176716758884; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Insert Delimiter"; DefinitionNotebookClient`DelimiterInsert[]]]], DefinitionNotebookClient`ButtonCodeID[ 1887802176716758884]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ "\"Subscripted Variable\"", "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Insert subscripted variable placeholder\""}, "PrettyTooltipTemplate"], 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 = 3787878858871814623; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Subscripted Variable"; DefinitionNotebookClient`SubscriptInsert[]]]], DefinitionNotebookClient`ButtonCodeID[ 3787878858871814623]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], ActionMenuBox[ FrameBox[ ButtonBox[ TemplateBox[{ StyleBox[ TemplateBox[{ "\"Tables\"", "\"\[ThinSpace]\[ThinSpace]\[ThinSpace]\ \[FilledDownTriangle]\""}, "RowDefault"], "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], "\"Table functions\""}, "PrettyTooltipTemplate"], 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 = 3216557251994556740; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[Null]]], DefinitionNotebookClient`ButtonCodeID[ 3216557251994556740]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], { "\"Insert table with two columns\"" :> With[{RSNB`nb$ = InputNotebook[], 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 = 5800166344906378520; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Insert table with two columns"; DefinitionNotebookClient`TableInsert[2]]]], DefinitionNotebookClient`ButtonCodeID[ 5800166344906378520]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Insert table with three columns\"" :> With[{RSNB`nb$ = InputNotebook[], 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 = 533841403879783297; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Insert table with three columns"; DefinitionNotebookClient`TableInsert[3]]]], DefinitionNotebookClient`ButtonCodeID[ 533841403879783297]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Add a row to the selected table\"" :> With[{RSNB`nb$ = InputNotebook[], 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 = 4413051590217973467; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Add a row to the selected table"; DefinitionNotebookClient`TableRowInsert[]]]], DefinitionNotebookClient`ButtonCodeID[ 4413051590217973467]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Sort the selected table\"" :> With[{RSNB`nb$ = InputNotebook[], 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 = 9150037060110806081; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Sort the selected table"; DefinitionNotebookClient`TableSort[]]]], DefinitionNotebookClient`ButtonCodeID[ 9150037060110806081]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Merge selected tables\"" :> With[{RSNB`nb$ = InputNotebook[], 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 = 2347719643166780208; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Tables"; DefinitionNotebookClient`$ClickedAction = "Merge selected tables"; DefinitionNotebookClient`TableMerge[]]]], DefinitionNotebookClient`ButtonCodeID[ 2347719643166780208]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]}, Appearance -> None, Method -> "Queued"], ActionMenuBox[ FrameBox[ ButtonBox[ StyleBox[ TemplateBox[{ "\"Cells\"", "\"\[ThinSpace]\[ThinSpace]\[ThinSpace]\[FilledDownTriangle]\ \""}, "RowDefault"], "Text", FontFamily -> "Source Sans Pro", FontSize -> 11, StripOnInput -> False], 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 = 3216557251994556740; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[Null]]], DefinitionNotebookClient`ButtonCodeID[ 3216557251994556740]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], FrameMargins -> {{4, 4}, {0, 0}}, BaseStyle -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], FEPrivate`If[ CurrentValue["MouseOver"], { FontColor -> GrayLevel[1], TaggingRules -> {"ButtonHovering" -> True}}, { FontColor -> RGBColor[0.8274509803921568, 0.20784313725490197`, 0.], TaggingRules -> {"ButtonHovering" -> False}}], { FontColor -> RGBColor[0.9568627450980391, 0.8019607843137255, 0.75], TaggingRules -> {"ButtonHovering" -> False}}], Evaluator -> "System"], Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GPL5w6v66uRAEZJNqyN3J1VfdxC6bMiAjoAhQ nBhDHh3dfT3JGqLrhpfUgwJvCAKyIYJAWaAaPIYAZSEqbwapfjq8GS38gSJA cYgCZHPQDIG44XaU3r9fP7HGI1AcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+yIZCQ xPQFJgCqgYQzRCMkNUJiExKSBE2AAEg4Q+KdAQwoN4QqLvlPvTChVuxQJZ1Q K8VSJe/AAYW5GBlQWJ6QBKhoCH5ATGkPANqBKWU= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6G3Dt/+uKq+RAEZJNqyIn+urW20su12ZARUAQo Towhtw7v2RZtD9G1wYjrgK0wBAHZEEGgLFANHkOAshCVW0x5H0eo/8k2QUZA EaA4RAGyOWiGQNyw3ZzvV6YxmgkQBBQHykLcg9UQoH8hbsBlAtwciHvg4YNs CCQkMX2BiYBqIOEM0QhJjZDYhIQkQRMgCBLOkHhnAAPKDaGKS6gYJtSKHaqk E2qlWKrkHTigMBcjAwrLE5IAFQ3BD4gp7QGdXXDI "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4CllgA6GvHjx4i0MANmkGvLx48c/f/6g+RooAhQnxpBX r179+PEDIv771dNPR7ZAEJANEQTKAtXgMQQoCxH5+ejWg0Kfy6YMyAgoAhSH KEA2B80QiBu+3754xYoNzQQIAooDZSHuwWoI0L8QN+AyAW4OxD3w8EE2BBKS mL7AREA1kHCGaISkRkhsQkKSoAkQBAlnSLwzgAHlhlDFJVQME2rFDlXSCbVS LFXyDhxQmIuRAYXlCUmAiobgB8SU9gD80e8B "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> GrayLevel[0.9], Method -> "Queued", ImageSize -> {All, 20}, Evaluator -> Automatic], FrameStyle -> Directive[ GrayLevel[0.9], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False], { "\"Insert comment for reviewer\"" :> With[{RSNB`nb$ = InputNotebook[], 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 = 2572781756330727330; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Cells"; DefinitionNotebookClient`$ClickedAction = "Insert comment for reviewer"; DefinitionNotebookClient`CommentInsert[]]]], DefinitionNotebookClient`ButtonCodeID[ 2572781756330727330]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Mark/unmark selected cells as comments\"" :> With[{RSNB`nb$ = InputNotebook[], 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 = 3646530685697756512; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Cells"; DefinitionNotebookClient`$ClickedAction = "Mark/unmark selected cells as comments"; DefinitionNotebookClient`CommentToggle[]]]], DefinitionNotebookClient`ButtonCodeID[ 3646530685697756512]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Mark/unmark selected cells as excluded\"" :> With[{RSNB`nb$ = InputNotebook[], 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 = 1866935765212102190; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Cells"; DefinitionNotebookClient`$ClickedAction = "Mark/unmark selected cells as excluded"; DefinitionNotebookClient`ExclusionToggle[]]]], DefinitionNotebookClient`ButtonCodeID[ 1866935765212102190]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]}, Appearance -> None, Method -> "Queued"]}}, GridBoxAlignment -> {"Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxBackground -> {"Columns" -> {{None}}, "Rows" -> { GrayLevel[0.9]}}, GridBoxFrame -> { "Columns" -> False, "RowsIndexed" -> {1 -> GrayLevel[0.9]}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {5, {0.5}, 5}, "Rows" -> {{Automatic}}}, FrameStyle -> GrayLevel[0.75]], "Grid"], ButtonBoxOptions -> {Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}]}, StripOnInput -> False]& )}], Cell[ StyleData["MainGridTemplate"], TemplateBoxOptions -> {DisplayFunction -> (StyleBox[ TagBox[ GridBox[{{ TagBox[ GridBox[{{ GraphicsBox[{ Thickness[0.022222222222222223`], { FaceForm[{ RGBColor[0.87451, 0.278431, 0.03137260000000001], Opacity[1.]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{45., 22.5}, {45., 10.073999999999998`}, {34.926, 0.}, {22.5, 0.}, {10.074, 0.}, {0., 10.073999999999998`}, {0., 22.5}, {0., 34.926}, {10.074, 45.}, {22.5, 45.}, { 34.926, 45.}, {45., 34.926}, {45., 22.5}}}]}, { FaceForm[{ RGBColor[1., 1., 1.], Opacity[1.]}], FilledCurveBox[{{{0, 2, 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}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGAwAWIQLcESxqe7SdlhqnN3zvPblg4w/omyffOl/K0cEp9e ULq9U9lhT8lkCZZrVg6VL9UMOd4oO1SLrHN/GGXtcKUCKOCh4sDDpN0udtPa 4fnvlR8v8ao6ZIE12ELMrVZzmAIymNfOAWj43PfpGg45YIV2Dguk9O+qsGlB 9M+0h9gjpgOxh8fBYePc98uPees5MICAggNE/TF9B6Bl574rO0DcMcsAwmd2 cNCM6T/0VcPQAeQsjh6oeWWGEPt97R3UDTnWyMwyhKh7Yefw5S/QB22GEHe1 2zlIg5yTaAh3by7InUKGDmBnLrR1cOkGudzAYZHrts9/Q2wdHi+dfUShwMBh Q1HGxLcytg5BO+RaXwsaQN1r6/BdA2jRVn1oeNk6aIEcWq4HcccvWwfTuF2e PEy6UPPtHIC+CH68VBvOP70QaNFeLTg/T6j5wKlELYdPl3yTBCLsIOGkowVx 71tbhycg93zQdAjonZ4ndNgGzgern2ENVw90TZVInhUkfqy1IO65ZQl3L4wP iW99B/NOx4SnEyzh4Q+W32XhcBUc0PoQd7dawM1D568H2cdnCOd/A9nzVc/h I9hdWg4ZoIg6oueQD/Kfoh40nSD4fkDfWpboQOw7oYDBh6mHxIcy3DxYek4A peOfCD7MPTA+zL0yUSnW9/sV4Hxw/DgpQOL7igUkfi8qwsMHAHSDTZ8= "], {{19.051000000000002`, 14.242}, {19.051000000000002`, 27.594}, {23.828, 27.594}, {23.828, 26.543}, {21.426, 26.308999999999997`}, {21.375, 26.258000000000003`}, { 21.375, 24.219}, {21.375, 17.535000000000004`}, {21.375, 15.602}, {21.426, 15.547}, {23.828, 15.315999999999999`}, {23.828, 14.242}}, {{24.578, 18.75}, {24.578, 23.078000000000003`}, {24.578, 23.539}, { 24.953, 23.914}, {25.418, 23.91}, {29.746, 23.91}, { 30.203, 23.91}, {30.578, 23.539}, {30.578, 23.078000000000003`}, {30.578, 18.75}, { 30.581999999999997`, 18.288999999999998`}, {30.207, 17.91}, {29.746, 17.91}, {25.418, 17.91}, {24.953, 17.906}, {24.574, 18.285}, {24.578, 18.75}}, {{31.328, 14.242}, {31.328, 15.315999999999999`}, {33.684, 15.539000000000001`}, {33.789, 15.602}, {33.789, 17.641}, {33.789, 24.188}, {33.789, 26.227}, {33.684, 26.281}, {31.328, 26.512000000000004`}, {31.328, 27.586}, {36.113, 27.586}, {36.113, 14.234000000000002`}}}]}}, { ImageSize -> {Automatic, 32}, ImagePadding -> {{5, 0}, {0, 0}}, BaselinePosition -> Scaled[0.25], AspectRatio -> Automatic, Background -> RGBColor[0.988235, 0.419608, 0.203922], ImageSize -> {45., 45.}, PlotRange -> {{0., 45.}, {0., 45.}}}], StyleBox[ TagBox[ GridBox[{{ StyleBox[ "\"Function Resource\"", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", StripOnInput -> False], StyleBox[ "\"DEFINITION NOTEBOOK\"", FontFamily -> "Source Sans Pro", FontTracking -> "SemiCondensed", FontVariations -> {"CapsType" -> "AllSmallCaps"}, StripOnInput -> False]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxDividers -> { "ColumnsIndexed" -> {2 -> RGBColor[1., 1., 1.]}, "Rows" -> {{None}}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], FontSize -> 24, FontColor -> RGBColor[1., 1., 1.], StripOnInput -> False]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}], "Grid"], "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", "\[SpanFromLeft]", TemplateBox[{ StyleBox[ TemplateBox[{ "\"Function Repository\"", "\" \[RightGuillemet] \""}, "RowDefault"], "Text", FontColor -> RGBColor[1., 1., 1.], StripOnInput -> False], "https://resources.wolframcloud.com/FunctionRepository"}, "HyperlinkURL"]}, { TemplateBox[{ TemplateBox[{ "\"Open Sample\"", "\"View a completed sample definition notebook\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 4393071033038384034; DefinitionNotebookClient`$ClickedButton = "Open Sample"; DefinitionNotebookClient`ViewExampleNotebook[ ButtonNotebook[]], DefinitionNotebookClient`ButtonCodeID[4393071033038384034]]& , "\"View a completed sample definition notebook\"", False}, "OrangeButtonTemplate"], TemplateBox[{ TemplateBox[{ "\"Style Guidelines\"", "\"View general guidelines for authoring resource \ functions\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 5906117565281445171; DefinitionNotebookClient`$ClickedButton = "Style Guidelines"; DefinitionNotebookClient`ViewStyleGuidelines[ ButtonNotebook[]], DefinitionNotebookClient`ButtonCodeID[5906117565281445171]]& , "\"View general guidelines for authoring resource functions\"", False}, "OrangeButtonTemplate"], TemplateBox[{ TemplateBox[{ TagBox[ GridBox[{{"\"Tools\"", PaneSelectorBox[{False -> GraphicsBox[{ RGBColor[1., 1., 1.], AbsoluteThickness[1.], 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., 1., 1.], AbsoluteThickness[1.], 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]]}}, GridBoxAlignment -> { "Columns" -> {{Automatic}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.35}}}], "Grid"], "\"Toggle documentation toolbar\""}, "PrettyTooltipTemplate"], 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[0.994118, 0.709804, 0.601961]], "Grid"], TemplateBox[{ TemplateBox[{ "\"Check\"", "\"Check notebook for potential errors\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 7891204313296928191; DefinitionNotebookClient`$ClickedButton = "Check"; DefinitionNotebookClient`CheckDefinitionNotebook[ ButtonNotebook[]], DefinitionNotebookClient`ButtonCodeID[7891204313296928191]]& , "\"Check notebook for potential errors\"", False}, "OrangeButtonTemplate"], TemplateBox[{ TemplateBox[{"\"Preview\"", "\"Generate a preview notebook\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 4299709568580201021; DefinitionNotebookClient`$ClickedButton = "Preview"; DefinitionNotebookClient`PreviewResource[ ButtonNotebook[], "Notebook"], DefinitionNotebookClient`ButtonCodeID[4299709568580201021]]& , "\"Generate a preview notebook\"", True}, "OrangeButtonTemplate"], ActionMenuBox[ TemplateBox[{ TemplateBox[{"\"Deploy\"", TemplateBox[{5}, "Spacer1"], "\"\[FilledDownTriangle]\""}, "RowDefault"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 1898445052439169298; Null, DefinitionNotebookClient`ButtonCodeID[1898445052439169298]]& , "\"\"", True}, "OrangeButtonTemplate"], { "\"Locally on this computer\"" :> 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 = 8714502586816766511; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Deploy"; DefinitionNotebookClient`$ClickedAction = "Locally on this computer"; DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "Local"]]]]], DefinitionNotebookClient`ButtonCodeID[ 8714502586816766511]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"For my cloud account\"" :> 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 = 1389539917011878958; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Deploy"; DefinitionNotebookClient`$ClickedAction = "For my cloud account"; DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "CloudPrivate"]]]]], DefinitionNotebookClient`ButtonCodeID[ 1389539917011878958]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"Publicly in the cloud\"" :> 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 = 5593410685219912767; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Deploy"; DefinitionNotebookClient`$ClickedAction = "Publicly in the cloud"; DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "CloudPublic"]]]]], DefinitionNotebookClient`ButtonCodeID[ 5593410685219912767]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]], "\"In this session only (without 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 = 8586347731213964380; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ DefinitionNotebookClient`$ClickedButton = "Deploy"; DefinitionNotebookClient`$ClickedAction = "In this session only (without documentation)"; DefinitionNotebookClient`DisplayStripe[ ButtonNotebook[], DefinitionNotebookClient`DeployResource[ ButtonNotebook[], "KernelSession"]]]]], DefinitionNotebookClient`ButtonCodeID[ 8586347731213964380]], CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]}, Appearance -> None, Method -> "Queued"], ItemBox[ StyleBox[ DynamicBox[ ToBoxes[ CurrentValue[ EvaluationNotebook[], {TaggingRules, "StatusMessage"}, ""], StandardForm], Initialization :> (CurrentValue[ EvaluationNotebook[], {TaggingRules, "StatusMessage"}] = "")], "Text", GrayLevel[1], StripOnInput -> False], ItemSize -> Fit, StripOnInput -> False], DynamicBox[ ToBoxes[ If[ CurrentValue[ EvaluationNotebook[], { TaggingRules, "SubmissionReviewData", "Review"}, False], RawBoxes[ TemplateBox[{ TemplateBox[{ TagBox[ GridBox[{{ GraphicsBox[{ Thickness[0.06349], StyleBox[{ 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, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBWIWIGZigIEX9mCqQd8Bwv+Bnc/A54CiHs5HV6/ngJUP p2HmwdTp4FCHTvOhqYfZrw2lhdDk0fno6tHcD1PPwOSAnY+uns8BAE8cGz4= "]]}, { FaceForm[ RGBColor[1., 1., 1.]]}, StripOnInput -> False], StyleBox[{ 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, 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}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgB2IWIGZigAEJBwjNB6EblHHwX9ijqofxoeoYhKC0Bg4+ Hw4apk4Uap8aDr4QDhqqDu4uVRx8URw0TJ001D5lHHwJHDRUHYMclFbCwZfG QUPVNSjgp+HmIWgAG/wcEg== "]], 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, 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, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJx10EEKgCAQhWGpFtEyEAYGggQj6RKeoSMErbuCR0/IWfTgCcPwy7fR9XrO u3fOTXWGOp2zM+ZvH2170nv+e2sFH0ijt45/XxJp9NgRPHYAb63kHhu9tf2H eU8aPfbS9kxawAvxnrSCx3c3XzbS6JX4RFrAS34B53ckaw== "]]}, { FaceForm[ RGBColor[1., 1., 1.]]}, StripOnInput -> False]}, ImageSize -> 15, PlotRange -> {{0., 15.75}, {0., 16.5}}, AspectRatio -> 1.15], "\"Submit Update\""}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{0}}, "ColumnsIndexed" -> {2 -> 0.5}, "Rows" -> {{0}}}], "Grid"], "\"Submit changes to update your resource submission\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3196298050911436087; DefinitionNotebookClient`$ClickedButton = "SubmitUpdate"; With[{RSNB`nb = ButtonNotebook[]}, DefinitionNotebookClient`DisplayStripe[RSNB`nb, DefinitionNotebookClient`SubmitRepositoryUpdate[RSNB`nb], "ShowProgress" -> True]], DefinitionNotebookClient`ButtonCodeID[ 3196298050911436087]]& , "\"Submit changes to update your resource submission\"", True}, "OrangeButtonTemplate"]], RawBoxes[ TemplateBox[{ TemplateBox[{ TagBox[ GridBox[{{ GraphicsBox[{ Thickness[0.06349], StyleBox[{ 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, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBWIWIGZigIEX9mCqQd8Bwv+Bnc/A54CiHs5HV6/ngJUP p2HmwdTp4FCHTvOhqYfZrw2lhdDk0fno6tHcD1PPwOSAnY+uns8BAE8cGz4= "]]}, { FaceForm[ RGBColor[1., 1., 1.]]}, StripOnInput -> False], StyleBox[{ 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, 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}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgB2IWIGZigAEJBwjNB6EblHHwX9ijqofxoeoYhKC0Bg4+ Hw4apk4Uap8aDr4QDhqqDu4uVRx8URw0TJ001D5lHHwJHDRUHYMclFbCwZfG QUPVNSjgp+HmIWgAG/wcEg== "]], 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, 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, 2, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}}}, CompressedData[" 1:eJx10EEKgCAQhWGpFtEyEAYGggQj6RKeoSMErbuCR0/IWfTgCcPwy7fR9XrO u3fOTXWGOp2zM+ZvH2170nv+e2sFH0ijt45/XxJp9NgRPHYAb63kHhu9tf2H eU8aPfbS9kxawAvxnrSCx3c3XzbS6JX4RFrAS34B53ckaw== "]]}, { FaceForm[ RGBColor[1., 1., 1.]]}, StripOnInput -> False]}, ImageSize -> 15, PlotRange -> {{0., 15.75}, {0., 16.5}}, AspectRatio -> 1.15], "\"Submit to Repository\""}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {{0}}, "ColumnsIndexed" -> {2 -> 0.5}, "Rows" -> {{0}}}], "Grid"], "\"Submit your function to the Wolfram Function \ Repository\""}, "PrettyTooltipTemplate"], Annotation[ DefinitionNotebookClient`$ButtonCodeID = 3704832848557640569; DefinitionNotebookClient`$ClickedButton = "Submit"; With[{RSNB`nb = ButtonNotebook[]}, DefinitionNotebookClient`DisplayStripe[RSNB`nb, DefinitionNotebookClient`SubmitRepository[RSNB`nb], "ShowProgress" -> True]], DefinitionNotebookClient`ButtonCodeID[ 3704832848557640569]]& , "\"Submit your function to the Wolfram Function \ Repository\"", True}, "OrangeButtonTemplate"]]], StandardForm], Evaluator -> "System", SingleEvaluation -> True]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "ColumnsIndexed" -> {-1 -> Right}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxBackground -> {"Columns" -> {{None}}, "Rows" -> { RGBColor[0.988235, 0.419608, 0.203922], RGBColor[0.921569, 0.341176, 0.105882]}}, GridBoxFrame -> { "Columns" -> False, "RowsIndexed" -> { 1 -> RGBColor[0.988235, 0.419608, 0.203922], 2 -> RGBColor[0.921569, 0.341176, 0.105882]}}, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> { "Columns" -> {5, {0.9}, 5}, "RowsIndexed" -> {1 -> 1.1, 2 -> 1.3, 3 -> 0.25}}, FrameStyle -> RGBColor[0.988235, 0.419608, 0.203922]], "Grid"], ButtonBoxOptions -> {Enabled -> Dynamic[ Not[ TrueQ[DefinitionNotebookClient`$ButtonsDisabled]], TrackedSymbols :> {DefinitionNotebookClient`$ButtonsDisabled}]}, StripOnInput -> False]& )}], Cell[ StyleData["ReviewerCommentLabelTemplate"], TemplateBoxOptions -> {DisplayFunction -> (TagBox[ GridBox[{{#, TemplateBox[{ GraphicsBox[{ Thickness[0.022222222222222223`], { FaceForm[{ RGBColor[0.87451, 0.278431, 0.03137260000000001], Opacity[1.]}], FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{45., 22.5}, {45., 10.073999999999998`}, {34.926, 0.}, {22.5, 0.}, {10.074, 0.}, {0., 10.073999999999998`}, { 0., 22.5}, {0., 34.926}, {10.074, 45.}, {22.5, 45.}, {34.926, 45.}, {45., 34.926}, {45., 22.5}}}]}, { FaceForm[{ RGBColor[1., 1., 1.], Opacity[1.]}], FilledCurveBox[{{{0, 2, 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}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, { 1, 3, 3}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}}, {{0, 2, 0}, {1, 3, 3}, {0, 1, 0}, {1, 3, 3}, {0, 1, 0}, {0, 1, 0}, { 0, 1, 0}}}, {CompressedData[" 1:eJxTTMoPSmViYGAwAWIQLcESxqe7SdlhqnN3zvPblg4w/omyffOl/K0cEp9e ULq9U9lhT8lkCZZrVg6VL9UMOd4oO1SLrHN/GGXtcKUCKOCh4sDDpN0udtPa 4fnvlR8v8ao6ZIE12ELMrVZzmAIymNfOAWj43PfpGg45YIV2Dguk9O+qsGlB 9M+0h9gjpgOxh8fBYePc98uPees5MICAggNE/TF9B6Bl574rO0DcMcsAwmd2 cNCM6T/0VcPQAeQsjh6oeWWGEPt97R3UDTnWyMwyhKh7Yefw5S/QB22GEHe1 2zlIg5yTaAh3by7InUKGDmBnLrR1cOkGudzAYZHrts9/Q2wdHi+dfUShwMBh Q1HGxLcytg5BO+RaXwsaQN1r6/BdA2jRVn1oeNk6aIEcWq4HcccvWwfTuF2e PEy6UPPtHIC+CH68VBvOP70QaNFeLTg/T6j5wKlELYdPl3yTBCLsIOGkowVx 71tbhycg93zQdAjonZ4ndNgGzgern2ENVw90TZVInhUkfqy1IO65ZQl3L4wP iW99B/NOx4SnEyzh4Q+W32XhcBUc0PoQd7dawM1D568H2cdnCOd/A9nzVc/h I9hdWg4ZoIg6oueQD/Kfoh40nSD4fkDfWpboQOw7oYDBh6mHxIcy3DxYek4A peOfCD7MPTA+zL0yUSnW9/sV4Hxw/DgpQOL7igUkfi8qwsMHAHSDTZ8= "], {{19.051000000000002`, 14.242}, {19.051000000000002`, 27.594}, {23.828, 27.594}, {23.828, 26.543}, {21.426, 26.308999999999997`}, {21.375, 26.258000000000003`}, { 21.375, 24.219}, {21.375, 17.535000000000004`}, {21.375, 15.602}, {21.426, 15.547}, {23.828, 15.315999999999999`}, { 23.828, 14.242}}, {{24.578, 18.75}, {24.578, 23.078000000000003`}, {24.578, 23.539}, {24.953, 23.914}, { 25.418, 23.91}, {29.746, 23.91}, {30.203, 23.91}, {30.578, 23.539}, {30.578, 23.078000000000003`}, {30.578, 18.75}, { 30.581999999999997`, 18.288999999999998`}, {30.207, 17.91}, {29.746, 17.91}, {25.418, 17.91}, {24.953, 17.906}, {24.574, 18.285}, {24.578, 18.75}}, {{31.328, 14.242}, {31.328, 15.315999999999999`}, {33.684, 15.539000000000001`}, {33.789, 15.602}, {33.789, 17.641}, { 33.789, 24.188}, {33.789, 26.227}, {33.684, 26.281}, { 31.328, 26.512000000000004`}, {31.328, 27.586}, {36.113, 27.586}, {36.113, 14.234000000000002`}}}]}}, { ImageSize -> 12, AspectRatio -> Automatic, Background -> None, ImageSize -> {45., 45.}, PlotRange -> {{0., 45.}, {0., 45.}}}], "Wolfram Function Repository Reviewer"}, "PrettyTooltipTemplate"]}}, GridBoxAlignment -> { "Columns" -> {{Automatic}}, "Rows" -> {{Center}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.25}}}], "Grid"]& )}], Cell[ StyleData["CommentCellLabelTemplate"], TemplateBoxOptions -> {DisplayFunction -> (StyleBox[ TagBox[ GridBox[{{ StyleBox[#, FontSize -> 11]}, { StyleBox[ DynamicBox[ ToBoxes[ DateString[ TimeZoneConvert[ DateObject[#2, TimeZone -> 0]], { "Month", "/", "Day", "/", "Year", " ", "Hour24", ":", "Minute"}], StandardForm], SingleEvaluation -> True], FontSize -> 9]}}, GridBoxAlignment -> {"Columns" -> {{Left}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{Automatic}}, "Rows" -> {{0}}}], "Grid"], "CommentLabel", ShowStringCharacters -> False]& )}], Cell[ StyleData["OrangeButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (FrameBox[ ButtonBox[ StyleBox[#, "Text", FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontTracking -> "Condensed", FontSize -> 13, FontColor -> Dynamic[ FEPrivate`If[ CurrentValue[Enabled], GrayLevel[1], RGBColor[0.9568627450980391, 0.8019607843137255, 0.75]], Evaluator -> "System"], StripOnInput -> False], ButtonFunction :> With[{RSNB`nb$ = ButtonNotebook[]}, If[#4, CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ProgressIndicator[Appearance -> "Necklace"]]; With[{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 = 3145484069433207908; DefinitionNotebookClient`CheckForUpdates[RSNB`nb$, ReleaseHold[ DefinitionNotebookClient`$ButtonCode = HoldForm[ #2[]]]], DefinitionNotebookClient`ButtonCodeID[3145484069433207908]], DefinitionNotebookClient`$ButtonsDisabled = False; Null]; Null]]]; CurrentValue[RSNB`nb$, {TaggingRules, "StatusMessage"}] = ""; Null], FrameMargins -> {{5, 5}, {0, 0}}, Appearance -> {"Default" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4HW4NCWIDoa8CJZ47CsMQUA2qYY8cOe/Zsl82ZQBGQFF gOLEGPI8UOymHTtE1xUkE+BsoCxQDR5DgLJotuNCyOagGQJ3A0EEVInVEKB/ iTQBguDhg2wIZkjiR0D1EI2Q1AiJTbSQxI8gKiHxzgAGlBtCFZdQMUyoFTtU SSfUSrFUyTvUysVULE9IQlQ0BD8gprQHAOYEDp4= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Hover" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4HW4NCWIDoY8DpK86ikKQUA2qYacdhZaZ8CxXJsNGQFF gOLEGHLfX3yHOTeadmQElAWqwWMIUBaPdmSEbA6aIRA3rMCrfQXMPVgNAfqX SGdAEDx8kA3BDEn8CKgeohGSGiGxSZIJEASJdwYwoNwQqriEimFCrdihSjqh VoqlSt6hVi6mYnlCEqKiIfgBMaU9AAiH5q8= "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True], "Pressed" -> Image[CompressedData[" 1:eJxTTMoPSmNiYGAo5gASQYnljkVFiZXBAkBOaF5xZnpeaopnXklqemqRRRIz UFAcikHs/4QAMWqA4HW4NCWIDoa8zTb72JMMQUA2qYZ8Wdr69/1LNF8DRYDi xBjyvsz115UjEPFvL589PbgNgoBsiCBQFqgGjyFAWYjIpwe3D2YFLNdmQ0ZA EaA4RAGyOWiGQNzw/ubllQY8aCZAEFAcKAtxD1ZDgP6FuAGXCXBzIO6Bhw+y IZCQxPQFJgKqgYQzRCMkNUJiExKSBE2AIEg4Q+KdAQwoN4QqLqFimFArdqiS TqiVYqmSd6iVi6lYnpCEqGgIfkBMaQ8AIISqgg== "], "Byte", ColorSpace -> "RGB", ImageResolution -> 144, Interleaving -> True]}, Background -> RGBColor[0.921569, 0.341176, 0.105882], Method -> "Queued", ImageSize -> {All, 23}, Evaluator -> Automatic], FrameStyle -> Directive[ RGBColor[0.921569, 0.341176, 0.105882], AbsoluteThickness[2]], FrameMargins -> -1, ContentPadding -> False, StripOnInput -> False]& )}], Cell[ StyleData["SuggestionGridTemplate"], TemplateBoxOptions -> {DisplayFunction -> (StyleBox[ FrameBox[ AdjustmentBox[ TagBox[ GridBox[{{ TemplateBox[{#2, #3, {16., 16.}, {{1., 17.}, {1., 17.}}}, "SuggestionIconTemplate"], PaneBox[#, ImageSizeAction -> "ShrinkToFit", BaselinePosition -> Baseline, ImageSize -> Full], RowBox[{ AdjustmentBox[ TemplateBox[{ ActionMenuBox[ TagBox[ PaneSelectorBox[{False -> GraphicsBox[{ EdgeForm[ Directive[ GrayLevel[1, 0], Thickness[0.025]]], FaceForm[#4], RectangleBox[{-1.75, -2}, {1.75, 2}, RoundingRadius -> 0.2], Thickness[0.15], #5, LineBox[{{-0.5, -1.}, {0.5, 0.}, {-0.5, 1.}}]}, ImageSize -> {Automatic, 15}, ImageMargins -> 0], True -> GraphicsBox[{ EdgeForm[ Directive[#5, Thickness[0.025]]], FaceForm[#2], RectangleBox[{-1.75, -2}, {1.75, 2}, RoundingRadius -> 0.2], Thickness[0.15], GrayLevel[1], LineBox[{{-0.5, -1.}, {0.5, 0.}, {-0.5, 1.}}]}, ImageSize -> {Automatic, 15}, ImageMargins -> 0]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0], MouseAppearanceTag["LinkHand"]], #6, Appearance -> None, Method -> "Queued"], "\"View suggestions\""}, "PrettyTooltipTemplate"], BoxBaselineShift -> -0.5], " "}]}}, GridBoxAlignment -> { "Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, AutoDelete -> False, GridBoxItemSize -> { "Columns" -> {Automatic, Automatic, Fit}, "Rows" -> {{Automatic}}}, GridBoxSpacings -> {"Columns" -> {{0.4}}}], "Grid"], BoxMargins -> {{0.25, -0.5}, {0.15, -0.15}}], RoundingRadius -> {13, 75}, Background -> #4, FrameStyle -> None, FrameMargins -> {{0, 8}, {0, 0}}, ImageMargins -> {{0, 0}, {5, 5}}, StripOnInput -> False], "Text", FontColor -> #5, FontSize -> 14, FontFamily -> "Source Sans Pro", FontWeight -> "SemiBold", FontTracking -> "Plain", PrivateFontOptions -> {"OperatorSubstitution" -> False}, LineBreakWithin -> False]& )}], Cell[ StyleData["SuggestionIconTemplate"], TemplateBoxOptions -> {DisplayFunction -> (GraphicsBox[{ Thickness[0.05555555555555555], StyleBox[{ FilledCurveBox[{{{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, CompressedData[" 1:eJxTTMoPSmVmYGBgBGJJIGZigIIGAwcIQ8kBxk94ekHp9k9Vh4qXaoYcOfoO m+a+X37stKZDbP+hrxpzdOA0TBymDqYPl7n2pnG7PHlk4PzZRxQ2FGWIwPWD jI3p54WbLxuVYn3fnwluD8S8H/Yo9gD5KPYA+TB7YPph9sDMh9EwcZg6FPdh MRfdXpi7YPph7oaZD/MXzB5c4QCzBwA8nn+Z "]]}, FaceForm[#]], StyleBox[{ FilledCurveBox[{{{0, 2, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}, {0, 1, 0}}, {{1, 4, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}, {1, 3, 3}}}, {{{8.175292500000001, 7.416875}, {7.796855000000001, 11.3084375}, {7.796855000000001, 13.38}, {10.11998, 13.38}, {10.11998, 11.3084375}, { 9.741542500000001, 7.416875}, {8.175292500000001, 7.416875}}, CompressedData[" 1:eJxTTMoPSmViYGCQBGIQ/cTvZcLf/4oOD6tE1rk/5HNQjDzAkqeL4FsusdsW 1KjgwAAGAg7hCSdehX2Xd5BvfR24Q07QwaZCOJPjjZyDHdf1xQW2Qg56LJYa iWlyDv2HvmrEzBeG80GmVbmIwvkvtjT6Sb8Qg+t/BLLPUwJuPti6DEm4/WD7 2qTg7gMZJyIm7QBzP4y/zEVob88lJTi/7+dk7hV1ynD9c3LzfPxZVODmr3ro 0futUwVu/0bpbbqnzqjA3Qfjw9wP48P8B9MP8z/MfFj4wOyHhR/MfbDwRQ9/ ACBxmlc= "]}]}, FaceForm[#2]]}, ImageSize -> #3, PlotRange -> #4, AspectRatio -> Automatic, BaselinePosition -> Scaled[0.1]]& )}], Cell[ StyleData["FormEditValuesButtonTemplate"], TemplateBoxOptions -> {DisplayFunction -> (TemplateBox[{ TagBox[ PaneBox[ PaneSelectorBox[{False -> GraphicsBox[ TagBox[ RasterBox[CompressedData[" 1:eJzNWHlMVEcYf28XlGM5VlcRapRDDFK0sBaLBWVXUDxTKpe4JgvoQlALAsvV hHIoV4KK6wGiQlUqoqDcKKysDSZtPZJWTTzaxGrV2mqrNtqKB3Qnz8+Zd6Cv tn90vkgyv+/4zc58M9/3dEtIXZoooSgqw8r8Z2l8tjo9PT43wtE8iUrJSE5K 0a1akKLXJenSAxKkZlD58h9y+X+M8Z7a/I3G7V/lHQgKp2kGmzw9rcrQb+j/ ZItPIGBvNywsVVGVJ01DWAqbpBYUFZ1hGsTYvssRqTLHt4nvoIgvbP6ZjM+I Nt9PzUePPdbvcvX+ZwzTQ9vv8yMh6R04fFNY0/ciOkM8wzjXY4+F47xJgiPF cqRuY3kOlnUGLFq4khsv53NPv8zd7NXs/lYsR+158Gm9l1Tu7IYwmq7oJaMd uWMnR7jMMXLd/isYt7UXx4F9Rjtj1NmNXPPsCKyh6S9+AHzUOHEcpR3gMWM+ iQdHrq1kZFkmidvYQS633399ZBf31G21F/ZdLmmvPo0zVcyalCFg33Qr78Ce 7+qv5jdOm8W3e39u9yN+npR3ieHQ5ArlWGwW28pBIXwfilvFcESnC2eyMoS0 ii8UstncZ2XDjiaROihGjbMcyWVJLBP0N2ELC8vm229icHFPKKo+Y3zK3Jj6 q2lV3gFvZpk4BfSqKHwfFC4fLNDml3cVt2IGO7m+5sRzfoSNxglemGVV8dZT yRXqaKeJ5V1gkWIALX5bk8r5u+3x3qEbwvuN3kJ1DN9j5mLQdz60skXIeM9X PoPMnWYzdD4cjoGRMC3XRyI5+CNolyQhJK4A5mWdXGs7Ofs3HP+z9nz16fbf Scz41Muf67c8B7Q7z6L5RiPMAxZxbfU1OFbDtVDNSGtmnb4qQz/W1F1ElYsc 8rG9A6BF8x1fw2zhSnbddHHHJ115kl3rJNI1mzBL6HI2x9SglrugQzHzG7Ft RQ95IglF+DfwqylNb2gRugnWMnNteFWLj/+FsNlLyd3tfoTrTPWZV+vUcBnQ cHbre8HoTzy3ljGYxzT2Cep3MespaibRtZWwGy9vnPmkmXPgjy1fgte7Mxlk fhwZa/8V+9EQTZuPzwg4HBSA1J4XZqCotB1gExTO58hrYOoYM5RzcCcAHHIn QKpPD8eBzx12GHP0PAlfjXPI3C8J7JXlSNjt9vuSYVrKkjbwUs4R2quCwxLU mFJTZpCoaQjXuPqrgPmqhBhs7XH1lTsxmP889su24lOEZuzEyJE7ZJ3Gu23o Z9bDHvitrb2A0Um+NedwxKO/IGzrKZhn15FnRFHeAdh2zSZuXxscCXtpGorR kxqpRWx2zxPQsTk8/bgrxe+MaWj9UXw/be11pZih5VduxzPCqu03kiPFALPM 3VyOCV5kv9P3ovJk6rbkipI2du3n39AwLegO3UBzn0CYH3vMfzHUMeyM4Mu6 7Vwfiqr6BrRxBWhO0/suAxK5jm8fpoX7LszAz4bJStAanylcGCwiFbD9V2ja xk4ZosmNTsc+Xv51F4Xit9yduwJbqaJ0JYEfoT4xaw9YFDaBVuaId93cVb58 MxPLsL/UIlSz2URmft3FGL2tA7YI1UAONF7HOeWnxhb6XULrJFnQsLHz+XDW x6ooZQjcOD4DKXsvkfnu6i1kYxpaVcw/H/5QRQl7L0lk27HfLJCtp8Rw6EqF fDe08F+54MjaC0jX8aDpFtglV4jhCAoH+44HzPvdfFuTy63xMGwd5GMpKq8B fNTRpNZj2vw4RvznkfhoZ7A/fBO9AdzTEhrM70HiNBGj1jJcRY3PJvmSHod+ Ao3Yr2j8HVXeNXMx7Cr7K7HmHOzFZGXWHpytjmPEcXx2kIzWcG15juOYqUHk dz+S2OwRVmFa3DkhaboljgF1R9wc6R3A/RJIz5PWe1wsNlssB0XFZgllI8Qe TrOhxcJSPAfqIjabhOLkNYSvFsL3XlqsG67qv264eqcYuv4gI9V/bz+Kptcf IbETz4ualXP+zf/+WMuWJO08i2J1P0qrYjJTIl2WyXx5NV6PK1C88/bR/7vx N3kqZvY= "], {{0, 50.}, {50., 0}}, {0, 255}, ColorFunction -> GrayLevel], BoxForm`ImageTag[ "Byte", ColorSpace -> "Grayscale", Interleaving -> False], Selectable -> False], DefaultBaseStyle -> "ImageGraphics", ImageSizeRaw -> {50., 50.}, PlotRange -> {{0, 50.}, {0, 50.}}], True -> GraphicsBox[ TagBox[ RasterBox[CompressedData[" 1:eJzNWG1MU1cY7m1vS4GWttBLy0dLWyhl5aultrT0C2QzM5rMIWgyluDHkMwf YgBF9gc1cWpijDNuRNFsv2Rmuqmb/NjIYIFkG2qyAYnAljidODfdmItu+AHs Xi6n59x7D3LH9mPnRJLzvB/Pue95z3nfat3UWLVFKpFImpX0n6qNrRVNTRvb 1mrpRc225tcbttW/tnJbS31DfZN/k4wGS+b/MSb/jxFvt7QX95R86TytXyMh WEztye1w97v7c97SBAG2tEHIqRpXX/ksnPlnCVIiMTWXz0DMN5rZSGqX4l+u t+wp+wn1z05Lu7ZCiIYfOjoTnf+MQfd8aFLoiZmRR4FbeEl02tQsnkFpCT/E +1lsUtViOezHOJYzhZdSVqVt5vvLe0/ldpzk7mbZN2I5vEPAJnjPdlBpnQOJ 4s9Qb2V3SB0Dk9rM7b4xiJNJ4jigjSINiaAV3TO1FjEgSr+PWRjFcRR+AiyS X0RxqjrnCDtNO1Bcpga5HJp8tud4m/2Yd9g3WvixZxBmqpg96SqBfmDCeXrZ t6XjzjOaMEbvhfADYZ4UdYvhMLfhcsy8k6sl1+PvQ8EFMRymJnwm6ypRLcse nI7rc1kC1xshk+sVRmkcn8V2AGvfi1jKy24vxhBvs+71XI4+Zm9M6XhuR5J/ cZaE54CcqoH3IS49eaWlvai74AJkIHWOE9GnQg/FPQl5kMW6zz2QfSh1nTKr qBto2I8CKXxbbQeF0VYVB27i4828hanrhRYpq4E8dF+WOBcFe8xmZv5OcxhC 9xdiYKexjm9DSP0/AGl6A4NYdoN14SW+NqnjfkPkT++QZzD0G4pFH6u9fDvz LiD1XGHWxT1gnbKKr+s4AX35rxtqpfHsPrXl7n4o8Y4wlQsditTIIyBl1iVf gVXaZm7djLfBk3b1cWsdIcs5DFkMr3A5NKHg3RgH7dN5BsmUT9ETse6F34Cp pkTBedxNkKno2hCrxZG/GIyq4mTKA1hnPJdj+6wVMEiYlzg6PX8mT2UqFlMV cU/Q0cnuJ/8ciuYcAdGYv3H0SbPnIByuL4BVUoBFjBtQX74xeQrwZmmHZwQ4 5PrYmQ7hGSSS3HeADt0XCTicXWwdY4duOewEAIfCEMu/wYU44LmDCEOOyFTG VphDdL+EiZU0DkQ7NEks0FIWXgRWuuW4WOV/QDCNqSTJh6Lls7DGlY4DTFuO YyCTYPVVGFgseQX3Zct6Yy6mxyFSdget0zDa7n52P9wB31rvMERVLs9VxOPP DOYeAOu8d9Ezor/Qj0TwML+vpapBLOlvb0ElBGlujUzF7iCHQ+Xm7xS+M3RN /AjeTzLJth8yBH/hdzxSZfBXlMN+NHZfTvI5EvLQfic67eqzH8s+VHiRW/uF N9RYB2SBm8xaEwTr8EPhi5G6npsRwml/m29Dv4FfA6llNxs+3yhAMrcL9Y11 4L7jGYTZoC6JffmTuHQWy2wEmG+MvvRqXaW5zdSE2Hi9Izj/wbuGV6EWVWN7 U/8S0yc6TsXux1kgJbUw6nRXOf9m2g5Ae4I01Lp60cz3jphaSA3UMNSCHPDf gDmlrYAajk7cPlEWZsjUmjL9y1SNrhLcOCEDOn3X0HxPdOJ0ymet+4TnIxxU Dd46fQtXj/tmgekeEMNh24+zLTgvfOWoau8wIwv9HpgAetmHxHDo1wB92nbu /S67bW7j13gwSI0ila6+XcAmdR0qVRUZN7AzeQWKK9KAfuAW8wbwTws32O9h pjILojIVrKLRJyoXahH4EUjE/oqGv6OKulNWg6hyfyV6roJYqEscp2C2yilx HM73UW/+6+ZdckoTQn/3M9PcKlUa62DnNBerCXEMTHfEz5HII9gvxbCp4D0+ Zm4Vy0H3kjtx2Qh8LyShs1UunoPpIly9OD/OroytONx3La1+oar/rJHotB8N /4F6Kv1Onkz3hx+iWPRp/jm6Y/gX//sjU6U3eK4wvsIPcjvYzCRkph3sLy// DcvuuIyle//vxt/PCE6d "], {{0, 50.}, {50., 0}}, {0, 255}, ColorFunction -> GrayLevel], BoxForm`ImageTag[ "Byte", ColorSpace -> "Grayscale", Interleaving -> False], Selectable -> False], DefaultBaseStyle -> "ImageGraphics", ImageSizeRaw -> {50., 50.}, PlotRange -> {{0, 50.}, {0, 50.}}]}, Dynamic[ CurrentValue["MouseOver"]], ImageSize -> Automatic, FrameMargins -> 0], ImageSize -> {Automatic, 15}, ImageSizeAction -> "ResizeToFit"], MouseAppearanceTag["LinkHand"]], "\"Edit values\""}, "PrettyTooltipTemplate"]& )}], Cell["Documentation", "Section"], Cell["Usage", "Subsection"], 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"], 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"], 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], Cell["Details & Options", "Subsection"], 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["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 -> {}, StyleMenuListing -> None], Cell["Examples", "Subsection"], Cell[ StyleData["ExampleDelimiter"], Selectable -> False, ShowCellBracket -> Automatic, CellMargins -> {{66, 14}, {5, 10}}, Evaluatable -> True, CellGroupingRules -> {"SectionGrouping", 58}, CellEvaluationFunction -> (($Line = 0; Null)& ), 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"]], Selectable -> False, CellFrame -> {{0, 0}, {1, 0}}, CellMargins -> {{66, 14}, {15, -5}}, CellElementSpacings -> {"CellMinHeight" -> 1}, Evaluatable -> True, CellEvaluationFunction -> (($Line = 0; Null)& ), CellFrameColor -> GrayLevel[ Rational[77, 85]]], Cell[ StyleData["Subsection"], Evaluatable -> True, CellEvaluationFunction -> (($Line = 0; Null)& ), ShowCellLabel -> False], Cell[ StyleData["Subsubsection"], Evaluatable -> True, CellEvaluationFunction -> (($Line = 0; Null)& ), ShowCellLabel -> False], Cell[ StyleData["ExampleImage"], PageWidth :> 650, CellMargins -> {{66, 66}, {16, 5}}, Evaluatable -> False, ShowCellLabel -> False, MenuSortingValue -> 10000, RasterBoxOptions -> {ImageEditMode -> False}], Cell["Links", "Section"], 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["StringTypeLink", StyleDefinitions -> StyleData["Link"]], FontColor -> Dynamic[ If[ CurrentValue["MouseOver"], RGBColor[0.969, 0.467, 0.], GrayLevel[0.467]]]], Cell[ StyleData["CharactersRefLink"], ShowSpecialCharacters -> False], Cell["Annotation", "Section"], 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.880722, 0.611041, 0.142051], 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.368417, 0.506779, 0.709798], 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.560181, 0.691569, 0.194885], Background -> RGBColor[0.934, 0.954, 0.879]], Cell[ StyleData["CommentLabel", StyleDefinitions -> StyleData["Text"]], ShowStringCharacters -> False, FontSlant -> "Italic", FontColor -> GrayLevel[0.5]], Cell["Special Input", "Section"], 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 :> With[{RSNB`file = SystemDialogInput["FileOpen"], RSNB`cell = ParentCell[ EvaluationCell[]]}, If[ RSNB`file =!= $Canceled, SelectionMove[RSNB`cell, All, CellContents]; NotebookWrite[ Notebooks[RSNB`cell], RowBox[{"File", "[", ToBoxes[RSNB`file], "]"}]]]], Appearance :> FEPrivate`FrontEndResource[ "FEExpressions", "GrayButtonNinePatchAppearance"]]]]}, { 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`file = SystemDialogInput["Directory"], RSNB`cell = ParentCell[ EvaluationCell[]]}, If[ RSNB`file =!= $Canceled, SelectionMove[RSNB`cell, All, CellContents]; NotebookWrite[ Notebooks[RSNB`cell], RowBox[{"File", "[", ToBoxes[RSNB`file], "]"}]]]], Appearance :> FEPrivate`FrontEndResource[ "FEExpressions", "GrayButtonNinePatchAppearance"]]]]}, { None, None}}], Cell["Misc", "Section"], 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. Inherited, ButtonBoxOptions -> {Appearance -> {Automatic, None}}, FractionBoxOptions -> {BaseStyle -> {SpanMaxSize -> Automatic}}, GridBoxOptions -> { GridBoxItemSize -> { "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}}], Cell[ StyleData["DockedCell"], CellFrameColor -> GrayLevel[0.75], Background -> GrayLevel[0.9]]}, Visible -> False, FrontEndVersion -> "13.1 for Linux x86 (64-bit) (June 16, 2022)", StyleDefinitions -> "PrivateStylesheetFormatting.nb"] ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{ "Name"->{ Cell[632, 23, 99, 2, 70, "Title",ExpressionUUID->"208a88ae-57e8-4ea4-9fd1-df4c282e5fc8", CellTags->{"Name", "TemplateCell", "Title"}, CellID->421705929]}, "TemplateCell"->{ Cell[632, 23, 99, 2, 70, "Title",ExpressionUUID->"208a88ae-57e8-4ea4-9fd1-df4c282e5fc8", CellTags->{"Name", "TemplateCell", "Title"}, CellID->421705929], Cell[734, 27, 129, 2, 70, "Text",ExpressionUUID->"57bfe79e-46fa-4046-9cb3-1a7e0744a8c0", CellTags->{"Description", "TemplateCell"}, CellID->549920672]}, "Title"->{ Cell[632, 23, 99, 2, 70, "Title",ExpressionUUID->"208a88ae-57e8-4ea4-9fd1-df4c282e5fc8", CellTags->{"Name", "TemplateCell", "Title"}, CellID->421705929]}, "Description"->{ Cell[734, 27, 129, 2, 70, "Text",ExpressionUUID->"57bfe79e-46fa-4046-9cb3-1a7e0744a8c0", CellTags->{"Description", "TemplateCell"}, CellID->549920672]}, "Definition"->{ Cell[888, 33, 1206, 29, 70, "Section",ExpressionUUID->"39baa5df-1e78-49d4-9ebf-1855128ca229", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326]}, "Function"->{ Cell[888, 33, 1206, 29, 70, "Section",ExpressionUUID->"39baa5df-1e78-49d4-9ebf-1855128ca229", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326]}, "TemplateCellGroup"->{ Cell[888, 33, 1206, 29, 70, "Section",ExpressionUUID->"39baa5df-1e78-49d4-9ebf-1855128ca229", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[57648, 1389, 1980, 50, 70, "Subsection",ExpressionUUID->"31a9a01b-d532-42ac-8ca0-5fa46cc2e1d3", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310], Cell[62279, 1545, 1429, 32, 70, "Subsection",ExpressionUUID->"3be3b5aa-319d-47e6-a7cc-bfc04a2facee", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236], Cell[68504, 1744, 7029, 152, 70, "Section",ExpressionUUID->"71196aef-b697-4a72-abf6-f90541ffb734", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[189364, 4949, 1026, 26, 70, "Subsection",ExpressionUUID->"3fbaa830-150e-437e-8a9a-476fbf2fd065", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell[190480, 4983, 996, 26, 70, "Subsection",ExpressionUUID->"3873bb03-574f-474a-95c8-9f645c8cb2b1", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425], Cell[191870, 5038, 221, 6, 70, "Subsection",ExpressionUUID->"439188b1-9444-4b12-a887-90de80d60545", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[200455, 5304, 980, 26, 70, "Subsection",ExpressionUUID->"75ba8a9a-3850-4f6d-ac0e-6722a3b90857", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169], Cell[201619, 5344, 1039, 26, 70, "Subsection",ExpressionUUID->"f2240ef4-0ae3-46ce-a4bf-b2a280e6487b", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472], Cell[203226, 5385, 1084, 26, 70, "Subsection",ExpressionUUID->"b4005765-8c2c-40c8-a691-5b9cc7131ec6", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], Cell[204598, 5424, 923, 26, 70, "Subsection",ExpressionUUID->"86365131-bbf0-4be3-b336-44087853818b", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], Cell[206070, 5470, 1874, 45, 70, "Subsection",ExpressionUUID->"24ac1e71-ab7e-462b-bab7-9215d88838ae", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[859836, 20054, 955, 25, 70, "Subsection",ExpressionUUID->"195374fd-ff55-4aad-91b2-a106cbd5a793", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[860816, 20083, 1174, 31, 70, "Subsubsection",ExpressionUUID->"e7c9133e-d8f2-4ad8-9e79-a5c599f7aab6", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell[862119, 20123, 1113, 29, 70, "Subsubsection",ExpressionUUID->"42f412c4-9dd1-44c3-8b93-cfc69ae01412", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[865370, 20221, 1280, 33, 70, "Subsubsection",ExpressionUUID->"64e21d9c-f7ab-4a71-98f1-ff50bf979ad8", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[868839, 20324, 1913, 46, 70, "Subsubsection",ExpressionUUID->"451203f8-21ab-4181-8584-288b8c3fb2b0", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[874778, 20494, 1071, 27, 70, "Subsubsection",ExpressionUUID->"f67b5beb-a74c-488b-aae9-9efd94cbadc5", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[877131, 20566, 1155, 28, 70, "Section",ExpressionUUID->"1491ad61-786e-4b81-a927-82e7476dda4a", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], Cell[878855, 20609, 1033, 26, 70, "Section",ExpressionUUID->"28658bc0-de4e-4c37-a588-f4bd50e51b27", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765]}, "TabNext"->{ Cell[18307, 425, 571, 10, 70, "Subsection",ExpressionUUID->"09e49a22-5c49-4238-97c0-22ef36a86f72", CellTags->"TabNext", CellID->294285759], Cell[63711, 1579, 214, 6, 70, "Notes",ExpressionUUID->"ca3b93d4-2ac1-4dae-84f5-b47b8205bb2c", CellTags->"TabNext", CellID->395719005], Cell[202661, 5372, 528, 8, 70, "Item",ExpressionUUID->"ae112936-7af7-4f8d-8b6a-918449759497", CellTags->{"DefaultContent", "TabNext"}, CellID->873143661], Cell[878289, 20596, 529, 8, 70, "Text",ExpressionUUID->"b1873ea2-c79d-4b6c-89a8-5668167cdf28", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487], Cell[879891, 20637, 515, 8, 70, "Text",ExpressionUUID->"beac507e-cdeb-43fb-9107-1ada2f8eb320", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542]}, "Documentation"->{ Cell[57428, 1380, 195, 5, 70, "Section",ExpressionUUID->"8a8446fe-bad4-4eca-a7a8-cc158cf0018b", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307]}, "TemplateSection"->{ Cell[57428, 1380, 195, 5, 70, "Section",ExpressionUUID->"8a8446fe-bad4-4eca-a7a8-cc158cf0018b", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307], Cell[189090, 4940, 249, 5, 70, "Section",ExpressionUUID->"c0e88449-5c67-4eb1-abe3-9814bbaaa680", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116]}, "Usage"->{ Cell[57648, 1389, 1980, 50, 70, "Subsection",ExpressionUUID->"31a9a01b-d532-42ac-8ca0-5fa46cc2e1d3", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310]}, "Details & Options"->{ Cell[62279, 1545, 1429, 32, 70, "Subsection",ExpressionUUID->"3be3b5aa-319d-47e6-a7cc-bfc04a2facee", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236]}, "Notes"->{ Cell[62279, 1545, 1429, 32, 70, "Subsection",ExpressionUUID->"3be3b5aa-319d-47e6-a7cc-bfc04a2facee", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236]}, "Examples"->{ Cell[68504, 1744, 7029, 152, 70, "Section",ExpressionUUID->"71196aef-b697-4a72-abf6-f90541ffb734", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011]}, "Source & Additional Information"->{ Cell[189090, 4940, 249, 5, 70, "Section",ExpressionUUID->"c0e88449-5c67-4eb1-abe3-9814bbaaa680", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116]}, "Contributed By"->{ Cell[189364, 4949, 1026, 26, 70, "Subsection",ExpressionUUID->"3fbaa830-150e-437e-8a9a-476fbf2fd065", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256]}, "ContributorInformation"->{ Cell[189364, 4949, 1026, 26, 70, "Subsection",ExpressionUUID->"3fbaa830-150e-437e-8a9a-476fbf2fd065", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256]}, "Keywords"->{ Cell[190480, 4983, 996, 26, 70, "Subsection",ExpressionUUID->"3873bb03-574f-474a-95c8-9f645c8cb2b1", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425]}, "Categories"->{ Cell[191870, 5038, 221, 6, 70, "Subsection",ExpressionUUID->"439188b1-9444-4b12-a887-90de80d60545", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[192094, 5046, 8324, 253, 70, "Output",ExpressionUUID->"9d5b3e74-6673-41b3-baf6-756dc8fa1c17", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->270468172]}, "Categories-Checkboxes"->{ Cell[192094, 5046, 8324, 253, 70, "Output",ExpressionUUID->"9d5b3e74-6673-41b3-baf6-756dc8fa1c17", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->270468172]}, "CheckboxCell"->{ Cell[192094, 5046, 8324, 253, 70, "Output",ExpressionUUID->"9d5b3e74-6673-41b3-baf6-756dc8fa1c17", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->270468172], Cell[863235, 20154, 2098, 62, 70, "Output",ExpressionUUID->"42cebe0c-4c3c-4eb8-8690-0b538289b649", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->589765368], Cell[866653, 20256, 2149, 63, 70, "Output",ExpressionUUID->"32f683c8-73f7-4672-b6dd-510b2a77f75a", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->851691753], Cell[870755, 20372, 3986, 117, 70, "Output",ExpressionUUID->"7e3c37d1-a394-4a08-9979-58b751ba2502", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->71422750], Cell[875852, 20523, 1218, 36, 70, "Output",ExpressionUUID->"370b9772-c57e-4488-828d-495dae5670c6", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->131115484]}, "Related Symbols"->{ Cell[200455, 5304, 980, 26, 70, "Subsection",ExpressionUUID->"75ba8a9a-3850-4f6d-ac0e-6722a3b90857", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169]}, "Related Resource Objects"->{ Cell[201619, 5344, 1039, 26, 70, "Subsection",ExpressionUUID->"f2240ef4-0ae3-46ce-a4bf-b2a280e6487b", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472]}, "DefaultContent"->{ Cell[202661, 5372, 528, 8, 70, "Item",ExpressionUUID->"ae112936-7af7-4f8d-8b6a-918449759497", CellTags->{"DefaultContent", "TabNext"}, CellID->873143661], Cell[861993, 20116, 89, 2, 70, "Text",ExpressionUUID->"6d147093-2e60-4233-a386-ccb2a676de75", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768], Cell[878289, 20596, 529, 8, 70, "Text",ExpressionUUID->"b1873ea2-c79d-4b6c-89a8-5668167cdf28", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487], Cell[879891, 20637, 515, 8, 70, "Text",ExpressionUUID->"beac507e-cdeb-43fb-9107-1ada2f8eb320", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542]}, "Source/Reference Citation"->{ Cell[203226, 5385, 1084, 26, 70, "Subsection",ExpressionUUID->"b4005765-8c2c-40c8-a691-5b9cc7131ec6", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552]}, "Links"->{ Cell[204598, 5424, 923, 26, 70, "Subsection",ExpressionUUID->"86365131-bbf0-4be3-b336-44087853818b", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773]}, "Tests"->{ Cell[206070, 5470, 1874, 45, 70, "Subsection",ExpressionUUID->"24ac1e71-ab7e-462b-bab7-9215d88838ae", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448]}, "VerificationTests"->{ Cell[206070, 5470, 1874, 45, 70, "Subsection",ExpressionUUID->"24ac1e71-ab7e-462b-bab7-9215d88838ae", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448]}, "Compatibility"->{ Cell[859836, 20054, 955, 25, 70, "Subsection",ExpressionUUID->"195374fd-ff55-4aad-91b2-a106cbd5a793", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822]}, "CompatibilityWolframLanguageVersionRequired"->{ Cell[860816, 20083, 1174, 31, 70, "Subsubsection",ExpressionUUID->"e7c9133e-d8f2-4ad8-9e79-a5c599f7aab6", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016]}, "Wolfram Language Version"->{ Cell[860816, 20083, 1174, 31, 70, "Subsubsection",ExpressionUUID->"e7c9133e-d8f2-4ad8-9e79-a5c599f7aab6", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016]}, "ScrapeDefault"->{ Cell[861993, 20116, 89, 2, 70, "Text",ExpressionUUID->"6d147093-2e60-4233-a386-ccb2a676de75", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768]}, "CompatibilityOperatingSystem"->{ Cell[862119, 20123, 1113, 29, 70, "Subsubsection",ExpressionUUID->"42f412c4-9dd1-44c3-8b93-cfc69ae01412", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[863235, 20154, 2098, 62, 70, "Output",ExpressionUUID->"42cebe0c-4c3c-4eb8-8690-0b538289b649", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->589765368]}, "Operating System"->{ Cell[862119, 20123, 1113, 29, 70, "Subsubsection",ExpressionUUID->"42f412c4-9dd1-44c3-8b93-cfc69ae01412", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406]}, "CompatibilityOperatingSystem-Checkboxes"->{ Cell[863235, 20154, 2098, 62, 70, "Output",ExpressionUUID->"42cebe0c-4c3c-4eb8-8690-0b538289b649", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->589765368]}, "CompatibilityFeatures"->{ Cell[865370, 20221, 1280, 33, 70, "Subsubsection",ExpressionUUID->"64e21d9c-f7ab-4a71-98f1-ff50bf979ad8", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[866653, 20256, 2149, 63, 70, "Output",ExpressionUUID->"32f683c8-73f7-4672-b6dd-510b2a77f75a", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->851691753]}, "Required Features"->{ Cell[865370, 20221, 1280, 33, 70, "Subsubsection",ExpressionUUID->"64e21d9c-f7ab-4a71-98f1-ff50bf979ad8", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156]}, "CompatibilityFeatures-Checkboxes"->{ Cell[866653, 20256, 2149, 63, 70, "Output",ExpressionUUID->"32f683c8-73f7-4672-b6dd-510b2a77f75a", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->851691753]}, "CompatibilityEvaluationEnvironment"->{ Cell[868839, 20324, 1913, 46, 70, "Subsubsection",ExpressionUUID->"451203f8-21ab-4181-8584-288b8c3fb2b0", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[870755, 20372, 3986, 117, 70, "Output",ExpressionUUID->"7e3c37d1-a394-4a08-9979-58b751ba2502", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->71422750]}, "Environments"->{ Cell[868839, 20324, 1913, 46, 70, "Subsubsection",ExpressionUUID->"451203f8-21ab-4181-8584-288b8c3fb2b0", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563]}, "CompatibilityEvaluationEnvironment-Checkboxes"->{ Cell[870755, 20372, 3986, 117, 70, "Output",ExpressionUUID->"7e3c37d1-a394-4a08-9979-58b751ba2502", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->71422750]}, "Cloud Support"->{ Cell[874778, 20494, 1071, 27, 70, "Subsubsection",ExpressionUUID->"f67b5beb-a74c-488b-aae9-9efd94cbadc5", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371]}, "CompatibilityCloudSupport"->{ Cell[874778, 20494, 1071, 27, 70, "Subsubsection",ExpressionUUID->"f67b5beb-a74c-488b-aae9-9efd94cbadc5", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[875852, 20523, 1218, 36, 70, "Output",ExpressionUUID->"370b9772-c57e-4488-828d-495dae5670c6", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->131115484]}, "CompatibilityCloudSupport-Checkboxes"->{ Cell[875852, 20523, 1218, 36, 70, "Output",ExpressionUUID->"370b9772-c57e-4488-828d-495dae5670c6", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->131115484]}, "Author Notes"->{ Cell[877131, 20566, 1155, 28, 70, "Section",ExpressionUUID->"1491ad61-786e-4b81-a927-82e7476dda4a", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591]}, "Submission Notes"->{ Cell[878855, 20609, 1033, 26, 70, "Section",ExpressionUUID->"28658bc0-de4e-4c37-a588-f4bd50e51b27", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765]} } *) (*CellTagsIndex CellTagsIndex->{ {"Name", 1003410, 22965}, {"TemplateCell", 1003592, 22969}, {"Title", 1003927, 22976}, {"Description", 1004108, 22980}, {"Definition", 1004286, 22984}, {"Function", 1004482, 22988}, {"TemplateCellGroup", 1004687, 22992}, {"TabNext", 1008546, 23053}, {"Documentation", 1009349, 23069}, {"TemplateSection", 1009544, 23073}, {"Usage", 1009920, 23080}, {"Details & Options", 1010116, 23084}, {"Notes", 1010321, 23088}, {"Examples", 1010529, 23092}, {"Source & Additional Information", 1010740, 23096}, {"Contributed By", 1010953, 23100}, {"ContributorInformation", 1011189, 23104}, {"Keywords", 1011411, 23108}, {"Categories", 1011603, 23112}, {"Categories-Checkboxes", 1012001, 23119}, {"CheckboxCell", 1012215, 23123}, {"Related Symbols", 1013344, 23139}, {"Related Resource Objects", 1013557, 23143}, {"DefaultContent", 1013770, 23147}, {"Source/Reference Citation", 1014463, 23160}, {"Links", 1014668, 23164}, {"Tests", 1014852, 23168}, {"VerificationTests", 1015070, 23172}, {"Compatibility", 1015284, 23176}, {"CompatibilityWolframLanguageVersionRequired", 1015515, 23180}, {"Wolfram Language Version", 1015789, 23184}, {"ScrapeDefault", 1016052, 23188}, {"CompatibilityOperatingSystem", 1016257, 23192}, {"Operating System", 1016730, 23199}, {"CompatibilityOperatingSystem-Checkboxes", 1016996, 23203}, {"CompatibilityFeatures", 1017255, 23207}, {"Required Features", 1017709, 23214}, {"CompatibilityFeatures-Checkboxes", 1017962, 23218}, {"CompatibilityEvaluationEnvironment", 1018220, 23222}, {"Environments", 1018703, 23229}, {"CompatibilityEvaluationEnvironment-Checkboxes", 1018977, 23233}, {"Cloud Support", 1019240, 23237}, {"CompatibilityCloudSupport", 1019486, 23241}, {"CompatibilityCloudSupport-Checkboxes", 1019967, 23248}, {"Author Notes", 1020211, 23252}, {"Submission Notes", 1020412, 23256} } *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[632, 23, 99, 2, 70, "Title",ExpressionUUID->"208a88ae-57e8-4ea4-9fd1-df4c282e5fc8", CellTags->{"Name", "TemplateCell", "Title"}, CellID->421705929], Cell[734, 27, 129, 2, 70, "Text",ExpressionUUID->"57bfe79e-46fa-4046-9cb3-1a7e0744a8c0", CellTags->{"Description", "TemplateCell"}, CellID->549920672], Cell[CellGroupData[{ Cell[888, 33, 1206, 29, 70, "Section",ExpressionUUID->"39baa5df-1e78-49d4-9ebf-1855128ca229", CellTags->{"Definition", "Function", "TemplateCellGroup"}, CellID->72845326], Cell[CellGroupData[{ Cell[2119, 66, 141, 3, 70, "Subsection",ExpressionUUID->"9a051e70-8a22-4aa2-911b-ddfd612e3c29", CellID->988763296], Cell[2263, 71, 136, 2, 70, "Text",ExpressionUUID->"ba007858-f314-4ef5-978c-340a02efc17f", CellID->525310088], Cell[2402, 75, 312, 9, 70, "Input",ExpressionUUID->"345ea7d9-6678-405e-acf4-2c49e998e253", CellID->488821573], Cell[CellGroupData[{ Cell[2739, 88, 143, 3, 70, "Subsubsection",ExpressionUUID->"c73e528d-e161-4a23-a3c2-789aea02deb2", CellID->92067984], Cell[2885, 93, 2387, 53, 70, "Input",ExpressionUUID->"e3125c36-c03f-4be4-b338-83438055686f", CellID->277020559] }, Open ]], Cell[CellGroupData[{ Cell[5309, 151, 142, 3, 70, "Subsubsection",ExpressionUUID->"ee40c88e-1b31-450c-9fa2-c0a292982a91", CellID->836551079], Cell[5454, 156, 470, 12, 70, "Input",ExpressionUUID->"1ebd077a-2df4-4759-9234-62763d8413cd", CellID->320871925], Cell[5927, 170, 2111, 46, 70, "Input",ExpressionUUID->"cb7ca6e0-1b93-4425-81b4-b33b6018268f", CellID->914604303] }, Open ]], Cell[CellGroupData[{ Cell[8075, 221, 142, 3, 70, "Subsubsection",ExpressionUUID->"88d348b2-9cc0-498b-a2fa-b3451b4540b1", CellID->322814721], Cell[8220, 226, 10038, 193, 70, "Input",ExpressionUUID->"0d771349-84ac-4f6d-a2c5-09f6033bdfd5", CellID->806270639] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[18307, 425, 571, 10, 70, "Subsection",ExpressionUUID->"09e49a22-5c49-4238-97c0-22ef36a86f72", CellTags->"TabNext", CellID->294285759], Cell[CellGroupData[{ Cell[18903, 439, 142, 3, 70, "Subsubsection",ExpressionUUID->"1d6124b6-bc18-48ba-b5ed-17fa911686d2", CellID->952277054], Cell[19048, 444, 553, 15, 70, "Text",ExpressionUUID->"4ecde4b7-c9fa-4d68-8470-fe0736b908d9", CellID->159042456], Cell[19604, 461, 1158, 29, 70, "Input",ExpressionUUID->"8b857df2-6e0d-49cb-b0df-157195221180", CellID->61008692] }, Open ]], Cell[CellGroupData[{ Cell[20799, 495, 155, 3, 70, "Subsubsection",ExpressionUUID->"7e45c3b3-8154-4425-ab96-629eb41a7226", CellID->830564704], Cell[20957, 500, 201, 5, 70, "Text",ExpressionUUID->"db9fcd58-05b1-4dc1-acb6-d860042c4a24", CellID->378615357], Cell[21161, 507, 1127, 23, 70, "Input",ExpressionUUID->"1a904b17-e556-4a30-9695-831430b0b0f6", CellID->523303485] }, Open ]], Cell[CellGroupData[{ Cell[22325, 535, 151, 3, 70, "Subsubsection",ExpressionUUID->"4ec332ab-32de-40d0-9c29-d6cbfcaa9deb", CellID->716612324], Cell[22479, 540, 289, 6, 70, "Text",ExpressionUUID->"8121d5f7-3673-44b0-a441-a3d549a3f738", CellID->687967790], Cell[22771, 548, 4337, 96, 70, "Input",ExpressionUUID->"c9899b1b-8ef3-4bbe-ba6c-9452b635c1f4", CellID->554667320] }, Open ]], Cell[CellGroupData[{ Cell[27145, 649, 144, 3, 70, "Subsubsection",ExpressionUUID->"e96c801d-7e4c-417d-8bdd-48c5e829fa96", CellID->836551080], Cell[27292, 654, 200, 5, 70, "Text",ExpressionUUID->"4fe3ebd1-0381-4bd4-9213-a7817ed64120", CellID->880418064], Cell[27495, 661, 4297, 100, 70, "Input",ExpressionUUID->"9d1aa802-1900-4eff-bcad-c2d4d111e531", CellID->44165364] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[31841, 767, 142, 3, 70, "Subsection",ExpressionUUID->"b4096207-26f8-4ef2-8b25-8035d4c40dca", CellID->99087902], Cell[CellGroupData[{ Cell[32008, 774, 143, 3, 70, "Subsubsection",ExpressionUUID->"117ce238-d39c-4ffd-a9ac-09596a5abdaf", CellID->721339644], Cell[32154, 779, 619, 15, 70, "Input",ExpressionUUID->"22bf3644-0fd0-412c-8de5-45fc8ef9f22f", CellID->113203256] }, Open ]], Cell[CellGroupData[{ Cell[32810, 799, 142, 3, 70, "Subsubsection",ExpressionUUID->"345c9b05-46de-429c-9e17-cb2957dd22fb", CellID->232530928], Cell[32955, 804, 1000, 22, 70, "Input",ExpressionUUID->"54585302-18ef-4adf-9fdf-df824707f76f", CellID->86841919] }, Open ]], Cell[CellGroupData[{ Cell[33992, 831, 203, 4, 70, "Subsubsection",ExpressionUUID->"03ea67e9-db41-4967-bafa-b58d6760c0b1", CellID->42521496], Cell[34198, 837, 22377, 509, 70, "Input",ExpressionUUID->"24d53b0f-5c6f-4bb4-851b-327ff39c2d9d", CellID->309071988] }, Open ]], Cell[CellGroupData[{ Cell[56612, 1351, 151, 3, 70, "Subsubsection",ExpressionUUID->"7f588dd3-14d8-495d-ae03-da9957f79961", CellID->934232748], Cell[56766, 1356, 601, 17, 70, "Input",ExpressionUUID->"41bfcd24-377e-46b4-bcd6-c84e0b3a3b90", CellID->824937528] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[57428, 1380, 195, 5, 70, "Section",ExpressionUUID->"8a8446fe-bad4-4eca-a7a8-cc158cf0018b", CellTags->{"Documentation", "TemplateSection"}, CellID->429741307], Cell[CellGroupData[{ Cell[57648, 1389, 1980, 50, 70, "Subsection",ExpressionUUID->"31a9a01b-d532-42ac-8ca0-5fa46cc2e1d3", CellTags->{"TemplateCellGroup", "Usage"}, CellID->542419310], Cell[CellGroupData[{ Cell[59653, 1443, 148, 4, 70, "UsageInputs",ExpressionUUID->"ce4f2c59-c461-4ca0-8992-d5a46dc09eb9", CellID->367521524], Cell[59804, 1449, 679, 23, 70, "UsageDescription",ExpressionUUID->"1329aee3-05cd-4375-8cc5-d44bbcd047b0", CellID->861308003] }, Open ]], Cell[CellGroupData[{ Cell[60520, 1477, 195, 6, 70, "UsageInputs",ExpressionUUID->"6122d83d-9577-4a40-b6b1-e3c130ff6fc9", CellID->745180296], Cell[60718, 1485, 812, 27, 70, "UsageDescription",ExpressionUUID->"1705d913-28aa-49c9-8e78-61c5f5360233", CellID->79172700] }, Open ]], Cell[CellGroupData[{ Cell[61567, 1517, 405, 11, 70, "UsageInputs",ExpressionUUID->"e44cf9bd-516c-4e13-a0c0-afba6b21bf04", CellID->185002431], Cell[61975, 1530, 255, 9, 70, "UsageDescription",ExpressionUUID->"4c9828f7-13f9-4480-9706-46518d3b04ad", CellID->226878048] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[62279, 1545, 1429, 32, 70, "Subsection",ExpressionUUID->"3be3b5aa-319d-47e6-a7cc-bfc04a2facee", CellTags->{"Details & Options", "Notes", "TemplateCellGroup"}, CellID->908801236], Cell[63711, 1579, 214, 6, 70, "Notes",ExpressionUUID->"ca3b93d4-2ac1-4dae-84f5-b47b8205bb2c", CellTags->"TabNext", CellID->395719005], Cell[63928, 1587, 653, 21, 70, "Notes",ExpressionUUID->"5acd25e3-368f-4617-b5a7-08723982c015", CellID->604326395], Cell[64584, 1610, 698, 22, 70, "Notes",ExpressionUUID->"48ddc33f-6e76-44d7-9549-9d9dbf64bafe", CellID->789621090], Cell[65285, 1634, 778, 26, 70, "Notes",ExpressionUUID->"3e0db9cb-1490-4985-8e24-e26c4569cba7", CellID->841502435], Cell[66066, 1662, 1228, 38, 70, "Notes",ExpressionUUID->"d998b6ee-616b-4615-ab38-28a4b6e67c76", CellID->58549768], Cell[67297, 1702, 233, 6, 70, "Notes",ExpressionUUID->"439a27b0-6000-4c81-b545-e9bff5529be3", CellID->80130221], Cell[67533, 1710, 256, 6, 70, "Notes",ExpressionUUID->"560583c5-9b9a-4d8e-84e1-3b03a39a3395", CellID->234368236], Cell[67792, 1718, 663, 20, 70, "Notes",ExpressionUUID->"d0f143b2-9a57-4bbf-843d-3e6f0d0937eb", CellID->626608952] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[68504, 1744, 7029, 152, 70, "Section",ExpressionUUID->"71196aef-b697-4a72-abf6-f90541ffb734", CellTags->{"Examples", "TemplateCellGroup"}, CellID->530638011], Cell[CellGroupData[{ Cell[75558, 1900, 75, 2, 70, "Subsection",ExpressionUUID->"59bc761a-ad4a-49be-9f31-3307a1089059", CellID->904125756], Cell[75636, 1904, 215, 4, 70, "Text",ExpressionUUID->"fde35794-6b58-4e9b-9129-60396872234d", CellID->92725275], Cell[CellGroupData[{ Cell[75876, 1912, 234, 6, 70, "Input",ExpressionUUID->"3bdaef93-54e0-4474-a3e2-a0ebee7add39", CellID->129751837], Cell[76113, 1920, 852, 25, 70, "Output",ExpressionUUID->"26cedf5f-27af-476c-a7aa-9075eb631dc0", CellID->785766534] }, Open ]], Cell[CellGroupData[{ Cell[77002, 1950, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"0be6dc50-f6e9-4f70-b096-48e33bf4a233", CellID->14107562], Cell[77148, 1956, 175, 3, 70, "Text",ExpressionUUID->"782714eb-428e-4998-bbd6-8b842329cdf3", CellID->119140869], Cell[CellGroupData[{ Cell[77348, 1963, 267, 7, 70, "Input",ExpressionUUID->"867b077a-469c-45ec-a8f5-686c1901eaec", CellID->757418145], Cell[77618, 1972, 528, 17, 70, "Output",ExpressionUUID->"5b0c4a50-406c-448a-9d45-5628e59a204d", CellID->34520394] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[78195, 1995, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"e122747c-1d86-458e-8f0a-1e3c27822fe0", CellID->14107563], Cell[78341, 2001, 215, 4, 70, "Text",ExpressionUUID->"d4764c6a-12a8-4fc6-8694-9c4e31e071de", CellID->924755776], Cell[CellGroupData[{ Cell[78581, 2009, 262, 6, 70, "Input",ExpressionUUID->"aaa0d978-2f7b-4a0a-a453-4cff2b537288", CellID->81695737], Cell[78846, 2017, 615, 18, 70, "Output",ExpressionUUID->"d5f1b2fa-3faf-4064-a4b1-7fb430df0a02", CellID->306655507] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[79522, 2042, 66, 2, 70, "Subsection",ExpressionUUID->"4117d8e6-d5fe-49d9-8990-1b8f1a4fa7e2", CellID->204653245], Cell[79591, 2046, 153, 3, 70, "Text",ExpressionUUID->"0e1e5c2d-2145-4158-9661-bb53aad1df84", CellID->775762905], Cell[CellGroupData[{ Cell[79769, 2053, 188, 5, 70, "Input",ExpressionUUID->"18823513-210b-4bb0-aad0-cc971bce8fff", CellID->971903604], Cell[79960, 2060, 717, 22, 70, "Output",ExpressionUUID->"54d71db3-b916-4376-b439-777504d06c3b", CellID->250458852] }, Open ]], Cell[CellGroupData[{ Cell[80714, 2087, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"cc9130b6-b531-4ad3-851e-57a35ca64a3d", CellID->14107564], Cell[80860, 2093, 285, 7, 70, "Text",ExpressionUUID->"5776d0db-ab45-46ba-9995-6141651029bd", CellID->141029357], Cell[CellGroupData[{ Cell[81170, 2104, 261, 6, 70, "Input",ExpressionUUID->"624aec8e-a912-4cbf-a65a-14c0a0fe5300", CellID->265819557], Cell[81434, 2112, 588, 17, 70, "Output",ExpressionUUID->"df5d9ac6-6cb9-46ca-b5b5-5f0fb70c6d23", CellID->735507481] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[82071, 2135, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"d6f062c5-31bf-4b6d-8889-47b4e3be76ce", CellID->14107565], Cell[82217, 2141, 157, 3, 70, "Text",ExpressionUUID->"623b0be3-edd3-4e62-96ea-2db0ac4d09f8", CellID->485764392], Cell[CellGroupData[{ Cell[82399, 2148, 211, 5, 70, "Input",ExpressionUUID->"7842cef1-090e-4f84-9e53-ede670fe6fcf", CellID->230668771], Cell[82613, 2155, 532, 17, 70, "Output",ExpressionUUID->"c4592c6c-a800-4f19-a49b-39377613a9fe", CellID->584743996] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[83194, 2178, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"11665974-1470-455b-8515-970a840466b8", CellID->14107566], Cell[83340, 2184, 155, 3, 70, "Text",ExpressionUUID->"a80da085-316b-4b84-b96f-a88918e35f30", CellID->146732873], Cell[CellGroupData[{ Cell[83520, 2191, 521, 12, 70, "Input",ExpressionUUID->"d597fa20-4c45-4129-ad02-a4f5a8cf8c55", CellID->939752010], Cell[84044, 2205, 1778, 53, 70, "Output",ExpressionUUID->"35ef57d2-d18e-4cfb-98d3-c61381d2d983", CellID->493344408] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[85871, 2264, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"f11e5f53-c2b8-4ff8-ada7-c298054d8c76", CellID->14107567], Cell[86017, 2270, 266, 5, 70, "Text",ExpressionUUID->"73abfdd7-0628-4d10-87cb-6586570acae5", CellID->388072085], Cell[CellGroupData[{ Cell[86308, 2279, 224, 6, 70, "Input",ExpressionUUID->"dbd4d661-d4da-468d-b1dc-fe991dd3f792", CellID->448308195], Cell[86535, 2287, 675, 17, 70, "Output",ExpressionUUID->"21bbe0ba-112c-4464-a4e8-b3769d440f4e", CellID->26420496] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[87271, 2311, 68, 2, 70, "Subsection",ExpressionUUID->"81543bd4-e816-4d36-8214-382268c8cf40", CellID->890561554], Cell[CellGroupData[{ Cell[87364, 2317, 142, 3, 70, "Subsubsection",ExpressionUUID->"5b020042-b087-4903-84b4-221148640a3e", CellID->101105612], Cell[87509, 2322, 178, 3, 70, "Text",ExpressionUUID->"9b8a9acb-44a3-4efe-bbb3-56602b398102", CellID->224671337], Cell[CellGroupData[{ Cell[87712, 2329, 291, 7, 70, "Input",ExpressionUUID->"2beeadd3-cd69-479c-9daf-dfcedc6287de", CellID->756459172], Cell[88006, 2338, 732, 21, 70, "Output",ExpressionUUID->"bcf61138-231b-4890-a435-fb354e54a428", CellID->625821338] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[88787, 2365, 139, 3, 70, "Subsubsection",ExpressionUUID->"f3c2da0e-04f4-4982-853a-3edbebd7409d", CellID->329971317], Cell[88929, 2370, 221, 4, 70, "Text",ExpressionUUID->"a69e1f8c-4876-4d6b-8496-6e4063feb1c8", CellID->105282035], Cell[CellGroupData[{ Cell[89175, 2378, 650, 15, 70, "Input",ExpressionUUID->"abe7ec39-bc42-4efe-a3ba-0b2be561f5b7", CellID->178031885], Cell[89828, 2395, 1167, 30, 70, "Output",ExpressionUUID->"4f34ac38-6ae8-4bbb-9327-4327055144f4", CellID->433708637] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[91044, 2431, 140, 3, 70, "Subsubsection",ExpressionUUID->"a4c7233a-1d75-43c4-933f-a438ff3e54b5", CellID->263234609], Cell[91187, 2436, 732, 23, 70, "Text",ExpressionUUID->"1ee87b05-eb0e-4e0f-b631-7d77022b4b75", CellID->381562508], Cell[CellGroupData[{ Cell[91944, 2463, 273, 8, 70, "Input",ExpressionUUID->"4015cc2d-0e31-4da2-a0e7-cb43f048935d", CellID->680644650], Cell[92220, 2473, 843, 25, 70, "Output",ExpressionUUID->"5b5a2904-307d-4f94-8ad8-6b038d7fae80", CellID->544548066] }, Open ]], Cell[93078, 2501, 157, 3, 70, "Text",ExpressionUUID->"8d5c0044-b4cd-42ba-ae38-67be197eec4a", CellID->555714473], Cell[CellGroupData[{ Cell[93260, 2508, 516, 13, 70, "Input",ExpressionUUID->"d481d226-46cc-424c-a737-9a7e4a200c6e", CellID->440994916], Cell[93779, 2523, 579, 17, 70, "Output",ExpressionUUID->"b66432a1-8de5-441d-a15d-4e89d38fc216", CellID->716439872] }, Open ]], Cell[94373, 2543, 167, 3, 70, "Text",ExpressionUUID->"12c63bdf-eaa9-414c-b4ae-166a2591f7d3", CellID->85948537], Cell[CellGroupData[{ Cell[94565, 2550, 273, 7, 70, "Input",ExpressionUUID->"98d3c7bc-26c5-426e-bd71-c0680e7d2b04", CellID->823235481], Cell[94841, 2559, 473, 16, 70, "Output",ExpressionUUID->"35a716fa-9dd3-4645-8d43-70d665cb6350", CellID->613409647] }, Open ]] }, Closed]] }, Closed]], Cell[CellGroupData[{ Cell[95375, 2582, 85, 2, 70, "Subsection",ExpressionUUID->"9b09aa69-a308-404f-ac06-ebfda18083bb", CellID->232113220], Cell[95463, 2586, 748, 21, 70, "Text",ExpressionUUID->"69946fcc-a796-4f07-8d3e-9e4b17519a4b", CellID->878328425], Cell[CellGroupData[{ Cell[96236, 2611, 195, 5, 70, "Input",ExpressionUUID->"8e6bd27d-edec-48e1-8c7f-531dd7905df0", CellID->951098241], Cell[96434, 2618, 683, 20, 70, "Output",ExpressionUUID->"86176784-3499-486d-8a8c-062fcb0d0003", CellID->620552795] }, Open ]], Cell[97132, 2641, 796, 22, 70, "Text",ExpressionUUID->"4e68287e-42e8-44ec-aa65-28f00fd617b8", CellID->46778517], Cell[CellGroupData[{ Cell[97953, 2667, 225, 6, 70, "Input",ExpressionUUID->"837d6739-edac-4db2-a561-493e05e56c94", CellID->336495374], Cell[98181, 2675, 414, 10, 70, "Message",ExpressionUUID->"11459a5f-b064-4d82-b43a-0f0d25b0717f", CellID->658309062], Cell[98598, 2687, 257, 7, 70, "Output",ExpressionUUID->"7583b757-ebbc-4957-8dc9-774fea446351", CellID->579763129] }, Open ]], Cell[98870, 2697, 297, 8, 70, "Text",ExpressionUUID->"44fe6f1b-9514-4fdd-bc92-fae16bd7cb14", CellID->288349366], Cell[CellGroupData[{ Cell[99192, 2709, 234, 6, 70, "Input",ExpressionUUID->"36759073-0bca-4ef1-8652-5fbc1c1c0086", CellID->573257212], Cell[99429, 2717, 730, 21, 70, "Output",ExpressionUUID->"81af5f9a-654b-45f8-ab09-0e076d0064ee", CellID->891263363] }, Open ]], Cell[CellGroupData[{ Cell[100196, 2743, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"d74962a4-1409-4830-8205-5684ae5e9d81", CellID->14107568], Cell[100342, 2749, 1193, 36, 70, "Text",ExpressionUUID->"5c2df61d-807f-4fc0-b28c-c14510391dac", CellID->328973766], Cell[101538, 2787, 781, 21, 70, "Input",ExpressionUUID->"a4263b70-5dd8-4eaf-b768-3d3e2d2bec4c", CellID->445024040], Cell[CellGroupData[{ Cell[102344, 2812, 411, 13, 70, "Input",ExpressionUUID->"4a49206d-e1f4-44f0-8fef-9f0ce289b8a0", CellID->570745602], Cell[102758, 2827, 331, 9, 70, "Output",ExpressionUUID->"ec4db71f-088b-4ef3-a6bc-f656cf3ae44b", CellID->347389610] }, Open ]], Cell[CellGroupData[{ Cell[103126, 2841, 197, 5, 70, "Input",ExpressionUUID->"3214a76b-2590-42d8-8231-297111407394", CellID->323820404], Cell[103326, 2848, 2122, 64, 70, "Output",ExpressionUUID->"3926202d-ad46-4d80-8354-b0a63583f0a7", CellID->352089372] }, Open ]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[105509, 2919, 76, 2, 70, "Subsection",ExpressionUUID->"06af65f2-afbd-4415-8f7f-004c24d8126a", CellID->158766396], Cell[105588, 2923, 1175, 33, 70, "Text",ExpressionUUID->"7a102332-31d3-4c33-812e-71ea2c6d5cfa", CellID->999456285], Cell[CellGroupData[{ Cell[106788, 2960, 368, 10, 70, "Input",ExpressionUUID->"dba21c92-02df-4ce4-ade4-61485479f12d", CellID->772613760], Cell[107159, 2972, 1474, 41, 70, "Output",ExpressionUUID->"0c4b1819-c3d6-4497-a72b-b7180c2a740a", CellID->318030657] }, Open ]], Cell[CellGroupData[{ Cell[108670, 3018, 248, 8, 70, "Input",ExpressionUUID->"d6d48d61-e796-4bfb-ad46-6fb548e3853b", CellID->646536777], Cell[108921, 3028, 204, 6, 70, "Output",ExpressionUUID->"5c4d3e74-8972-4bee-bcfb-d420b0de9d7d", CellID->227807468] }, Open ]], Cell[109140, 3037, 395, 12, 70, "Text",ExpressionUUID->"ff6eb114-f201-4a6a-9be1-62ab7ef21f49", CellID->269965045], Cell[CellGroupData[{ Cell[109560, 3053, 265, 7, 70, "Input",ExpressionUUID->"d8736b79-e3f7-4918-8e36-c93b3f463b42", CellID->279949213], Cell[109828, 3062, 681, 20, 70, "Output",ExpressionUUID->"66cfd920-9ca3-43f4-9fdb-31ab43aec793", CellID->9297189] }, Open ]], Cell[110524, 3085, 439, 11, 70, "Text",ExpressionUUID->"e1aab84c-609d-40a5-baa8-9bc40b4e7b7d", CellID->120666753], Cell[CellGroupData[{ Cell[110988, 3100, 230, 6, 70, "Input",ExpressionUUID->"8e108cc1-6ba9-4727-954b-3547601e9d71", CellID->170724445], Cell[111221, 3108, 767, 22, 70, "Output",ExpressionUUID->"191d1683-7fc2-4540-8d6c-f078e87808b7", CellID->407305322] }, Open ]], Cell[CellGroupData[{ Cell[112025, 3135, 342, 9, 70, "Input",ExpressionUUID->"07de3729-ed9b-4244-8f1c-65b245e45745", CellID->791299555], Cell[112370, 3146, 215, 6, 70, "Output",ExpressionUUID->"678111c7-441d-4414-8316-3006a88f56a9", CellID->430976454] }, Open ]], Cell[CellGroupData[{ Cell[112622, 3157, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"cf06c8e9-ffdc-4380-8ce2-3098bbd66b96", CellID->14107569], Cell[112768, 3163, 1402, 41, 70, "Text",ExpressionUUID->"b4c0907f-a95d-4c14-93e2-944c0a14cc9f", CellID->937105909], Cell[CellGroupData[{ Cell[114195, 3208, 358, 10, 70, "Input",ExpressionUUID->"20e1361f-43ba-46b6-8224-11521e4d7838", CellID->715450618], Cell[114556, 3220, 1100, 33, 70, "Output",ExpressionUUID->"0f64a84e-599e-47fa-8201-75d73286859f", CellID->6256932] }, Open ]], Cell[CellGroupData[{ Cell[115693, 3258, 238, 7, 70, "Input",ExpressionUUID->"cb088cd7-3907-4419-9310-6ef254d7a077", CellID->547014475], Cell[115934, 3267, 201, 7, 70, "Output",ExpressionUUID->"039ee4e6-b2c0-4cab-9dfe-f20b2dd88ba5", CellID->744632348] }, Open ]], Cell[116150, 3277, 1329, 41, 70, "Text",ExpressionUUID->"8a385248-c136-4183-ab9f-f9bb57d7320a", CellID->151286447], Cell[CellGroupData[{ Cell[117504, 3322, 276, 7, 70, "Input",ExpressionUUID->"4a036d67-f850-47b8-bd28-4af8c8eb46a9", CellID->320157594], Cell[117783, 3331, 524, 17, 70, "Output",ExpressionUUID->"32a20a77-a4d0-437f-a1d0-89d740b7d0b0", CellID->878355614] }, Open ]], Cell[CellGroupData[{ Cell[118344, 3353, 196, 5, 70, "Input",ExpressionUUID->"6e63518f-0bc4-40b0-9c6c-c05b23c2fe83", CellID->746086069], Cell[118543, 3360, 161, 4, 70, "Output",ExpressionUUID->"f9f49220-e943-436e-bbf5-453f09bdd9ad", CellID->871637840] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[118753, 3370, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"60dab235-fc3a-47f3-96e5-681ed87d5a93", CellID->14107570], Cell[118899, 3376, 1006, 29, 70, "Text",ExpressionUUID->"d0fbdbdb-ead1-46f7-9d93-c99acb916424", CellID->442867201], Cell[CellGroupData[{ Cell[119930, 3409, 1138, 33, 70, "Input",ExpressionUUID->"82025277-5c91-4484-8c1e-632adeb318b9", CellID->386769787], Cell[121071, 3444, 34344, 569, 70, "Output",ExpressionUUID->"68aec49b-dda5-453b-a46f-c98fb33aecbc", CellID->833429214] }, Open ]], Cell[155430, 4016, 395, 12, 70, "Text",ExpressionUUID->"73ddedc2-389c-4de6-b936-9ab497c76294", CellID->269965046], Cell[CellGroupData[{ Cell[155850, 4032, 288, 9, 70, "Input",ExpressionUUID->"dc088a47-8930-49a2-9573-ba8ba186e8e4", CellID->891385385], Cell[156141, 4043, 1812, 54, 70, "Output",ExpressionUUID->"f4018d9d-5280-4cc6-895e-b7716f3067e0", CellID->715046958] }, Open ]], Cell[CellGroupData[{ Cell[157990, 4102, 248, 8, 70, "Input",ExpressionUUID->"f4f3416f-bb1b-49d4-b722-c8b3d39e5c0d", CellID->703078657], Cell[158241, 4112, 232, 7, 70, "Output",ExpressionUUID->"19be4d74-3f5f-40ea-99d9-a5f6f3d0fda1", CellID->632786188] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[158522, 4125, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"9a8cfed2-4aac-4cbb-a730-b67d801053ce", CellID->14107571], Cell[158668, 4131, 353, 9, 70, "Text",ExpressionUUID->"03a1287c-f87a-4454-a94a-24927ebf42e7", CellID->827356785], Cell[CellGroupData[{ Cell[159046, 4144, 215, 5, 70, "Input",ExpressionUUID->"7dff5b14-91bb-4197-ac04-84fcbcc2fbf1", CellID->651599892], Cell[159264, 4151, 5528, 112, 70, "Output",ExpressionUUID->"e42011d7-b59d-495b-abbf-240adedbcb1d", CellID->109851228] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[164841, 4269, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"784ed59b-8900-49bb-8b20-3f8a8a5600a3", CellID->14107572], Cell[164987, 4275, 531, 10, 70, "Text",ExpressionUUID->"9a2781f4-befc-40a1-b7b2-01c6e1bf456d", CellID->252869887], Cell[CellGroupData[{ Cell[165543, 4289, 266, 6, 70, "Input",ExpressionUUID->"12e7bc4f-acb9-463d-b29a-a78ed4e4fbd8", CellID->712087668], Cell[165812, 4297, 587, 18, 70, "Output",ExpressionUUID->"85819f48-da64-451f-a72e-a4fda2c72166", CellID->787635419] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[166448, 4321, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"feeb27f5-266c-4d8d-90cf-86d430099089", CellID->14107573], Cell[166594, 4327, 1386, 39, 70, "Text",ExpressionUUID->"421a4599-da3f-4d68-a35a-0c07014718a3", CellID->731246493], Cell[CellGroupData[{ Cell[168005, 4370, 346, 9, 70, "Input",ExpressionUUID->"acd29ac5-1cdf-4bea-bfba-09b043dd2eed", CellID->671562127], Cell[168354, 4381, 1073, 32, 70, "Output",ExpressionUUID->"f0967ed8-e6db-4911-a9fc-b194c7ab9c79", CellID->111061111] }, Open ]], Cell[CellGroupData[{ Cell[169464, 4418, 184, 5, 70, "Input",ExpressionUUID->"dca585d4-903f-4e2d-819b-0639edd76f83", CellID->432693358], Cell[169651, 4425, 161, 4, 70, "Output",ExpressionUUID->"ac9fb8e8-ac61-4496-a351-bf52ea9f5e49", CellID->738293886] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[169861, 4435, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"9724ed58-057d-4eeb-b078-e7d9d9ed9aac", CellID->14107574], Cell[170007, 4441, 459, 11, 70, "Text",ExpressionUUID->"eaf8386a-6033-4892-9ae3-bd1fede350d9", CellID->958634028], Cell[CellGroupData[{ Cell[170491, 4456, 261, 6, 70, "Input",ExpressionUUID->"b3407ea8-d7a9-4c92-a137-da946c33d5b8", CellID->218190456], Cell[170755, 4464, 531, 17, 70, "Output",ExpressionUUID->"26fdf064-b609-4182-b2de-81b9fad22dfc", CellID->607706096] }, Open ]], Cell[171301, 4484, 222, 4, 70, "Text",ExpressionUUID->"fa185b2a-4f1d-4ea8-81f7-1cc966711f57", CellID->717018711], Cell[CellGroupData[{ Cell[171548, 4492, 212, 5, 70, "Input",ExpressionUUID->"21a9ccdd-0976-4b26-8f63-255264395269", CellID->642590188], Cell[171763, 4499, 715, 22, 70, "Output",ExpressionUUID->"da0668c8-3b04-4477-9921-3ee2f3490da5", CellID->987395954] }, Open ]], Cell[172493, 4524, 253, 6, 70, "Text",ExpressionUUID->"739f2d8e-223c-465d-b1cc-698bd17a70ab", CellID->660268209], Cell[CellGroupData[{ Cell[172771, 4534, 187, 5, 70, "Input",ExpressionUUID->"e9f75d0b-c03f-4093-a522-6b2239a462bd", CellID->625430079], Cell[172961, 4541, 713, 22, 70, "Output",ExpressionUUID->"4ffb1b87-7f6c-4faa-bed0-b3d54c954861", CellID->946926824] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[173723, 4569, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"2ae5bb1c-6bba-4843-b54c-a9ad9db78f0f", CellID->14107575], Cell[173869, 4575, 228, 4, 70, "Text",ExpressionUUID->"96cd780f-a498-4c2e-8f06-fd22e64f53f8", CellID->737277314], Cell[CellGroupData[{ Cell[174122, 4583, 226, 6, 70, "Input",ExpressionUUID->"faf01125-fd8d-4ed6-ac3a-c9771ca8d6c7", CellID->646353610], Cell[174351, 4591, 5579, 113, 70, "Output",ExpressionUUID->"96ee19f9-6f09-4fe0-927b-450e66c60486", CellID->337402130] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[179979, 4710, 143, 4, 70, "ExampleDelimiter",ExpressionUUID->"e888adc7-465f-4bc0-8bae-27167d018400", CellID->14107576], Cell[180125, 4716, 209, 4, 70, "Text",ExpressionUUID->"1a2c3b7d-75ee-44ec-8e52-873571ea145e", CellID->85757921], Cell[CellGroupData[{ Cell[180359, 4724, 248, 6, 70, "Input",ExpressionUUID->"8c4486f1-5703-4cee-9240-4bfb166f7a2f", CellID->104224597], Cell[180610, 4732, 5837, 120, 70, "Output",ExpressionUUID->"d9e61399-9c15-42bb-8850-f5fd246dbd5d", CellID->906766681] }, Open ]], Cell[186462, 4855, 870, 24, 70, "Text",ExpressionUUID->"20674302-d5d0-47e5-99cc-3528f00ef2dc", CellID->108565382], Cell[CellGroupData[{ Cell[187357, 4883, 354, 10, 70, "Input",ExpressionUUID->"4bebd1bf-f61c-43cf-83e8-23625011c2a2", CellID->892763539], Cell[187714, 4895, 1303, 37, 70, "Output",ExpressionUUID->"660f9389-bad5-491f-a9b3-6398ad510fb9", CellID->735402886] }, Open ]] }, Open ]] }, Closed]] }, Open ]], Cell[CellGroupData[{ Cell[189090, 4940, 249, 5, 70, "Section",ExpressionUUID->"c0e88449-5c67-4eb1-abe3-9814bbaaa680", CellTags->{"Source & Additional Information", "TemplateSection"}, CellID->611501116], Cell[CellGroupData[{ Cell[189364, 4949, 1026, 26, 70, "Subsection",ExpressionUUID->"3fbaa830-150e-437e-8a9a-476fbf2fd065", CellTags->{"Contributed By", "ContributorInformation", "TemplateCellGroup"}, CellID->86203256], Cell[190393, 4977, 50, 1, 70, "Text",ExpressionUUID->"50880dad-3eb7-45c2-ab38-441b0ff02175", CellID->567543531] }, Open ]], Cell[CellGroupData[{ Cell[190480, 4983, 996, 26, 70, "Subsection",ExpressionUUID->"3873bb03-574f-474a-95c8-9f645c8cb2b1", CellTags->{"Keywords", "TemplateCellGroup"}, CellID->696375425], Cell[191479, 5011, 40, 1, 70, "Item",ExpressionUUID->"d5229cc8-7d19-4f00-9924-7a35f5ce685f", CellID->231125018], Cell[191522, 5014, 40, 1, 70, "Item",ExpressionUUID->"d5972dec-2cdf-4646-afff-ae60516e4a20", CellID->302672188], Cell[191565, 5017, 45, 1, 70, "Item",ExpressionUUID->"71d3b378-9f12-48ef-82aa-bc6cf6f42dca", CellID->695315937], Cell[191613, 5020, 41, 1, 70, "Item",ExpressionUUID->"eb83dc74-085c-4af0-b01e-627cb3a972a7", CellID->969240954], Cell[191657, 5023, 39, 1, 70, "Item",ExpressionUUID->"4400ff0d-b295-4b05-9a76-44e786f2e703", CellID->542255894], Cell[191699, 5026, 40, 1, 70, "Item",ExpressionUUID->"97ea1cc2-cec3-413e-ae53-05042b42adf4", CellID->520579079], Cell[191742, 5029, 43, 1, 70, "Item",ExpressionUUID->"1f31137d-9c13-40d9-abd7-2b194b046cf4", CellID->88934290], Cell[191788, 5032, 45, 1, 70, "Item",ExpressionUUID->"c1b08195-7a15-4f9d-b58b-e85ba3ec60f6", CellID->320661369] }, Open ]], Cell[CellGroupData[{ Cell[191870, 5038, 221, 6, 70, "Subsection",ExpressionUUID->"439188b1-9444-4b12-a887-90de80d60545", CellTags->{"Categories", "TemplateCellGroup"}, CellID->362094786], Cell[192094, 5046, 8324, 253, 70, "Output",ExpressionUUID->"9d5b3e74-6673-41b3-baf6-756dc8fa1c17", CellTags->{"Categories", "Categories-Checkboxes", "CheckboxCell"}, CellID->270468172] }, Open ]], Cell[CellGroupData[{ Cell[200455, 5304, 980, 26, 70, "Subsection",ExpressionUUID->"75ba8a9a-3850-4f6d-ac0e-6722a3b90857", CellTags->{"Related Symbols", "TemplateCellGroup"}, CellID->659846169], Cell[201438, 5332, 46, 1, 70, "Item",ExpressionUUID->"d2676c9f-ebe8-4b8b-b68c-bfa29d680ce1", CellID->566904740], Cell[201487, 5335, 46, 1, 70, "Item",ExpressionUUID->"85c81698-8cae-4522-9536-957a79dad590", CellID->630379512], Cell[201536, 5338, 46, 1, 70, "Item",ExpressionUUID->"0bd5efb9-099a-46f6-bc5f-c63cc5f76249", CellID->271793251] }, Open ]], Cell[CellGroupData[{ Cell[201619, 5344, 1039, 26, 70, "Subsection",ExpressionUUID->"f2240ef4-0ae3-46ce-a4bf-b2a280e6487b", CellTags->{"Related Resource Objects", "TemplateCellGroup"}, CellID->465534472], Cell[202661, 5372, 528, 8, 70, "Item",ExpressionUUID->"ae112936-7af7-4f8d-8b6a-918449759497", CellTags->{"DefaultContent", "TabNext"}, CellID->873143661] }, Open ]], Cell[CellGroupData[{ Cell[203226, 5385, 1084, 26, 70, "Subsection",ExpressionUUID->"b4005765-8c2c-40c8-a691-5b9cc7131ec6", CellTags->{"Source/Reference Citation", "TemplateCellGroup"}, CellID->515669552], Cell[204313, 5413, 248, 6, 70, "Text",ExpressionUUID->"0f632870-74aa-4275-b40d-52b7bc9ba665", CellID->783171781] }, Open ]], Cell[CellGroupData[{ Cell[204598, 5424, 923, 26, 70, "Subsection",ExpressionUUID->"86365131-bbf0-4be3-b336-44087853818b", CellTags->{"Links", "TemplateCellGroup"}, CellID->571756773], Cell[205524, 5452, 232, 5, 70, "Item",ExpressionUUID->"cbfbb3a6-5aa3-48c3-8d7e-8af0ef27982f", CellID->23878155], Cell[205759, 5459, 274, 6, 70, "Item",ExpressionUUID->"830782e9-bddf-4978-814a-06d9535c701a", CellID->768142286] }, Open ]], Cell[CellGroupData[{ Cell[206070, 5470, 1874, 45, 70, "Subsection",ExpressionUUID->"24ac1e71-ab7e-462b-bab7-9215d88838ae", CellTags->{"TemplateCellGroup", "Tests", "VerificationTests"}, CellID->561308448], Cell[207947, 5517, 221, 3, 70, "Text",ExpressionUUID->"dc92a78d-c843-46f5-a165-6a10d941af56", CellID->896371680], Cell[CellGroupData[{ Cell[208193, 5524, 212, 4, 70, "Subsubsection",ExpressionUUID->"48a70c8b-5d4f-4afd-9e58-2504403b5801", CellID->424498660], Cell[208408, 5530, 116, 2, 70, "Text",ExpressionUUID->"ba8a20f4-2559-4f5e-b4da-16582d27cf01", CellID->685405470], Cell[CellGroupData[{ Cell[208549, 5536, 452, 11, 70, "Input",ExpressionUUID->"34e0134d-1a5d-4b6c-8c84-a64b559e7e8c", CellID->404158921], Cell[209004, 5549, 9698, 209, 70, "Output",ExpressionUUID->"a426ae7d-bfdb-4e21-ab46-12c2954d01ee", CellID->274707360] }, Open ]], Cell[CellGroupData[{ Cell[218739, 5763, 428, 11, 70, "Input",ExpressionUUID->"91170d31-97de-4dcb-8148-5fbd5c096570", CellID->342302634], Cell[219170, 5776, 9688, 210, 70, "Output",ExpressionUUID->"19e6caab-c2ac-4b4e-9502-692474b830a1", CellID->111405672] }, Open ]], Cell[228873, 5989, 117, 2, 70, "Text",ExpressionUUID->"3acc3203-087a-47f9-8a3f-1ed14e18b2bf", CellID->366613245], Cell[CellGroupData[{ Cell[229015, 5995, 449, 11, 70, "Input",ExpressionUUID->"eec6fa73-aaa7-49f5-b2ec-71bc0ce9fe54", CellID->243605427], Cell[229467, 6008, 9683, 210, 70, "Output",ExpressionUUID->"03ee57e8-16e4-46b5-87b1-e43949d0f02a", CellID->724339315] }, Open ]], Cell[239165, 6221, 112, 2, 70, "Text",ExpressionUUID->"9e49f27d-401b-4772-9560-9bd49545a396", CellID->512904443], Cell[CellGroupData[{ Cell[239302, 6227, 452, 11, 70, "Input",ExpressionUUID->"e5383b0a-c93d-4446-80fd-d0379e1fb953", CellID->155880285], Cell[239757, 6240, 9675, 209, 70, "Output",ExpressionUUID->"f6625aea-074c-41b2-a3a3-5cbfd06dbf2e", CellID->177766040] }, Open ]], Cell[CellGroupData[{ Cell[249469, 6454, 452, 11, 70, "Input",ExpressionUUID->"7c07d481-3ee9-40da-8b84-d245c4796937", CellID->452630924], Cell[249924, 6467, 9734, 211, 70, "Output",ExpressionUUID->"5fea1047-298c-44cf-a27a-9a43b8333c07", CellID->71038173] }, Open ]], Cell[259673, 6681, 114, 2, 70, "Text",ExpressionUUID->"2688350f-b193-4dff-a8e7-fbe35b246c61", CellID->230793326], Cell[CellGroupData[{ Cell[259812, 6687, 449, 11, 70, "Input",ExpressionUUID->"250519cc-1070-4bb7-a7d8-be082a4df561", CellID->359049414], Cell[260264, 6700, 9701, 210, 70, "Output",ExpressionUUID->"20da78a6-c89d-4688-a378-ba23cd467e6d", CellID->678770065] }, Open ]], Cell[CellGroupData[{ Cell[270002, 6915, 450, 11, 70, "Input",ExpressionUUID->"88b797f3-5e96-45b5-8a05-8f44074a6290", CellID->945957456], Cell[270455, 6928, 9699, 209, 70, "Output",ExpressionUUID->"1fbf541f-9324-40cc-9162-b97ba799b21c", CellID->745098557] }, Open ]], Cell[280169, 7140, 119, 2, 70, "Text",ExpressionUUID->"e025af8a-81b8-457e-a0b4-cb4dd5726458", CellID->765689285], Cell[CellGroupData[{ Cell[280313, 7146, 442, 11, 70, "Input",ExpressionUUID->"95e00dea-4763-416c-a6c4-ed81c0549ca9", CellID->378665178], Cell[280758, 7159, 9652, 210, 70, "Output",ExpressionUUID->"6b0bc1e6-4c68-4d0e-8df5-3be87003a9fe", CellID->473372575] }, Open ]], Cell[290425, 7372, 166, 3, 70, "Text",ExpressionUUID->"cba35600-ece4-43e5-94b1-13f47de2d98b", CellID->719641120], Cell[CellGroupData[{ Cell[290616, 7379, 409, 10, 70, "Input",ExpressionUUID->"d7828663-e454-4ad6-853f-c0a21d9dd3fa", CellID->950880085], Cell[291028, 7391, 9530, 207, 70, "Output",ExpressionUUID->"2503e229-0f35-4025-b03d-4365dfe7d66b", CellID->806669276] }, Open ]], Cell[300573, 7601, 144, 3, 70, "Text",ExpressionUUID->"30f2f0f3-d2d5-4469-8851-5906da75f5a2", CellID->685405471], Cell[CellGroupData[{ Cell[300742, 7608, 459, 11, 70, "Input",ExpressionUUID->"1c541bfe-2deb-4d6b-a758-b6c4a1a13d35", CellID->126846642], Cell[301204, 7621, 9694, 210, 70, "Output",ExpressionUUID->"16dbd91e-0fee-4a90-8ecd-ebbe5d7d3c12", CellID->295055476] }, Open ]], Cell[CellGroupData[{ Cell[310935, 7836, 431, 11, 70, "Input",ExpressionUUID->"2cd92582-720b-462f-ad8d-f276ae9e992a", CellID->55568484], Cell[311369, 7849, 9765, 212, 70, "Output",ExpressionUUID->"5078c1a5-753a-45da-a7aa-849f80ca311d", CellID->459537700] }, Open ]], Cell[CellGroupData[{ Cell[321171, 8066, 527, 13, 70, "Input",ExpressionUUID->"ca49e06a-124b-433c-817f-3d85d35df661", CellID->151540560], Cell[321701, 8081, 9773, 212, 70, "Output",ExpressionUUID->"95a9a71c-5e3e-4f7b-9698-a197455011e5", CellID->815752927] }, Open ]], Cell[CellGroupData[{ Cell[331511, 8298, 523, 13, 70, "Input",ExpressionUUID->"2d4d51e1-b66c-4eac-8c7e-5cc810f2bbc3", CellID->436718228], Cell[332037, 8313, 9801, 213, 70, "Output",ExpressionUUID->"d6187abc-d77e-4c73-980d-1c4cf7fe3f50", CellID->433861487] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[341887, 8532, 196, 4, 70, "Subsubsection",ExpressionUUID->"a6ef74ea-3df1-43c1-9b87-10bf5e8c4032", CellID->388539239], Cell[342086, 8538, 169, 3, 70, "Text",ExpressionUUID->"7760cd30-ec0f-41e0-bfb4-ef51a28358ef", CellID->517278672], Cell[CellGroupData[{ Cell[342280, 8545, 474, 12, 70, "Input",ExpressionUUID->"ac405987-8a74-4f3a-802f-0e1c9c3ea081", CellID->347439000], Cell[342757, 8559, 10220, 221, 70, "Output",ExpressionUUID->"940abe11-3419-4a38-8915-dc0fb4d3ea2a", CellID->699609952] }, Open ]], Cell[CellGroupData[{ Cell[353014, 8785, 455, 12, 70, "Input",ExpressionUUID->"1e020528-93c0-4dd4-a17c-31c4c9c0aa1f", CellID->334053352], Cell[353472, 8799, 10190, 220, 70, "Output",ExpressionUUID->"36d24462-89ff-4c49-b93e-33fed7c44722", CellID->224117106] }, Open ]], Cell[CellGroupData[{ Cell[363699, 9024, 467, 12, 70, "Input",ExpressionUUID->"c3edaa1c-93f4-4524-8edc-26d96831c8e4", CellID->419367841], Cell[364169, 9038, 10151, 220, 70, "Output",ExpressionUUID->"2da6c6b3-a7ec-4c92-bb73-dcbcbae6d740", CellID->58246765] }, Open ]], Cell[CellGroupData[{ Cell[374357, 9263, 390, 11, 70, "Input",ExpressionUUID->"c603c4d9-0d65-4168-b50f-3775306b62ec", CellID->745756171], Cell[374750, 9276, 10156, 220, 70, "Output",ExpressionUUID->"ef70b85b-a983-4b73-9a15-c23faa85cd2d", CellID->734873366] }, Open ]], Cell[CellGroupData[{ Cell[384943, 9501, 409, 11, 70, "Input",ExpressionUUID->"f66b35b0-398c-4a28-abfa-20c22ab79afb", CellID->742880936], Cell[385355, 9514, 9974, 215, 70, "Output",ExpressionUUID->"b6fee13a-1ac5-4b35-a59b-95b15a4a3f42", CellID->142600171] }, Open ]], Cell[395344, 9732, 162, 3, 70, "Text",ExpressionUUID->"bcc5e1e7-3bed-4755-b586-165b493dde99", CellID->568984181], Cell[CellGroupData[{ Cell[395531, 9739, 431, 11, 70, "Input",ExpressionUUID->"344f6272-d344-48a9-bcb8-74e1a0ca3fe5", CellID->193011743], Cell[395965, 9752, 9935, 215, 70, "Output",ExpressionUUID->"12a4459a-cb0d-4513-a3c4-94430e459c66", CellID->428812341] }, Open ]], Cell[CellGroupData[{ Cell[405937, 9972, 407, 11, 70, "Input",ExpressionUUID->"dae72943-7632-42cf-ba77-4acb5c444b78", CellID->325240450], Cell[406347, 9985, 9941, 216, 70, "Output",ExpressionUUID->"5372a9da-3fb2-4f6e-9177-a0f9c75fa118", CellID->782573776] }, Open ]], Cell[416303, 10204, 113, 2, 70, "Text",ExpressionUUID->"cdf1ff7d-bb2b-4539-9ea8-fd73721ed44d", CellID->488582756], Cell[CellGroupData[{ Cell[416441, 10210, 470, 12, 70, "Input",ExpressionUUID->"097be2a1-d4bc-4f00-92e7-35b345351b3e", CellID->646877386], Cell[416914, 10224, 10210, 221, 70, "Output",ExpressionUUID->"bbe87cbe-9a33-440c-86be-9d307421428a", CellID->738218848] }, Open ]], Cell[CellGroupData[{ Cell[427161, 10450, 422, 11, 70, "Input",ExpressionUUID->"f2c492a1-08fd-44e3-ba8c-3616298c971d", CellID->995303634], Cell[427586, 10463, 10179, 220, 70, "Output",ExpressionUUID->"60846739-cde4-4833-bb3b-5d934ce63b44", CellID->821108129] }, Open ]], Cell[CellGroupData[{ Cell[437802, 10688, 399, 11, 70, "Input",ExpressionUUID->"58539157-c035-4e63-a9de-3da286024c04", CellID->934970347], Cell[438204, 10701, 10186, 221, 70, "Output",ExpressionUUID->"e58a2a22-a354-4738-9410-4a91c977d869", CellID->418245009] }, Open ]], Cell[CellGroupData[{ Cell[448427, 10927, 400, 11, 70, "Input",ExpressionUUID->"10a06a8c-4368-452f-91ce-786d27ff318e", CellID->718261524], Cell[448830, 10940, 10181, 220, 70, "Output",ExpressionUUID->"ff1c9827-4d84-418f-b9de-1bc12c2b09a4", CellID->348620911] }, Open ]], Cell[459026, 11163, 107, 2, 70, "Text",ExpressionUUID->"4c7930c4-31d8-4243-89f9-f251096346ed", CellID->131955105], Cell[CellGroupData[{ Cell[459158, 11169, 422, 11, 70, "Input",ExpressionUUID->"617b02dc-d2f5-4e43-addc-98a0dc1fdb40", CellID->655251242], Cell[459583, 11182, 9733, 210, 70, "Output",ExpressionUUID->"9f824929-0065-4fba-b447-c968d18248b1", CellID->762031425] }, Open ]], Cell[CellGroupData[{ Cell[469353, 11397, 397, 11, 70, "Input",ExpressionUUID->"d0f6a634-ddf9-4122-a2f5-46eac95422d9", CellID->425138670], Cell[469753, 11410, 9741, 211, 70, "Output",ExpressionUUID->"a8fc2017-8049-4672-9677-486b3207205f", CellID->780553253] }, Open ]], Cell[CellGroupData[{ Cell[479531, 11626, 407, 11, 70, "Input",ExpressionUUID->"5621abfa-3de9-45a3-a7d6-be6092613ae8", CellID->571269475], Cell[479941, 11639, 9697, 210, 70, "Output",ExpressionUUID->"4b5422aa-3a3b-4b98-b605-2b89a3cc6f0b", CellID->153368917] }, Open ]], Cell[CellGroupData[{ Cell[489675, 11854, 408, 11, 70, "Input",ExpressionUUID->"bacdbc57-f18f-46ec-8789-4f8e5bba1dcb", CellID->254235309], Cell[490086, 11867, 9695, 210, 70, "Output",ExpressionUUID->"cecb318e-65eb-4a97-b956-833fdff1b1dc", CellID->454532287] }, Open ]], Cell[CellGroupData[{ Cell[499818, 12082, 373, 10, 70, "Input",ExpressionUUID->"8f168dfe-a24d-457c-8dce-de17aee815b1", CellID->711455005], Cell[500194, 12094, 9543, 206, 70, "Output",ExpressionUUID->"fa29c36a-ad3a-45bb-94a8-de51709540e4", CellID->376527310] }, Open ]], Cell[509752, 12303, 115, 2, 70, "Text",ExpressionUUID->"da86485a-2e06-4a13-bcb7-ce545d522001", CellID->637871162], Cell[CellGroupData[{ Cell[509892, 12309, 426, 11, 70, "Input",ExpressionUUID->"c5379d99-c32f-43fd-ad94-f588f8678ac7", CellID->214851337], Cell[510321, 12322, 10148, 221, 70, "Output",ExpressionUUID->"52b20873-e554-4839-b36f-ceb44aaa6024", CellID->671155659] }, Open ]], Cell[CellGroupData[{ Cell[520506, 12548, 428, 11, 70, "Input",ExpressionUUID->"5fe61c42-3723-47c0-b191-759d393153af", CellID->358111396], Cell[520937, 12561, 10148, 221, 70, "Output",ExpressionUUID->"a4ef4608-030f-4701-95fe-1f3c826a1bed", CellID->281753123] }, Open ]], Cell[CellGroupData[{ Cell[531122, 12787, 426, 11, 70, "Input",ExpressionUUID->"4e75cfde-8eeb-4b50-8963-75000703acfa", CellID->885532502], Cell[531551, 12800, 10099, 219, 70, "Output",ExpressionUUID->"11bf1445-42f8-4953-8f41-1596e11248a7", CellID->524100985] }, Open ]], Cell[CellGroupData[{ Cell[541687, 13024, 424, 11, 70, "Input",ExpressionUUID->"1170e2d9-8c0c-4723-9771-fef135bb7e6e", CellID->47501919], Cell[542114, 13037, 10099, 219, 70, "Output",ExpressionUUID->"ded427d6-b2a1-4814-ac8d-213f2d9e690c", CellID->79105371] }, Open ]], Cell[CellGroupData[{ Cell[552250, 13261, 442, 11, 70, "Input",ExpressionUUID->"1139b24c-dcdf-4f3a-bf77-8a696a3b8c33", CellID->78787671], Cell[552695, 13274, 10242, 223, 70, "Output",ExpressionUUID->"564b1743-3abe-4281-a43b-b7cb3f25ff88", CellID->41746163] }, Open ]], Cell[CellGroupData[{ Cell[562974, 13502, 443, 11, 70, "Input",ExpressionUUID->"696358c3-0139-45b0-952a-6d9a78adb311", CellID->519058627], Cell[563420, 13515, 10252, 223, 70, "Output",ExpressionUUID->"1854abe5-e23d-4251-b5b0-274a0dcd0632", CellID->980637653] }, Open ]], Cell[CellGroupData[{ Cell[573709, 13743, 439, 11, 70, "Input",ExpressionUUID->"774fbc51-a680-4cb6-98c0-e45df3155aa2", CellID->925687430], Cell[574151, 13756, 10204, 221, 70, "Output",ExpressionUUID->"9b3bdfb0-4e10-4add-acca-17aaaf32b04d", CellID->683447799] }, Open ]], Cell[CellGroupData[{ Cell[584392, 13982, 442, 11, 70, "Input",ExpressionUUID->"8f09c849-fa1d-4c2a-8aef-83b94811b2f1", CellID->783548925], Cell[584837, 13995, 10204, 221, 70, "Output",ExpressionUUID->"bdd54273-2f35-4d3f-8b02-ee1c6d7e2395", CellID->137407385] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[595090, 14222, 171, 3, 70, "Subsubsection",ExpressionUUID->"13e44683-d3ba-4eb2-ae29-d32c9c5c9a9d", CellID->122759479], Cell[595264, 14227, 154, 2, 70, "Text",ExpressionUUID->"519b2308-776c-4783-a3e3-2c533d719804", CellID->757667888], Cell[CellGroupData[{ Cell[595443, 14233, 502, 12, 70, "Input",ExpressionUUID->"3ea13d5f-5215-4827-be8f-862ced2a986f", CellID->360092489], Cell[595948, 14247, 11897, 248, 70, "Output",ExpressionUUID->"bde92240-9848-4151-942e-b8221bffa8ec", CellID->957368024] }, Open ]], Cell[CellGroupData[{ Cell[607882, 14500, 506, 12, 70, "Input",ExpressionUUID->"01fbc061-0327-4286-ac39-9649aab46aa3", CellID->660869668], Cell[608391, 14514, 11903, 248, 70, "Output",ExpressionUUID->"865361ac-fd42-4834-9b58-926e17d0e115", CellID->676696798] }, Open ]], Cell[620309, 14765, 155, 2, 70, "Text",ExpressionUUID->"84a2c0cf-cfd1-4bf5-b509-5f3a99cccd50", CellID->380190004], Cell[CellGroupData[{ Cell[620489, 14771, 501, 12, 70, "Input",ExpressionUUID->"fe5e9366-2f2b-4b81-852e-c3fa292f0648", CellID->452362241], Cell[620993, 14785, 11890, 248, 70, "Output",ExpressionUUID->"2415bfe8-62e2-4ddd-8837-952eba80d830", CellID->783979461] }, Open ]], Cell[CellGroupData[{ Cell[632920, 15038, 504, 12, 70, "Input",ExpressionUUID->"5a143be7-6d18-41c0-b6fa-30ecd1a49c2c", CellID->285649669], Cell[633427, 15052, 11899, 248, 70, "Output",ExpressionUUID->"a8849f89-e331-463f-9eee-7b99c73c5139", CellID->913709698] }, Open ]], Cell[645341, 15303, 150, 2, 70, "Text",ExpressionUUID->"6673bc9f-d091-4adb-8e7d-f8d69df81542", CellID->138973699], Cell[CellGroupData[{ Cell[645516, 15309, 502, 12, 70, "Input",ExpressionUUID->"74b20a6b-cdd0-4a49-a13b-4423142e5f74", CellID->476902447], Cell[646021, 15323, 11897, 248, 70, "Output",ExpressionUUID->"e03d49f5-05a5-4c0f-8b8a-0ec92522245e", CellID->923233192] }, Open ]], Cell[CellGroupData[{ Cell[657955, 15576, 480, 12, 70, "Input",ExpressionUUID->"4bfec695-e3ce-4c1d-86d1-2267bea06669", CellID->648083304], Cell[658438, 15590, 11905, 248, 70, "Output",ExpressionUUID->"8e15c9a9-82cc-4fdf-9be5-84fe9acd4063", CellID->757322453] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[670392, 15844, 142, 3, 70, "Subsubsection",ExpressionUUID->"492dc1f4-3eb0-44d3-8564-a3fd38eb4f41", CellID->878973792], Cell[CellGroupData[{ Cell[670559, 15851, 792, 19, 70, "Input",ExpressionUUID->"1e921dea-8745-4c56-b897-1b87c776c02d", CellID->630724559], Cell[671354, 15872, 10295, 222, 70, "Output",ExpressionUUID->"a13165e1-fef7-493d-ac35-439e3be05ef8", CellID->305072664] }, Open ]], Cell[CellGroupData[{ Cell[681686, 16099, 616, 16, 70, "Input",ExpressionUUID->"d6df471a-e579-4637-8e52-5c4369692cd3", CellID->644578909], Cell[682305, 16117, 9202, 200, 70, "Output",ExpressionUUID->"a6527949-3ce6-41bd-82e3-5596b35e09db", CellID->643192792] }, Open ]], Cell[CellGroupData[{ Cell[691544, 16322, 462, 11, 70, "Input",ExpressionUUID->"9332bcdc-fa45-4b03-8af6-12653e63e918", CellID->866741494], Cell[692009, 16335, 8754, 190, 70, "Output",ExpressionUUID->"b779282c-69a2-4837-b5e8-3fcb24a86326", CellID->708149213] }, Open ]], Cell[CellGroupData[{ Cell[700800, 16530, 703, 18, 70, "Input",ExpressionUUID->"d5fe8e84-2ec8-4828-8d84-6f1b5a6a66e9", CellID->356282897], Cell[701506, 16550, 9793, 214, 70, "Output",ExpressionUUID->"c6012fe9-39cc-4995-a249-b1b84383a68c", CellID->964589987] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[711348, 16770, 154, 3, 70, "Subsubsection",ExpressionUUID->"a9f692df-2315-4210-9b6f-ac71bcd427a0", CellID->875208264], Cell[711505, 16775, 107, 2, 70, "Text",ExpressionUUID->"94882364-68ff-4ec4-9d35-d28dd88a4efd", CellID->465670750], Cell[CellGroupData[{ Cell[711637, 16781, 448, 11, 70, "Input",ExpressionUUID->"18a0db0a-9b78-4e41-8d98-6e38e8a854ee", CellID->19647684], Cell[712088, 16794, 9581, 208, 70, "Output",ExpressionUUID->"55a97143-b88e-47b8-bf01-bf03fd44888f", CellID->75236935] }, Open ]], Cell[CellGroupData[{ Cell[721706, 17007, 449, 11, 70, "Input",ExpressionUUID->"c84707ed-4b21-4247-a751-e3822e219f07", CellID->141100838], Cell[722158, 17020, 9702, 210, 70, "Output",ExpressionUUID->"a213128c-0063-4a2b-a09d-c242e14aa5cb", CellID->611370867] }, Open ]], Cell[CellGroupData[{ Cell[731897, 17235, 445, 11, 70, "Input",ExpressionUUID->"27bc181b-a387-4a02-8d73-dcf8b1941f1d", CellID->709571286], Cell[732345, 17248, 9703, 210, 70, "Output",ExpressionUUID->"dc42c2e1-af8e-405f-9aef-3e669a134c11", CellID->233051186] }, Open ]], Cell[CellGroupData[{ Cell[742085, 17463, 447, 11, 70, "Input",ExpressionUUID->"e9bfdde8-97bd-4d6b-92a3-25bb45636311", CellID->741528469], Cell[742535, 17476, 10277, 220, 70, "Output",ExpressionUUID->"e15c9aea-7aed-4e32-b6a2-930096cbbd5e", CellID->467298399] }, Open ]], Cell[CellGroupData[{ Cell[752849, 17701, 501, 12, 70, "Input",ExpressionUUID->"7889213c-8361-4b9f-b247-33e11347e2b0", CellID->304028188], Cell[753353, 17715, 10316, 220, 70, "Output",ExpressionUUID->"9a68c415-43d7-448d-bee5-1adbb2b3964a", CellID->270302221] }, Open ]], Cell[CellGroupData[{ Cell[763706, 17940, 504, 12, 70, "Input",ExpressionUUID->"36bd269b-d1f0-4bef-b09b-07c04b2f7242", CellID->501953171], Cell[764213, 17954, 11864, 246, 70, "Output",ExpressionUUID->"6aad48ff-1026-4ffc-9999-85aba74bfd0a", CellID->746621044] }, Open ]], Cell[CellGroupData[{ Cell[776114, 18205, 503, 12, 70, "Input",ExpressionUUID->"e1ff10ce-d26c-45a8-8e6e-274fd6331b20", CellID->16345853], Cell[776620, 18219, 10184, 219, 70, "Output",ExpressionUUID->"a9261699-ba31-4461-ae20-8ce36918ab06", CellID->486069415] }, Open ]], Cell[786819, 18441, 110, 2, 70, "Text",ExpressionUUID->"2dd056a4-036a-46b9-83c4-be4fde3d05ce", CellID->797892019], Cell[CellGroupData[{ Cell[786954, 18447, 416, 11, 70, "Input",ExpressionUUID->"70c58d43-cb80-4b8d-ae92-e4bc8b780938", CellID->362086361], Cell[787373, 18460, 10058, 217, 70, "Output",ExpressionUUID->"ad22df4a-4ae4-4b6a-bcf5-ecf9fa578d82", CellID->743314657] }, Open ]], Cell[CellGroupData[{ Cell[797468, 18682, 418, 11, 70, "Input",ExpressionUUID->"1ec45ea5-cd71-42b0-9899-67a58cf2f997", CellID->613130542], Cell[797889, 18695, 10141, 219, 70, "Output",ExpressionUUID->"b3b9f8fc-df6d-40de-a9c5-698e4373c41c", CellID->860202713] }, Open ]], Cell[CellGroupData[{ Cell[808067, 18919, 419, 11, 70, "Input",ExpressionUUID->"6c8710f5-19c9-4ad7-8962-bf8729bbbc45", CellID->503717495], Cell[808489, 18932, 10219, 221, 70, "Output",ExpressionUUID->"31e55875-f741-40fc-a640-98881ac77fb7", CellID->901682446] }, Open ]], Cell[CellGroupData[{ Cell[818745, 19158, 421, 11, 70, "Input",ExpressionUUID->"9759107e-f594-4d1d-a86c-0a75ef67c636", CellID->990352759], Cell[819169, 19171, 9944, 215, 70, "Output",ExpressionUUID->"56b65045-89b2-4312-9df5-6d8a24941fbb", CellID->423206310] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[829162, 19392, 150, 3, 70, "Subsubsection",ExpressionUUID->"f484802c-495a-4dd1-88a3-f04590cc1807", CellID->433166199], Cell[CellGroupData[{ Cell[829337, 19399, 1894, 44, 70, "Input",ExpressionUUID->"839d6269-c327-475c-b9f6-278f5cec3e5b", CellID->363541110], Cell[831234, 19445, 16952, 341, 70, "Output",ExpressionUUID->"44f90673-ef87-4087-9b99-1f9d4d864ab5", CellID->319580096] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[848235, 19792, 164, 3, 70, "Subsubsection",ExpressionUUID->"3040d918-2ace-4598-a15a-09385a2b1eb7", CellID->926885230], Cell[848402, 19797, 145, 2, 70, "Text",ExpressionUUID->"76f5b519-7d51-4d15-9e58-851aec253468", CellID->90195236], Cell[CellGroupData[{ Cell[848572, 19803, 746, 18, 70, "Input",ExpressionUUID->"7ffd5349-7f05-424f-bc08-1e667396a7a6", CellID->184001852], Cell[849321, 19823, 10454, 224, 70, "Output",ExpressionUUID->"47bdfc31-eb25-4932-95fa-14bfb8850043", CellID->430290197] }, Open ]] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[859836, 20054, 955, 25, 70, "Subsection",ExpressionUUID->"195374fd-ff55-4aad-91b2-a106cbd5a793", CellTags->{"Compatibility", "TemplateCellGroup"}, CellID->559974822], Cell[CellGroupData[{ Cell[860816, 20083, 1174, 31, 70, "Subsubsection",ExpressionUUID->"e7c9133e-d8f2-4ad8-9e79-a5c599f7aab6", CellTags->{"CompatibilityWolframLanguageVersionRequired", "TemplateCellGroup", "Wolfram Language Version"}, CellID->901090016], Cell[861993, 20116, 89, 2, 70, "Text",ExpressionUUID->"6d147093-2e60-4233-a386-ccb2a676de75", CellTags->{"DefaultContent", "ScrapeDefault"}, CellID->913148768] }, Open ]], Cell[CellGroupData[{ Cell[862119, 20123, 1113, 29, 70, "Subsubsection",ExpressionUUID->"42f412c4-9dd1-44c3-8b93-cfc69ae01412", CellTags->{"CompatibilityOperatingSystem", "Operating System", "TemplateCellGroup"}, CellID->499582406], Cell[863235, 20154, 2098, 62, 70, "Output",ExpressionUUID->"42cebe0c-4c3c-4eb8-8690-0b538289b649", CellTags->{"CheckboxCell", "CompatibilityOperatingSystem", "CompatibilityOperatingSystem-Checkboxes"}, CellID->589765368] }, Closed]], Cell[CellGroupData[{ Cell[865370, 20221, 1280, 33, 70, "Subsubsection",ExpressionUUID->"64e21d9c-f7ab-4a71-98f1-ff50bf979ad8", CellTags->{"CompatibilityFeatures", "Required Features", "TemplateCellGroup"}, CellID->989275156], Cell[866653, 20256, 2149, 63, 70, "Output",ExpressionUUID->"32f683c8-73f7-4672-b6dd-510b2a77f75a", CellTags->{"CheckboxCell", "CompatibilityFeatures", "CompatibilityFeatures-Checkboxes"}, CellID->851691753] }, Closed]], Cell[CellGroupData[{ Cell[868839, 20324, 1913, 46, 70, "Subsubsection",ExpressionUUID->"451203f8-21ab-4181-8584-288b8c3fb2b0", CellTags->{"CompatibilityEvaluationEnvironment", "Environments", "TemplateCellGroup"}, CellID->605308563], Cell[870755, 20372, 3986, 117, 70, "Output",ExpressionUUID->"7e3c37d1-a394-4a08-9979-58b751ba2502", CellTags->{"CheckboxCell", "CompatibilityEvaluationEnvironment", "CompatibilityEvaluationEnvironment-Checkboxes"}, CellID->71422750] }, Closed]], Cell[CellGroupData[{ Cell[874778, 20494, 1071, 27, 70, "Subsubsection",ExpressionUUID->"f67b5beb-a74c-488b-aae9-9efd94cbadc5", CellTags->{"Cloud Support", "CompatibilityCloudSupport", "TemplateCellGroup"}, CellID->129998371], Cell[875852, 20523, 1218, 36, 70, "Output",ExpressionUUID->"370b9772-c57e-4488-828d-495dae5670c6", CellTags->{"CheckboxCell", "CompatibilityCloudSupport", "CompatibilityCloudSupport-Checkboxes"}, CellID->131115484] }, Closed]] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[877131, 20566, 1155, 28, 70, "Section",ExpressionUUID->"1491ad61-786e-4b81-a927-82e7476dda4a", CellTags->{"Author Notes", "TemplateCellGroup"}, CellID->681870591], Cell[878289, 20596, 529, 8, 70, "Text",ExpressionUUID->"b1873ea2-c79d-4b6c-89a8-5668167cdf28", CellTags->{"DefaultContent", "TabNext"}, CellID->958952487] }, Open ]], Cell[CellGroupData[{ Cell[878855, 20609, 1033, 26, 70, "Section",ExpressionUUID->"28658bc0-de4e-4c37-a588-f4bd50e51b27", CellTags->{"Submission Notes", "TemplateCellGroup"}, CellID->916799765], Cell[879891, 20637, 515, 8, 70, "Text",ExpressionUUID->"beac507e-cdeb-43fb-9107-1ada2f8eb320", CellTags->{"DefaultContent", "TabNext"}, CellID->604291542] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)