Logic 我如何在精益中证明这一点?p∨¬;P

Logic 我如何在精益中证明这一点?p∨¬;P,logic,lean,Logic,Lean,我有一个定理要证明 theorem T (h : ¬ A) : ¬ (A ∨ B) ∨ (¬ A ∧ B) 为了证明这一点,我想我需要 or.elim (B ∨ ¬B) (assume b: B, ...) (assume nb:¬B, ...) 我必须再次证明这一点 B v ¬B 那么,我该如何着手呢?有什么更好的方法吗?pv-p是一个来自核心库的引理,名为classic.empv-p是一个来自核心库的引理,名为classic.em,如果没有可选的额外公理classic.choice,这

我有一个定理要证明

theorem T (h : ¬ A) : ¬ (A ∨ B) ∨ (¬ A ∧ B)
为了证明这一点,我想我需要

or.elim (B ∨ ¬B) (assume b: B, ...) (assume nb:¬B, ...)
我必须再次证明这一点

B v ¬B

那么,我该如何着手呢?有什么更好的方法吗?

pv-p
是一个来自核心库的引理,名为
classic.em
pv-p
是一个来自核心库的引理,名为
classic.em
,如果没有可选的额外公理
classic.choice
,这是无法证明的。正如马里奥在下面所说,库中的定理名称是
classic.em
,如果没有可选的额外公理
classic.choice
,这是无法证明的。正如马里奥在下面所说,库中定理的名称是
classic.em
import tactic

variables (A B : Prop)

theorem T (h : ¬ A) : ¬ (A ∨ B) ∨ (¬ A ∧ B) := by tauto!