# | Line 1 | Line 1 | |
---|---|---|
1 | + | { RCSid $Id$ } |
2 | + | { Use continued fraction calculation to derive rational number from real } |
3 | + | |
4 | frac(x,e) : x - floor(x+e); | |
5 | sq(x) : x * x; | |
6 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |