DEFER: handle?
DEFER: room
DEFER: os-env
+DEFER: type-of
+DEFER: size-of
IN: strings
DEFER: str=
float?
str>float
unparse-float
+ float>bits
complex?
real
imaginary
millis
init-random
(random-int)
+ type-of
+ size-of
] [
swap succ tuck primitive,
] each drop ;