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

Theorem funelss 8024
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 𝐴𝐵𝐴𝑋𝐴) → ((1st𝑋) ∈ dom 𝐵𝑋𝐵))

Proof of Theorem funelss
StepHypRef Expression
1 funrel 6534 . . . . . 6 (Fun 𝐴 → Rel 𝐴)
2 1st2nd 8016 . . . . . 6 ((Rel 𝐴𝑋𝐴) → 𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩)
31, 2sylan 589 . . . . 5 ((Fun 𝐴𝑋𝐴) → 𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩)
4 simpl1l 1237 . . . . . . . . . 10 ((((Fun 𝐴𝑋𝐴) ∧ 𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩ ∧ 𝐵𝐴) ∧ (1st𝑋) ∈ dom 𝐵) → Fun 𝐴)
5 simpl3 1206 . . . . . . . . . 10 ((((Fun 𝐴𝑋𝐴) ∧ 𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩ ∧ 𝐵𝐴) ∧ (1st𝑋) ∈ dom 𝐵) → 𝐵𝐴)
6 simpr 488 . . . . . . . . . 10 ((((Fun 𝐴𝑋𝐴) ∧ 𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩ ∧ 𝐵𝐴) ∧ (1st𝑋) ∈ dom 𝐵) → (1st𝑋) ∈ dom 𝐵)
7 funssfv 6884 . . . . . . . . . 10 ((Fun 𝐴𝐵𝐴 ∧ (1st𝑋) ∈ dom 𝐵) → (𝐴‘(1st𝑋)) = (𝐵‘(1st𝑋)))
84, 5, 6, 7syl3anc 1389 . . . . . . . . 9 ((((Fun 𝐴𝑋𝐴) ∧ 𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩ ∧ 𝐵𝐴) ∧ (1st𝑋) ∈ dom 𝐵) → (𝐴‘(1st𝑋)) = (𝐵‘(1st𝑋)))
9 eleq1 2849 . . . . . . . . . . . . . . 15 (𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩ → (𝑋𝐴 ↔ ⟨(1st𝑋), (2nd𝑋)⟩ ∈ 𝐴))
109adantl 485 . . . . . . . . . . . . . 14 ((Fun 𝐴𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩) → (𝑋𝐴 ↔ ⟨(1st𝑋), (2nd𝑋)⟩ ∈ 𝐴))
11 funopfv 6912 . . . . . . . . . . . . . . 15 (Fun 𝐴 → (⟨(1st𝑋), (2nd𝑋)⟩ ∈ 𝐴 → (𝐴‘(1st𝑋)) = (2nd𝑋)))
1211adantr 484 . . . . . . . . . . . . . 14 ((Fun 𝐴𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩) → (⟨(1st𝑋), (2nd𝑋)⟩ ∈ 𝐴 → (𝐴‘(1st𝑋)) = (2nd𝑋)))
1310, 12sylbid 242 . . . . . . . . . . . . 13 ((Fun 𝐴𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩) → (𝑋𝐴 → (𝐴‘(1st𝑋)) = (2nd𝑋)))
1413impancom 455 . . . . . . . . . . . 12 ((Fun 𝐴𝑋𝐴) → (𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩ → (𝐴‘(1st𝑋)) = (2nd𝑋)))
1514imp 410 . . . . . . . . . . 11 (((Fun 𝐴𝑋𝐴) ∧ 𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩) → (𝐴‘(1st𝑋)) = (2nd𝑋))
16153adant3 1144 . . . . . . . . . 10 (((Fun 𝐴𝑋𝐴) ∧ 𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩ ∧ 𝐵𝐴) → (𝐴‘(1st𝑋)) = (2nd𝑋))
1716adantr 484 . . . . . . . . 9 ((((Fun 𝐴𝑋𝐴) ∧ 𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩ ∧ 𝐵𝐴) ∧ (1st𝑋) ∈ dom 𝐵) → (𝐴‘(1st𝑋)) = (2nd𝑋))
188, 17eqtr3d 2798 . . . . . . . 8 ((((Fun 𝐴𝑋𝐴) ∧ 𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩ ∧ 𝐵𝐴) ∧ (1st𝑋) ∈ dom 𝐵) → (𝐵‘(1st𝑋)) = (2nd𝑋))
19 funss 6536 . . . . . . . . . . . . . 14 (𝐵𝐴 → (Fun 𝐴 → Fun 𝐵))
2019com12 32 . . . . . . . . . . . . 13 (Fun 𝐴 → (𝐵𝐴 → Fun 𝐵))
2120adantr 484 . . . . . . . . . . . 12 ((Fun 𝐴𝑋𝐴) → (𝐵𝐴 → Fun 𝐵))
2221imp 410 . . . . . . . . . . 11 (((Fun 𝐴𝑋𝐴) ∧ 𝐵𝐴) → Fun 𝐵)
2322funfnd 6548 . . . . . . . . . 10 (((Fun 𝐴𝑋𝐴) ∧ 𝐵𝐴) → 𝐵 Fn dom 𝐵)
24233adant2 1143 . . . . . . . . 9 (((Fun 𝐴𝑋𝐴) ∧ 𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩ ∧ 𝐵𝐴) → 𝐵 Fn dom 𝐵)
25 fnopfvb 6914 . . . . . . . . 9 ((𝐵 Fn dom 𝐵 ∧ (1st𝑋) ∈ dom 𝐵) → ((𝐵‘(1st𝑋)) = (2nd𝑋) ↔ ⟨(1st𝑋), (2nd𝑋)⟩ ∈ 𝐵))
2624, 25sylan 589 . . . . . . . 8 ((((Fun 𝐴𝑋𝐴) ∧ 𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩ ∧ 𝐵𝐴) ∧ (1st𝑋) ∈ dom 𝐵) → ((𝐵‘(1st𝑋)) = (2nd𝑋) ↔ ⟨(1st𝑋), (2nd𝑋)⟩ ∈ 𝐵))
2718, 26mpbid 234 . . . . . . 7 ((((Fun 𝐴𝑋𝐴) ∧ 𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩ ∧ 𝐵𝐴) ∧ (1st𝑋) ∈ dom 𝐵) → ⟨(1st𝑋), (2nd𝑋)⟩ ∈ 𝐵)
28 eleq1 2849 . . . . . . . . 9 (𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩ → (𝑋𝐵 ↔ ⟨(1st𝑋), (2nd𝑋)⟩ ∈ 𝐵))
29283ad2ant2 1146 . . . . . . . 8 (((Fun 𝐴𝑋𝐴) ∧ 𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩ ∧ 𝐵𝐴) → (𝑋𝐵 ↔ ⟨(1st𝑋), (2nd𝑋)⟩ ∈ 𝐵))
3029adantr 484 . . . . . . 7 ((((Fun 𝐴𝑋𝐴) ∧ 𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩ ∧ 𝐵𝐴) ∧ (1st𝑋) ∈ dom 𝐵) → (𝑋𝐵 ↔ ⟨(1st𝑋), (2nd𝑋)⟩ ∈ 𝐵))
3127, 30mpbird 259 . . . . . 6 ((((Fun 𝐴𝑋𝐴) ∧ 𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩ ∧ 𝐵𝐴) ∧ (1st𝑋) ∈ dom 𝐵) → 𝑋𝐵)
32313exp1 1365 . . . . 5 ((Fun 𝐴𝑋𝐴) → (𝑋 = ⟨(1st𝑋), (2nd𝑋)⟩ → (𝐵𝐴 → ((1st𝑋) ∈ dom 𝐵𝑋𝐵))))
333, 32mpd 15 . . . 4 ((Fun 𝐴𝑋𝐴) → (𝐵𝐴 → ((1st𝑋) ∈ dom 𝐵𝑋𝐵)))
3433ex 416 . . 3 (Fun 𝐴 → (𝑋𝐴 → (𝐵𝐴 → ((1st𝑋) ∈ dom 𝐵𝑋𝐵))))
3534com23 86 . 2 (Fun 𝐴 → (𝐵𝐴 → (𝑋𝐴 → ((1st𝑋) ∈ dom 𝐵𝑋𝐵))))
36353imp 1122 1 ((Fun 𝐴𝐵𝐴𝑋𝐴) → ((1st𝑋) ∈ dom 𝐵𝑋𝐵))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 208  wa 399  w3a 1097   = wceq 1559  wcel 2141  wss 3904  cop 4587  dom cdm 5645  Rel wrel 5650  Fun wfun 6511   Fn wfn 6512  cfv 6517  1st c1st 7964  2nd c2nd 7965
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1814  ax-4 1828  ax-5 1929  ax-6 1986  ax-7 2027  ax-8 2143  ax-9 2151  ax-10 2174  ax-11 2190  ax-12 2211  ax-ext 2733  ax-sep 5245  ax-nul 5255  ax-pr 5389  ax-un 7714
This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3an 1099  df-tru 1562  df-fal 1572  df-ex 1799  df-nf 1803  df-sb 2090  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3076  df-rex 3086  df-rab 3414  df-v 3455  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-nul 4286  df-if 4480  df-sn 4582  df-pr 4584  df-op 4588  df-uni 4865  df-br 5100  df-opab 5162  df-mpt 5181  df-id 5540  df-xp 5651  df-rel 5652  df-cnv 5653  df-co 5654  df-dm 5655  df-rn 5656  df-res 5657  df-iota 6473  df-fun 6519  df-fn 6520  df-fv 6525  df-1st 7966  df-2nd 7967
This theorem is referenced by:  funeldmdif  8025
  Copyright terms: Public domain W3C validator