| author | wenzelm |
| Mon, 16 Nov 1998 10:41:08 +0100 | |
| changeset 5869 | b279a84ac11c |
| parent 5601 | b6456ccd9e3e |
| permissions | -rw-r--r-- |
(* Title: HOL/ex/IntRingDefs.thy ID: $Id$ Author: Tobias Nipkow and Markus Wenzel Copyright 1996 TU Muenchen *) Goalw [zero_int_def,zdiff_def] "(zero-x)+(x::int) = zero"; by (Simp_tac 1); qed "left_inv_int"; Goalw [zero_int_def,zdiff_def] "x-y = (x::int) + (zero-y)"; by (Simp_tac 1); qed "minus_inv_int";