Evaluated proc jpegm {url {step 5} {lmax 444}} { jpg get $url; jpegmaxsize 70 120 $step $lmax}