function y = myname(l)

eval(sprintf('y=loadpnm(''v%02d.pgm'');',l))

dis('loadframe: cropping bacon from around edges, and trimming fat off bottom')
y=y(3+1:3+200,7+1:7+300);

%dis('loadframe.m: generating frame %d from rgb frames; check .3,.6,.1',l)
%eval(sprintf('[r g b]=loadpnm(''pic%02d.ppm'');',l))
%y=.3*r + .5*g + .2*b;
%[M,N]=size(y);
%y=y(1:2:M,:);
%y=(y(:,1:2:N-1)+y(:,2:2:N))/2;
%eval(sprintf('savepnm(''v%02d.pgm'',y)',l))

