#! /bin/csh -fe
# Last edited on 2000-05-02 14:02:56 by stolfi

set usage = "$0 GREY"

echo "$0 $*"

if ( $#argv != 1 ) then
  echo "usage: ${usage}"; exit 1
endif

set grey = "$1"; shift;

set nums = ( `list-fragment-numbers` )

echo 'nums = '${nums}

foreach num ( ${nums} )

  set image  = "${num}/split"
  set chain = "${num}/r000"
  
  echo '=== '"${image}.pgm -> ${chain}.flc"' ==============================='
  
  sh -c "/bin/rm -f ${chain}.flc ${image}.ps ; exit 0"
  
  nice PZBoundary \
    -inFile ${image} \
    -black ${grey} \
    -grey ${grey} \
    -outFile ${chain}
  
  nice PZDraw \
    -window raw \
    -outName ${chain} \
    -ticks -axes -rect raw \
    < ${chain}.flc

#  ghostview -openwindows ${chain}.ps

end