; crop

(clear)
(open "../static/crystal.jpg")
(crop (rect 100 100 400 400))