author | paulson |
Fri, 31 Jan 1997 17:13:19 +0100 | |
changeset 2572 | 8a47f85e7a03 |
parent 2278 | d63ffafce255 |
child 2640 | ee4dfce170a0 |
permissions | -rw-r--r-- |
2278 | 1 |
(* Title: HOLCF/Up2.thy |
2 |
ID: $Id$ |
|
3 |
Author: Franz Regensburger |
|
4 |
Copyright 1993 Technische Universitaet Muenchen |
|
5 |
||
6 |
Class Instance u::(pcpo)po |
|
7 |
||
8 |
*) |
|
9 |
||
10 |
Up2 = Up1 + |
|
11 |
||
12 |
(* Witness for the above arity axiom is up1.ML *) |
|
13 |
||
14 |
arities "u" :: (pcpo)po |
|
15 |
||
16 |
rules |
|
17 |
||
18 |
(* instance of << for type ('a)u *) |
|
19 |
||
20 |
inst_up_po "((op <<)::[('a)u,('a)u]=>bool) = less_up" |
|
21 |
||
22 |
end |
|
23 |
||
24 |
||
25 |