Theorem eqrelrd2 28806

Description: A version of eqrelrdv2 5142 with explicit non-free declarations. (Contributed by Thierry Arnoux, 28-Aug-2017.)

Hypotheses

Ref	Expression
eqrelrd2.1	⊢ Ⅎ𝑥𝜑
eqrelrd2.2	⊢ Ⅎ𝑦𝜑
eqrelrd2.3	⊢ Ⅎ𝑥𝐴
eqrelrd2.4	⊢ Ⅎ𝑦𝐴
eqrelrd2.5	⊢ Ⅎ𝑥𝐵
eqrelrd2.6	⊢ Ⅎ𝑦𝐵
eqrelrd2.7	⊢ (𝜑 → (⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ 𝐵))

Assertion

Ref	Expression
eqrelrd2	⊢ (((Rel 𝐴 ∧ Rel 𝐵) ∧ 𝜑) → 𝐴 = 𝐵)

Distinct variable group:   𝑥,𝑦

Allowed substitution hints:   𝜑(𝑥,𝑦)   𝐴(𝑥,𝑦)   𝐵(𝑥,𝑦)

Proof of Theorem eqrelrd2

Step	Hyp	Ref	Expression
1		eqrelrd2.1	. . . 4 ⊢ Ⅎ𝑥𝜑
2		eqrelrd2.2	. . . . 5 ⊢ Ⅎ𝑦𝜑
3		eqrelrd2.7	. . . . 5 ⊢ (𝜑 → (⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ 𝐵))
4	2, 3	alrimi 2069	. . . 4 ⊢ (𝜑 → ∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ 𝐵))
5	1, 4	alrimi 2069	. . 3 ⊢ (𝜑 → ∀𝑥∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ 𝐵))
6	5	adantl 481	. 2 ⊢ (((Rel 𝐴 ∧ Rel 𝐵) ∧ 𝜑) → ∀𝑥∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ 𝐵))
7		eqrelrd2.3	. . . . . 6 ⊢ Ⅎ𝑥𝐴
8		eqrelrd2.4	. . . . . 6 ⊢ Ⅎ𝑦𝐴
9		eqrelrd2.5	. . . . . 6 ⊢ Ⅎ𝑥𝐵
10		eqrelrd2.6	. . . . . 6 ⊢ Ⅎ𝑦𝐵
11	1, 2, 7, 8, 9, 10	ssrelf 28805	. . . . 5 ⊢ (Rel 𝐴 → (𝐴 ⊆ 𝐵 ↔ ∀𝑥∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 → ⟨𝑥, 𝑦⟩ ∈ 𝐵)))
12	1, 2, 9, 10, 7, 8	ssrelf 28805	. . . . 5 ⊢ (Rel 𝐵 → (𝐵 ⊆ 𝐴 ↔ ∀𝑥∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐵 → ⟨𝑥, 𝑦⟩ ∈ 𝐴)))
13	11, 12	bi2anan9 913	. . . 4 ⊢ ((Rel 𝐴 ∧ Rel 𝐵) → ((𝐴 ⊆ 𝐵 ∧ 𝐵 ⊆ 𝐴) ↔ (∀𝑥∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 → ⟨𝑥, 𝑦⟩ ∈ 𝐵) ∧ ∀𝑥∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐵 → ⟨𝑥, 𝑦⟩ ∈ 𝐴))))
14		eqss 3583	. . . 4 ⊢ (𝐴 = 𝐵 ↔ (𝐴 ⊆ 𝐵 ∧ 𝐵 ⊆ 𝐴))
15		2albiim 1807	. . . 4 ⊢ (∀𝑥∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ 𝐵) ↔ (∀𝑥∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 → ⟨𝑥, 𝑦⟩ ∈ 𝐵) ∧ ∀𝑥∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐵 → ⟨𝑥, 𝑦⟩ ∈ 𝐴)))
16	13, 14, 15	3bitr4g 302	. . 3 ⊢ ((Rel 𝐴 ∧ Rel 𝐵) → (𝐴 = 𝐵 ↔ ∀𝑥∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ 𝐵)))
17	16	adantr 480	. 2 ⊢ (((Rel 𝐴 ∧ Rel 𝐵) ∧ 𝜑) → (𝐴 = 𝐵 ↔ ∀𝑥∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ 𝐵)))
18	6, 17	mpbird 246	1 ⊢ (((Rel 𝐴 ∧ Rel 𝐵) ∧ 𝜑) → 𝐴 = 𝐵)

Syntax hints:   → wi 4   ↔ wb 195   ∧ wa 383  ∀wal 1473   = wceq 1475  Ⅎwnf 1699   ∈ wcel 1977  Ⅎwnfc 2738   ⊆ wss 3540  ⟨cop 4131  Rel wrel 5043

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-sep 4709  ax-nul 4717  ax-pr 4833

This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ral 2901  df-v 3175  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-nul 3875  df-if 4037  df-sn 4126  df-pr 4128  df-op 4132  df-opab 4644  df-xp 5044  df-rel 5045

This theorem is referenced by:  fpwrelmap  28896