solid-sphere-program>> ( object -- value )


Vocabulary
accessors

Inputs
objectan object


Outputs
valuean object


Definition
IN: accessors

GENERIC: solid-sphere-program>> ( object -- value )


Methods
USING: accessors slots.private spheres ;

M: spheres-world solid-sphere-program>> 46 slot ; inline