Theorem reldm0 5874

Description: A relation is empty iff its domain is empty. (Contributed by NM, 15-Sep-2004.)

Assertion

Ref	Expression
reldm0	⊢ (Rel 𝐴 → (𝐴 = ∅ ↔ dom 𝐴 = ∅))

Proof of Theorem reldm0

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

Step	Hyp	Ref	Expression
1		rel0 5746	. . 3 ⊢ Rel ∅
2		eqrel 5731	. . 3 ⊢ ((Rel 𝐴 ∧ Rel ∅) → (𝐴 = ∅ ↔ ∀𝑥∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ ∅)))
3	1, 2	mpan2 691	. 2 ⊢ (Rel 𝐴 → (𝐴 = ∅ ↔ ∀𝑥∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ ∅)))
4		eq0 4303	. . 3 ⊢ (dom 𝐴 = ∅ ↔ ∀𝑥 ¬ 𝑥 ∈ dom 𝐴)
5		alnex 1781	. . . . . 6 ⊢ (∀𝑦 ¬ ⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ¬ ∃𝑦⟨𝑥, 𝑦⟩ ∈ 𝐴)
6		vex 3442	. . . . . . 7 ⊢ 𝑥 ∈ V
7	6	eldm2 5848	. . . . . 6 ⊢ (𝑥 ∈ dom 𝐴 ↔ ∃𝑦⟨𝑥, 𝑦⟩ ∈ 𝐴)
8	5, 7	xchbinxr 335	. . . . 5 ⊢ (∀𝑦 ¬ ⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ¬ 𝑥 ∈ dom 𝐴)
9		noel 4291	. . . . . . 7 ⊢ ¬ ⟨𝑥, 𝑦⟩ ∈ ∅
10	9	nbn 372	. . . . . 6 ⊢ (¬ ⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ (⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ ∅))
11	10	albii 1819	. . . . 5 ⊢ (∀𝑦 ¬ ⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ ∅))
12	8, 11	bitr3i 277	. . . 4 ⊢ (¬ 𝑥 ∈ dom 𝐴 ↔ ∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ ∅))
13	12	albii 1819	. . 3 ⊢ (∀𝑥 ¬ 𝑥 ∈ dom 𝐴 ↔ ∀𝑥∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ ∅))
14	4, 13	bitr2i 276	. 2 ⊢ (∀𝑥∀𝑦(⟨𝑥, 𝑦⟩ ∈ 𝐴 ↔ ⟨𝑥, 𝑦⟩ ∈ ∅) ↔ dom 𝐴 = ∅)
15	3, 14	bitrdi 287	1 ⊢ (Rel 𝐴 → (𝐴 = ∅ ↔ dom 𝐴 = ∅))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206  ∀wal 1538   = wceq 1540  ∃wex 1779   ∈ wcel 2109  ∅c0 4286  ⟨cop 4585  dom cdm 5623  Rel wrel 5628

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-ext 2701

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-sb 2066  df-clab 2708  df-cleq 2721  df-clel 2803  df-rab 3397  df-v 3440  df-dif 3908  df-un 3910  df-ss 3922  df-nul 4287  df-if 4479  df-sn 4580  df-pr 4582  df-op 4586  df-br 5096  df-opab 5158  df-xp 5629  df-rel 5630  df-dm 5633

This theorem is referenced by:  relrn0  5918  relresdm1  5988  coeq0  6208  snres0  6250  fnresdisj  6606  fn0  6617  fresaunres2  6700  funopsn  7086  fsnunfv  7127  frxp  8066  frxp2  8084  frxp3  8091  domss2  9060  swrd0  14583  setsres  17107  pmtrsn  19416  gsumval3  19804  00lsp  20902  metn0  24264  noetasuplem2  27662  noetainflem2  27666  wlkn0  29584  eulerpath  30203  dfrdg2  35768  mbfresfi  37645  mapfzcons1  42690  diophrw  42732  eldioph2lem1  42733  eldioph2lem2  42734  tfsconcatb0  43317  tfsconcat0i  43318  tfsconcat0b  43319  sge0cl  46363  resinsn  48857  resinsnALT  48858