equal
deleted
inserted
replaced
3 *) |
3 *) |
4 |
4 |
5 section \<open>Formalisation of chain-complete partial orders, continuity and admissibility\<close> |
5 section \<open>Formalisation of chain-complete partial orders, continuity and admissibility\<close> |
6 |
6 |
7 theory Complete_Partial_Order2 imports |
7 theory Complete_Partial_Order2 imports |
8 Main |
8 Main Lattice_Syntax |
9 "~~/src/HOL/Library/Lattice_Syntax" |
|
10 begin |
9 begin |
11 |
10 |
12 lemma chain_transfer [transfer_rule]: |
11 lemma chain_transfer [transfer_rule]: |
13 includes lifting_syntax |
12 includes lifting_syntax |
14 shows "((A ===> A ===> op =) ===> rel_set A ===> op =) Complete_Partial_Order.chain Complete_Partial_Order.chain" |
13 shows "((A ===> A ===> op =) ===> rel_set A ===> op =) Complete_Partial_Order.chain Complete_Partial_Order.chain" |