[42S] MANT Challenge

[Gerson W. Barbosa]

(01-23-2014 03:15 PM)Dieter Wrote:  

(01-23-2014 11:05 AM)Gerson W. Barbosa Wrote:  So does the HP-15C version for 1e-99...

Yes, that's why my previous version handles these cases separately. However, this can be done more elegantly, even shorter and without an explicit constant (-499 resp. -99), so it should work on the 42s as well as on the 15C and many other HPs.

Code:

01 ABS
02 1
03 0
04 X<Y?
05 1/x
06 *
07 ENTER
08 X≠0?
09 LOG
10 INT    ' or IP on later models
11 10^x
12 /
13 1
14 X>Y?
15 10^x
16 *

All input values are shifted by one magnitude towards 10, so that over-/underflow can not occur.

Dieter

Also, this preserves most of the stack (only T is lost). Very nice!

Gerson.