author | paulson |
Thu, 10 Aug 2000 11:39:53 +0200 | |
changeset 9574 | da0a964aa601 |
parent 9573 | 5cadc8146573 |
child 9575 | af71f5f4ca6b |
--- a/src/HOL/Real/RealBin.ML Thu Aug 10 11:33:40 2000 +0200 +++ b/src/HOL/Real/RealBin.ML Thu Aug 10 11:39:53 2000 +0200 @@ -457,6 +457,7 @@ structure CombineNumeralsData = struct + val add = op + : int*int -> int val mk_sum = long_mk_sum (*to work for e.g. #2*x + #3*x *) val dest_sum = dest_sum val mk_coeff = mk_coeff