% reads in entrance77massave data and generates pgm files for use in
% publication or web page... (perhaps for mpeg sequence shell script)

for l=0:39
  eval(sprintf('v%02d=loadframe(%02d);',l,l))
  %disp('cropdownsample.m: saving to single raw file for datfile')
  disp('cropdownsample.m: saving to pgm')
  eval(sprintf('savepnm(''deleteme77_%02d.pgm'',v%02d)',l,l))
  disp(sprintf('v%02d saved as deleteme77_%02d.pgm; clearing to save memory',l,l))
  eval(sprintf('clear v%02d',l))
  %eval(sprintf('saveraw(''deleteme_raw_movie_small%02d'',v%02d)',l,l))
  % file=sprintf('deleteme_v%02d_small_cropped.pgm',v%02d);
  % filegif=sprintf('deleteme_v%02d_small_cropped.gif',v%02d);
  % eval(sprintf('!/mas/potluck/bin/hp700/ppmtogif %s > %s',file,filegif));
  % gifnan not needed for this because original not chirped
  % gifnan syntax is: gifnan -t #ff0000 deleteme.gif > deletemenan.gif
  % eval(sprintf('!/mas/vision/bigu/steve/src/gifnan 
end%for