Evaluated proc bigjpeg {url {width 140}} { jpg get $url; . .. wget [paste [jpg do $width]]}