MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  eqrel Structured version   Visualization version   GIF version

Theorem eqrel 5116
Description: Extensionality principle for relations. Theorem 3.2(ii) of [Monk1] p. 33. (Contributed by NM, 2-Aug-1994.)
Assertion
Ref Expression
eqrel ((Rel 𝐴 ∧ Rel 𝐵) → (𝐴 = 𝐵 ↔ ∀𝑥𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ 𝐵)))
Distinct variable groups:   𝑥,𝑦,𝐴   𝑥,𝐵,𝑦

Proof of Theorem eqrel
StepHypRef Expression
1 ssrel 5115 . . 3 (Rel 𝐴 → (𝐴𝐵 ↔ ∀𝑥𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 → ⟨𝑥, 𝑦⟩ ∈ 𝐵)))
2 ssrel 5115 . . 3 (Rel 𝐵 → (𝐵𝐴 ↔ ∀𝑥𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐵 → ⟨𝑥, 𝑦⟩ ∈ 𝐴)))
31, 2bi2anan9 912 . 2 ((Rel 𝐴 ∧ Rel 𝐵) → ((𝐴𝐵𝐵𝐴) ↔ (∀𝑥𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 → ⟨𝑥, 𝑦⟩ ∈ 𝐵) ∧ ∀𝑥𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐵 → ⟨𝑥, 𝑦⟩ ∈ 𝐴))))
4 eqss 3577 . 2 (𝐴 = 𝐵 ↔ (𝐴𝐵𝐵𝐴))
5 2albiim 1805 . 2 (∀𝑥𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ 𝐵) ↔ (∀𝑥𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 → ⟨𝑥, 𝑦⟩ ∈ 𝐵) ∧ ∀𝑥𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐵 → ⟨𝑥, 𝑦⟩ ∈ 𝐴)))
63, 4, 53bitr4g 301 1 ((Rel 𝐴 ∧ Rel 𝐵) → (𝐴 = 𝐵 ↔ ∀𝑥𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ 𝐵)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 194  wa 382  wal 1472   = wceq 1474  wcel 1975  wss 3534  cop 4125  Rel wrel 5028
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1711  ax-4 1726  ax-5 1825  ax-6 1873  ax-7 1920  ax-9 1984  ax-10 2004  ax-11 2019  ax-12 2031  ax-13 2227  ax-ext 2584  ax-sep 4698  ax-nul 4707  ax-pr 4823
This theorem depends on definitions:  df-bi 195  df-or 383  df-an 384  df-3an 1032  df-tru 1477  df-ex 1695  df-nf 1700  df-sb 1866  df-clab 2591  df-cleq 2597  df-clel 2600  df-nfc 2734  df-v 3169  df-dif 3537  df-un 3539  df-in 3541  df-ss 3548  df-nul 3869  df-if 4031  df-sn 4120  df-pr 4122  df-op 4126  df-opab 4633  df-xp 5029  df-rel 5030
This theorem is referenced by:  eqrelriv  5120  eqrelrdv  5123  eqbrrdv  5124  eqrelrdv2  5126  opabid2  5156  reldm0  5246  iss  5349  asymref  5413  funssres  5825  fsn  6288
  Copyright terms: Public domain W3C validator