author | oheimb |
Fri, 14 Jul 2000 20:47:11 +0200 | |
changeset 9348 | f495dba0cb07 |
parent 8116 | 759f712f8f06 |
child 10042 | 7164dc0d24d8 |
permissions | -rw-r--r-- |
8011 | 1 |
(* Title: HOL/MicroJava/J/JBasis.thy |
2 |
ID: $Id$ |
|
3 |
Author: David von Oheimb |
|
4 |
Copyright 1999 TU Muenchen |
|
5 |
||
6 |
Some auxiliary definitions. |
|
7 |
*) |
|
8 |
||
9 |
JBasis = Main + |
|
10 |
||
11 |
constdefs |
|
12 |
||
13 |
unique :: "('a \\<times> 'b) list \\<Rightarrow> bool" |
|
14 |
"unique \\<equiv> nodups \\<circ> map fst" |
|
15 |
||
16 |
end |