#! /bin/csh -f

cd Figures

fig2dev -L pdftex $1.fig > $1.pdf

fig2dev -L pdftex_t -p $1.pdftex $1.fig > $1.pdftex_t

perl -p -i.bak -e 's#.pdftex##g' $1.pdftex_t

perl -p -i.bak -e 's#\\begingroup#\n\\multiply\\unitlength by \\magproz\n\\divide\\unitlength by 100\n\n\\begingroup#g' $1.pdftex_t

perl -p -i.bak -e 's#\includegraphics{#\includegraphics[scale=\\figscale]{#g' $1.pdftex_t

rm $1.pdftex_t.bak

cd ..

##############################
# new version of UPDPSF 
# renamed to UPDFIG
# new feature, generates pdf and eps and doesn't specify
# which to include. So everything can be used with
# latex and pdflatex without any change.