Simple ray-tracer written in Scheme