WP 34S solve an integral

[Dieter]

(04-24-2015 06:37 PM)I Wrote:  Please note that x≈0? is useless in display modes other than FIX. So don't use SCI,

Well, here's a solution using x≈? Y which will work in all display modes. FIX is only required if the value in R00 or the integral is zero.

Code:

LBL 00
 0
x<> Y
∫ 01      // ∫ from 0 to x
RCL 00    // compare with value in R00
x≈? Y     // if both are approximately equal
ENTER     // then set Y = X so that...
 -        //  ...the following subtraction yields zero
RTN       // else return ∫ - R00
LBL 01
 x²
RTN

10 STO 00
SCI 3
2 ENTER 4   SLV 00
=> 3,107 E+0   in < 8 s, |error| < 1E–7

Dieter