#! /bin/csh -f
# Last edited on 1999-03-14 17:19:29 by stolfi

# Applies apply-rf to all parts of a given list of pages
# in the filtered Voynich gallery.

foreach pg ( `cat new-pages.dir` )
  set dir = "filter-gal/${pg}"
  echo ${dir}
  foreach f ( `cd ${dir} && ls ${pg}.P?.pgm` )
    set inname = "${f:r}"
    set otname = "${inname}-06-rf"
    test-rf ${dir} ${inname} 06
    if ( -r ${dir}/${otname}.pgm ) then
      cat ${dir}/${otname}.pgm \
        | cjpeg -optimize -greyscale -quality 80 \
        > ${dir}/${inname}-rf.jpg
    else
      echo "${dir}/${otname}.pgm was not created\!"; exit 1
    endif
  end
end