Metamath Proof Explorer


Theorem ssimaex

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

Ref Expression
Hypothesis ssimaex.1 ⊢ A ∈ V
Assertion ssimaex ⊢ Fun ⁡ F ∧ B ⊆ F A → ∃ x x ⊆ A ∧ B = F x

Proof

Step Hyp Ref Expression
1 ssimaex.1 ⊢ A ∈ V
2 dmres ⊢ dom ⁡ F ↾ A = A ∩ dom ⁡ F
3 2 imaeq2i ⊢ F dom ⁡ F ↾ A = F A ∩ dom ⁡ F
4 imadmres ⊢ F dom ⁡ F ↾ A = F A
5 3 4 eqtr3i ⊢ F A ∩ dom ⁡ F = F A
6 5 sseq2i ⊢ B ⊆ F A ∩ dom ⁡ F ↔ B ⊆ F A
7 ssrab2 ⊢ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B ⊆ A ∩ dom ⁡ F
8 ssel2 ⊢ B ⊆ F A ∩ dom ⁡ F ∧ z ∈ B → z ∈ F A ∩ dom ⁡ F
9 8 adantll ⊢ Fun ⁡ F ∧ B ⊆ F A ∩ dom ⁡ F ∧ z ∈ B → z ∈ F A ∩ dom ⁡ F
10 fvelima ⊢ Fun ⁡ F ∧ z ∈ F A ∩ dom ⁡ F → ∃ w ∈ A ∩ dom ⁡ F F ⁡ w = z
11 10 ex ⊢ Fun ⁡ F → z ∈ F A ∩ dom ⁡ F → ∃ w ∈ A ∩ dom ⁡ F F ⁡ w = z
12 11 adantr ⊢ Fun ⁡ F ∧ z ∈ B → z ∈ F A ∩ dom ⁡ F → ∃ w ∈ A ∩ dom ⁡ F F ⁡ w = z
13 eleq1a ⊢ z ∈ B → F ⁡ w = z → F ⁡ w ∈ B
14 13 anim2d ⊢ z ∈ B → w ∈ A ∩ dom ⁡ F ∧ F ⁡ w = z → w ∈ A ∩ dom ⁡ F ∧ F ⁡ w ∈ B
15 fveq2 ⊢ y = w → F ⁡ y = F ⁡ w
16 15 eleq1d ⊢ y = w → F ⁡ y ∈ B ↔ F ⁡ w ∈ B
17 16 elrab ⊢ w ∈ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B ↔ w ∈ A ∩ dom ⁡ F ∧ F ⁡ w ∈ B
18 14 17 imbitrrdi ⊢ z ∈ B → w ∈ A ∩ dom ⁡ F ∧ F ⁡ w = z → w ∈ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B
19 simpr ⊢ w ∈ A ∩ dom ⁡ F ∧ F ⁡ w = z → F ⁡ w = z
20 18 19 jca2 ⊢ z ∈ B → w ∈ A ∩ dom ⁡ F ∧ F ⁡ w = z → w ∈ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B ∧ F ⁡ w = z
21 20 reximdv2 ⊢ z ∈ B → ∃ w ∈ A ∩ dom ⁡ F F ⁡ w = z → ∃ w ∈ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B F ⁡ w = z
22 21 adantl ⊢ Fun ⁡ F ∧ z ∈ B → ∃ w ∈ A ∩ dom ⁡ F F ⁡ w = z → ∃ w ∈ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B F ⁡ w = z
23 funfn ⊢ Fun ⁡ F ↔ F Fn dom ⁡ F
24 inss2 ⊢ A ∩ dom ⁡ F ⊆ dom ⁡ F
25 7 24 sstri ⊢ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B ⊆ dom ⁡ F
26 fvelimab ⊢ F Fn dom ⁡ F ∧ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B ⊆ dom ⁡ F → z ∈ F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B ↔ ∃ w ∈ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B F ⁡ w = z
27 25 26 mpan2 ⊢ F Fn dom ⁡ F → z ∈ F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B ↔ ∃ w ∈ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B F ⁡ w = z
28 23 27 sylbi ⊢ Fun ⁡ F → z ∈ F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B ↔ ∃ w ∈ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B F ⁡ w = z
29 28 adantr ⊢ Fun ⁡ F ∧ z ∈ B → z ∈ F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B ↔ ∃ w ∈ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B F ⁡ w = z
30 22 29 sylibrd ⊢ Fun ⁡ F ∧ z ∈ B → ∃ w ∈ A ∩ dom ⁡ F F ⁡ w = z → z ∈ F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B
31 12 30 syld ⊢ Fun ⁡ F ∧ z ∈ B → z ∈ F A ∩ dom ⁡ F → z ∈ F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B
32 31 adantlr ⊢ Fun ⁡ F ∧ B ⊆ F A ∩ dom ⁡ F ∧ z ∈ B → z ∈ F A ∩ dom ⁡ F → z ∈ F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B
33 9 32 mpd ⊢ Fun ⁡ F ∧ B ⊆ F A ∩ dom ⁡ F ∧ z ∈ B → z ∈ F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B
34 33 ex ⊢ Fun ⁡ F ∧ B ⊆ F A ∩ dom ⁡ F → z ∈ B → z ∈ F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B
35 fvelima ⊢ Fun ⁡ F ∧ z ∈ F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B → ∃ w ∈ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B F ⁡ w = z
36 35 ex ⊢ Fun ⁡ F → z ∈ F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B → ∃ w ∈ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B F ⁡ w = z
37 eleq1 ⊢ F ⁡ w = z → F ⁡ w ∈ B ↔ z ∈ B
38 37 biimpcd ⊢ F ⁡ w ∈ B → F ⁡ w = z → z ∈ B
39 38 adantl ⊢ w ∈ A ∩ dom ⁡ F ∧ F ⁡ w ∈ B → F ⁡ w = z → z ∈ B
40 17 39 sylbi ⊢ w ∈ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B → F ⁡ w = z → z ∈ B
41 40 rexlimiv ⊢ ∃ w ∈ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B F ⁡ w = z → z ∈ B
42 36 41 syl6 ⊢ Fun ⁡ F → z ∈ F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B → z ∈ B
43 42 adantr ⊢ Fun ⁡ F ∧ B ⊆ F A ∩ dom ⁡ F → z ∈ F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B → z ∈ B
44 34 43 impbid ⊢ Fun ⁡ F ∧ B ⊆ F A ∩ dom ⁡ F → z ∈ B ↔ z ∈ F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B
45 44 eqrdv ⊢ Fun ⁡ F ∧ B ⊆ F A ∩ dom ⁡ F → B = F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B
46 1 inex1 ⊢ A ∩ dom ⁡ F ∈ V
47 46 rabex ⊢ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B ∈ V
48 sseq1 ⊢ x = y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B → x ⊆ A ∩ dom ⁡ F ↔ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B ⊆ A ∩ dom ⁡ F
49 imaeq2 ⊢ x = y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B → F x = F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B
50 49 eqeq2d ⊢ x = y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B → B = F x ↔ B = F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B
51 48 50 anbi12d ⊢ x = y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B → x ⊆ A ∩ dom ⁡ F ∧ B = F x ↔ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B ⊆ A ∩ dom ⁡ F ∧ B = F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B
52 47 51 spcev ⊢ y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B ⊆ A ∩ dom ⁡ F ∧ B = F y ∈ A ∩ dom ⁡ F | F ⁡ y ∈ B → ∃ x x ⊆ A ∩ dom ⁡ F ∧ B = F x
53 7 45 52 sylancr ⊢ Fun ⁡ F ∧ B ⊆ F A ∩ dom ⁡ F → ∃ x x ⊆ A ∩ dom ⁡ F ∧ B = F x
54 inss1 ⊢ A ∩ dom ⁡ F ⊆ A
55 sstr ⊢ x ⊆ A ∩ dom ⁡ F ∧ A ∩ dom ⁡ F ⊆ A → x ⊆ A
56 54 55 mpan2 ⊢ x ⊆ A ∩ dom ⁡ F → x ⊆ A
57 56 anim1i ⊢ x ⊆ A ∩ dom ⁡ F ∧ B = F x → x ⊆ A ∧ B = F x
58 57 eximi ⊢ ∃ x x ⊆ A ∩ dom ⁡ F ∧ B = F x → ∃ x x ⊆ A ∧ B = F x
59 53 58 syl ⊢ Fun ⁡ F ∧ B ⊆ F A ∩ dom ⁡ F → ∃ x x ⊆ A ∧ B = F x
60 6 59 sylan2br ⊢ Fun ⁡ F ∧ B ⊆ F A → ∃ x x ⊆ A ∧ B = F x