Added some regression testing for simprocs
authorpaulson
Tue, 22 Jul 2003 11:05:02 +0200
changeset 14124 883c38e2d4c0
parent 14123 b300efca4ae0
child 14125 bf8edef6c1f1
Added some regression testing for simprocs
src/HOL/ex/BinEx.thy
--- a/src/HOL/ex/BinEx.thy	Tue Jul 22 11:03:42 2003 +0200
+++ b/src/HOL/ex/BinEx.thy	Tue Jul 22 11:05:02 2003 +0200
@@ -77,6 +77,10 @@
 lemma "(i + j + -12 + (k::int)) - -15 = y"
 apply simp  oops
 
+lemma "- (2*i) + 3  + (2*i + 4) = (0::int)"
+apply simp  oops
+
+
 
 subsection {* Arithmetic Method Tests *}