change_simp
author lcp
Thu, 08 Sep 1994 11:05:06 +0200
changeset 590 800603278425
parent 9 c1795fac88c3
permissions -rwxr-xr-x
{HOL,ZF}/indrule/quant_induct: replaced ssubst in eresolve_tac by separate call to hyp_subst_tac. This avoids substituting in x=f(x) {HOL,ZF}/indrule/ind_tac: now tries resolve_tac [refl]. This handles trivial equalities such as x=a. {HOL,ZF}/intr_elim/intro_tacsf_tac: now calls assume_tac last, to try refl before any equality assumptions

#! /bin/sh
#    simp FILE1 ... FILEn
#
#  leaves previous versions as XXX~~
#
for f in $*
do
echo $f. \ Backup file is $f~~
mv $f $f~~; sed -e '
s/\<ASM_SIMP_TAC\>/asm_simp_tac/g
s/\<SIMP_TAC\>/simp_tac/g
s/\<addrews\>/addsimps/g
s/addsplits \(\[[^]]*\]\)/setloop (split_tac \1)/g
s/addsplits/setloop  split_tac/g
s/\<setauto\>/setsolver/g
' $f~~ > $f
done
echo Finished.