Tag: COQ
Actualmente tengo: Require Import Coq.Init.Specif. Require Import Coq.Arith.Arith. Definition Test(s: {x : nat | x > 1}) := True. Lemma pTwoGt1 : 2 > 1. apply gt_Sn_n. Qed. Eval compute in Test (exist _ 2 pTwoGt1). ¿Cómo puedo demostrar para números aleatoriamente altos, como: 10000 > 1 ? ¿Cómo puedo . . . Read more
Intento resolver esta prueba pero no encuentro cómo hacerlo. Tengo dos objetivos pero ni siquiera sé si es correcto. Aquí está el lema que intenté resolver con esto pero estoy atascado: 2 objetivos a, b: Nat H: Equal (leB a b) True _______(1/2) Equal match b with | Z => . . . Read more
¿Es posible demostrar esto forall (a b : nat), a a
No estoy seguro de entender por qué en algunos casos reescribir H funciona y en otros no. Aquí, por ejemplo: “` Teorema add_assoc2 : forall n m: nat, n + m = m + n. Proof. intros. rewrite add_comm. reflexivity. Qed. Teorema plus_4: forall n m p q: nat, n . . . Read more
Actualmente estoy confundido acerca de cómo demostrar el siguiente teorema: Theorem excluded_middle2 : (forall P Q : Prop, (P -> Q) -> (~P \/ Q)) -> (forall P, P \/ ~P). Estoy atascado aquí: Theorem excluded_middle2 : (forall P Q : Prop, (P -> Q) -> (~P \/ Q)) -> . . . Read more