| | Who Cites es-tag? |
|
| es-tag | Def tag(e) == tag(kind(e)) |
|
| es-kind | Def kind(e) == 1of(2of(2of(2of(2of(2of(2of(2of(es))))))))(e) |
|
| tagof | Def tag(k) == 2of(outl(k)) |
| | | Thm* k:Knd. isrcv(k)  tag(k) Id |
|
| 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 |
|
| outl | Def outl(x) == InjCase(x; y. y; z. "???") |
| | | Thm* A,B:Type, x:A+B. isl(x)  outl(x) A |