ge, and downsample to a size appropriate for the machine speed.<a name="3"></a></h2>
<pre class="codeinput">oim = pgmRead(<span class="string">'einstein.pgm'</span>);
tic; corrDn(oim,[1 1; 1 1]/4,<span class="string">'reflect1'</span>,[2 2]); time = toc;
imSubSample = min(max(floor(log2(time)/2+3),0),2);
im = blurDn(oim, imSubSample,<span class="string">'qmf9'</span>);
clear <span class="string">oim</span>;
</pre><b>ShowIm:<a name="4"></a></b>
         <b>3 types of automatic graylevel scaling, 2 types of a