ed8310aa-c323-45ad-bb28-8bb5370b7c8a 18 4 5 decimal

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

Smath 5346

α x q α 1 7.8343 105 x 2^*^* - 2.8129 103^* 3.1337 105^* x * + / (1.3^5.9582 104 -^* 4.6678 102^* x 2^* - (1.7^* abs * :

Smath 6179 "No real roots" α 1 q 1 ≡ α solve #

Smath 6179: force 'x' close to 1 & set it |x|
|x| NOT <  |1.00000000000001| α 1.00000000000001 abs q 1.00000000000001 abs ≡ α solve 8.917240712 106 -^*

α x Q α 1 7.8343 105^* x 2^* - 2.8129 103^* 3.1337 105^* x * + / (1.3^5.9582 104 -^* 4.6678 102^* x 2^* - (1.7^* abs * :

0.000009 x abs Q 0 2 1 sys

Iterative sanity check

0.000009 1.000001 abs Q 1.0093

0.0000089 1.000001 abs Q 0.9981

0.00000891 1.000001 abs Q 0.9992

0.00000892 1.000001 abs Q 1.0003

0.000008917 1.000001 abs Q 0.999978

0.0000089172 1.00000000000001 abs Q 0.999995434

0.00000891724 1.00000000000001 abs Q 0.99999992

0.000008917240712 1.00000000000001 abs Q 0.999999999973

α 0.00000891724 :

α x Q α 1 7.8343 105^* x 2^* - 2.8129 103^* 3.1337 105^* x * + / (1.3^5.9582 104 -^* 4.6678 102^* x 2^* - (1.7^* abs * :

α 1 abs Q #

α x abs Q 0 2 1 sys α x abs Q 0 2 1 sys

α 1.000000000001 abs Q 1