The following code was used to generate the rendered image.
Although only a fraction of the scence appears in the rendered image, the enitre 
scene consists of a five walls forming a cube, with a few spehere inside the
walls of the cube.  It was rendered with a recursive depth of 5 at full size 512.

camera {
	position = (16.6,1.95,7);
	viewdir = (-1,-.25,-.3);
	//aspectratio = 1;
	updir = (0,0,.9);
}

//top light
directional_light
{
	direction = (-0.2, 0.2, -2);
	color = (.7, .7, .7);
}

//left light
directional_light
{
	direction = (-100, 10, 30);
	color = (.6, .6, .6);
}

//right light
point_light {
  position=( 25,10,10);
  color=( 1,1,1 );
  constant_attenuation_coeff= 0.2;
  linear_attenuation_coeff = 0.003372407;
  quadratic_attenuation_coeff = 0.000045492;	
}

//top light
point_light {
  position=( 10,0,15);
  color=( 1,1,1 );
  constant_attenuation_coeff= 0.25;
  linear_attenuation_coeff = 0.003372407;
  quadratic_attenuation_coeff = 0.000045492;	
}

//floor
translate( 0, 0, -2,
	scale( 15, 15, 1, 
		box {
			material = { 
				diffuse=( 0.130285,0.156406,0.22449);
				ambient=( 0.112245,0.112245,0.112245);
				specular=( 0.408163,0.408163,0.408163);
				emissive=( 0,0,0);
				shininess=256.0;
			}
		} ) )
//ceiling
translate( 0, 0, 13,
	scale( 15, 15, 1, 
		box {
			material = { 
				diffuse=( 0.194609,0.192348,0.204082);
				ambient=( 0.102041,0.102041,0.102041);
				specular=( 0.357143,0.357143,0.357143);
				emissive=( 0,0,0);
				shininess=100.740736;
				transmissive=( 0.714286,0.714286,0.714286 );
			}
		} ) )

//back wall
translate( -7, 0, 5,
	scale( 1, 15, 15, 
		box {
			material = { 
				diffuse=( 0.130285,0.156406,0.22449);
				    ambient=( 0.112245,0.112245,0.112245);
				    specular=( 0.408163,0.408163,0.408163);
				    emissive=( 0,0,0);
				    shininess=112.59264;

			}
		} ) )

//right wall
translate( 0, 7, 5,
	scale( 15, 1, 15, 
		box {
			material = { 
				specular = (0.8, 0.8, 0);
				reflective = (0.7, 0.7, 0);
				diffuse = (0.2, 0.2, 0);
				shininess = 256.0;
			}
		} ) )

//left wall
translate( 0, -7, 5,
	scale( 15, 1, 15, 
		box {
			material = { 
				specular = (0.8, 0.8, 0);
				reflective = (0.7, 0.7, 0);
				diffuse = (0.45, 0.45, 0);
				shininess = 256.0;
				
			}
		} ) )

translate( 0, 0, 2,
	scale( 2,
	sphere {
		material = { 
			diffuse = map( "checkerboard.bmp" ); 
			specular = (0.8, 0.8, 0.8);
			reflective = (0.8, 0.8, 0.8);
			shininess = 256.0;
		}
	} ) )
	
// Sphere acts as a lens
translate( 1.5 ,1.5,1.4,
	scale(1.5, 1.5, 1.5, 
	sphere {
		material = { 
			diffuse = (.25, 0.25, .250);
			transmissive = (0.9, 0.9, 0.9);
			index = 1.25;
		}
	} 
	) )

// Sphere acts as a lens
translate( 1.5 ,-1.5,1.5,
	scale(.8, .8, .8, 
	sphere {
		material = { 
			diffuse = (.25, 0.25, .250);
			transmissive = (1., 1., 1.);
			index = 1.25;
		}
	} 
	) )