| Who Cites w-ekind? |
|
w-ekind | Def kind(e) == kind(act(e)) |
|
w-act | Def act(e) == a(1of(e);2of(e)) |
|
w-kind | Def kind(a) == 1of(outr(a)) |
|
w-a | Def a(i;t) == 1of(2of(2of(2of(2of(w)))))(i,t) |
|
pi2 | Def 2of(t) == t.2 |
| | Thm* A:Type, B:(A Type), p:(a:A B(a)). 2of(p) B(1of(p)) |
|
pi1 | Def 1of(t) == t.1 |
| | Thm* A:Type, B:(A Type), p:(a:A B(a)). 1of(p) A |
|
outr | Def outr(x) == InjCase(x; y. "???"; z. z) |
| | Thm* A,B:Type, x:A+B.  isl(x)  outr(x) B |