(************************************************************************) (* v * The Coq Proof Assistant / The Coq Development Team *) (* tactic val contradiction : constr with_ebindings option -> tactic