Theorem cdleme31sc 37680

Description: Part of proof of Lemma E in [Crawley] p. 113. (Contributed by NM, 31-Mar-2013.)

Hypotheses

Ref	Expression
cdleme31sc.c	⊢ 𝐶 = ((𝑠 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑠) ∧ 𝑊)))
cdleme31sc.x	⊢ 𝑋 = ((𝑅 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑅) ∧ 𝑊)))

Assertion

Ref	Expression
cdleme31sc	⊢ (𝑅 ∈ 𝐴 → ⦋𝑅 / 𝑠⦌𝐶 = 𝑋)

Distinct variable groups:   𝐴,𝑠   ∨ ,𝑠   ∧ ,𝑠   𝑃,𝑠   𝑄,𝑠   𝑅,𝑠   𝑈,𝑠   𝑊,𝑠

Allowed substitution hints:   𝐶(𝑠)   𝑋(𝑠)

Proof of Theorem cdleme31sc

Step	Hyp	Ref	Expression
1		nfcvd 2956	. . 3 ⊢ (𝑅 ∈ 𝐴 → Ⅎ𝑠((𝑅 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑅) ∧ 𝑊))))
2		oveq1 7142	. . . 4 ⊢ (𝑠 = 𝑅 → (𝑠 ∨ 𝑈) = (𝑅 ∨ 𝑈))
3		oveq2 7143	. . . . . 6 ⊢ (𝑠 = 𝑅 → (𝑃 ∨ 𝑠) = (𝑃 ∨ 𝑅))
4	3	oveq1d 7150	. . . . 5 ⊢ (𝑠 = 𝑅 → ((𝑃 ∨ 𝑠) ∧ 𝑊) = ((𝑃 ∨ 𝑅) ∧ 𝑊))
5	4	oveq2d 7151	. . . 4 ⊢ (𝑠 = 𝑅 → (𝑄 ∨ ((𝑃 ∨ 𝑠) ∧ 𝑊)) = (𝑄 ∨ ((𝑃 ∨ 𝑅) ∧ 𝑊)))
6	2, 5	oveq12d 7153	. . 3 ⊢ (𝑠 = 𝑅 → ((𝑠 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑠) ∧ 𝑊))) = ((𝑅 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑅) ∧ 𝑊))))
7	1, 6	csbiegf 3861	. 2 ⊢ (𝑅 ∈ 𝐴 → ⦋𝑅 / 𝑠⦌((𝑠 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑠) ∧ 𝑊))) = ((𝑅 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑅) ∧ 𝑊))))
8		cdleme31sc.c	. . 3 ⊢ 𝐶 = ((𝑠 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑠) ∧ 𝑊)))
9	8	csbeq2i 3836	. 2 ⊢ ⦋𝑅 / 𝑠⦌𝐶 = ⦋𝑅 / 𝑠⦌((𝑠 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑠) ∧ 𝑊)))
10		cdleme31sc.x	. 2 ⊢ 𝑋 = ((𝑅 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑅) ∧ 𝑊)))
11	7, 9, 10	3eqtr4g 2858	1 ⊢ (𝑅 ∈ 𝐴 → ⦋𝑅 / 𝑠⦌𝐶 = 𝑋)

Syntax hints:   → wi 4   = wceq 1538   ∈ wcel 2111  ⦋csb 3828  (class class class)co 7135

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2113  ax-9 2121  ax-10 2142  ax-11 2158  ax-12 2175  ax-ext 2770

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3an 1086  df-tru 1541  df-ex 1782  df-nf 1786  df-sb 2070  df-clab 2777  df-cleq 2791  df-clel 2870  df-nfc 2938  df-v 3443  df-sbc 3721  df-csb 3829  df-un 3886  df-in 3888  df-ss 3898  df-sn 4526  df-pr 4528  df-op 4532  df-uni 4801  df-br 5031  df-iota 6283  df-fv 6332  df-ov 7138

This theorem is referenced by:  cdleme31snd  37682  cdleme31sdnN  37683  cdlemefr44  37721  cdlemefr45e  37724  cdleme48fv  37795  cdleme46fvaw  37797  cdleme48bw  37798  cdleme46fsvlpq  37801  cdlemeg46fvcl  37802  cdlemeg49le  37807  cdlemeg46fjgN  37817  cdlemeg46rjgN  37818  cdlemeg46fjv  37819  cdleme48d  37831  cdlemeg49lebilem  37835  cdleme50eq  37837  cdleme50f  37838  cdlemg2jlemOLDN  37889  cdlemg2klem  37891