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

Theorem isfildlem 23865
Description: Lemma for isfild 23866. (Contributed by Mario Carneiro, 1-Dec-2013.)
Hypotheses
Ref Expression
isfild.1 (𝜑 → (𝑥𝐹 ↔ (𝑥𝐴𝜓)))
isfild.2 (𝜑𝐴𝑉)
Assertion
Ref Expression
isfildlem (𝜑 → (𝐵𝐹 ↔ (𝐵𝐴[𝐵 / 𝑥]𝜓)))
Distinct variable groups:   𝑥,𝐴   𝑥,𝐹   𝜑,𝑥
Allowed substitution hints:   𝜓(𝑥)   𝐵(𝑥)   𝑉(𝑥)

Proof of Theorem isfildlem
Dummy variable 𝑦 is distinct from all other variables.
StepHypRef Expression
1 elex 3501 . . 3 (𝐵𝐹𝐵 ∈ V)
21a1i 11 . 2 (𝜑 → (𝐵𝐹𝐵 ∈ V))
3 isfild.2 . . . 4 (𝜑𝐴𝑉)
4 ssexg 5323 . . . . 5 ((𝐵𝐴𝐴𝑉) → 𝐵 ∈ V)
54expcom 413 . . . 4 (𝐴𝑉 → (𝐵𝐴𝐵 ∈ V))
63, 5syl 17 . . 3 (𝜑 → (𝐵𝐴𝐵 ∈ V))
76adantrd 491 . 2 (𝜑 → ((𝐵𝐴[𝐵 / 𝑥]𝜓) → 𝐵 ∈ V))
8 eleq1 2829 . . . . . 6 (𝑦 = 𝐵 → (𝑦𝐹𝐵𝐹))
9 sseq1 4009 . . . . . . 7 (𝑦 = 𝐵 → (𝑦𝐴𝐵𝐴))
10 dfsbcq 3790 . . . . . . 7 (𝑦 = 𝐵 → ([𝑦 / 𝑥]𝜓[𝐵 / 𝑥]𝜓))
119, 10anbi12d 632 . . . . . 6 (𝑦 = 𝐵 → ((𝑦𝐴[𝑦 / 𝑥]𝜓) ↔ (𝐵𝐴[𝐵 / 𝑥]𝜓)))
128, 11bibi12d 345 . . . . 5 (𝑦 = 𝐵 → ((𝑦𝐹 ↔ (𝑦𝐴[𝑦 / 𝑥]𝜓)) ↔ (𝐵𝐹 ↔ (𝐵𝐴[𝐵 / 𝑥]𝜓))))
1312imbi2d 340 . . . 4 (𝑦 = 𝐵 → ((𝜑 → (𝑦𝐹 ↔ (𝑦𝐴[𝑦 / 𝑥]𝜓))) ↔ (𝜑 → (𝐵𝐹 ↔ (𝐵𝐴[𝐵 / 𝑥]𝜓)))))
14 nfv 1914 . . . . . 6 𝑥𝜑
15 nfv 1914 . . . . . . 7 𝑥 𝑦𝐹
16 nfv 1914 . . . . . . . 8 𝑥 𝑦𝐴
17 nfsbc1v 3808 . . . . . . . 8 𝑥[𝑦 / 𝑥]𝜓
1816, 17nfan 1899 . . . . . . 7 𝑥(𝑦𝐴[𝑦 / 𝑥]𝜓)
1915, 18nfbi 1903 . . . . . 6 𝑥(𝑦𝐹 ↔ (𝑦𝐴[𝑦 / 𝑥]𝜓))
2014, 19nfim 1896 . . . . 5 𝑥(𝜑 → (𝑦𝐹 ↔ (𝑦𝐴[𝑦 / 𝑥]𝜓)))
21 eleq1 2829 . . . . . . 7 (𝑥 = 𝑦 → (𝑥𝐹𝑦𝐹))
22 sseq1 4009 . . . . . . . 8 (𝑥 = 𝑦 → (𝑥𝐴𝑦𝐴))
23 sbceq1a 3799 . . . . . . . 8 (𝑥 = 𝑦 → (𝜓[𝑦 / 𝑥]𝜓))
2422, 23anbi12d 632 . . . . . . 7 (𝑥 = 𝑦 → ((𝑥𝐴𝜓) ↔ (𝑦𝐴[𝑦 / 𝑥]𝜓)))
2521, 24bibi12d 345 . . . . . 6 (𝑥 = 𝑦 → ((𝑥𝐹 ↔ (𝑥𝐴𝜓)) ↔ (𝑦𝐹 ↔ (𝑦𝐴[𝑦 / 𝑥]𝜓))))
2625imbi2d 340 . . . . 5 (𝑥 = 𝑦 → ((𝜑 → (𝑥𝐹 ↔ (𝑥𝐴𝜓))) ↔ (𝜑 → (𝑦𝐹 ↔ (𝑦𝐴[𝑦 / 𝑥]𝜓)))))
27 isfild.1 . . . . 5 (𝜑 → (𝑥𝐹 ↔ (𝑥𝐴𝜓)))
2820, 26, 27chvarfv 2240 . . . 4 (𝜑 → (𝑦𝐹 ↔ (𝑦𝐴[𝑦 / 𝑥]𝜓)))
2913, 28vtoclg 3554 . . 3 (𝐵 ∈ V → (𝜑 → (𝐵𝐹 ↔ (𝐵𝐴[𝐵 / 𝑥]𝜓))))
3029com12 32 . 2 (𝜑 → (𝐵 ∈ V → (𝐵𝐹 ↔ (𝐵𝐴[𝐵 / 𝑥]𝜓))))
312, 7, 30pm5.21ndd 379 1 (𝜑 → (𝐵𝐹 ↔ (𝐵𝐴[𝐵 / 𝑥]𝜓)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395   = wceq 1540  wcel 2108  Vcvv 3480  [wsbc 3788  wss 3951
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2708  ax-sep 5296
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1543  df-ex 1780  df-nf 1784  df-sb 2065  df-clab 2715  df-cleq 2729  df-clel 2816  df-nfc 2892  df-rab 3437  df-v 3482  df-sbc 3789  df-in 3958  df-ss 3968
This theorem is referenced by:  isfild  23866
  Copyright terms: Public domain W3C validator