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 35632
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 7403 . . . . . . 7 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (𝐴𝑔𝐵) ∈ V)
3 simpl 482 . . . . . . . . 9 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → 𝐴 ∈ ω)
4 opeq1 4831 . . . . . . . . . . . . 13 (𝑎 = 𝐴 → ⟨𝑎, 𝑏⟩ = ⟨𝐴, 𝑏⟩)
54opeq2d 4838 . . . . . . . . . . . 12 (𝑎 = 𝐴 → ⟨∅, ⟨𝑎, 𝑏⟩⟩ = ⟨∅, ⟨𝐴, 𝑏⟩⟩)
65eqeq2d 2748 . . . . . . . . . . 11 (𝑎 = 𝐴 → (⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝑎, 𝑏⟩⟩ ↔ ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝑏⟩⟩))
76rexbidv 3162 . . . . . . . . . 10 (𝑎 = 𝐴 → (∃𝑏 ∈ ω ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝑎, 𝑏⟩⟩ ↔ ∃𝑏 ∈ ω ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝑏⟩⟩))
87adantl 481 . . . . . . . . 9 (((𝐴 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝑎 = 𝐴) → (∃𝑏 ∈ ω ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝑎, 𝑏⟩⟩ ↔ ∃𝑏 ∈ ω ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝑏⟩⟩))
9 simpr 484 . . . . . . . . . 10 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → 𝐵 ∈ ω)
10 opeq2 4832 . . . . . . . . . . . . 13 (𝑏 = 𝐵 → ⟨𝐴, 𝑏⟩ = ⟨𝐴, 𝐵⟩)
1110opeq2d 4838 . . . . . . . . . . . 12 (𝑏 = 𝐵 → ⟨∅, ⟨𝐴, 𝑏⟩⟩ = ⟨∅, ⟨𝐴, 𝐵⟩⟩)
1211eqeq2d 2748 . . . . . . . . . . 11 (𝑏 = 𝐵 → (⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝑏⟩⟩ ↔ ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝐵⟩⟩))
1312adantl 481 . . . . . . . . . 10 (((𝐴 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝑏 = 𝐵) → (⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝑏⟩⟩ ↔ ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝐵⟩⟩))
14 eqidd 2738 . . . . . . . . . 10 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝐵⟩⟩)
159, 13, 14rspcedvd 3580 . . . . . . . . 9 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → ∃𝑏 ∈ ω ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝐴, 𝑏⟩⟩)
163, 8, 15rspcedvd 3580 . . . . . . . 8 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → ∃𝑎 ∈ ω ∃𝑏 ∈ ω ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝑎, 𝑏⟩⟩)
17 goel 35560 . . . . . . . . . 10 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (𝐴𝑔𝐵) = ⟨∅, ⟨𝐴, 𝐵⟩⟩)
18 goel 35560 . . . . . . . . . 10 ((𝑎 ∈ ω ∧ 𝑏 ∈ ω) → (𝑎𝑔𝑏) = ⟨∅, ⟨𝑎, 𝑏⟩⟩)
1917, 18eqeqan12d 2751 . . . . . . . . 9 (((𝐴 ∈ ω ∧ 𝐵 ∈ ω) ∧ (𝑎 ∈ ω ∧ 𝑏 ∈ ω)) → ((𝐴𝑔𝐵) = (𝑎𝑔𝑏) ↔ ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝑎, 𝑏⟩⟩))
20192rexbidva 3201 . . . . . . . 8 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (∃𝑎 ∈ ω ∃𝑏 ∈ ω (𝐴𝑔𝐵) = (𝑎𝑔𝑏) ↔ ∃𝑎 ∈ ω ∃𝑏 ∈ ω ⟨∅, ⟨𝐴, 𝐵⟩⟩ = ⟨∅, ⟨𝑎, 𝑏⟩⟩))
2116, 20mpbird 257 . . . . . . 7 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → ∃𝑎 ∈ ω ∃𝑏 ∈ ω (𝐴𝑔𝐵) = (𝑎𝑔𝑏))
22 eqeq1 2741 . . . . . . . . 9 (𝑥 = (𝐴𝑔𝐵) → (𝑥 = (𝑎𝑔𝑏) ↔ (𝐴𝑔𝐵) = (𝑎𝑔𝑏)))
23222rexbidv 3203 . . . . . . . 8 (𝑥 = (𝐴𝑔𝐵) → (∃𝑎 ∈ ω ∃𝑏 ∈ ω 𝑥 = (𝑎𝑔𝑏) ↔ ∃𝑎 ∈ ω ∃𝑏 ∈ ω (𝐴𝑔𝐵) = (𝑎𝑔𝑏)))
24 fmla0 35595 . . . . . . . 8 (Fmla‘∅) = {𝑥 ∈ V ∣ ∃𝑎 ∈ ω ∃𝑏 ∈ ω 𝑥 = (𝑎𝑔𝑏)}
2523, 24elrab2 3651 . . . . . . 7 ((𝐴𝑔𝐵) ∈ (Fmla‘∅) ↔ ((𝐴𝑔𝐵) ∈ V ∧ ∃𝑎 ∈ ω ∃𝑏 ∈ ω (𝐴𝑔𝐵) = (𝑎𝑔𝑏)))
262, 21, 25sylanbrc 584 . . . . . 6 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (𝐴𝑔𝐵) ∈ (Fmla‘∅))
27 satefvfmla0 35631 . . . . . 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 6841 . . . . 5 (𝑎 = 𝑆 → (𝑎‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) = (𝑆‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))))
32 fveq1 6841 . . . . 5 (𝑎 = 𝑆 → (𝑎‘(2nd ‘(2nd ‘(𝐴𝑔𝐵)))) = (𝑆‘(2nd ‘(2nd ‘(𝐴𝑔𝐵)))))
3331, 32eleq12d 2831 . . . 4 (𝑎 = 𝑆 → ((𝑎‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) ∈ (𝑎‘(2nd ‘(2nd ‘(𝐴𝑔𝐵)))) ↔ (𝑆‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) ∈ (𝑆‘(2nd ‘(2nd ‘(𝐴𝑔𝐵))))))
3433elrab 3648 . . 3 (𝑆 ∈ {𝑎 ∈ (𝑀m ω) ∣ (𝑎‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) ∈ (𝑎‘(2nd ‘(2nd ‘(𝐴𝑔𝐵))))} ↔ (𝑆 ∈ (𝑀m ω) ∧ (𝑆‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) ∈ (𝑆‘(2nd ‘(2nd ‘(𝐴𝑔𝐵))))))
3530, 34bitrdi 287 . 2 ((𝑀𝑉 ∧ (𝐴 ∈ ω ∧ 𝐵 ∈ ω)) → (𝑆𝐸 ↔ (𝑆 ∈ (𝑀m ω) ∧ (𝑆‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) ∈ (𝑆‘(2nd ‘(2nd ‘(𝐴𝑔𝐵)))))))
3617fveq2d 6846 . . . . . . . 8 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (2nd ‘(𝐴𝑔𝐵)) = (2nd ‘⟨∅, ⟨𝐴, 𝐵⟩⟩))
3736fveq2d 6846 . . . . . . 7 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (1st ‘(2nd ‘(𝐴𝑔𝐵))) = (1st ‘(2nd ‘⟨∅, ⟨𝐴, 𝐵⟩⟩)))
38 0ex 5254 . . . . . . . . . 10 ∅ ∈ V
39 opex 5419 . . . . . . . . . 10 𝐴, 𝐵⟩ ∈ V
4038, 39op2nd 7952 . . . . . . . . 9 (2nd ‘⟨∅, ⟨𝐴, 𝐵⟩⟩) = ⟨𝐴, 𝐵
4140fveq2i 6845 . . . . . . . 8 (1st ‘(2nd ‘⟨∅, ⟨𝐴, 𝐵⟩⟩)) = (1st ‘⟨𝐴, 𝐵⟩)
42 op1stg 7955 . . . . . . . 8 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (1st ‘⟨𝐴, 𝐵⟩) = 𝐴)
4341, 42eqtrid 2784 . . . . . . 7 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (1st ‘(2nd ‘⟨∅, ⟨𝐴, 𝐵⟩⟩)) = 𝐴)
4437, 43eqtrd 2772 . . . . . 6 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (1st ‘(2nd ‘(𝐴𝑔𝐵))) = 𝐴)
4544fveq2d 6846 . . . . 5 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (𝑆‘(1st ‘(2nd ‘(𝐴𝑔𝐵)))) = (𝑆𝐴))
4636fveq2d 6846 . . . . . . 7 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (2nd ‘(2nd ‘(𝐴𝑔𝐵))) = (2nd ‘(2nd ‘⟨∅, ⟨𝐴, 𝐵⟩⟩)))
4740fveq2i 6845 . . . . . . . 8 (2nd ‘(2nd ‘⟨∅, ⟨𝐴, 𝐵⟩⟩)) = (2nd ‘⟨𝐴, 𝐵⟩)
48 op2ndg 7956 . . . . . . . 8 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (2nd ‘⟨𝐴, 𝐵⟩) = 𝐵)
4947, 48eqtrid 2784 . . . . . . 7 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (2nd ‘(2nd ‘⟨∅, ⟨𝐴, 𝐵⟩⟩)) = 𝐵)
5046, 49eqtrd 2772 . . . . . 6 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (2nd ‘(2nd ‘(𝐴𝑔𝐵))) = 𝐵)
5150fveq2d 6846 . . . . 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 3401  Vcvv 3442  c0 4287  cop 4588  cfv 6500  (class class class)co 7368  ωcom 7818  1st c1st 7941  2nd c2nd 7942  m cmap 8775  𝑔cgoe 35546  Fmlacfmla 35550   Sat csate 35551
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 5226  ax-sep 5243  ax-nul 5253  ax-pow 5312  ax-pr 5379  ax-un 7690  ax-inf2 9562  ax-ac2 10385
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 3352  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-int 4905  df-iun 4950  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5527  df-eprel 5532  df-po 5540  df-so 5541  df-fr 5585  df-se 5586  df-we 5587  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-pred 6267  df-ord 6328  df-on 6329  df-lim 6330  df-suc 6331  df-iota 6456  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-isom 6509  df-riota 7325  df-ov 7371  df-oprab 7372  df-mpo 7373  df-om 7819  df-1st 7943  df-2nd 7944  df-frecs 8233  df-wrecs 8264  df-recs 8313  df-rdg 8351  df-1o 8407  df-2o 8408  df-er 8645  df-map 8777  df-en 8896  df-dom 8897  df-sdom 8898  df-fin 8899  df-card 9863  df-ac 10038  df-goel 35553  df-gona 35554  df-goal 35555  df-sat 35556  df-sate 35557  df-fmla 35558
This theorem is referenced by:  sategoelfv  35633  ex-sategoelel  35634  ex-sategoelelomsuc  35639  ex-sategoelel12  35640
  Copyright terms: Public domain W3C validator