; crop

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