Theorem elabgtOLD 3618

Description: Obsolete version of elabgt 3617 as of 1-Dec-2025. (Contributed by NM, 7-Nov-2005.) (Proof shortened by Andrew Salmon, 8-Jun-2011.) Reduce axiom usage. (Revised by GG, 12-Oct-2024.) (Proof shortened by Wolf Lammen, 11-May-2025.) (Proof modification is discouraged.) (New usage is discouraged.)

Assertion

Ref	Expression
elabgtOLD	⊢ ((𝐴 ∈ 𝐵 ∧ ∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓))) → (𝐴 ∈ {𝑥 ∣ 𝜑} ↔ 𝜓))

Distinct variable groups:   𝑥,𝐴   𝜓,𝑥

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

Proof of Theorem elabgtOLD

Step	Hyp	Ref	Expression
1		elab6g 3614	. . 3 ⊢ (𝐴 ∈ 𝐵 → (𝐴 ∈ {𝑥 ∣ 𝜑} ↔ ∀𝑥(𝑥 = 𝐴 → 𝜑)))
2	1	adantr 481	. 2 ⊢ ((𝐴 ∈ 𝐵 ∧ ∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓))) → (𝐴 ∈ {𝑥 ∣ 𝜑} ↔ ∀𝑥(𝑥 = 𝐴 → 𝜑)))
3		elisset 2822	. . . . . 6 ⊢ (𝐴 ∈ 𝐵 → ∃𝑥 𝑥 = 𝐴)
4		biimp 216	. . . . . . . . 9 ⊢ ((𝜑 ↔ 𝜓) → (𝜑 → 𝜓))
5	4	imim3i 64	. . . . . . . 8 ⊢ ((𝑥 = 𝐴 → (𝜑 ↔ 𝜓)) → ((𝑥 = 𝐴 → 𝜑) → (𝑥 = 𝐴 → 𝜓)))
6	5	al2imi 1822	. . . . . . 7 ⊢ (∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓)) → (∀𝑥(𝑥 = 𝐴 → 𝜑) → ∀𝑥(𝑥 = 𝐴 → 𝜓)))
7		19.23v 1949	. . . . . . 7 ⊢ (∀𝑥(𝑥 = 𝐴 → 𝜓) ↔ (∃𝑥 𝑥 = 𝐴 → 𝜓))
8	6, 7	imbitrdi 252	. . . . . 6 ⊢ (∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓)) → (∀𝑥(𝑥 = 𝐴 → 𝜑) → (∃𝑥 𝑥 = 𝐴 → 𝜓)))
9	3, 8	syl7 74	. . . . 5 ⊢ (∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓)) → (∀𝑥(𝑥 = 𝐴 → 𝜑) → (𝐴 ∈ 𝐵 → 𝜓)))
10	9	com3r 87	. . . 4 ⊢ (𝐴 ∈ 𝐵 → (∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓)) → (∀𝑥(𝑥 = 𝐴 → 𝜑) → 𝜓)))
11	10	imp 407	. . 3 ⊢ ((𝐴 ∈ 𝐵 ∧ ∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓))) → (∀𝑥(𝑥 = 𝐴 → 𝜑) → 𝜓))
12		biimpr 221	. . . . . . . 8 ⊢ ((𝜑 ↔ 𝜓) → (𝜓 → 𝜑))
13	12	imim2i 16	. . . . . . 7 ⊢ ((𝑥 = 𝐴 → (𝜑 ↔ 𝜓)) → (𝑥 = 𝐴 → (𝜓 → 𝜑)))
14	13	com23 86	. . . . . 6 ⊢ ((𝑥 = 𝐴 → (𝜑 ↔ 𝜓)) → (𝜓 → (𝑥 = 𝐴 → 𝜑)))
15	14	alimi 1818	. . . . 5 ⊢ (∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓)) → ∀𝑥(𝜓 → (𝑥 = 𝐴 → 𝜑)))
16		19.21v 1946	. . . . 5 ⊢ (∀𝑥(𝜓 → (𝑥 = 𝐴 → 𝜑)) ↔ (𝜓 → ∀𝑥(𝑥 = 𝐴 → 𝜑)))
17	15, 16	sylib 219	. . . 4 ⊢ (∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓)) → (𝜓 → ∀𝑥(𝑥 = 𝐴 → 𝜑)))
18	17	adantl 482	. . 3 ⊢ ((𝐴 ∈ 𝐵 ∧ ∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓))) → (𝜓 → ∀𝑥(𝑥 = 𝐴 → 𝜑)))
19	11, 18	impbid 213	. 2 ⊢ ((𝐴 ∈ 𝐵 ∧ ∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓))) → (∀𝑥(𝑥 = 𝐴 → 𝜑) ↔ 𝜓))
20	2, 19	bitrd 280	1 ⊢ ((𝐴 ∈ 𝐵 ∧ ∀𝑥(𝑥 = 𝐴 → (𝜑 ↔ 𝜓))) → (𝐴 ∈ {𝑥 ∣ 𝜑} ↔ 𝜓))

Syntax hints:   → wi 4   ↔ wb 207   ∧ wa 396  ∀wal 1545   = wceq 1547  ∃wex 1786   ∈ wcel 2119  {cab 2718

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-ext 2712

This theorem depends on definitions:  df-bi 208  df-an 397  df-tru 1550  df-ex 1787  df-sb 2074  df-clab 2719  df-cleq 2732  df-clel 2815

This theorem is referenced by: (None)