Commit 1fab9ab0 authored by bp's avatar bp
Browse files

Fixed zen float comment

git-svn-id: https://forth-ev.de/repos/bigforth@1734 3b8d8251-53f3-0310-8f3b-fd1cb8370982
parent ec52ea5f
( Very compressed one-screen floating-point 2116may98py
\ Very compressed one-screen floating-point 16may98py
: D10* D2* 2DUP D2* D2* D+ ; : D+- 0< IF DNEGATE THEN ;
: TRIM >R TUCK DABS BEGIN OVER 0< OVER OR WHILE 0 10 UM/MOD >R
10 UM/MOD NIP R> R> 1+ >R REPEAT ROT D+- DROP R> ;
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment