#!/bin/csh
foreach x (*.xwd)
set b = `echo $x | sed 's/.xwd$//'`
echo "$b.xwd -> $b.ps"
xpr -portrait -scale 3 -psfig < $b.xwd >! $b.ps
end
