changeset 63667 | 24126c564d8a |
parent 63648 | f9f3006a5579 |
child 67091 | 1393c2340eec |
--- a/src/HOL/Library/positivstellensatz.ML Thu Aug 11 15:32:53 2016 +0200 +++ b/src/HOL/Library/positivstellensatz.ML Thu Aug 11 15:36:17 2016 +0200 @@ -495,7 +495,7 @@ val P = Thm.lhs_of PQ in Thm.implies_intr P (Thm.equal_elim PQ (Thm.assume P)) end - (* FIXME!!! Copied from groebner.ml *) + (*FIXME!!! Copied from groebner.ml*) val strip_exists = let fun h (acc, t) =