rm -f Cryst.Pmatr
rm -f Cryst.interf


manipx-ibm <$1.hftxt
dengenx < Outd > Cryst.Pmatr
cr-apost > $1.out
