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

Theorem mpt2xopoveq 7290
Description: Value of an operation given by a maps-to rule, where the first argument is a pair and the base set of the second argument is the first component of the first argument. (Contributed by Alexander van der Vekens, 11-Oct-2017.)
Hypothesis
Ref Expression
mpt2xopoveq.f 𝐹 = (𝑥 ∈ V, 𝑦 ∈ (1st𝑥) ↦ {𝑛 ∈ (1st𝑥) ∣ 𝜑})
Assertion
Ref Expression
mpt2xopoveq (((𝑉𝑋𝑊𝑌) ∧ 𝐾𝑉) → (⟨𝑉, 𝑊𝐹𝐾) = {𝑛𝑉[𝑉, 𝑊⟩ / 𝑥][𝐾 / 𝑦]𝜑})
Distinct variable groups:   𝑛,𝐾,𝑥,𝑦   𝑛,𝑉,𝑥,𝑦   𝑛,𝑊,𝑥,𝑦   𝑛,𝑋,𝑥,𝑦   𝑛,𝑌,𝑥,𝑦
Allowed substitution hints:   𝜑(𝑥,𝑦,𝑛)   𝐹(𝑥,𝑦,𝑛)

Proof of Theorem mpt2xopoveq
StepHypRef Expression
1 mpt2xopoveq.f . . 3 𝐹 = (𝑥 ∈ V, 𝑦 ∈ (1st𝑥) ↦ {𝑛 ∈ (1st𝑥) ∣ 𝜑})
21a1i 11 . 2 (((𝑉𝑋𝑊𝑌) ∧ 𝐾𝑉) → 𝐹 = (𝑥 ∈ V, 𝑦 ∈ (1st𝑥) ↦ {𝑛 ∈ (1st𝑥) ∣ 𝜑}))
3 fveq2 6148 . . . . 5 (𝑥 = ⟨𝑉, 𝑊⟩ → (1st𝑥) = (1st ‘⟨𝑉, 𝑊⟩))
4 op1stg 7125 . . . . . 6 ((𝑉𝑋𝑊𝑌) → (1st ‘⟨𝑉, 𝑊⟩) = 𝑉)
54adantr 481 . . . . 5 (((𝑉𝑋𝑊𝑌) ∧ 𝐾𝑉) → (1st ‘⟨𝑉, 𝑊⟩) = 𝑉)
63, 5sylan9eqr 2677 . . . 4 ((((𝑉𝑋𝑊𝑌) ∧ 𝐾𝑉) ∧ 𝑥 = ⟨𝑉, 𝑊⟩) → (1st𝑥) = 𝑉)
76adantrr 752 . . 3 ((((𝑉𝑋𝑊𝑌) ∧ 𝐾𝑉) ∧ (𝑥 = ⟨𝑉, 𝑊⟩ ∧ 𝑦 = 𝐾)) → (1st𝑥) = 𝑉)
8 sbceq1a 3428 . . . . . 6 (𝑦 = 𝐾 → (𝜑[𝐾 / 𝑦]𝜑))
98adantl 482 . . . . 5 ((𝑥 = ⟨𝑉, 𝑊⟩ ∧ 𝑦 = 𝐾) → (𝜑[𝐾 / 𝑦]𝜑))
109adantl 482 . . . 4 ((((𝑉𝑋𝑊𝑌) ∧ 𝐾𝑉) ∧ (𝑥 = ⟨𝑉, 𝑊⟩ ∧ 𝑦 = 𝐾)) → (𝜑[𝐾 / 𝑦]𝜑))
11 sbceq1a 3428 . . . . . 6 (𝑥 = ⟨𝑉, 𝑊⟩ → ([𝐾 / 𝑦]𝜑[𝑉, 𝑊⟩ / 𝑥][𝐾 / 𝑦]𝜑))
1211adantr 481 . . . . 5 ((𝑥 = ⟨𝑉, 𝑊⟩ ∧ 𝑦 = 𝐾) → ([𝐾 / 𝑦]𝜑[𝑉, 𝑊⟩ / 𝑥][𝐾 / 𝑦]𝜑))
1312adantl 482 . . . 4 ((((𝑉𝑋𝑊𝑌) ∧ 𝐾𝑉) ∧ (𝑥 = ⟨𝑉, 𝑊⟩ ∧ 𝑦 = 𝐾)) → ([𝐾 / 𝑦]𝜑[𝑉, 𝑊⟩ / 𝑥][𝐾 / 𝑦]𝜑))
1410, 13bitrd 268 . . 3 ((((𝑉𝑋𝑊𝑌) ∧ 𝐾𝑉) ∧ (𝑥 = ⟨𝑉, 𝑊⟩ ∧ 𝑦 = 𝐾)) → (𝜑[𝑉, 𝑊⟩ / 𝑥][𝐾 / 𝑦]𝜑))
157, 14rabeqbidv 3181 . 2 ((((𝑉𝑋𝑊𝑌) ∧ 𝐾𝑉) ∧ (𝑥 = ⟨𝑉, 𝑊⟩ ∧ 𝑦 = 𝐾)) → {𝑛 ∈ (1st𝑥) ∣ 𝜑} = {𝑛𝑉[𝑉, 𝑊⟩ / 𝑥][𝐾 / 𝑦]𝜑})
16 opex 4893 . . 3 𝑉, 𝑊⟩ ∈ V
1716a1i 11 . 2 (((𝑉𝑋𝑊𝑌) ∧ 𝐾𝑉) → ⟨𝑉, 𝑊⟩ ∈ V)
18 simpr 477 . 2 (((𝑉𝑋𝑊𝑌) ∧ 𝐾𝑉) → 𝐾𝑉)
19 rabexg 4772 . . 3 (𝑉𝑋 → {𝑛𝑉[𝑉, 𝑊⟩ / 𝑥][𝐾 / 𝑦]𝜑} ∈ V)
2019ad2antrr 761 . 2 (((𝑉𝑋𝑊𝑌) ∧ 𝐾𝑉) → {𝑛𝑉[𝑉, 𝑊⟩ / 𝑥][𝐾 / 𝑦]𝜑} ∈ V)
21 equid 1936 . . 3 𝑧 = 𝑧
22 nfvd 1841 . . 3 (𝑧 = 𝑧 → Ⅎ𝑥((𝑉𝑋𝑊𝑌) ∧ 𝐾𝑉))
2321, 22ax-mp 5 . 2 𝑥((𝑉𝑋𝑊𝑌) ∧ 𝐾𝑉)
24 nfvd 1841 . . 3 (𝑧 = 𝑧 → Ⅎ𝑦((𝑉𝑋𝑊𝑌) ∧ 𝐾𝑉))
2521, 24ax-mp 5 . 2 𝑦((𝑉𝑋𝑊𝑌) ∧ 𝐾𝑉)
26 nfcv 2761 . 2 𝑦𝑉, 𝑊
27 nfcv 2761 . 2 𝑥𝐾
28 nfsbc1v 3437 . . 3 𝑥[𝑉, 𝑊⟩ / 𝑥][𝐾 / 𝑦]𝜑
29 nfcv 2761 . . 3 𝑥𝑉
3028, 29nfrab 3112 . 2 𝑥{𝑛𝑉[𝑉, 𝑊⟩ / 𝑥][𝐾 / 𝑦]𝜑}
31 nfsbc1v 3437 . . . 4 𝑦[𝐾 / 𝑦]𝜑
3226, 31nfsbc 3439 . . 3 𝑦[𝑉, 𝑊⟩ / 𝑥][𝐾 / 𝑦]𝜑
33 nfcv 2761 . . 3 𝑦𝑉
3432, 33nfrab 3112 . 2 𝑦{𝑛𝑉[𝑉, 𝑊⟩ / 𝑥][𝐾 / 𝑦]𝜑}
352, 15, 6, 17, 18, 20, 23, 25, 26, 27, 30, 34ovmpt2dxf 6739 1 (((𝑉𝑋𝑊𝑌) ∧ 𝐾𝑉) → (⟨𝑉, 𝑊𝐹𝐾) = {𝑛𝑉[𝑉, 𝑊⟩ / 𝑥][𝐾 / 𝑦]𝜑})
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 196  wa 384   = wceq 1480  wnf 1705  wcel 1987  {crab 2911  Vcvv 3186  [wsbc 3417  cop 4154  cfv 5847  (class class class)co 6604  cmpt2 6606  1st c1st 7111
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1719  ax-4 1734  ax-5 1836  ax-6 1885  ax-7 1932  ax-8 1989  ax-9 1996  ax-10 2016  ax-11 2031  ax-12 2044  ax-13 2245  ax-ext 2601  ax-sep 4741  ax-nul 4749  ax-pow 4803  ax-pr 4867  ax-un 6902
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3an 1038  df-tru 1483  df-ex 1702  df-nf 1707  df-sb 1878  df-eu 2473  df-mo 2474  df-clab 2608  df-cleq 2614  df-clel 2617  df-nfc 2750  df-ral 2912  df-rex 2913  df-rab 2916  df-v 3188  df-sbc 3418  df-dif 3558  df-un 3560  df-in 3562  df-ss 3569  df-nul 3892  df-if 4059  df-sn 4149  df-pr 4151  df-op 4155  df-uni 4403  df-br 4614  df-opab 4674  df-mpt 4675  df-id 4989  df-xp 5080  df-rel 5081  df-cnv 5082  df-co 5083  df-dm 5084  df-rn 5085  df-iota 5810  df-fun 5849  df-fv 5855  df-ov 6607  df-oprab 6608  df-mpt2 6609  df-1st 7113
This theorem is referenced by:  mpt2xopovel  7291  mpt2xopoveqd  7292
  Copyright terms: Public domain W3C validator