| changeset 12888 | f6c1e7306c40 |
| parent 12517 | 360e3215f029 |
| child 12911 | 704713ca07ea |
--- a/src/HOL/MicroJava/J/JBasis.thy Thu Feb 14 11:50:52 2002 +0100 +++ b/src/HOL/MicroJava/J/JBasis.thy Thu Feb 14 12:06:07 2002 +0100 @@ -14,7 +14,7 @@ constdefs unique :: "('a \<times> 'b) list => bool" - "unique == nodups \<circ> map fst" + "unique == distinct \<circ> map fst" lemma fst_in_set_lemma [rule_format (no_asm)]: