Users' Mathboxes Mathbox for Mario Carneiro < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  sategoelfvb Structured version   Visualization version   GIF version

Theorem sategoelfvb 35617
Description: Characterization of a valuation 𝑆 of a simplified satisfaction predicate for a Godel-set of membership. (Contributed by AV, 5-Nov-2023.)
Hypothesis
Ref Expression
sategoelfvb.s 𝐸 = (𝑀 Sat (𝐴𝑔𝐵))
Assertion
Ref Expression
sategoelfvb ((𝑀𝑉 ∧ (𝐴 ∈ ω ∧ 𝐵 ∈ ω)) → (𝑆𝐸 ↔ (𝑆 ∈ (𝑀m ω) ∧ (𝑆𝐴) ∈ (𝑆𝐵))))

Proof of Theorem sategoelfvb
Dummy variables 𝑎 𝑏 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 sategoelfvb.s . . . . 5 𝐸 = (𝑀 Sat (𝐴𝑔𝐵))
2 ovexd 7395 . . . . . . 7 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (𝐴𝑔𝐵) ∈ V)
3 simpl 482 . . . . . . . . 9 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → 𝐴 ∈ ω)
4 opeq1 4817 . . . . . . . . . . . . 13 (𝑎 = 𝐴 → ⟨𝑎, 𝑏⟩ = ⟨𝐴, 𝑏⟩)
54opeq2d 4824 . . . . . . . . . . . 12 (𝑎 = 𝐴 → ⟨∅, ⟨𝑎, 𝑏⟩⟩ = ⟨∅, ⟨𝐴, 𝑏⟩⟩)
65eqeq2d 2748 . . . . . . . . . . 11 (𝑎 = 𝐴 → (⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝑎, 𝑏⟩⟩ ↔ ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝑏⟩⟩))
76rexbidv 3162 . . . . . . . . . 10 (𝑎 = 𝐴 → (∃𝑏 ∈ ω ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝑎, 𝑏⟩⟩ ↔ ∃𝑏 ∈ ω ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝑏⟩⟩))
87adantl 481 . . . . . . . . 9 (((𝐴 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝑎 = 𝐴) → (∃𝑏 ∈ ω ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝑎, 𝑏⟩⟩ ↔ ∃𝑏 ∈ ω ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝑏⟩⟩))
9 simpr 484 . . . . . . . . . 10 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → 𝐵 ∈ ω)
10 opeq2 4818 . . . . . . . . . . . . 13 (𝑏 = 𝐵 → ⟨𝐴, 𝑏⟩ = ⟨𝐴, 𝐵⟩)
1110opeq2d 4824 . . . . . . . . . . . 12 (𝑏 = 𝐵 → ⟨∅, ⟨𝐴, 𝑏⟩⟩ = ⟨∅, ⟨𝐴, 𝐵⟩⟩)
1211eqeq2d 2748 . . . . . . . . . . 11 (𝑏 = 𝐵 → (⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝑏⟩⟩ ↔ ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝐵⟩⟩))
1312adantl 481 . . . . . . . . . 10 (((𝐴 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝑏 = 𝐵) → (⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝑏⟩⟩ ↔ ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝐵⟩⟩))
14 eqidd 2738 . . . . . . . . . 10 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝐵⟩⟩)
159, 13, 14rspcedvd 3567 . . . . . . . . 9 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → ∃𝑏 ∈ ω ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝑏⟩⟩)
163, 8, 15rspcedvd 3567 . . . . . . . 8 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → ∃𝑎 ∈ ω ∃𝑏 ∈ ω ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝑎, 𝑏⟩⟩)
17 goel 35545 . . . . . . . . . 10 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (𝐴𝑔𝐵) = ⟨∅, ⟨𝐴, 𝐵⟩⟩)
18 goel 35545 . . . . . . . . . 10 ((𝑎 ∈ ω ∧ 𝑏 ∈ ω) → (𝑎𝑔𝑏) = ⟨∅, ⟨𝑎, 𝑏⟩⟩)
1917, 18eqeqan12d 2751 . . . . . . . . 9 (((𝐴 ∈ ω ∧ 𝐵 ∈ ω) ∧ (𝑎 ∈ ω ∧ 𝑏 ∈ ω)) → ((𝐴𝑔𝐵) = (𝑎𝑔𝑏) ↔ ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝑎, 𝑏⟩⟩))
20192rexbidva 3201 . . . . . . . 8 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (∃𝑎 ∈ ω ∃𝑏 ∈ ω (𝐴𝑔𝐵) = (𝑎𝑔𝑏) ↔ ∃𝑎 ∈ ω ∃𝑏 ∈ ω ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝑎, 𝑏⟩⟩))
2116, 20mpbird 257 . . . . . . 7 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → ∃𝑎 ∈ ω ∃𝑏 ∈ ω (𝐴𝑔𝐵) = (𝑎𝑔𝑏))
22 eqeq1 2741 . . . . . . . . 9 (𝑥 = (𝐴𝑔𝐵) → (𝑥 = (𝑎𝑔𝑏) ↔ (𝐴𝑔𝐵) = (𝑎𝑔𝑏)))
23222rexbidv 3203 . . . . . . . 8 (𝑥 = (𝐴𝑔𝐵) → (∃𝑎 ∈ ω ∃𝑏 ∈ ω 𝑥 = (𝑎𝑔𝑏) ↔ ∃𝑎 ∈ ω ∃𝑏 ∈ ω (𝐴𝑔𝐵) = (𝑎𝑔𝑏)))
24 fmla0 35580 . . . . . . . 8 (Fmla‘∅) = {𝑥 ∈ V ∣ ∃𝑎 ∈ ω ∃𝑏 ∈ ω 𝑥 = (𝑎𝑔𝑏)}
2523, 24elrab2 3638 . . . . . . 7 ((𝐴𝑔𝐵) ∈ (Fmla‘∅) ↔ ((𝐴𝑔𝐵) ∈ V ∧ ∃𝑎 ∈ ω ∃𝑏 ∈ ω (𝐴𝑔𝐵) = (𝑎𝑔𝑏)))
262, 21, 25sylanbrc 584 . . . . . 6 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (𝐴𝑔𝐵) ∈ (Fmla‘∅))
27 satefvfmla0 35616 . . . . . 6 ((𝑀𝑉 ∧ (𝐴𝑔𝐵) ∈ (Fmla‘∅)) → (𝑀 Sat (𝐴𝑔𝐵)) = {𝑎 ∈ (𝑀m ω) ∣ (𝑎‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) ∈ (𝑎‘(2nd ‘(2nd ‘(𝐴𝑔𝐵))))})
2826, 27sylan2 594 . . . . 5 ((𝑀𝑉 ∧ (𝐴 ∈ ω ∧ 𝐵 ∈ ω)) → (𝑀 Sat (𝐴𝑔𝐵)) = {𝑎 ∈ (𝑀m ω) ∣ (𝑎‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) ∈ (𝑎‘(2nd ‘(2nd ‘(𝐴𝑔𝐵))))})
291, 28eqtrid 2784 . . . 4 ((𝑀𝑉 ∧ (𝐴 ∈ ω ∧ 𝐵 ∈ ω)) → 𝐸 = {𝑎 ∈ (𝑀m ω) ∣ (𝑎‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) ∈ (𝑎‘(2nd ‘(2nd ‘(𝐴𝑔𝐵))))})
3029eleq2d 2823 . . 3 ((𝑀𝑉 ∧ (𝐴 ∈ ω ∧ 𝐵 ∈ ω)) → (𝑆𝐸𝑆 ∈ {𝑎 ∈ (𝑀m ω) ∣ (𝑎‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) ∈ (𝑎‘(2nd ‘(2nd ‘(𝐴𝑔𝐵))))}))
31 fveq1 6833 . . . . 5 (𝑎 = 𝑆 → (𝑎‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) = (𝑆‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))))
32 fveq1 6833 . . . . 5 (𝑎 = 𝑆 → (𝑎‘(2nd ‘(2nd ‘(𝐴𝑔𝐵)))) = (𝑆‘(2nd ‘(2nd ‘(𝐴𝑔𝐵)))))
3331, 32eleq12d 2831 . . . 4 (𝑎 = 𝑆 → ((𝑎‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) ∈ (𝑎‘(2nd ‘(2nd ‘(𝐴𝑔𝐵)))) ↔ (𝑆‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) ∈ (𝑆‘(2nd ‘(2nd ‘(𝐴𝑔𝐵))))))
3433elrab 3635 . . 3 (𝑆 ∈ {𝑎 ∈ (𝑀m ω) ∣ (𝑎‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) ∈ (𝑎‘(2nd ‘(2nd ‘(𝐴𝑔𝐵))))} ↔ (𝑆 ∈ (𝑀m ω) ∧ (𝑆‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) ∈ (𝑆‘(2nd ‘(2nd ‘(𝐴𝑔𝐵))))))
3530, 34bitrdi 287 . 2 ((𝑀𝑉 ∧ (𝐴 ∈ ω ∧ 𝐵 ∈ ω)) → (𝑆𝐸 ↔ (𝑆 ∈ (𝑀m ω) ∧ (𝑆‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) ∈ (𝑆‘(2nd ‘(2nd ‘(𝐴𝑔𝐵)))))))
3617fveq2d 6838 . . . . . . . 8 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (2nd ‘(𝐴𝑔𝐵)) = (2nd ‘⟨∅, ⟨𝐴, 𝐵⟩⟩))
3736fveq2d 6838 . . . . . . 7 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (1st ‘(2nd ‘(𝐴𝑔𝐵))) = (1st ‘(2nd ‘⟨∅, ⟨𝐴, 𝐵⟩⟩)))
38 0ex 5242 . . . . . . . . . 10 ∅ ∈ V
39 opex 5411 . . . . . . . . . 10 𝐴, 𝐵⟩ ∈ V
4038, 39op2nd 7944 . . . . . . . . 9 (2nd ‘⟨∅, ⟨𝐴, 𝐵⟩⟩) = ⟨𝐴, 𝐵
4140fveq2i 6837 . . . . . . . 8 (1st ‘(2nd ‘⟨∅, ⟨𝐴, 𝐵⟩⟩)) = (1st ‘⟨𝐴, 𝐵⟩)
42 op1stg 7947 . . . . . . . 8 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (1st ‘⟨𝐴, 𝐵⟩) = 𝐴)
4341, 42eqtrid 2784 . . . . . . 7 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (1st ‘(2nd ‘⟨∅, ⟨𝐴, 𝐵⟩⟩)) = 𝐴)
4437, 43eqtrd 2772 . . . . . 6 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (1st ‘(2nd ‘(𝐴𝑔𝐵))) = 𝐴)
4544fveq2d 6838 . . . . 5 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (𝑆‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) = (𝑆𝐴))
4636fveq2d 6838 . . . . . . 7 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (2nd ‘(2nd ‘(𝐴𝑔𝐵))) = (2nd ‘(2nd ‘⟨∅, ⟨𝐴, 𝐵⟩⟩)))
4740fveq2i 6837 . . . . . . . 8 (2nd ‘(2nd ‘⟨∅, ⟨𝐴, 𝐵⟩⟩)) = (2nd ‘⟨𝐴, 𝐵⟩)
48 op2ndg 7948 . . . . . . . 8 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (2nd ‘⟨𝐴, 𝐵⟩) = 𝐵)
4947, 48eqtrid 2784 . . . . . . 7 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (2nd ‘(2nd ‘⟨∅, ⟨𝐴, 𝐵⟩⟩)) = 𝐵)
5046, 49eqtrd 2772 . . . . . 6 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (2nd ‘(2nd ‘(𝐴𝑔𝐵))) = 𝐵)
5150fveq2d 6838 . . . . 5 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (𝑆‘(2nd ‘(2nd ‘(𝐴𝑔𝐵)))) = (𝑆𝐵))
5245, 51eleq12d 2831 . . . 4 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → ((𝑆‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) ∈ (𝑆‘(2nd ‘(2nd ‘(𝐴𝑔𝐵)))) ↔ (𝑆𝐴) ∈ (𝑆𝐵)))
5352adantl 481 . . 3 ((𝑀𝑉 ∧ (𝐴 ∈ ω ∧ 𝐵 ∈ ω)) → ((𝑆‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) ∈ (𝑆‘(2nd ‘(2nd ‘(𝐴𝑔𝐵)))) ↔ (𝑆𝐴) ∈ (𝑆𝐵)))
5453anbi2d 631 . 2 ((𝑀𝑉 ∧ (𝐴 ∈ ω ∧ 𝐵 ∈ ω)) → ((𝑆 ∈ (𝑀m ω) ∧ (𝑆‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) ∈ (𝑆‘(2nd ‘(2nd ‘(𝐴𝑔𝐵))))) ↔ (𝑆 ∈ (𝑀m ω) ∧ (𝑆𝐴) ∈ (𝑆𝐵))))
5535, 54bitrd 279 1 ((𝑀𝑉 ∧ (𝐴 ∈ ω ∧ 𝐵 ∈ ω)) → (𝑆𝐸 ↔ (𝑆 ∈ (𝑀m ω) ∧ (𝑆𝐴) ∈ (𝑆𝐵))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395   = wceq 1542  wcel 2114  wrex 3062  {crab 3390  Vcvv 3430  c0 4274  cop 4574  cfv 6492  (class class class)co 7360  ωcom 7810  1st c1st 7933  2nd c2nd 7934  m cmap 8766  𝑔cgoe 35531  Fmlacfmla 35535   Sat csate 35536
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5212  ax-sep 5231  ax-nul 5241  ax-pow 5302  ax-pr 5370  ax-un 7682  ax-inf2 9553  ax-ac2 10376
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-int 4891  df-iun 4936  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-se 5578  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-isom 6501  df-riota 7317  df-ov 7363  df-oprab 7364  df-mpo 7365  df-om 7811  df-1st 7935  df-2nd 7936  df-frecs 8224  df-wrecs 8255  df-recs 8304  df-rdg 8342  df-1o 8398  df-2o 8399  df-er 8636  df-map 8768  df-en 8887  df-dom 8888  df-sdom 8889  df-fin 8890  df-card 9854  df-ac 10029  df-goel 35538  df-gona 35539  df-goal 35540  df-sat 35541  df-sate 35542  df-fmla 35543
This theorem is referenced by:  sategoelfv  35618  ex-sategoelel  35619  ex-sategoelelomsuc  35624  ex-sategoelel12  35625
  Copyright terms: Public domain W3C validator