Theorem supeq3 7049

Description: Equality theorem for supremum. (Contributed by Scott Fenton, 13-Jun-2018.)

Assertion

Ref	Expression
supeq3	⊢ (𝑅 = 𝑆 → sup(𝐴, 𝐵, 𝑅) = sup(𝐴, 𝐵, 𝑆))

Proof of Theorem supeq3

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

Step	Hyp	Ref	Expression
1		breq 4031	. . . . . . 7 ⊢ (𝑅 = 𝑆 → (𝑥𝑅𝑦 ↔ 𝑥𝑆𝑦))
2	1	notbid 668	. . . . . 6 ⊢ (𝑅 = 𝑆 → (¬ 𝑥𝑅𝑦 ↔ ¬ 𝑥𝑆𝑦))
3	2	ralbidv 2494	. . . . 5 ⊢ (𝑅 = 𝑆 → (∀𝑦 ∈ 𝐴 ¬ 𝑥𝑅𝑦 ↔ ∀𝑦 ∈ 𝐴 ¬ 𝑥𝑆𝑦))
4		breq 4031	. . . . . . 7 ⊢ (𝑅 = 𝑆 → (𝑦𝑅𝑥 ↔ 𝑦𝑆𝑥))
5		breq 4031	. . . . . . . 8 ⊢ (𝑅 = 𝑆 → (𝑦𝑅𝑧 ↔ 𝑦𝑆𝑧))
6	5	rexbidv 2495	. . . . . . 7 ⊢ (𝑅 = 𝑆 → (∃𝑧 ∈ 𝐴 𝑦𝑅𝑧 ↔ ∃𝑧 ∈ 𝐴 𝑦𝑆𝑧))
7	4, 6	imbi12d 234	. . . . . 6 ⊢ (𝑅 = 𝑆 → ((𝑦𝑅𝑥 → ∃𝑧 ∈ 𝐴 𝑦𝑅𝑧) ↔ (𝑦𝑆𝑥 → ∃𝑧 ∈ 𝐴 𝑦𝑆𝑧)))
8	7	ralbidv 2494	. . . . 5 ⊢ (𝑅 = 𝑆 → (∀𝑦 ∈ 𝐵 (𝑦𝑅𝑥 → ∃𝑧 ∈ 𝐴 𝑦𝑅𝑧) ↔ ∀𝑦 ∈ 𝐵 (𝑦𝑆𝑥 → ∃𝑧 ∈ 𝐴 𝑦𝑆𝑧)))
9	3, 8	anbi12d 473	. . . 4 ⊢ (𝑅 = 𝑆 → ((∀𝑦 ∈ 𝐴 ¬ 𝑥𝑅𝑦 ∧ ∀𝑦 ∈ 𝐵 (𝑦𝑅𝑥 → ∃𝑧 ∈ 𝐴 𝑦𝑅𝑧)) ↔ (∀𝑦 ∈ 𝐴 ¬ 𝑥𝑆𝑦 ∧ ∀𝑦 ∈ 𝐵 (𝑦𝑆𝑥 → ∃𝑧 ∈ 𝐴 𝑦𝑆𝑧))))
10	9	rabbidv 2749	. . 3 ⊢ (𝑅 = 𝑆 → {𝑥 ∈ 𝐵 ∣ (∀𝑦 ∈ 𝐴 ¬ 𝑥𝑅𝑦 ∧ ∀𝑦 ∈ 𝐵 (𝑦𝑅𝑥 → ∃𝑧 ∈ 𝐴 𝑦𝑅𝑧))} = {𝑥 ∈ 𝐵 ∣ (∀𝑦 ∈ 𝐴 ¬ 𝑥𝑆𝑦 ∧ ∀𝑦 ∈ 𝐵 (𝑦𝑆𝑥 → ∃𝑧 ∈ 𝐴 𝑦𝑆𝑧))})
11	10	unieqd 3846	. 2 ⊢ (𝑅 = 𝑆 → ∪ {𝑥 ∈ 𝐵 ∣ (∀𝑦 ∈ 𝐴 ¬ 𝑥𝑅𝑦 ∧ ∀𝑦 ∈ 𝐵 (𝑦𝑅𝑥 → ∃𝑧 ∈ 𝐴 𝑦𝑅𝑧))} = ∪ {𝑥 ∈ 𝐵 ∣ (∀𝑦 ∈ 𝐴 ¬ 𝑥𝑆𝑦 ∧ ∀𝑦 ∈ 𝐵 (𝑦𝑆𝑥 → ∃𝑧 ∈ 𝐴 𝑦𝑆𝑧))})
12		df-sup 7043	. 2 ⊢ sup(𝐴, 𝐵, 𝑅) = ∪ {𝑥 ∈ 𝐵 ∣ (∀𝑦 ∈ 𝐴 ¬ 𝑥𝑅𝑦 ∧ ∀𝑦 ∈ 𝐵 (𝑦𝑅𝑥 → ∃𝑧 ∈ 𝐴 𝑦𝑅𝑧))}
13		df-sup 7043	. 2 ⊢ sup(𝐴, 𝐵, 𝑆) = ∪ {𝑥 ∈ 𝐵 ∣ (∀𝑦 ∈ 𝐴 ¬ 𝑥𝑆𝑦 ∧ ∀𝑦 ∈ 𝐵 (𝑦𝑆𝑥 → ∃𝑧 ∈ 𝐴 𝑦𝑆𝑧))}
14	11, 12, 13	3eqtr4g 2251	1 ⊢ (𝑅 = 𝑆 → sup(𝐴, 𝐵, 𝑅) = sup(𝐴, 𝐵, 𝑆))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 104   = wceq 1364  ∀wral 2472  ∃wrex 2473  {crab 2476  ∪ cuni 3835   class class class wbr 4029  supcsup 7041

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 615  ax-in2 616  ax-io 710  ax-5 1458  ax-7 1459  ax-gen 1460  ax-ie1 1504  ax-ie2 1505  ax-8 1515  ax-10 1516  ax-11 1517  ax-i12 1518  ax-bndl 1520  ax-4 1521  ax-17 1537  ax-i9 1541  ax-ial 1545  ax-i5r 1546  ax-ext 2175

This theorem depends on definitions:  df-bi 117  df-tru 1367  df-nf 1472  df-sb 1774  df-clab 2180  df-cleq 2186  df-clel 2189  df-nfc 2325  df-ral 2477  df-rex 2478  df-rab 2481  df-uni 3836  df-br 4030  df-sup 7043

This theorem is referenced by:  infeq3  7074