69f76170-45f4-4f4f-81de-93d9795a6a32 18 2 5 decimal

&[DATE] &[TIME] - &[FILENAME]

The Newton-Raphson Solver:

]]>

leftSide# rightSide# variable# guess1# guess2# solveNR solveNRcode### :

solveNRcode### precision# 10 : xi guess1# eval : xii guess2# eval : fi leftSide# rightSide# - (variable# xi ≡ at eval : fii leftSide# rightSide# - (variable# xii ≡ at eval : df fii fi - xii xi - / eval fi UnitsOf xi UnitsOf / try : i 110000 range xii xi fi df / - eval : fii leftSide# rightSide# - (variable# xii ≡ at eval : df fii fi - xii xi - / eval df try : xii xi - xii / abs 10 precision# -^< break if xi xii : fi fii : 61 line for xii 81 line :

h 3^5 + h 3 nthroot - h 2^h 01 - solveNR 1.55306859139485 -

h 3^5 + h 3 nthroot - h 2^- (h 1.55306859139485 - ≡ at 2.97 1014 -^*

Compare to Find Root:

]]>

h 3^5 + h 3 nthroot - h 2^- 0 ≡ h 1 - ≡ FindRoot 1.37 - 0.11 i * -

h Clear 1

h 3^5 + h 3 nthroot - h 2^- (h 1.37 - 0.11 i * - ≡ at 0.032148775379977 0.028239364879935 i * +