Theorem ectocld 8787

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 2769	. . . 4 ⊢ (𝐴 = [𝑥]𝑅 → (𝜑 ↔ 𝜓))
4	1, 3	syl5ibcom 248	. . 3 ⊢ ((𝜒 ∧ 𝑥 ∈ 𝐵) → (𝐴 = [𝑥]𝑅 → 𝜓))
5	4	rexlimdva 3164	. 2 ⊢ (𝜒 → (∃𝑥 ∈ 𝐵 𝐴 = [𝑥]𝑅 → 𝜓))
6		elqsi 8770	. . 3 ⊢ (𝐴 ∈ (𝐵 / 𝑅) → ∃𝑥 ∈ 𝐵 𝐴 = [𝑥]𝑅)
7		ectocl.1	. . 3 ⊢ 𝑆 = (𝐵 / 𝑅)
8	6, 7	eleq2s 2879	. 2 ⊢ (𝐴 ∈ 𝑆 → ∃𝑥 ∈ 𝐵 𝐴 = [𝑥]𝑅)
9	5, 8	impel 515	1 ⊢ ((𝜒 ∧ 𝐴 ∈ 𝑆) → 𝜓)

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

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 2733

This proof depends on definitions:  df-bi 210  df-an 402  df-tru 1573  df-ex 1813  df-sb 2100  df-clab 2740  df-cleq 2753  df-clel 2836  df-rex 3088  df-qs 8707

This theorem is used by:  ectocl  8788  elqsn0  8789  qsdisj  8799  qsel  8801  eqgen  19373  orbsta  19507  sylow1lem3  19794  sylow2alem2  19812  sylow2a  19813  sylow2blem2  19815  frgpup1  19969  frgpup3lem  19971  quscrng  21559  pi1xfr  25356  pi1coghm  25362  vitalilem3  25911  qsdisjALTV  39599  eqvrelqsel  39600