Theorem cdleme31se2 34689

Description: Part of proof of Lemma D in [Crawley] p. 113. (Contributed by NM, 3-Apr-2013.)

Hypotheses

Ref	Expression
cdleme31se2.e	⊢ 𝐸 = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑅 ∨ 𝑡) ∧ 𝑊)))
cdleme31se2.y	⊢ 𝑌 = ((𝑃 ∨ 𝑄) ∧ (⦋𝑆 / 𝑡⦌𝐷 ∨ ((𝑅 ∨ 𝑆) ∧ 𝑊)))

Assertion

Ref	Expression
cdleme31se2	⊢ (𝑆 ∈ 𝐴 → ⦋𝑆 / 𝑡⦌𝐸 = 𝑌)

Distinct variable groups:   𝑡,𝐴   𝑡, ∨   𝑡, ∧   𝑡,𝑃   𝑡,𝑄   𝑡,𝑅   𝑡,𝑆   𝑡,𝑊

Allowed substitution hints:   𝐷(𝑡)   𝐸(𝑡)   𝑌(𝑡)

Proof of Theorem cdleme31se2

Step	Hyp	Ref	Expression
1		nfcv 2751	. . . . 5 ⊢ Ⅎ𝑡(𝑃 ∨ 𝑄)
2		nfcv 2751	. . . . 5 ⊢ Ⅎ𝑡 ∧
3		nfcsb1v 3515	. . . . . 6 ⊢ Ⅎ𝑡⦋𝑆 / 𝑡⦌𝐷
4		nfcv 2751	. . . . . 6 ⊢ Ⅎ𝑡 ∨
5		nfcv 2751	. . . . . 6 ⊢ Ⅎ𝑡((𝑅 ∨ 𝑆) ∧ 𝑊)
6	3, 4, 5	nfov 6575	. . . . 5 ⊢ Ⅎ𝑡(⦋𝑆 / 𝑡⦌𝐷 ∨ ((𝑅 ∨ 𝑆) ∧ 𝑊))
7	1, 2, 6	nfov 6575	. . . 4 ⊢ Ⅎ𝑡((𝑃 ∨ 𝑄) ∧ (⦋𝑆 / 𝑡⦌𝐷 ∨ ((𝑅 ∨ 𝑆) ∧ 𝑊)))
8	7	a1i 11	. . 3 ⊢ (𝑆 ∈ 𝐴 → Ⅎ𝑡((𝑃 ∨ 𝑄) ∧ (⦋𝑆 / 𝑡⦌𝐷 ∨ ((𝑅 ∨ 𝑆) ∧ 𝑊))))
9		csbeq1a 3508	. . . . 5 ⊢ (𝑡 = 𝑆 → 𝐷 = ⦋𝑆 / 𝑡⦌𝐷)
10		oveq2 6557	. . . . . 6 ⊢ (𝑡 = 𝑆 → (𝑅 ∨ 𝑡) = (𝑅 ∨ 𝑆))
11	10	oveq1d 6564	. . . . 5 ⊢ (𝑡 = 𝑆 → ((𝑅 ∨ 𝑡) ∧ 𝑊) = ((𝑅 ∨ 𝑆) ∧ 𝑊))
12	9, 11	oveq12d 6567	. . . 4 ⊢ (𝑡 = 𝑆 → (𝐷 ∨ ((𝑅 ∨ 𝑡) ∧ 𝑊)) = (⦋𝑆 / 𝑡⦌𝐷 ∨ ((𝑅 ∨ 𝑆) ∧ 𝑊)))
13	12	oveq2d 6565	. . 3 ⊢ (𝑡 = 𝑆 → ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑅 ∨ 𝑡) ∧ 𝑊))) = ((𝑃 ∨ 𝑄) ∧ (⦋𝑆 / 𝑡⦌𝐷 ∨ ((𝑅 ∨ 𝑆) ∧ 𝑊))))
14	8, 13	csbiegf 3523	. 2 ⊢ (𝑆 ∈ 𝐴 → ⦋𝑆 / 𝑡⦌((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑅 ∨ 𝑡) ∧ 𝑊))) = ((𝑃 ∨ 𝑄) ∧ (⦋𝑆 / 𝑡⦌𝐷 ∨ ((𝑅 ∨ 𝑆) ∧ 𝑊))))
15		cdleme31se2.e	. . 3 ⊢ 𝐸 = ((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑅 ∨ 𝑡) ∧ 𝑊)))
16	15	csbeq2i 3945	. 2 ⊢ ⦋𝑆 / 𝑡⦌𝐸 = ⦋𝑆 / 𝑡⦌((𝑃 ∨ 𝑄) ∧ (𝐷 ∨ ((𝑅 ∨ 𝑡) ∧ 𝑊)))
17		cdleme31se2.y	. 2 ⊢ 𝑌 = ((𝑃 ∨ 𝑄) ∧ (⦋𝑆 / 𝑡⦌𝐷 ∨ ((𝑅 ∨ 𝑆) ∧ 𝑊)))
18	14, 16, 17	3eqtr4g 2669	1 ⊢ (𝑆 ∈ 𝐴 → ⦋𝑆 / 𝑡⦌𝐸 = 𝑌)

Syntax hints:   → wi 4   = wceq 1475   ∈ wcel 1977  Ⅎwnfc 2738  ⦋csb 3499  (class class class)co 6549

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590

This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ral 2901  df-rex 2902  df-rab 2905  df-v 3175  df-sbc 3403  df-csb 3500  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-nul 3875  df-if 4037  df-sn 4126  df-pr 4128  df-op 4132  df-uni 4373  df-br 4584  df-iota 5768  df-fv 5812  df-ov 6552

This theorem is referenced by:  cdlemeg47rv2  34816