| Some definitions of interest. |
|
qadd | Def a +q b == (a.num b.den+b.num a.den)/(a.den b.den) |
| | Thm* p,q: . p +q q  |
|
qmul | Def a *q b == (a.num b.num)/(a.den b.den) |
| | Thm* p,q: . p *q q  |
|
qdenom | Def q.den == 2of(q) |
| | Thm* q: . q.den   |
|
qnumer | Def q.num == 1of(q) |
| | Thm* q: . q.num  |
|
rat | Def ==     |
| | Thm* Type |