| | 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 |