Thm* b:. b Prop
Thm* p,q:. (p q)
Thm* (A B) Prop
Thm* Type
Thm* b:, A:Type, p,q:A. if b p else q fi A
Thm* true