Theorem uniprgOLD 4825

Description: Obsolete version of unipr 4823 as of 1-Sep-2024. (Contributed by NM, 25-Aug-2006.) (Proof modification is discouraged.) (New usage is discouraged.)

Assertion

Ref	Expression
uniprgOLD	⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊) → ∪ {𝐴, 𝐵} = (𝐴 ∪ 𝐵))

Proof of Theorem uniprgOLD

Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		preq1 4635	. . . 4 ⊢ (𝑥 = 𝐴 → {𝑥, 𝑦} = {𝐴, 𝑦})
2	1	unieqd 4819	. . 3 ⊢ (𝑥 = 𝐴 → ∪ {𝑥, 𝑦} = ∪ {𝐴, 𝑦})
3		uneq1 4056	. . 3 ⊢ (𝑥 = 𝐴 → (𝑥 ∪ 𝑦) = (𝐴 ∪ 𝑦))
4	2, 3	eqeq12d 2752	. 2 ⊢ (𝑥 = 𝐴 → (∪ {𝑥, 𝑦} = (𝑥 ∪ 𝑦) ↔ ∪ {𝐴, 𝑦} = (𝐴 ∪ 𝑦)))
5		preq2 4636	. . . 4 ⊢ (𝑦 = 𝐵 → {𝐴, 𝑦} = {𝐴, 𝐵})
6	5	unieqd 4819	. . 3 ⊢ (𝑦 = 𝐵 → ∪ {𝐴, 𝑦} = ∪ {𝐴, 𝐵})
7		uneq2 4057	. . 3 ⊢ (𝑦 = 𝐵 → (𝐴 ∪ 𝑦) = (𝐴 ∪ 𝐵))
8	6, 7	eqeq12d 2752	. 2 ⊢ (𝑦 = 𝐵 → (∪ {𝐴, 𝑦} = (𝐴 ∪ 𝑦) ↔ ∪ {𝐴, 𝐵} = (𝐴 ∪ 𝐵)))
9		vex 3402	. . 3 ⊢ 𝑥 ∈ V
10		vex 3402	. . 3 ⊢ 𝑦 ∈ V
11	9, 10	unipr 4823	. 2 ⊢ ∪ {𝑥, 𝑦} = (𝑥 ∪ 𝑦)
12	4, 8, 11	vtocl2g 3476	1 ⊢ ((𝐴 ∈ 𝑉 ∧ 𝐵 ∈ 𝑊) → ∪ {𝐴, 𝐵} = (𝐴 ∪ 𝐵))

Syntax hints:   → wi 4   ∧ wa 399   = wceq 1543   ∈ wcel 2112   ∪ cun 3851  {cpr 4529  ∪ cuni 4805

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2018  ax-8 2114  ax-9 2122  ax-ext 2708

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-tru 1546  df-ex 1788  df-sb 2073  df-clab 2715  df-cleq 2728  df-clel 2809  df-v 3400  df-un 3858  df-in 3860  df-ss 3870  df-sn 4528  df-pr 4530  df-uni 4806

This theorem is referenced by: (None)