| Some definitions of interest. |
|
assert | Def b == if b True else False fi |
| | Thm* b:. b Prop |
|
bnot | Def b == if b false else true fi |
| | Thm* b:. b |
|
isl | Def isl(x) == InjCase(x; y. true; z. false) |
| | Thm* A,B:Type, x:A+B. isl(x) |
|
outl | Def outl(x) == InjCase(x; y. y; z. "???") |
| | Thm* A,B:Type, x:A+B. isl(x) outl(x) A |
|
outr | Def outr(x) == InjCase(x; y. "???"; z. z) |
| | Thm* A,B:Type, x:A+B. isl(x) outr(x) B |