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


Vocabulary
accessors

Inputs
objectan object


Outputs
valuean object


Definition
IN: accessors

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


Methods
USING: accessors slots.private spheres ;

M: spheres-world texture-sphere-program>> 47 slot ; inline