13 lines
631 B
Text
13 lines
631 B
Text
quot.mk
|
|
(prerat.mk 14 6
|
|
(mul_denom_pos
|
|
(prerat.mul
|
|
(prerat.add
|
|
(prerat.add (prerat.add (prerat.of_int 1) (prerat.of_int 1))
|
|
(prerat.add (prerat.of_int 1) (prerat.of_int 1)))
|
|
(prerat.add (prerat.add (prerat.of_int 1) (prerat.of_int 1))
|
|
(prerat.add (prerat.of_int 1) (prerat.of_int 1))))
|
|
(prerat.inv
|
|
(prerat.add (prerat.add (prerat.add (prerat.of_int 1) (prerat.of_int 1)) (prerat.of_int 1))
|
|
(prerat.add (prerat.add (prerat.of_int 1) (prerat.of_int 1)) (prerat.of_int 1)))))
|
|
(prerat.of_int 1)))
|