Create Receding Shapes.rkt