Raycasting demo in Scheme