Theorem releldm2 8036

Description: Two ways of expressing membership in the domain of a relation. (Contributed by NM, 22-Sep-2013.)

Assertion

Ref	Expression
releldm2	⊢ (Rel 𝐴 → (𝐵 ∈ dom 𝐴 ↔ ∃𝑥 ∈ 𝐴 (1st ‘𝑥) = 𝐵))

Distinct variable groups:   𝑥,𝐴   𝑥,𝐵

Proof of Theorem releldm2

Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		elex 3484	. . 3 ⊢ (𝐵 ∈ dom 𝐴 → 𝐵 ∈ V)
2	1	anim2i 628	. 2 ⊢ ((Rel 𝐴 ∧ 𝐵 ∈ dom 𝐴) → (Rel 𝐴 ∧ 𝐵 ∈ V))
3		id 23	. . . . 5 ⊢ ((1st ‘𝑥) = 𝐵 → (1st ‘𝑥) = 𝐵)
4		fvex 6892	. . . . 5 ⊢ (1st ‘𝑥) ∈ V
5	3, 4	eqeltrrdi 2878	. . . 4 ⊢ ((1st ‘𝑥) = 𝐵 → 𝐵 ∈ V)
6	5	rexlimivw 3168	. . 3 ⊢ (∃𝑥 ∈ 𝐴 (1st ‘𝑥) = 𝐵 → 𝐵 ∈ V)
7	6	anim2i 628	. 2 ⊢ ((Rel 𝐴 ∧ ∃𝑥 ∈ 𝐴 (1st ‘𝑥) = 𝐵) → (Rel 𝐴 ∧ 𝐵 ∈ V))
8		eldm2g 5887	. . . 4 ⊢ (𝐵 ∈ V → (𝐵 ∈ dom 𝐴 ↔ ∃𝑦⟨𝐵, 𝑦⟩ ∈ 𝐴))
9	8	adantl 486	. . 3 ⊢ ((Rel 𝐴 ∧ 𝐵 ∈ V) → (𝐵 ∈ dom 𝐴 ↔ ∃𝑦⟨𝐵, 𝑦⟩ ∈ 𝐴))
10		df-rel 5666	. . . . . . . . 9 ⊢ (Rel 𝐴 ↔ 𝐴 ⊆ (V × V))
11		ssel 3939	. . . . . . . . 9 ⊢ (𝐴 ⊆ (V × V) → (𝑥 ∈ 𝐴 → 𝑥 ∈ (V × V)))
12	10, 11	sylbi 220	. . . . . . . 8 ⊢ (Rel 𝐴 → (𝑥 ∈ 𝐴 → 𝑥 ∈ (V × V)))
13	12	imp 411	. . . . . . 7 ⊢ ((Rel 𝐴 ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ (V × V))
14		op1steq 8026	. . . . . . 7 ⊢ (𝑥 ∈ (V × V) → ((1st ‘𝑥) = 𝐵 ↔ ∃𝑦 𝑥 = ⟨𝐵, 𝑦⟩))
15	13, 14	syl 18	. . . . . 6 ⊢ ((Rel 𝐴 ∧ 𝑥 ∈ 𝐴) → ((1st ‘𝑥) = 𝐵 ↔ ∃𝑦 𝑥 = ⟨𝐵, 𝑦⟩))
16	15	rexbidva 3193	. . . . 5 ⊢ (Rel 𝐴 → (∃𝑥 ∈ 𝐴 (1st ‘𝑥) = 𝐵 ↔ ∃𝑥 ∈ 𝐴 ∃𝑦 𝑥 = ⟨𝐵, 𝑦⟩))
17	16	adantr 485	. . . 4 ⊢ ((Rel 𝐴 ∧ 𝐵 ∈ V) → (∃𝑥 ∈ 𝐴 (1st ‘𝑥) = 𝐵 ↔ ∃𝑥 ∈ 𝐴 ∃𝑦 𝑥 = ⟨𝐵, 𝑦⟩))
18		rexcom4 3298	. . . . 5 ⊢ (∃𝑥 ∈ 𝐴 ∃𝑦 𝑥 = ⟨𝐵, 𝑦⟩ ↔ ∃𝑦∃𝑥 ∈ 𝐴 𝑥 = ⟨𝐵, 𝑦⟩)
19		risset 3246	. . . . . 6 ⊢ (⟨𝐵, 𝑦⟩ ∈ 𝐴 ↔ ∃𝑥 ∈ 𝐴 𝑥 = ⟨𝐵, 𝑦⟩)
20	19	exbii 1875	. . . . 5 ⊢ (∃𝑦⟨𝐵, 𝑦⟩ ∈ 𝐴 ↔ ∃𝑦∃𝑥 ∈ 𝐴 𝑥 = ⟨𝐵, 𝑦⟩)
21	18, 20	bitr4i 281	. . . 4 ⊢ (∃𝑥 ∈ 𝐴 ∃𝑦 𝑥 = ⟨𝐵, 𝑦⟩ ↔ ∃𝑦⟨𝐵, 𝑦⟩ ∈ 𝐴)
22	17, 21	bitrdi 290	. . 3 ⊢ ((Rel 𝐴 ∧ 𝐵 ∈ V) → (∃𝑥 ∈ 𝐴 (1st ‘𝑥) = 𝐵 ↔ ∃𝑦⟨𝐵, 𝑦⟩ ∈ 𝐴))
23	9, 22	bitr4d 285	. 2 ⊢ ((Rel 𝐴 ∧ 𝐵 ∈ V) → (𝐵 ∈ dom 𝐴 ↔ ∃𝑥 ∈ 𝐴 (1st ‘𝑥) = 𝐵))
24	2, 7, 23	pm5.21nd 813	1 ⊢ (Rel 𝐴 → (𝐵 ∈ dom 𝐴 ↔ ∃𝑥 ∈ 𝐴 (1st ‘𝑥) = 𝐵))

Syntax hints:   → wi 4   ↔ wb 209   ∧ wa 400   = wceq 1567  ∃wex 1806   ∈ wcel 2149  ∃wrex 3095  Vcvv 3463   ⊆ wss 3913  ⟨cop 4597   × cxp 5657  dom cdm 5659  Rel wrel 5664  ‘cfv 6533  1^st c1st 7980

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-sep 5258  ax-nul 5268  ax-pr 5402  ax-un 7730

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-ral 3086  df-rex 3096  df-rab 3424  df-v 3465  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-nul 4295  df-if 4490  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4874  df-br 5111  df-opab 5175  df-mpt 5194  df-id 5554  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-iota 6489  df-fun 6535  df-fv 6541  df-1st 7982  df-2nd 7983

This theorem is referenced by:  reldm  8037  releldmdifi  8038  satffunlem1lem2  35790  satffunlem2lem2  35793