Leon, e.g.? result = ((1/30000) * 30000) + 1.0 > 1 s>f 30000 s>f f/ 30000 s>f f* 1 s>f f+ f>s . ^ ?? -42 45 > P.
----- PŮVODNÍ ZPRÁVA ----- Od: "Leon Nathaniel Maurer" <[email protected]> Komu: [email protected] Předmět: Re: [Amforth-devel] Leon's float Datum: 27.8.2010 - 23:32:34 > Got it. > > If all you want to test is that f+, f-, f*, and f/ > do what they're supposed to > do, then make floats from single length integers > with "s>f", then do what you > want and convert them back to integers with "f>s" > (that doesn't round -- it > just truncates the part after the decimal point). > > For now, there's no direct way to display or make > non-integers, but you can do > it indirectly by dividing or multpilying by powers > of 10 (e.g. you can get > 0.125 by "125 s>f 1000 s>f f/") > > -Leon > > On Friday, August 27, 2010 04:21:35 pm pito wrote: > > s>f defined after the first usage....You have to > > relocate the > > > Conversion words on the better place within the > > code(:-)). After the > > > second upload it has been taken. So now how to > > test??? I have no > > > idea... Float, float..P/ > > > > > > ----- PŮVODNÍ ZPRÁVA ----- > > Od: "pito" <[email protected]> > > Komu: [email protected] > > Předmět: [Amforth-devel] Leon's float > > Datum: 27.8.2010 - 23:03:31 > > > > > Hi Leon, > > > I've tried to upload to my new 1284p, but > > > getting > > > > > this error: > > > > > > ..... > > > > > > > : f/ ( f1 f2 -- f1/f2 ) > > > > > > okfdup f0= abort" division by zero " > > > okfzeroexponent >r ( f1 f2, R: n2 ) > > > okfswap fzeroexponent r> - >r fswap ( f1 f2, > > > R: > > > > > n1-n2 ) > > > okf0 frot frot ( sum remainder divisor, R: > > > exponent ) > > > ok[ 1 s>f ] frot frot ( sum toadd remainder > > > divisor, R: exponent ) > > > ^ > > > ?? -13 8 > > > > > > > 25 0 do > > > > > > ok > > > > > > > fover f0= if leave then <<<<<<< here it > > > > crashed > > > > > > > so reset was > > > > > > > > > required > > > > > > Any prerequisite needed? > > > Pito > > > > > > > > > ------------------------------------------------------------------------- > > > > > > > > ----- > > > > > > > Sell apps to millions through the Intel(R) > > > > > > Atom(Tm) Developer Program > > > Be part of this innovative community and reach > > > millions of netbook users > > > worldwide. Take advantage of special > > > opportunities > > > > > to increase revenue and > > > speed time-to-market. Join now, and jumpstart > > > your > > > > > future. > > > http://p.sf.net/sfu/intel-atom-d2d > > > _______________________________________________ > > > > > Amforth-devel mailing list > > > [email protected] > > > https://lists.sourceforge.net/lists/listinfo/amforth-devel > > > > > > --------------------------------------------------------------------------- > > > > > --- Sell apps to millions through the Intel(R) > > Atom(Tm) Developer Program > > > Be part of this innovative community and reach > > millions of netbook users > > > worldwide. Take advantage of special > > opportunities to increase revenue and > > > speed time-to-market. Join now, and jumpstart > > your future. > > > http://p.sf.net/sfu/intel-atom-d2d > > _______________________________________________ > > Amforth-devel mailing list > > [email protected] > > https://lists.sourceforge.net/lists/listinfo/amforth-devel > > > ------------------------------------------------------------------------------ > > Sell apps to millions through the Intel(R) > Atom(Tm) Developer Program > Be part of this innovative community and reach > millions of netbook users > worldwide. Take advantage of special opportunities > to increase revenue and > speed time-to-market. Join now, and jumpstart your > future. > http://p.sf.net/sfu/intel-atom-d2d > _______________________________________________ > Amforth-devel mailing list > [email protected] > https://lists.sourceforge.net/lists/listinfo/amforth-devel ------------------------------------------------------------------------------ Sell apps to millions through the Intel(R) Atom(Tm) Developer Program Be part of this innovative community and reach millions of netbook users worldwide. Take advantage of special opportunities to increase revenue and speed time-to-market. Join now, and jumpstart your future. http://p.sf.net/sfu/intel-atom-d2d _______________________________________________ Amforth-devel mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/amforth-devel
