No se trata de precision en el calculo o en la comparacion, justamente usar punto fijo evita esto..
se trata de la palabra que imprime el numero de punto, tiene fijo la cantidad de decimales.
(lib/mprint.txt --> linea 77)
y no se ven los decimales que tengo
si lo imprimo en hexa se ve que esta pasando..
dos detalles:
2/ funciona como 2.0 /.
y si queda la llamada a la recursion como ultima palabra..No es recursion..se compila un JUMP, no un CALL
mitad2 no usa la pila R para ejecutarse !!!
----------------------------------------------------------------------------
^r4/lib/gui.txt
^r4/lib/trace.txt
:mitad
0.0 >? ( 2.0 /. dup "%f " print cr mitad ) ;
:mitad2
0 ? ( drop ; )
2/ dup dup "%f %h " print cr
mitad2 ;
: cls 1000.0 mitad chome 1000.0 mitad2 waitkey waitkey ;
----------------------------------------------------------------------------