mnd MNDOC.OUT $1neut.inp 2
mnd MNDOC.OUT $1 AAA
mv -f MS.out $1opt.out
rm -f MNDOC.OUT
mndoms <$1neut.inp
bond2
cat MS.out  MNDOC.bnd >$1neut.out
rm -f MS.out
rm -f MNDOC.OUT
mndoms <$1AAA.inp
bond2
cat MS.out  MNDOC.bnd >$1AAA.out
rm -f MNDOC.OUT
rm -f MS.out
mndoms <$1BBB.inp
bond2
cat MS.out  MNDOC.bnd >$1BBB.out
rm -f MNDOC.OUT
rm -f MS.out
mndoms <$1CCC.inp
bond2
cat MS.out  MNDOC.bnd >$1CCC.out
rm -f MNDOC.OUT
rm -f MS.out
mndoms <$1DDD.inp
bond2
cat MS.out  MNDOC.bnd >$1DDD.out
rm -f MNDOC.OUT
rm -f MS.out
rm -f MNDOC.bnd
