Turbo Pascal port of the smallpt renderer