(* 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[ 28797, 835] NotebookOptionsPosition[ 22457, 677] NotebookOutlinePosition[ 25902, 766] CellTagsIndexPosition[ 25825, 761] WindowTitle->RoundAwayFromZero | Example Notebook WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell[TextData[{ "Basic Examples", "\[NonBreakingSpace]", Cell["(2)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellTags->"DefaultContent", CellID->619504543], Cell["Round a number:", "Text", TaggingRules->{}, CellChangeTimes->{{3.871907468515402*^9, 3.8719074787868843`*^9}}, CellTags->"DefaultContent", CellID->586099280], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ FrameBox[ PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.65 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["\<\"RoundAwayFromZero\"\>", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->0.9 Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], Background->RGBColor[0.968627, 0.976471, 0.984314], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 1}}, FrameStyle->RGBColor[0.831373, 0.847059, 0.85098], RoundingRadius->4], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RoundAwayFromZero"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RoundAwayFromZero"], BoxID -> "RoundAwayFromZero", Selectable->False], "[", "3.14", "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.871907462094925*^9, 3.8719074822193832`*^9}, { 3.871907678154673*^9, 3.871907684650229*^9}}, CellTags->"DefaultContent", CellLabel->"In[15]:=", CellID->298664010], Cell[BoxData["4"], "Output", TaggingRules->{}, CellChangeTimes->{{3.8719074652628307`*^9, 3.8719074824976387`*^9}, { 3.871907678546619*^9, 3.871907684944289*^9}, 3.87190814464813*^9, 3.8720019208207836`*^9}, CellTags->"DefaultContent", CellLabel->"Out[15]=", CellID->216950691] }, Open ]], Cell["Round a negative number:", "Text", TaggingRules->{}, CellChangeTimes->{{3.8719074938792*^9, 3.87190749947688*^9}}, CellID->431695524], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ FrameBox[ PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.65 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["\<\"RoundAwayFromZero\"\>", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->0.9 Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], Background->RGBColor[0.968627, 0.976471, 0.984314], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 1}}, FrameStyle->RGBColor[0.831373, 0.847059, 0.85098], RoundingRadius->4], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RoundAwayFromZero"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RoundAwayFromZero"], BoxID -> "RoundAwayFromZero", Selectable->False], "[", RowBox[{"-", "3.14"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.871907485357031*^9, 3.871907490602315*^9}, { 3.8719076876401367`*^9, 3.871907690930715*^9}}, CellLabel->"In[16]:=", CellID->678943051], Cell[BoxData[ RowBox[{"-", "4"}]], "Output", TaggingRules->{}, CellChangeTimes->{3.871907491186508*^9, 3.871907691126507*^9, 3.871908146611442*^9, 3.8720019275556417`*^9}, CellLabel->"Out[16]=", CellID->350468212] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[TextData[{ "Scope", "\[NonBreakingSpace]", Cell["(2)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellTags->"DefaultContent", CellID->313242344], Cell[TextData[{ Cell[BoxData["RoundTowardsZero"], "InlineFormula", FontFamily->"Source Sans Pro"], " is ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["Listable", "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/Listable", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.8719075208930473`*^9, 3.871907541696176*^9}}, CellTags->"DefaultContent", CellID->291939446], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ FrameBox[ PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.65 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["\<\"RoundAwayFromZero\"\>", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->0.9 Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], Background->RGBColor[0.968627, 0.976471, 0.984314], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 1}}, FrameStyle->RGBColor[0.831373, 0.847059, 0.85098], RoundingRadius->4], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RoundAwayFromZero"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RoundAwayFromZero"], BoxID -> "RoundAwayFromZero", Selectable->False], "[", RowBox[{"{", RowBox[{ RowBox[{"-", "8.8"}], ",", "4.1", ",", "2.3", ",", "2.9"}], "}"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.871907503749695*^9, 3.8719075167812243`*^9}, 3.8719076943521233`*^9}, CellTags->"DefaultContent", CellLabel->"In[1974]:=", CellID->448965068], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"-", "9"}], ",", "5", ",", "3", ",", "3"}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{3.871907518070612*^9, 3.871907694878202*^9, 3.871908150463876*^9}, CellTags->"DefaultContent", CellLabel->"Out[1974]=", CellID->960823388] }, Open ]], Cell["Round 'outwards' to a multiple of 0.25:", "Text", TaggingRules->{}, CellChangeTimes->{{3.8719079317171307`*^9, 3.871907946068873*^9}}, CellID->683803376], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{ InterpretationBox[ TagBox[ FrameBox[ PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.65 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["\<\"RoundAwayFromZero\"\>", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->0.9 Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], Background->RGBColor[0.968627, 0.976471, 0.984314], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 1}}, FrameStyle->RGBColor[0.831373, 0.847059, 0.85098], RoundingRadius->4], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RoundAwayFromZero"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RoundAwayFromZero"], BoxID -> "RoundAwayFromZero", Selectable->False], "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"-", "8.8"}], ",", "4.1", ",", "2.3", ",", "2.9"}], "}"}], ",", "0.25"}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.8719079136914473`*^9, 3.871907927337264*^9}}, CellLabel->"In[1975]:=", CellID->517150277], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"-", "9.`"}], ",", "4.25`", ",", "2.5`", ",", "3.`"}], "}"}]], "Output", TaggingRules->{}, CellChangeTimes->{{3.871907917276517*^9, 3.871907927590415*^9}, 3.871908152705831*^9}, CellLabel->"Out[1975]=", CellID->348484363] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[TextData[{ "Properties and Relations", "\[NonBreakingSpace]", Cell["(1)", "ExampleCount"], "\[NonBreakingSpace]" }], "Subsection", TaggingRules->{}, CellTags->"DefaultContent", CellID->727494039], Cell[TextData[{ "The opposite (rounding towards zero) can be achieved using ", Cell[BoxData[ TagBox[ ButtonBox[ StyleBox["IntegerPart", "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/IntegerPart", ContentPadding->False], MouseAppearanceTag["LinkHand"]]], "InlineFormula", FontFamily->"Source Sans Pro"], ":" }], "Text", TaggingRules->{}, CellChangeTimes->{{3.8719077847521753`*^9, 3.871907801692816*^9}, 3.871907899077012*^9}, CellID->425656393], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"TableForm", "[", RowBox[{ RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"i", ",", RowBox[{ InterpretationBox[ TagBox[ FrameBox[ PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.65 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["\<\"RoundAwayFromZero\"\>", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->0.9 Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], Background->RGBColor[0.968627, 0.976471, 0.984314], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 1}}, FrameStyle->RGBColor[0.831373, 0.847059, 0.85098], RoundingRadius->4], {"FunctionResourceBox", RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RoundAwayFromZero"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RoundAwayFromZero"], BoxID -> "RoundAwayFromZero", Selectable->False], "[", "i", "]"}], ",", RowBox[{"IntegerPart", "[", "i", "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", RowBox[{"{", RowBox[{ RowBox[{"-", "8.8"}], ",", "4.1", ",", "2.3", ",", "2.9"}], "}"}]}], "}"}]}], "]"}], ",", RowBox[{"TableHeadings", "->", RowBox[{"{", RowBox[{"None", ",", " ", RowBox[{"{", RowBox[{ "\"\\"", ",", "\"\\"", ",", "\"\\""}], "}"}]}], "}"}]}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.871907810256029*^9, 3.871907890123352*^9}}, CellLabel->"In[1976]:=", CellID->786024517], Cell[BoxData[ TagBox[ TagBox[GridBox[{ { TagBox["\<\"Number\"\>", HoldForm], TagBox["\<\"Rounding away from zero\"\>", HoldForm], TagBox["\<\"IntegerPart\"\>", HoldForm]}, { RowBox[{"-", "8.8`"}], RowBox[{"-", "9"}], RowBox[{"-", "8"}]}, {"4.1`", "5", "4"}, {"2.3`", "3", "2"}, {"2.9`", "3", "2"} }, GridBoxAlignment->{"Columns" -> {{Left}}, "Rows" -> {{Baseline}}}, GridBoxDividers->{ "Columns" -> {{False}}, "Rows" -> {False, True, {False}, False}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[2.0999999999999996`]}, Offset[0.27999999999999997`]}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}}], {None, OutputFormsDump`HeadedColumns}], Function[BoxForm`e$, TableForm[ BoxForm`e$, TableHeadings -> { None, {"Number", "Rounding away from zero", "IntegerPart"}}]]]], "Output",\ TaggingRules->{}, CellChangeTimes->{{3.871907840956766*^9, 3.871907890559966*^9}, 3.871908154996875*^9}, CellLabel->"Out[1976]//TableForm=", CellID->825806066] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell["Neat Examples", "Subsection", TaggingRules->{}, CellTags->"DefaultContent", CellID->303071976], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Plot", "[", RowBox[{ RowBox[{ InterpretationBox[ TagBox[ FrameBox[ PaneBox[GridBox[{ { StyleBox[ StyleBox[ AdjustmentBox["\<\"[\[FilledSmallSquare]]\"\>", BoxBaselineShift->-0.25, BoxMargins->{{0, 0}, {-1, -1}}], "ResourceFunctionIcon", FontColor->RGBColor[ 0.8745098039215686, 0.2784313725490196, 0.03137254901960784]], ShowStringCharacters->False, FontFamily->"Source Sans Pro Black", FontSize->0.65 Inherited, FontWeight->"Heavy", PrivateFontOptions->{"OperatorSubstitution"->False}], StyleBox[ RowBox[{ StyleBox["\<\"RoundAwayFromZero\"\>", "ResourceFunctionLabel"], " "}], ShowAutoStyles->False, ShowStringCharacters->False, FontSize->0.9 Inherited, FontColor->GrayLevel[0.1]]} }, GridBoxSpacings->{"Columns" -> {{0.25}}}], Alignment->Left, BaseStyle->{LineSpacing -> {0, 0}, LineBreakWithin -> False}, BaselinePosition->Baseline, FrameMargins->{{3, 0}, {0, 0}}], Background->RGBColor[0.968627, 0.976471, 0.984314], BaselinePosition->Baseline, DefaultBaseStyle->{}, FrameMargins->{{0, 0}, {1, 1}}, FrameStyle->RGBColor[0.831373, 0.847059, 0.85098], RoundingRadius->4], {"FunctionResourceBox", RGBColor[0.8745098039215686, 0.2784313725490196, 0.03137254901960784], "RoundAwayFromZero"}, TagBoxNote->"FunctionResourceBox"], ResourceFunction["RoundAwayFromZero"], BoxID -> "RoundAwayFromZero", Selectable->False], "[", "x", "]"}], ",", RowBox[{"{", RowBox[{"x", ",", RowBox[{"-", "3"}], ",", "3"}], "}"}]}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.87190755302984*^9, 3.87190756316189*^9}, 3.871907697122917*^9}, CellLabel->"In[1977]:=", CellID->1740808499], Cell[BoxData[ GraphicsBox[{{{}, {}, TagBox[ {RGBColor[0.368417, 0.506779, 0.709798], AbsoluteThickness[1.6], Opacity[ 1.], LineBox[{{-2.9999998775510206`, -3.}, {-2.941113955170919, -3.}, \ {-2.8822280327908176`, -3.}, {-2.754549857487248, -3.}, {-2.635332698579087, \ -3.}, {-2.518454107086743, -3.}, {-2.3916691850510325`, -3.}, \ {-2.273345279410731, -3.}, {-2.1451150432270625`, -3.}, {-2.082169208843137, \ -3.}, {-2.019223374459211, -3.}, {-2.0118839586859334`, -3.}, \ {-2.0045445429126554`, -3.}, {-2.002709688969336, -3.}, \ {-2.0019132653061225`, -3.}}], LineBox[CompressedData[" 1:eJxTTMoPSmViYGAQA2IQHed38LTmj//7GSDgAOfuwNTWpwj+gj+zc2uvIfh/ mI72xc5C8MM53623jUPw+cQcPv19+g/OP6I0yWRfLoLPMIXjy5eMv3C+NWv9 Zu2UP3D+FAdzc8faX3B+8pyIp6/m/4Dzzy+X42Sc9Q3Ol+PZYLh/2xc4n0vh 2fmXqz4hzN9lanJy5Uc4PyekdcaKFR/gfJFlRkVbcxD8vd/vex8yQPDVfbyb jioi+BMXbNtxQgjBP+b1JtiLG8FftNHO5Bo7gg8AGh14HQ== "]], LineBox[{{-0.9980867346938775, -1.}, {-0.9899497717261867, -1.}, \ {-0.982631680477144, -1.}, {-0.9533593154809734, -1.}, {-0.9240869504848028, \ -1.}, {-0.8605890552207783, -1.}, {-0.7970911599567538, -1.}, \ {-0.6785563858241136, -1.}, {-0.5501152811481067, -1.}, \ {-0.42401274388791677`, -1.}, {-0.30637122302313563`, -1.}, \ {-0.17882337161498782`, -1.}, {-0.11927995410861832`, -1.}, \ {-0.059736536602248806`, -1.}, {-0.0305494697030183, -1.}, \ {-0.001913265306122449, -1.}}], LineBox[CompressedData[" 1:eJxTTMoPSmViYGCQAGIQfa392K8LEfH2DGDwwX5mxdyvl68WwPl3b2auX+hX Aecb+zVOlFvQDOeXr/f1fiPRDeczWBbfd2adCue7zLKfKVg3B85P08tpu7Z9 KZy/qt/CYYnBWji/orf/Wee5fXB+X2bjtYSm43A+7xcf6zWBl+H8ByXHTMpa bsP573b6Hio/8RDOX9a+MCGl8ymcr/pttXDF7JdwftOV1Bc3G1/D+fc2ye+1 zngL518U9Ji0KOwdnH+koCCd0/U9nN/YsUtmcQOCb7eA5ZLNHgRfZs3KNZy3 EPw9c5qmB39A8AHnAICW "]], LineBox[CompressedData[" 1:eJxTTMoPSmViYGAQB2IQvWijnck19g/2DBDg8ERl8XMXIQT/TrqP3A5JBH9G /bTLgaEIfuj0Bx2vJyD4VfPMlOdM/gjnz1vas9dn2ic4nyU69y1r5Rc4/1zC yuVBLd/g/K28UrHfc37A+WqzFF+w+/yC83+VtfxdHfwHzv9kcYFVy+0vnP/6 lzTfCot/cD7DhhtfuPcg+GKpU2/n2/+H8xfs/3xOsRHB15YKOnT5EIJ/boOm vcNlBL/AnXHPmscI/iGh3F+PXiP4wvduWEh+QfDj/A6e1vyB4AMA35xpGw== "]], LineBox[{{2.0019132653061225`, 3.}, {2.009123501828184, 3.}, { 2.0171429256269704`, 3.}, {2.0801290323093546`, 3.}, { 2.143115138991739, 3.}, {2.2606263359610983`, 3.}, { 2.3880438634738246`, 3.}, {2.5070003745911422`, 3.}, { 2.623618318292643, 3.}, {2.75014259253751, 3.}, {2.8682058503869685`, 3.}, {2.9341028639689943`, 3.}, {2.9999998775510206`, 3.}}]}, Annotation[#, "Charting`Private`Tag$2077384#1"]& ], {}}, {}}, AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->{True, True}, AxesLabel->{None, None}, AxesOrigin->{0, 0}, DisplayFunction->Identity, Frame->{{False, False}, {False, False}}, FrameLabel->{{None, None}, {None, None}}, FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}}, GridLines->{None, None}, GridLinesStyle->Directive[ GrayLevel[0.5, 0.4]], ImagePadding->All, Method->{ "DefaultBoundaryStyle" -> Automatic, "DefaultGraphicsInteraction" -> { "Version" -> 1.2, "TrackMousePosition" -> {True, False}, "Effects" -> { "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, "Droplines" -> { "freeformCursorMode" -> True, "placement" -> {"x" -> "All", "y" -> "None"}}}}, "DefaultMeshStyle" -> AbsolutePointSize[6], "ScalingFunctions" -> None, "CoordinatesToolOptions" -> {"DisplayFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& ), "CopiedValueFunction" -> ({ (Identity[#]& )[ Part[#, 1]], (Identity[#]& )[ Part[#, 2]]}& )}}, PlotRange->{{-3, 3}, {-3., 3.}}, PlotRangeClipping->True, PlotRangePadding->{{ Scaled[0.02], Scaled[0.02]}, { Scaled[0.05], Scaled[0.05]}}, Ticks->{Automatic, Automatic}]], "Output", TaggingRules->{}, CellChangeTimes->{3.8719075637708673`*^9, 3.871907699014965*^9, 3.8719081570190563`*^9}, CellLabel->"Out[1977]=", CellID->1225231492] }, Open ]] }, Open ]] }, WindowSize->Automatic, WindowMargins->Automatic, WindowTitle->"RoundAwayFromZero | Example Notebook", TaggingRules->{ "Metadata" -> { "ResourceType" -> "Function", "Name" -> "RoundAwayFromZero", "Property" -> "ExampleNotebook"}}, FrontEndVersion->"13.1 for Linux x86 (64-bit) (June 16, 2022)", StyleDefinitions->Notebook[{ Cell[ StyleData[ StyleDefinitions -> FrontEnd`FileName[{"Wolfram"}, "Reference.nb", CharacterEncoding -> "UTF-8"]]], Cell[ StyleData[All, "Working"], Editable -> True, DockedCells -> {}], Cell[ StyleData["Notebook"], Editable -> True, DockedCells -> {}, ScrollingOptions -> {"VerticalScrollRange" -> Automatic}], Cell[ StyleData[ "Section", StyleDefinitions -> StyleData["PrimaryExamplesSection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData["Subsection", StyleDefinitions -> StyleData["ExampleSection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData[ "Subsubsection", StyleDefinitions -> StyleData["ExampleSubsection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData[ "Subsubsubsection", StyleDefinitions -> StyleData["ExampleSubsubsection"]], Editable -> True, ShowGroupOpener -> "Inline", WholeCellGroupOpener -> True], Cell[ StyleData["Text", StyleDefinitions -> StyleData["ExampleText"]], Editable -> True]}, Visible -> False, FrontEndVersion -> "13.1 for Linux x86 (64-bit) (June 16, 2022)", StyleDefinitions -> "PrivateStylesheetFormatting.nb"], $CellContext`ClosingSaveDialog -> False ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{ "DefaultContent"->{ Cell[630, 23, 197, 8, 70, "Subsection",ExpressionUUID->"843bc850-604a-4a01-824b-09b5a1a67c41", CellTags->"DefaultContent", CellID->619504543], Cell[830, 33, 167, 4, 70, "Text",ExpressionUUID->"da0da986-a79e-4c4a-81c3-0aa6c29439ff", CellTags->"DefaultContent", CellID->586099280], Cell[1022, 41, 1889, 52, 70, "Input",ExpressionUUID->"bd5ea05e-8870-4023-897f-057c030def4e", CellTags->"DefaultContent", CellID->298664010], Cell[2914, 95, 289, 7, 70, "Output",ExpressionUUID->"c57249a5-67af-4120-b216-8da2179687cb", CellTags->"DefaultContent", CellID->216950691], Cell[5536, 178, 188, 8, 70, "Subsection",ExpressionUUID->"b4d93b9b-ee86-4175-a847-1a97c890968f", CellTags->"DefaultContent", CellID->313242344], Cell[5727, 188, 726, 23, 70, "Text",ExpressionUUID->"0e27af50-a362-466f-b991-eae69424128f", CellTags->"DefaultContent", CellID->291939446], Cell[6478, 215, 1965, 56, 70, "Input",ExpressionUUID->"97a84ee7-cc38-4187-b22a-8cd008c6eec1", CellTags->"DefaultContent", CellID->448965068], Cell[8446, 273, 295, 9, 70, "Output",ExpressionUUID->"bc422b14-2430-4eaa-bb11-8beae94893fb", CellTags->"DefaultContent", CellID->960823388], Cell[11216, 364, 207, 8, 70, "Subsection",ExpressionUUID->"f25d1858-932b-4cd9-946c-80a0ac11c0cb", CellTags->"DefaultContent", CellID->727494039], Cell[16133, 519, 103, 3, 70, "Subsection",ExpressionUUID->"e16d354c-8f8d-4358-913a-985e4182dc16", CellTags->"DefaultContent", CellID->303071976]} } *) (*CellTagsIndex CellTagsIndex->{ {"DefaultContent", 24300, 727} } *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[630, 23, 197, 8, 70, "Subsection",ExpressionUUID->"843bc850-604a-4a01-824b-09b5a1a67c41", CellTags->"DefaultContent", CellID->619504543], Cell[830, 33, 167, 4, 70, "Text",ExpressionUUID->"da0da986-a79e-4c4a-81c3-0aa6c29439ff", CellTags->"DefaultContent", CellID->586099280], Cell[CellGroupData[{ Cell[1022, 41, 1889, 52, 70, "Input",ExpressionUUID->"bd5ea05e-8870-4023-897f-057c030def4e", CellTags->"DefaultContent", CellID->298664010], Cell[2914, 95, 289, 7, 70, "Output",ExpressionUUID->"c57249a5-67af-4120-b216-8da2179687cb", CellTags->"DefaultContent", CellID->216950691] }, Open ]], Cell[3218, 105, 142, 3, 70, "Text",ExpressionUUID->"0f321756-2c59-4117-b40a-e50270ec84a2", CellID->431695524], Cell[CellGroupData[{ Cell[3385, 112, 1878, 52, 70, "Input",ExpressionUUID->"dbd4c1dc-45cc-455a-9252-3956084dfc53", CellID->678943051], Cell[5266, 166, 221, 6, 70, "Output",ExpressionUUID->"4b39ac85-e685-4b3c-9ed9-e70ad9b20688", CellID->350468212] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[5536, 178, 188, 8, 70, "Subsection",ExpressionUUID->"b4d93b9b-ee86-4175-a847-1a97c890968f", CellTags->"DefaultContent", CellID->313242344], Cell[5727, 188, 726, 23, 70, "Text",ExpressionUUID->"0e27af50-a362-466f-b991-eae69424128f", CellTags->"DefaultContent", CellID->291939446], Cell[CellGroupData[{ Cell[6478, 215, 1965, 56, 70, "Input",ExpressionUUID->"97a84ee7-cc38-4187-b22a-8cd008c6eec1", CellTags->"DefaultContent", CellID->448965068], Cell[8446, 273, 295, 9, 70, "Output",ExpressionUUID->"bc422b14-2430-4eaa-bb11-8beae94893fb", CellTags->"DefaultContent", CellID->960823388] }, Open ]], Cell[8756, 285, 162, 3, 70, "Text",ExpressionUUID->"59923acc-49b2-4d26-8480-ca57e2b7f3af", CellID->683803376], Cell[CellGroupData[{ Cell[8943, 292, 1938, 55, 70, "Input",ExpressionUUID->"9726785c-9c71-47b6-804a-0b30412fd5d3", CellID->517150277], Cell[10884, 349, 283, 9, 70, "Output",ExpressionUUID->"2d2b07be-1059-4138-971a-7d35233dee66", CellID->348484363] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[11216, 364, 207, 8, 70, "Subsection",ExpressionUUID->"f25d1858-932b-4cd9-946c-80a0ac11c0cb", CellTags->"DefaultContent", CellID->727494039], Cell[11426, 374, 698, 21, 70, "Text",ExpressionUUID->"11a7affb-f53a-4c6d-9fa4-287d18b3acfe", CellID->425656393], Cell[CellGroupData[{ Cell[12149, 399, 2766, 73, 70, "Input",ExpressionUUID->"254dcce1-2d8b-42b3-a97d-c2ede0dbe954", CellID->786024517], Cell[14918, 474, 1166, 39, 70, "Output",ExpressionUUID->"4a4f39bc-4a0f-4dfa-9cff-e4d8b0618430", CellID->825806066] }, Open ]] }, Closed]], Cell[CellGroupData[{ Cell[16133, 519, 103, 3, 70, "Subsection",ExpressionUUID->"e16d354c-8f8d-4358-913a-985e4182dc16", CellTags->"DefaultContent", CellID->303071976], Cell[CellGroupData[{ Cell[16261, 526, 2058, 56, 70, "Input",ExpressionUUID->"9d7c5154-b1b4-4977-89de-df79deed5fac", CellID->1740808499], Cell[18322, 584, 4107, 89, 70, "Output",ExpressionUUID->"ec96ce28-03ac-4128-98ce-44b4fda51181", CellID->1225231492] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)