changeset 273 | b82e765ca464 |
parent 272 | ddd2f209d0d2 |
child 285 | 8ebdef196fd5 |
272:ddd2f209d0d2 | 273:b82e765ca464 |
---|---|
36 shows "x \<approx> x" |
36 shows "x \<approx> x" |
37 apply (rule rlam.induct) |
37 apply (rule rlam.induct) |
38 apply (simp_all add:a1 a2) |
38 apply (simp_all add:a1 a2) |
39 apply (rule a3) |
39 apply (rule a3) |
40 apply (simp_all) |
40 apply (simp_all) |
41 (* apply (simp add: pt_swap_bij'') *) |
|
41 sorry |
42 sorry |
42 |
43 |
43 quotient lam = rlam / alpha |
44 quotient lam = rlam / alpha |
44 sorry |
45 sorry |
45 |
46 |