Theorem ectocld 8786

Description: Implicit substitution of class for equivalence class. (Contributed by Mario Carneiro, 9-Jul-2014.)

Hypotheses

Ref	Expression
ectocl.1	⊢ 𝑆 = (𝐵 / 𝑅)
ectocl.2	⊢ ([𝑥]𝑅 = 𝐴 → (𝜑 ↔ 𝜓))
ectocld.3	⊢ ((𝜒 ∧ 𝑥 ∈ 𝐵) → 𝜑)

Assertion

Ref	Expression
ectocld	⊢ ((𝜒 ∧ 𝐴 ∈ 𝑆) → 𝜓)

Distinct variable groups:   𝑥,𝐴   𝑥,𝐵   𝑥,𝑅   𝜓,𝑥   𝜒,𝑥

Allowed substitution hints:   𝜑(𝑥)   𝑆(𝑥)

Proof of Theorem ectocld

Step	Hyp	Ref	Expression
1		ectocld.3	. . . 4 ⊢ ((𝜒 ∧ 𝑥 ∈ 𝐵) → 𝜑)
2		ectocl.2	. . . . 5 ⊢ ([𝑥]𝑅 = 𝐴 → (𝜑 ↔ 𝜓))
3	2	eqcoms 2770	. . . 4 ⊢ (𝐴 = [𝑥]𝑅 → (𝜑 ↔ 𝜓))
4	1, 3	syl5ibcom 248	. . 3 ⊢ ((𝜒 ∧ 𝑥 ∈ 𝐵) → (𝐴 = [𝑥]𝑅 → 𝜓))
5	4	rexlimdva 3165	. 2 ⊢ (𝜒 → (∃𝑥 ∈ 𝐵 𝐴 = [𝑥]𝑅 → 𝜓))
6		elqsi 8769	. . 3 ⊢ (𝐴 ∈ (𝐵 / 𝑅) → ∃𝑥 ∈ 𝐵 𝐴 = [𝑥]𝑅)
7		ectocl.1	. . 3 ⊢ 𝑆 = (𝐵 / 𝑅)
8	6, 7	eleq2s 2880	. 2 ⊢ (𝐴 ∈ 𝑆 → ∃𝑥 ∈ 𝐵 𝐴 = [𝑥]𝑅)
9	5, 8	impel 515	1 ⊢ ((𝜒 ∧ 𝐴 ∈ 𝑆) → 𝜓)

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   = wceq 1570   ∈ wcel 2145  ∃wrex 3088  [cec 8698   / cqs 8699

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-ext 2734

This proof depends on definitions:  df-bi 210  df-an 402  df-tru 1573  df-ex 1813  df-sb 2100  df-clab 2741  df-cleq 2754  df-clel 2837  df-rex 3089  df-qs 8706

This theorem is used by:  ectocl  8787  elqsn0  8788  qsdisj  8798  qsel  8800  eqgen  19312  orbsta  19446  sylow1lem3  19733  sylow2alem2  19751  sylow2a  19752  sylow2blem2  19754  frgpup1  19908  frgpup3lem  19910  quscrng  21492  pi1xfr  25289  pi1coghm  25295  vitalilem3  25844  qsdisjALTV  39455  eqvrelqsel  39456