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

Theorem satfsschain 35593
Description: The binary relation of a satisfaction predicate as function over wff codes is an increasing chain (with respect to inclusion). (Contributed by AV, 15-Oct-2023.)
Hypothesis
Ref Expression
satfsschain.s 𝑆 = (𝑀 Sat 𝐸)
Assertion
Ref Expression
satfsschain (((𝑀𝑉𝐸𝑊) ∧ (𝐴 ∈ ω ∧ 𝐵 ∈ ω)) → (𝐵𝐴 → (𝑆𝐵) ⊆ (𝑆𝐴)))

Proof of Theorem satfsschain
Dummy variables 𝑎 𝑏 𝑖 𝑘 𝑢 𝑣 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fveq2 6834 . . . . . . 7 (𝑏 = 𝐵 → (𝑆𝑏) = (𝑆𝐵))
21sseq2d 3954 . . . . . 6 (𝑏 = 𝐵 → ((𝑆𝐵) ⊆ (𝑆𝑏) ↔ (𝑆𝐵) ⊆ (𝑆𝐵)))
32imbi2d 341 . . . . 5 (𝑏 = 𝐵 → (((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆𝑏)) ↔ ((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆𝐵))))
4 fveq2 6834 . . . . . . 7 (𝑏 = 𝑎 → (𝑆𝑏) = (𝑆𝑎))
54sseq2d 3954 . . . . . 6 (𝑏 = 𝑎 → ((𝑆𝐵) ⊆ (𝑆𝑏) ↔ (𝑆𝐵) ⊆ (𝑆𝑎)))
65imbi2d 341 . . . . 5 (𝑏 = 𝑎 → (((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆𝑏)) ↔ ((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆𝑎))))
7 fveq2 6834 . . . . . . 7 (𝑏 = suc 𝑎 → (𝑆𝑏) = (𝑆‘suc 𝑎))
87sseq2d 3954 . . . . . 6 (𝑏 = suc 𝑎 → ((𝑆𝐵) ⊆ (𝑆𝑏) ↔ (𝑆𝐵) ⊆ (𝑆‘suc 𝑎)))
98imbi2d 341 . . . . 5 (𝑏 = suc 𝑎 → (((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆𝑏)) ↔ ((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆‘suc 𝑎))))
10 fveq2 6834 . . . . . . 7 (𝑏 = 𝐴 → (𝑆𝑏) = (𝑆𝐴))
1110sseq2d 3954 . . . . . 6 (𝑏 = 𝐴 → ((𝑆𝐵) ⊆ (𝑆𝑏) ↔ (𝑆𝐵) ⊆ (𝑆𝐴)))
1211imbi2d 341 . . . . 5 (𝑏 = 𝐴 → (((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆𝑏)) ↔ ((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆𝐴))))
13 ssidd 3945 . . . . . 6 ((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆𝐵))
1413a1i 11 . . . . 5 (𝐵 ∈ ω → ((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆𝐵)))
15 pm2.27 42 . . . . . . . . 9 ((𝑀𝑉𝐸𝑊) → (((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆𝑎)) → (𝑆𝐵) ⊆ (𝑆𝑎)))
1615adantl 482 . . . . . . . 8 ((((𝑎 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝑎) ∧ (𝑀𝑉𝐸𝑊)) → (((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆𝑎)) → (𝑆𝐵) ⊆ (𝑆𝑎)))
17 simpr 485 . . . . . . . . . 10 (((((𝑎 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝑎) ∧ (𝑀𝑉𝐸𝑊)) ∧ (𝑆𝐵) ⊆ (𝑆𝑎)) → (𝑆𝐵) ⊆ (𝑆𝑎))
18 ssun1 4114 . . . . . . . . . . . 12 (𝑆𝑎) ⊆ ((𝑆𝑎) ∪ {⟨𝑥, 𝑦⟩ ∣ ∃𝑢 ∈ (𝑆𝑎)(∃𝑣 ∈ (𝑆𝑎)(𝑥 = ((1st𝑢)⊼𝑔(1st𝑣)) ∧ 𝑦 = ((𝑀m ω) ∖ ((2nd𝑢) ∩ (2nd𝑣)))) ∨ ∃𝑖 ∈ ω (𝑥 = ∀𝑔𝑖(1st𝑢) ∧ 𝑦 = {𝑧 ∈ (𝑀m ω) ∣ ∀𝑘𝑀 ({⟨𝑖, 𝑘⟩} ∪ (𝑧 ↾ (ω ∖ {𝑖}))) ∈ (2nd𝑢)}))})
19 simpl 483 . . . . . . . . . . . . 13 ((𝑀𝑉𝐸𝑊) → 𝑀𝑉)
20 simpr 485 . . . . . . . . . . . . 13 ((𝑀𝑉𝐸𝑊) → 𝐸𝑊)
21 simplll 780 . . . . . . . . . . . . 13 ((((𝑎 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝑎) ∧ (𝑀𝑉𝐸𝑊)) → 𝑎 ∈ ω)
22 satfsschain.s . . . . . . . . . . . . . 14 𝑆 = (𝑀 Sat 𝐸)
2322satfvsuc 35590 . . . . . . . . . . . . 13 ((𝑀𝑉𝐸𝑊𝑎 ∈ ω) → (𝑆‘suc 𝑎) = ((𝑆𝑎) ∪ {⟨𝑥, 𝑦⟩ ∣ ∃𝑢 ∈ (𝑆𝑎)(∃𝑣 ∈ (𝑆𝑎)(𝑥 = ((1st𝑢)⊼𝑔(1st𝑣)) ∧ 𝑦 = ((𝑀m ω) ∖ ((2nd𝑢) ∩ (2nd𝑣)))) ∨ ∃𝑖 ∈ ω (𝑥 = ∀𝑔𝑖(1st𝑢) ∧ 𝑦 = {𝑧 ∈ (𝑀m ω) ∣ ∀𝑘𝑀 ({⟨𝑖, 𝑘⟩} ∪ (𝑧 ↾ (ω ∖ {𝑖}))) ∈ (2nd𝑢)}))}))
2419, 20, 21, 23syl2an23an 1431 . . . . . . . . . . . 12 ((((𝑎 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝑎) ∧ (𝑀𝑉𝐸𝑊)) → (𝑆‘suc 𝑎) = ((𝑆𝑎) ∪ {⟨𝑥, 𝑦⟩ ∣ ∃𝑢 ∈ (𝑆𝑎)(∃𝑣 ∈ (𝑆𝑎)(𝑥 = ((1st𝑢)⊼𝑔(1st𝑣)) ∧ 𝑦 = ((𝑀m ω) ∖ ((2nd𝑢) ∩ (2nd𝑣)))) ∨ ∃𝑖 ∈ ω (𝑥 = ∀𝑔𝑖(1st𝑢) ∧ 𝑦 = {𝑧 ∈ (𝑀m ω) ∣ ∀𝑘𝑀 ({⟨𝑖, 𝑘⟩} ∪ (𝑧 ↾ (ω ∖ {𝑖}))) ∈ (2nd𝑢)}))}))
2518, 24sseqtrrid 3965 . . . . . . . . . . 11 ((((𝑎 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝑎) ∧ (𝑀𝑉𝐸𝑊)) → (𝑆𝑎) ⊆ (𝑆‘suc 𝑎))
2625adantr 481 . . . . . . . . . 10 (((((𝑎 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝑎) ∧ (𝑀𝑉𝐸𝑊)) ∧ (𝑆𝐵) ⊆ (𝑆𝑎)) → (𝑆𝑎) ⊆ (𝑆‘suc 𝑎))
2717, 26sstrd 3932 . . . . . . . . 9 (((((𝑎 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝑎) ∧ (𝑀𝑉𝐸𝑊)) ∧ (𝑆𝐵) ⊆ (𝑆𝑎)) → (𝑆𝐵) ⊆ (𝑆‘suc 𝑎))
2827ex 413 . . . . . . . 8 ((((𝑎 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝑎) ∧ (𝑀𝑉𝐸𝑊)) → ((𝑆𝐵) ⊆ (𝑆𝑎) → (𝑆𝐵) ⊆ (𝑆‘suc 𝑎)))
2916, 28syld 47 . . . . . . 7 ((((𝑎 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝑎) ∧ (𝑀𝑉𝐸𝑊)) → (((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆𝑎)) → (𝑆𝐵) ⊆ (𝑆‘suc 𝑎)))
3029ex 413 . . . . . 6 (((𝑎 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝑎) → ((𝑀𝑉𝐸𝑊) → (((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆𝑎)) → (𝑆𝐵) ⊆ (𝑆‘suc 𝑎))))
3130com23 86 . . . . 5 (((𝑎 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝑎) → (((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆𝑎)) → ((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆‘suc 𝑎))))
323, 6, 9, 12, 14, 31findsg 7844 . . . 4 (((𝐴 ∈ ω ∧ 𝐵 ∈ ω) ∧ 𝐵𝐴) → ((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆𝐴)))
3332ex 413 . . 3 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → (𝐵𝐴 → ((𝑀𝑉𝐸𝑊) → (𝑆𝐵) ⊆ (𝑆𝐴))))
3433com23 86 . 2 ((𝐴 ∈ ω ∧ 𝐵 ∈ ω) → ((𝑀𝑉𝐸𝑊) → (𝐵𝐴 → (𝑆𝐵) ⊆ (𝑆𝐴))))
3534impcom 408 1 (((𝑀𝑉𝐸𝑊) ∧ (𝐴 ∈ ω ∧ 𝐵 ∈ ω)) → (𝐵𝐴 → (𝑆𝐵) ⊆ (𝑆𝐴)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 396  wo 853   = wceq 1547  wcel 2119  wral 3054  wrex 3064  {crab 3392  cdif 3887  cun 3888  cin 3889  wss 3890  {csn 4562  cop 4568  {copab 5141  cres 5627  suc csuc 6319  cfv 6492  (class class class)co 7363  ωcom 7813  1st c1st 7936  2nd c2nd 7937  m cmap 8770  𝑔cgna 35563  𝑔cgol 35564   Sat csat 35565
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2712  ax-rep 5206  ax-sep 5225  ax-nul 5235  ax-pow 5301  ax-pr 5369  ax-un 7685  ax-inf2 9560
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2719  df-cleq 2732  df-clel 2815  df-nfc 2889  df-ne 2936  df-ral 3055  df-rex 3065  df-reu 3346  df-rab 3393  df-v 3434  df-sbc 3731  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4269  df-if 4462  df-pw 4538  df-sn 4563  df-pr 4565  df-op 4569  df-uni 4846  df-iun 4930  df-br 5080  df-opab 5142  df-mpt 5161  df-tr 5187  df-id 5520  df-eprel 5525  df-po 5533  df-so 5534  df-fr 5578  df-we 5580  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  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-ov 7366  df-oprab 7367  df-mpo 7368  df-om 7814  df-2nd 7939  df-frecs 8228  df-wrecs 8259  df-recs 8308  df-rdg 8346  df-sat 35572
This theorem is referenced by:  satfvsucsuc  35594  satffunlem2lem2  35635  satffunlem2  35637  satfun  35640
  Copyright terms: Public domain W3C validator