Tao3D example with cached

import Slides

GRID -> 50
SZ -> 40
picture_slide "Page 1",
    spheroid sqrt(mouse_x^2+mouse_y^2) / GRID

spheroid R2:real ->
    rotate_x 20 * time
    rotate_y 31 * time
    cached R2,
        for X in -10..10 loop
            for Y in -10..10 loop
                for Z in -10..10 loop
                    if abs(X^2+Y^2+Z^2-R2^2) < 4 then
                        color abs X/10, abs Y/10, abs Z/10, 50%
                        cube X*GRID, Y*GRID, Z*GRID, SZ, SZ, SZ