funelss - Metamath Proof Explorer

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

Theorem funelss 8086

Description: If the first component of an element of a function is in the domain of a subset of the function, the element is a member of this subset. (Contributed by AV, 27-Oct-2023.)

**Assertion**
Ref	Expression
funelss	⊢ ((Fun 𝐴 ∧ 𝐵 ⊆ 𝐴 ∧ 𝑋 ∈ 𝐴) → ((1^st ‘𝑋) ∈ dom 𝐵 → 𝑋 ∈ 𝐵))

**Proof of Theorem funelss**
Step	Hyp	Ref	Expression
1		funrel 6579	. . . . . 6 ⊢ (Fun 𝐴 → Rel 𝐴)
2		1st2nd 8077	. . . . . 6 ⊢ ((Rel 𝐴 ∧ 𝑋 ∈ 𝐴) → 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩)
3	1, 2	sylan 592	. . . . 5 ⊢ ((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) → 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩)
4		simpl1l 1243	. . . . . . . . . 10 ⊢ ((((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) ∧ 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∧ 𝐵 ⊆ 𝐴) ∧ (1^st ‘𝑋) ∈ dom 𝐵) → Fun 𝐴)
5		simpl3 1212	. . . . . . . . . 10 ⊢ ((((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) ∧ 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∧ 𝐵 ⊆ 𝐴) ∧ (1^st ‘𝑋) ∈ dom 𝐵) → 𝐵 ⊆ 𝐴)
6		simpr 490	. . . . . . . . . 10 ⊢ ((((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) ∧ 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∧ 𝐵 ⊆ 𝐴) ∧ (1^st ‘𝑋) ∈ dom 𝐵) → (1^st ‘𝑋) ∈ dom 𝐵)
7		funssfv 6932	. . . . . . . . . 10 ⊢ ((Fun 𝐴 ∧ 𝐵 ⊆ 𝐴 ∧ (1^st ‘𝑋) ∈ dom 𝐵) → (𝐴‘(1^st ‘𝑋)) = (𝐵‘(1^st ‘𝑋)))
8	4, 5, 6, 7	syl3anc 1399	. . . . . . . . 9 ⊢ ((((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) ∧ 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∧ 𝐵 ⊆ 𝐴) ∧ (1^st ‘𝑋) ∈ dom 𝐵) → (𝐴‘(1^st ‘𝑋)) = (𝐵‘(1^st ‘𝑋)))
9		eleq1 2852	. . . . . . . . . . . . . . 15 ⊢ (𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ → (𝑋 ∈ 𝐴 ↔ ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∈ 𝐴))
10	9	adantl 487	. . . . . . . . . . . . . 14 ⊢ ((Fun 𝐴 ∧ 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩) → (𝑋 ∈ 𝐴 ↔ ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∈ 𝐴))
11		funopfv 6960	. . . . . . . . . . . . . . 15 ⊢ (Fun 𝐴 → (⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∈ 𝐴 → (𝐴‘(1^st ‘𝑋)) = (2^nd ‘𝑋)))
12	11	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((Fun 𝐴 ∧ 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩) → (⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∈ 𝐴 → (𝐴‘(1^st ‘𝑋)) = (2^nd ‘𝑋)))
13	10, 12	sylbid 243	. . . . . . . . . . . . 13 ⊢ ((Fun 𝐴 ∧ 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩) → (𝑋 ∈ 𝐴 → (𝐴‘(1^st ‘𝑋)) = (2^nd ‘𝑋)))
14	13	impancom 457	. . . . . . . . . . . 12 ⊢ ((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) → (𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ → (𝐴‘(1^st ‘𝑋)) = (2^nd ‘𝑋)))
15	14	imp 412	. . . . . . . . . . 11 ⊢ (((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) ∧ 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩) → (𝐴‘(1^st ‘𝑋)) = (2^nd ‘𝑋))
16	15	3adant3 1150	. . . . . . . . . 10 ⊢ (((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) ∧ 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∧ 𝐵 ⊆ 𝐴) → (𝐴‘(1^st ‘𝑋)) = (2^nd ‘𝑋))
17	16	adantr 486	. . . . . . . . 9 ⊢ ((((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) ∧ 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∧ 𝐵 ⊆ 𝐴) ∧ (1^st ‘𝑋) ∈ dom 𝐵) → (𝐴‘(1^st ‘𝑋)) = (2^nd ‘𝑋))
18	8, 17	eqtr3d 2800	. . . . . . . 8 ⊢ ((((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) ∧ 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∧ 𝐵 ⊆ 𝐴) ∧ (1^st ‘𝑋) ∈ dom 𝐵) → (𝐵‘(1^st ‘𝑋)) = (2^nd ‘𝑋))
19		funss 6581	. . . . . . . . . . . . . 14 ⊢ (𝐵 ⊆ 𝐴 → (Fun 𝐴 → Fun 𝐵))
20	19	com12 33	. . . . . . . . . . . . 13 ⊢ (Fun 𝐴 → (𝐵 ⊆ 𝐴 → Fun 𝐵))
21	20	adantr 486	. . . . . . . . . . . 12 ⊢ ((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) → (𝐵 ⊆ 𝐴 → Fun 𝐵))
22	21	imp 412	. . . . . . . . . . 11 ⊢ (((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) ∧ 𝐵 ⊆ 𝐴) → Fun 𝐵)
23	22	funfnd 6594	. . . . . . . . . 10 ⊢ (((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) ∧ 𝐵 ⊆ 𝐴) → 𝐵 Fn dom 𝐵)
24	23	3adant2 1149	. . . . . . . . 9 ⊢ (((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) ∧ 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∧ 𝐵 ⊆ 𝐴) → 𝐵 Fn dom 𝐵)
25		fnopfvb 6962	. . . . . . . . 9 ⊢ ((𝐵 Fn dom 𝐵 ∧ (1^st ‘𝑋) ∈ dom 𝐵) → ((𝐵‘(1^st ‘𝑋)) = (2^nd ‘𝑋) ↔ ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∈ 𝐵))
26	24, 25	sylan 592	. . . . . . . 8 ⊢ ((((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) ∧ 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∧ 𝐵 ⊆ 𝐴) ∧ (1^st ‘𝑋) ∈ dom 𝐵) → ((𝐵‘(1^st ‘𝑋)) = (2^nd ‘𝑋) ↔ ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∈ 𝐵))
27	18, 26	mpbid 235	. . . . . . 7 ⊢ ((((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) ∧ 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∧ 𝐵 ⊆ 𝐴) ∧ (1^st ‘𝑋) ∈ dom 𝐵) → ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∈ 𝐵)
28		eleq1 2852	. . . . . . . . 9 ⊢ (𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ → (𝑋 ∈ 𝐵 ↔ ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∈ 𝐵))
29	28	3ad2ant2 1152	. . . . . . . 8 ⊢ (((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) ∧ 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∧ 𝐵 ⊆ 𝐴) → (𝑋 ∈ 𝐵 ↔ ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∈ 𝐵))
30	29	adantr 486	. . . . . . 7 ⊢ ((((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) ∧ 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∧ 𝐵 ⊆ 𝐴) ∧ (1^st ‘𝑋) ∈ dom 𝐵) → (𝑋 ∈ 𝐵 ↔ ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∈ 𝐵))
31	27, 30	mpbird 260	. . . . . 6 ⊢ ((((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) ∧ 𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ ∧ 𝐵 ⊆ 𝐴) ∧ (1^st ‘𝑋) ∈ dom 𝐵) → 𝑋 ∈ 𝐵)
32	31	3exp1 1371	. . . . 5 ⊢ ((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) → (𝑋 = ⟨(1^st ‘𝑋), (2^nd ‘𝑋)⟩ → (𝐵 ⊆ 𝐴 → ((1^st ‘𝑋) ∈ dom 𝐵 → 𝑋 ∈ 𝐵))))
33	3, 32	mpd 16	. . . 4 ⊢ ((Fun 𝐴 ∧ 𝑋 ∈ 𝐴) → (𝐵 ⊆ 𝐴 → ((1^st ‘𝑋) ∈ dom 𝐵 → 𝑋 ∈ 𝐵)))
34	33	ex 418	. . 3 ⊢ (Fun 𝐴 → (𝑋 ∈ 𝐴 → (𝐵 ⊆ 𝐴 → ((1^st ‘𝑋) ∈ dom 𝐵 → 𝑋 ∈ 𝐵))))
35	34	com23 87	. 2 ⊢ (Fun 𝐴 → (𝐵 ⊆ 𝐴 → (𝑋 ∈ 𝐴 → ((1^st ‘𝑋) ∈ dom 𝐵 → 𝑋 ∈ 𝐵))))
36	35	3imp 1128	1 ⊢ ((Fun 𝐴 ∧ 𝐵 ⊆ 𝐴 ∧ 𝑋 ∈ 𝐴) → ((1^st ‘𝑋) ∈ dom 𝐵 → 𝑋 ∈ 𝐵))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 401 ∧ w3a 1103 = wceq 1570 ∈ wcel 2147 ⊆ wss 3900 ⟨cop 4838 dom cdm 5656 Rel wrel 5661 Fun wfun 6555 Fn wfn 6556 ‘cfv 6561 1^st c1st 8026 2^nd c2nd 8027

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1945 ax-6 2002 ax-7 2043 ax-8 2149 ax-9 2157 ax-10 2180 ax-11 2197 ax-12 2216 ax-ext 2735 ax-sep 5253 ax-nul 5264 ax-pr 5396 ax-un 7778

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2102 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2839 df-nfc 2913 df-ne 2960 df-ral 3081 df-rex 3091 df-rab 3417 df-v 3456 df-ss 3901 df-dif 4050 df-in 4094 df-un 4154 df-nul 4282 df-if 4486 df-sn 4589 df-pr 4591 df-op 4839 df-uni 4871 df-br 5107 df-opab 5172 df-mpt 5191 df-id 5551 df-xp 5662 df-rel 5663 df-cnv 5664 df-co 5665 df-dm 5666 df-rn 5667 df-res 5668 df-iota 6515 df-fun 6563 df-fn 6564 df-fv 6569 df-1st 8028 df-2nd 8029

This theorem is used by: funeldmdif 8087

W3C validator