Theorem ssimaex 6173

Description: The existence of a subimage. (Contributed by NM, 8-Apr-2007.)

Hypothesis

Ref	Expression
ssimaex.1	⊢ 𝐴 ∈ V

Assertion

Ref	Expression
ssimaex	⊢ ((Fun 𝐹 ∧ 𝐵 ⊆ (𝐹 “ 𝐴)) → ∃𝑥(𝑥 ⊆ 𝐴 ∧ 𝐵 = (𝐹 “ 𝑥)))

Distinct variable groups:   𝑥,𝐴   𝑥,𝐵   𝑥,𝐹

Proof of Theorem ssimaex

Dummy variables 𝑤 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		dmres 5339	. . . . 5 ⊢ dom (𝐹 ↾ 𝐴) = (𝐴 ∩ dom 𝐹)
2	1	imaeq2i 5383	. . . 4 ⊢ (𝐹 “ dom (𝐹 ↾ 𝐴)) = (𝐹 “ (𝐴 ∩ dom 𝐹))
3		imadmres 5544	. . . 4 ⊢ (𝐹 “ dom (𝐹 ↾ 𝐴)) = (𝐹 “ 𝐴)
4	2, 3	eqtr3i 2634	. . 3 ⊢ (𝐹 “ (𝐴 ∩ dom 𝐹)) = (𝐹 “ 𝐴)
5	4	sseq2i 3593	. 2 ⊢ (𝐵 ⊆ (𝐹 “ (𝐴 ∩ dom 𝐹)) ↔ 𝐵 ⊆ (𝐹 “ 𝐴))
6		ssrab2 3650	. . . 4 ⊢ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} ⊆ (𝐴 ∩ dom 𝐹)
7		ssel2 3563	. . . . . . . . 9 ⊢ ((𝐵 ⊆ (𝐹 “ (𝐴 ∩ dom 𝐹)) ∧ 𝑧 ∈ 𝐵) → 𝑧 ∈ (𝐹 “ (𝐴 ∩ dom 𝐹)))
8	7	adantll 746	. . . . . . . 8 ⊢ (((Fun 𝐹 ∧ 𝐵 ⊆ (𝐹 “ (𝐴 ∩ dom 𝐹))) ∧ 𝑧 ∈ 𝐵) → 𝑧 ∈ (𝐹 “ (𝐴 ∩ dom 𝐹)))
9		fvelima 6158	. . . . . . . . . . . 12 ⊢ ((Fun 𝐹 ∧ 𝑧 ∈ (𝐹 “ (𝐴 ∩ dom 𝐹))) → ∃𝑤 ∈ (𝐴 ∩ dom 𝐹)(𝐹‘𝑤) = 𝑧)
10	9	ex 449	. . . . . . . . . . 11 ⊢ (Fun 𝐹 → (𝑧 ∈ (𝐹 “ (𝐴 ∩ dom 𝐹)) → ∃𝑤 ∈ (𝐴 ∩ dom 𝐹)(𝐹‘𝑤) = 𝑧))
11	10	adantr 480	. . . . . . . . . 10 ⊢ ((Fun 𝐹 ∧ 𝑧 ∈ 𝐵) → (𝑧 ∈ (𝐹 “ (𝐴 ∩ dom 𝐹)) → ∃𝑤 ∈ (𝐴 ∩ dom 𝐹)(𝐹‘𝑤) = 𝑧))
12		eleq1a 2683	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 ∈ 𝐵 → ((𝐹‘𝑤) = 𝑧 → (𝐹‘𝑤) ∈ 𝐵))
13	12	anim2d 587	. . . . . . . . . . . . . . 15 ⊢ (𝑧 ∈ 𝐵 → ((𝑤 ∈ (𝐴 ∩ dom 𝐹) ∧ (𝐹‘𝑤) = 𝑧) → (𝑤 ∈ (𝐴 ∩ dom 𝐹) ∧ (𝐹‘𝑤) ∈ 𝐵)))
14		fveq2 6103	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 = 𝑤 → (𝐹‘𝑦) = (𝐹‘𝑤))
15	14	eleq1d 2672	. . . . . . . . . . . . . . . 16 ⊢ (𝑦 = 𝑤 → ((𝐹‘𝑦) ∈ 𝐵 ↔ (𝐹‘𝑤) ∈ 𝐵))
16	15	elrab 3331	. . . . . . . . . . . . . . 15 ⊢ (𝑤 ∈ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} ↔ (𝑤 ∈ (𝐴 ∩ dom 𝐹) ∧ (𝐹‘𝑤) ∈ 𝐵))
17	13, 16	syl6ibr 241	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ 𝐵 → ((𝑤 ∈ (𝐴 ∩ dom 𝐹) ∧ (𝐹‘𝑤) = 𝑧) → 𝑤 ∈ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵}))
18		simpr 476	. . . . . . . . . . . . . . 15 ⊢ ((𝑤 ∈ (𝐴 ∩ dom 𝐹) ∧ (𝐹‘𝑤) = 𝑧) → (𝐹‘𝑤) = 𝑧)
19	18	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝑧 ∈ 𝐵 → ((𝑤 ∈ (𝐴 ∩ dom 𝐹) ∧ (𝐹‘𝑤) = 𝑧) → (𝐹‘𝑤) = 𝑧))
20	17, 19	jcad 554	. . . . . . . . . . . . 13 ⊢ (𝑧 ∈ 𝐵 → ((𝑤 ∈ (𝐴 ∩ dom 𝐹) ∧ (𝐹‘𝑤) = 𝑧) → (𝑤 ∈ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} ∧ (𝐹‘𝑤) = 𝑧)))
21	20	reximdv2 2997	. . . . . . . . . . . 12 ⊢ (𝑧 ∈ 𝐵 → (∃𝑤 ∈ (𝐴 ∩ dom 𝐹)(𝐹‘𝑤) = 𝑧 → ∃𝑤 ∈ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} (𝐹‘𝑤) = 𝑧))
22	21	adantl 481	. . . . . . . . . . 11 ⊢ ((Fun 𝐹 ∧ 𝑧 ∈ 𝐵) → (∃𝑤 ∈ (𝐴 ∩ dom 𝐹)(𝐹‘𝑤) = 𝑧 → ∃𝑤 ∈ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} (𝐹‘𝑤) = 𝑧))
23		funfn 5833	. . . . . . . . . . . . 13 ⊢ (Fun 𝐹 ↔ 𝐹 Fn dom 𝐹)
24		inss2 3796	. . . . . . . . . . . . . . 15 ⊢ (𝐴 ∩ dom 𝐹) ⊆ dom 𝐹
25	6, 24	sstri 3577	. . . . . . . . . . . . . 14 ⊢ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} ⊆ dom 𝐹
26		fvelimab 6163	. . . . . . . . . . . . . 14 ⊢ ((𝐹 Fn dom 𝐹 ∧ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} ⊆ dom 𝐹) → (𝑧 ∈ (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵}) ↔ ∃𝑤 ∈ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} (𝐹‘𝑤) = 𝑧))
27	25, 26	mpan2 703	. . . . . . . . . . . . 13 ⊢ (𝐹 Fn dom 𝐹 → (𝑧 ∈ (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵}) ↔ ∃𝑤 ∈ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} (𝐹‘𝑤) = 𝑧))
28	23, 27	sylbi 206	. . . . . . . . . . . 12 ⊢ (Fun 𝐹 → (𝑧 ∈ (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵}) ↔ ∃𝑤 ∈ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} (𝐹‘𝑤) = 𝑧))
29	28	adantr 480	. . . . . . . . . . 11 ⊢ ((Fun 𝐹 ∧ 𝑧 ∈ 𝐵) → (𝑧 ∈ (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵}) ↔ ∃𝑤 ∈ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} (𝐹‘𝑤) = 𝑧))
30	22, 29	sylibrd 248	. . . . . . . . . 10 ⊢ ((Fun 𝐹 ∧ 𝑧 ∈ 𝐵) → (∃𝑤 ∈ (𝐴 ∩ dom 𝐹)(𝐹‘𝑤) = 𝑧 → 𝑧 ∈ (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵})))
31	11, 30	syld 46	. . . . . . . . 9 ⊢ ((Fun 𝐹 ∧ 𝑧 ∈ 𝐵) → (𝑧 ∈ (𝐹 “ (𝐴 ∩ dom 𝐹)) → 𝑧 ∈ (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵})))
32	31	adantlr 747	. . . . . . . 8 ⊢ (((Fun 𝐹 ∧ 𝐵 ⊆ (𝐹 “ (𝐴 ∩ dom 𝐹))) ∧ 𝑧 ∈ 𝐵) → (𝑧 ∈ (𝐹 “ (𝐴 ∩ dom 𝐹)) → 𝑧 ∈ (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵})))
33	8, 32	mpd 15	. . . . . . 7 ⊢ (((Fun 𝐹 ∧ 𝐵 ⊆ (𝐹 “ (𝐴 ∩ dom 𝐹))) ∧ 𝑧 ∈ 𝐵) → 𝑧 ∈ (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵}))
34	33	ex 449	. . . . . 6 ⊢ ((Fun 𝐹 ∧ 𝐵 ⊆ (𝐹 “ (𝐴 ∩ dom 𝐹))) → (𝑧 ∈ 𝐵 → 𝑧 ∈ (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵})))
35		fvelima 6158	. . . . . . . . 9 ⊢ ((Fun 𝐹 ∧ 𝑧 ∈ (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵})) → ∃𝑤 ∈ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} (𝐹‘𝑤) = 𝑧)
36	35	ex 449	. . . . . . . 8 ⊢ (Fun 𝐹 → (𝑧 ∈ (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵}) → ∃𝑤 ∈ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} (𝐹‘𝑤) = 𝑧))
37		eleq1 2676	. . . . . . . . . . . 12 ⊢ ((𝐹‘𝑤) = 𝑧 → ((𝐹‘𝑤) ∈ 𝐵 ↔ 𝑧 ∈ 𝐵))
38	37	biimpcd 238	. . . . . . . . . . 11 ⊢ ((𝐹‘𝑤) ∈ 𝐵 → ((𝐹‘𝑤) = 𝑧 → 𝑧 ∈ 𝐵))
39	38	adantl 481	. . . . . . . . . 10 ⊢ ((𝑤 ∈ (𝐴 ∩ dom 𝐹) ∧ (𝐹‘𝑤) ∈ 𝐵) → ((𝐹‘𝑤) = 𝑧 → 𝑧 ∈ 𝐵))
40	16, 39	sylbi 206	. . . . . . . . 9 ⊢ (𝑤 ∈ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} → ((𝐹‘𝑤) = 𝑧 → 𝑧 ∈ 𝐵))
41	40	rexlimiv 3009	. . . . . . . 8 ⊢ (∃𝑤 ∈ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} (𝐹‘𝑤) = 𝑧 → 𝑧 ∈ 𝐵)
42	36, 41	syl6 34	. . . . . . 7 ⊢ (Fun 𝐹 → (𝑧 ∈ (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵}) → 𝑧 ∈ 𝐵))
43	42	adantr 480	. . . . . 6 ⊢ ((Fun 𝐹 ∧ 𝐵 ⊆ (𝐹 “ (𝐴 ∩ dom 𝐹))) → (𝑧 ∈ (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵}) → 𝑧 ∈ 𝐵))
44	34, 43	impbid 201	. . . . 5 ⊢ ((Fun 𝐹 ∧ 𝐵 ⊆ (𝐹 “ (𝐴 ∩ dom 𝐹))) → (𝑧 ∈ 𝐵 ↔ 𝑧 ∈ (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵})))
45	44	eqrdv 2608	. . . 4 ⊢ ((Fun 𝐹 ∧ 𝐵 ⊆ (𝐹 “ (𝐴 ∩ dom 𝐹))) → 𝐵 = (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵}))
46		ssimaex.1	. . . . . . 7 ⊢ 𝐴 ∈ V
47	46	inex1 4727	. . . . . 6 ⊢ (𝐴 ∩ dom 𝐹) ∈ V
48	47	rabex 4740	. . . . 5 ⊢ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} ∈ V
49		sseq1 3589	. . . . . 6 ⊢ (𝑥 = {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} → (𝑥 ⊆ (𝐴 ∩ dom 𝐹) ↔ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} ⊆ (𝐴 ∩ dom 𝐹)))
50		imaeq2 5381	. . . . . . 7 ⊢ (𝑥 = {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} → (𝐹 “ 𝑥) = (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵}))
51	50	eqeq2d 2620	. . . . . 6 ⊢ (𝑥 = {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} → (𝐵 = (𝐹 “ 𝑥) ↔ 𝐵 = (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵})))
52	49, 51	anbi12d 743	. . . . 5 ⊢ (𝑥 = {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} → ((𝑥 ⊆ (𝐴 ∩ dom 𝐹) ∧ 𝐵 = (𝐹 “ 𝑥)) ↔ ({𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} ⊆ (𝐴 ∩ dom 𝐹) ∧ 𝐵 = (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵}))))
53	48, 52	spcev 3273	. . . 4 ⊢ (({𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵} ⊆ (𝐴 ∩ dom 𝐹) ∧ 𝐵 = (𝐹 “ {𝑦 ∈ (𝐴 ∩ dom 𝐹) ∣ (𝐹‘𝑦) ∈ 𝐵})) → ∃𝑥(𝑥 ⊆ (𝐴 ∩ dom 𝐹) ∧ 𝐵 = (𝐹 “ 𝑥)))
54	6, 45, 53	sylancr 694	. . 3 ⊢ ((Fun 𝐹 ∧ 𝐵 ⊆ (𝐹 “ (𝐴 ∩ dom 𝐹))) → ∃𝑥(𝑥 ⊆ (𝐴 ∩ dom 𝐹) ∧ 𝐵 = (𝐹 “ 𝑥)))
55		inss1 3795	. . . . . 6 ⊢ (𝐴 ∩ dom 𝐹) ⊆ 𝐴
56		sstr 3576	. . . . . 6 ⊢ ((𝑥 ⊆ (𝐴 ∩ dom 𝐹) ∧ (𝐴 ∩ dom 𝐹) ⊆ 𝐴) → 𝑥 ⊆ 𝐴)
57	55, 56	mpan2 703	. . . . 5 ⊢ (𝑥 ⊆ (𝐴 ∩ dom 𝐹) → 𝑥 ⊆ 𝐴)
58	57	anim1i 590	. . . 4 ⊢ ((𝑥 ⊆ (𝐴 ∩ dom 𝐹) ∧ 𝐵 = (𝐹 “ 𝑥)) → (𝑥 ⊆ 𝐴 ∧ 𝐵 = (𝐹 “ 𝑥)))
59	58	eximi 1752	. . 3 ⊢ (∃𝑥(𝑥 ⊆ (𝐴 ∩ dom 𝐹) ∧ 𝐵 = (𝐹 “ 𝑥)) → ∃𝑥(𝑥 ⊆ 𝐴 ∧ 𝐵 = (𝐹 “ 𝑥)))
60	54, 59	syl 17	. 2 ⊢ ((Fun 𝐹 ∧ 𝐵 ⊆ (𝐹 “ (𝐴 ∩ dom 𝐹))) → ∃𝑥(𝑥 ⊆ 𝐴 ∧ 𝐵 = (𝐹 “ 𝑥)))
61	5, 60	sylan2br 492	1 ⊢ ((Fun 𝐹 ∧ 𝐵 ⊆ (𝐹 “ 𝐴)) → ∃𝑥(𝑥 ⊆ 𝐴 ∧ 𝐵 = (𝐹 “ 𝑥)))

Syntax hints:   → wi 4   ↔ wb 195   ∧ wa 383   = wceq 1475  ∃wex 1695   ∈ wcel 1977  ∃wrex 2897  {crab 2900  Vcvv 3173   ∩ cin 3539   ⊆ wss 3540  dom cdm 5038   ↾ cres 5040   “ cima 5041  Fun wfun 5798   Fn wfn 5799  ‘cfv 5804

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-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ral 2901  df-rex 2902  df-rab 2905  df-v 3175  df-sbc 3403  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-uni 4373  df-br 4584  df-opab 4644  df-id 4953  df-xp 5044  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-iota 5768  df-fun 5806  df-fn 5807  df-fv 5812

This theorem is referenced by:  ssimaexg  6174