scene
{
    camera
    {
        position <0, -40, 40>
        look_at <0, 100, 5>
    }

    light
    {
        position <100, -100, 50>
    }

    define material mat
    {
        color <0, 0.8, 1>
    }

    define material glass
    {
        transparency 1
        refraction 1.5
    }

    plane
    {
        position <0, 0, 1>, 0
        material
        {
            color <0, 0.7, 0>
        }
    }

    for (local $x = -200; $x <= 200; $x = $x + 40)
    {
        for (local $y = 0; $y <= 4000; $y = $y + 40)
        {
            sphere
            {
                radius 10
                translate <$x, $y, 10>
                if ($x == 0 && $y == 0)
                {
                    material glass
                    translate <0, 0, 20>
                }
                else
                {
                    material mat
                }
            }
        }
    }
}