#! /bin/csh -f
echo $1.inp
if  (-e $1.exc) then 
cp $1.exc exclude
else
endif
if  (-e $1.chg) then 
cp $1.chg charge 
else
endif
groups < $1.inp >$1.out
promoldg < $1.inp >  $1.gout
mv ORB $1.gorb
cp -p fort.78 fort.77
promoldg < $1.inp >  $1.lout
mv ORB $1.lorb
#enpart-80R <$1.inp > $1.enp
cp -p fort.79 fort.77
promoldg < $1.inp >  $1.lwdout
mv ORB $1.lwdorb
#cp -p fort.79 fort.80
#enpart-80R <$1.inp > $1.lwdenp
rm -f exclude
rm -f charge
