Theorem fveqdmss 7059

Description: If the empty set is not contained in the range of a function, and the function values of another class (not necessarily a function) are equal to the function values of the function for all elements of the domain of the function, then the domain of the function is contained in the domain of the class. (Contributed by AV, 28-Jan-2020.)

Hypothesis

Ref	Expression
fveqdmss.1	⊢ 𝐷 = dom 𝐵

Assertion

Ref	Expression
fveqdmss	⊢ ((Fun 𝐵 ∧ ∅ ∉ ran 𝐵 ∧ ∀𝑥 ∈ 𝐷 (𝐴‘𝑥) = (𝐵‘𝑥)) → 𝐷 ⊆ dom 𝐴)

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

Proof of Theorem fveqdmss

Dummy variables 𝑎 𝑏 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fveq2 6867	. . . . . . . . 9 ⊢ (𝑥 = 𝑎 → (𝐴‘𝑥) = (𝐴‘𝑎))
2		fveq2 6867	. . . . . . . . 9 ⊢ (𝑥 = 𝑎 → (𝐵‘𝑥) = (𝐵‘𝑎))
3	1, 2	eqeq12d 2778	. . . . . . . 8 ⊢ (𝑥 = 𝑎 → ((𝐴‘𝑥) = (𝐵‘𝑥) ↔ (𝐴‘𝑎) = (𝐵‘𝑎)))
4	3	rspcva 3579	. . . . . . 7 ⊢ ((𝑎 ∈ 𝐷 ∧ ∀𝑥 ∈ 𝐷 (𝐴‘𝑥) = (𝐵‘𝑥)) → (𝐴‘𝑎) = (𝐵‘𝑎))
5		nelrnfvne 7058	. . . . . . . . . . . . 13 ⊢ ((Fun 𝐵 ∧ 𝑎 ∈ dom 𝐵 ∧ ∅ ∉ ran 𝐵) → (𝐵‘𝑎) ≠ ∅)
6		n0 4305	. . . . . . . . . . . . . 14 ⊢ ((𝐵‘𝑎) ≠ ∅ ↔ ∃𝑏 𝑏 ∈ (𝐵‘𝑎))
7		eleq2 2851	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝐵‘𝑎) = (𝐴‘𝑎) → (𝑏 ∈ (𝐵‘𝑎) ↔ 𝑏 ∈ (𝐴‘𝑎)))
8	7	eqcoms 2770	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐴‘𝑎) = (𝐵‘𝑎) → (𝑏 ∈ (𝐵‘𝑎) ↔ 𝑏 ∈ (𝐴‘𝑎)))
9		elfvdm 6901	. . . . . . . . . . . . . . . . 17 ⊢ (𝑏 ∈ (𝐴‘𝑎) → 𝑎 ∈ dom 𝐴)
10	8, 9	biimtrdi 255	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴‘𝑎) = (𝐵‘𝑎) → (𝑏 ∈ (𝐵‘𝑎) → 𝑎 ∈ dom 𝐴))
11	10	com12 32	. . . . . . . . . . . . . . 15 ⊢ (𝑏 ∈ (𝐵‘𝑎) → ((𝐴‘𝑎) = (𝐵‘𝑎) → 𝑎 ∈ dom 𝐴))
12	11	exlimiv 1950	. . . . . . . . . . . . . 14 ⊢ (∃𝑏 𝑏 ∈ (𝐵‘𝑎) → ((𝐴‘𝑎) = (𝐵‘𝑎) → 𝑎 ∈ dom 𝐴))
13	6, 12	sylbi 219	. . . . . . . . . . . . 13 ⊢ ((𝐵‘𝑎) ≠ ∅ → ((𝐴‘𝑎) = (𝐵‘𝑎) → 𝑎 ∈ dom 𝐴))
14	5, 13	syl 17	. . . . . . . . . . . 12 ⊢ ((Fun 𝐵 ∧ 𝑎 ∈ dom 𝐵 ∧ ∅ ∉ ran 𝐵) → ((𝐴‘𝑎) = (𝐵‘𝑎) → 𝑎 ∈ dom 𝐴))
15	14	3exp 1132	. . . . . . . . . . 11 ⊢ (Fun 𝐵 → (𝑎 ∈ dom 𝐵 → (∅ ∉ ran 𝐵 → ((𝐴‘𝑎) = (𝐵‘𝑎) → 𝑎 ∈ dom 𝐴))))
16	15	com12 32	. . . . . . . . . 10 ⊢ (𝑎 ∈ dom 𝐵 → (Fun 𝐵 → (∅ ∉ ran 𝐵 → ((𝐴‘𝑎) = (𝐵‘𝑎) → 𝑎 ∈ dom 𝐴))))
17		fveqdmss.1	. . . . . . . . . 10 ⊢ 𝐷 = dom 𝐵
18	16, 17	eleq2s 2880	. . . . . . . . 9 ⊢ (𝑎 ∈ 𝐷 → (Fun 𝐵 → (∅ ∉ ran 𝐵 → ((𝐴‘𝑎) = (𝐵‘𝑎) → 𝑎 ∈ dom 𝐴))))
19	18	com24 95	. . . . . . . 8 ⊢ (𝑎 ∈ 𝐷 → ((𝐴‘𝑎) = (𝐵‘𝑎) → (∅ ∉ ran 𝐵 → (Fun 𝐵 → 𝑎 ∈ dom 𝐴))))
20	19	adantr 484	. . . . . . 7 ⊢ ((𝑎 ∈ 𝐷 ∧ ∀𝑥 ∈ 𝐷 (𝐴‘𝑥) = (𝐵‘𝑥)) → ((𝐴‘𝑎) = (𝐵‘𝑎) → (∅ ∉ ran 𝐵 → (Fun 𝐵 → 𝑎 ∈ dom 𝐴))))
21	4, 20	mpd 15	. . . . . 6 ⊢ ((𝑎 ∈ 𝐷 ∧ ∀𝑥 ∈ 𝐷 (𝐴‘𝑥) = (𝐵‘𝑥)) → (∅ ∉ ran 𝐵 → (Fun 𝐵 → 𝑎 ∈ dom 𝐴)))
22	21	ex 416	. . . . 5 ⊢ (𝑎 ∈ 𝐷 → (∀𝑥 ∈ 𝐷 (𝐴‘𝑥) = (𝐵‘𝑥) → (∅ ∉ ran 𝐵 → (Fun 𝐵 → 𝑎 ∈ dom 𝐴))))
23	22	com23 86	. . . 4 ⊢ (𝑎 ∈ 𝐷 → (∅ ∉ ran 𝐵 → (∀𝑥 ∈ 𝐷 (𝐴‘𝑥) = (𝐵‘𝑥) → (Fun 𝐵 → 𝑎 ∈ dom 𝐴))))
24	23	com14 96	. . 3 ⊢ (Fun 𝐵 → (∅ ∉ ran 𝐵 → (∀𝑥 ∈ 𝐷 (𝐴‘𝑥) = (𝐵‘𝑥) → (𝑎 ∈ 𝐷 → 𝑎 ∈ dom 𝐴))))
25	24	3imp 1123	. 2 ⊢ ((Fun 𝐵 ∧ ∅ ∉ ran 𝐵 ∧ ∀𝑥 ∈ 𝐷 (𝐴‘𝑥) = (𝐵‘𝑥)) → (𝑎 ∈ 𝐷 → 𝑎 ∈ dom 𝐴))
26	25	ssrdv 3942	1 ⊢ ((Fun 𝐵 ∧ ∅ ∉ ran 𝐵 ∧ ∀𝑥 ∈ 𝐷 (𝐴‘𝑥) = (𝐵‘𝑥)) → 𝐷 ⊆ dom 𝐴)

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 399   ∧ w3a 1098   = wceq 1560  ∃wex 1799   ∈ wcel 2142   ≠ wne 2957   ∉ wnel 3061  ∀wral 3076   ⊆ wss 3904  ∅c0 4285  dom cdm 5647  ran crn 5648  Fun wfun 6515  ‘cfv 6521

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1815  ax-4 1829  ax-5 1930  ax-6 1987  ax-7 2028  ax-8 2144  ax-9 2152  ax-10 2175  ax-12 2212  ax-ext 2734  ax-sep 5246  ax-nul 5256  ax-pr 5390

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3an 1100  df-tru 1563  df-fal 1573  df-ex 1800  df-nf 1804  df-sb 2091  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-ne 2958  df-nel 3062  df-ral 3077  df-rex 3087  df-rab 3415  df-v 3456  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-nul 4286  df-if 4481  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-br 5101  df-opab 5163  df-id 5542  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-iota 6477  df-fun 6523  df-fn 6524  df-fv 6529

This theorem is referenced by:  fveqressseq  7060