En utilisant ssreflect
dans le lemme suivant:Automatisation des ssreflect, Coq tout en traitant des hypothèses contredite sur les chiffres nat
From mathcomp Require Import ssreflect ssrfun ssrbool ssrnat eqtype.
Lemma nat_dec n m: (m <= n) -> (~~ (m <= n)) -> False.
Proof.
intros A notA.
(* auto. *)
red in A.
red in notA.
(* auto. *)
rewrite -> A in notA.
auto.
Qed.
Puis-je demander pourquoi les autos
, que j'ai commenté, ne fonctionnent pas à ces états de preuve ? car il me semble que ces états observent déjà une contradiction dans le contexte.
Y at-il une automatisation par ssreflect
pour prouver ce lemme?