(************************************************************************)
(*                                                                      *)
(* Micromega: A reflexive tactic using the Positivstellensatz           *)
(*                                                                      *)
(*  Frédéric Besson (Irisa/Inria) 2006-2008                             *)
(*                                                                      *)
(************************************************************************)
Open Scope Z_scope.
(* From Laurent Théry *)
Goal forall (x y : Z), x = 0 -> x * y = 0.
Goal forall (x y : Z), x = 0 -> x * y = 0.
Goal forall (x y : Z), 2*x = 0 -> x * y = 0.
Goal forall (x y: Z), - x*x >= 0 -> x * y = 0.

Lemma some_pol : forall x, 4 * x ^ 2 + 3 * x + 2 >= 0.