Evaluated proc jpeg11 {url {width 80}} {jpg get $url; jpg cum $width}