Add a main word
parent
ef0ea005da
commit
1f6222ef40
|
@ -102,5 +102,6 @@ HINTS: inertia body ;
|
||||||
HINTS: newton's-law body body ;
|
HINTS: newton's-law body body ;
|
||||||
HINTS: nbody fixnum ;
|
HINTS: nbody fixnum ;
|
||||||
|
|
||||||
: nbody-main ( -- )
|
: nbody-main ( -- ) 1000000 nbody ;
|
||||||
1000000 nbody ;
|
|
||||||
|
MAIN: nbody-main
|
||||||
|
|
Loading…
Reference in New Issue