Artifact 4537a3d255ab2be8606fe46bc5f6845a02eb0044:
- File demos/crop.tcl — part of check-in [6c9e2010d7] at 2010-08-12 23:36:06 on branch ak-experimental — Added crop and cut functionality to shrink images, extract a region. Updated docs, demos (user: andreask size: 98) [more...]
def crop { label {Crop} setup_image { show_image [crimp crop [base] 50 50 50 50] } }