Handbook
Glossary
sphere-t ( b d -- t )
Vocabulary
benchmark.raytracer
Inputs
b
an
object
d
an
object
Outputs
t
an
object
Definition
USING:
kernel
math
;
IN:
benchmark.raytracer
:
sphere-t
( b d -- t )
-+
dup
0.0
<
[
2drop
1/0.
]
[
[
[
0.0
>
]
keep
]
dip
?
]
if
;
inline