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

Theorem noetalem2 28018
Description: Lemma for noeta 28019. The full statement of the theorem with hypotheses in place. (Contributed by Scott Fenton, 10-Aug-2024.)
Hypotheses
Ref Expression
noetalem2.1 𝑆 = if(∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦, ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))))
noetalem2.2 𝑇 = if(∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥, ((𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥) ∪ {⟨dom (𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥), 1o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐵 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐵𝑢 <s 𝑣 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐵 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐵𝑢 <s 𝑣 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))))
Assertion
Ref Expression
noetalem2 ((((𝐴 No 𝐴𝑉) ∧ (𝐵 No 𝐵𝑊) ∧ ∀𝑎𝐴𝑏𝐵 𝑎 <s 𝑏) ∧ (𝑂 ∈ On ∧ ( bday “ (𝐴𝐵)) ⊆ 𝑂)) → ∃𝑐 No (∀𝑎𝐴 𝑎 <s 𝑐 ∧ ∀𝑏𝐵 𝑐 <s 𝑏 ∧ ( bday 𝑐) ⊆ 𝑂))
Distinct variable groups:   𝐴,𝑎,𝑏,𝑣,𝑦   𝑢,𝑂,𝑦   𝐵,𝑎,𝑔,𝑢,𝑣,𝑥,𝑦   𝑆,𝑎,𝑔,𝑥   𝑂,𝑐   𝐵,𝑏,𝑐,𝑎   𝐴,𝑔,𝑢,𝑥   𝐴,𝑐   𝑇,𝑎,𝑏,𝑔,𝑥   𝑆,𝑏,𝑐   𝑇,𝑐
Allowed substitution hints:   𝑆(𝑦, 𝑣, 𝑢)   𝑇(𝑦, 𝑣, 𝑢)   𝑂(𝑥, 𝑣, 𝑔, 𝑎, 𝑏)   𝑉(𝑥, 𝑦, 𝑣, 𝑢, 𝑔, 𝑎, 𝑏, 𝑐)   𝑊(𝑥, 𝑦, 𝑣, 𝑢, 𝑔, 𝑎, 𝑏, 𝑐)

Proof of Theorem noetalem2
StepHypRef Expression
1 elex 3471 . . . 4 (𝐴𝑉𝐴 ∈ V)
21anim2i 629 . . 3 ((𝐴 No 𝐴𝑉) → (𝐴 No 𝐴 ∈ V))
3 elex 3471 . . . 4 (𝐵𝑊𝐵 ∈ V)
43anim2i 629 . . 3 ((𝐵 No 𝐵𝑊) → (𝐵 No 𝐵 ∈ V))
5 id 23 . . 3 (∀𝑎𝐴𝑏𝐵 𝑎 <s 𝑏 → ∀𝑎𝐴𝑏𝐵 𝑎 <s 𝑏)
62, 4, 53anim123i 1169 . 2 (((𝐴 No 𝐴𝑉) ∧ (𝐵 No 𝐵𝑊) ∧ ∀𝑎𝐴𝑏𝐵 𝑎 <s 𝑏) → ((𝐴 No 𝐴 ∈ V) ∧ (𝐵 No 𝐵 ∈ V) ∧ ∀𝑎𝐴𝑏𝐵 𝑎 <s 𝑏))
7 noetalem2.1 . . . 4 𝑆 = if(∃𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦, ((𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦) ∪ {⟨dom (𝑥𝐴𝑦𝐴 ¬ 𝑥 <s 𝑦), 2o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐴 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐴 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐴𝑣 <s 𝑢 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))))
8 noetalem2.2 . . . 4 𝑇 = if(∃𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥, ((𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥) ∪ {⟨dom (𝑥𝐵𝑦𝐵 ¬ 𝑦 <s 𝑥), 1o⟩}), (𝑔 ∈ {𝑦 ∣ ∃𝑢𝐵 (𝑦 ∈ dom 𝑢 ∧ ∀𝑣𝐵𝑢 <s 𝑣 → (𝑢 ↾ suc 𝑦) = (𝑣 ↾ suc 𝑦)))} ↦ (℩𝑥𝑢𝐵 (𝑔 ∈ dom 𝑢 ∧ ∀𝑣𝐵𝑢 <s 𝑣 → (𝑢 ↾ suc 𝑔) = (𝑣 ↾ suc 𝑔)) ∧ (𝑢𝑔) = 𝑥))))
9 eqid 2760 . . . 4 (𝑆 ∪ ((suc ( bday 𝐵) ∖ dom 𝑆) × {1o})) = (𝑆 ∪ ((suc ( bday 𝐵) ∖ dom 𝑆) × {1o}))
10 eqid 2760 . . . 4 (𝑇 ∪ ((suc ( bday 𝐴) ∖ dom 𝑇) × {2o})) = (𝑇 ∪ ((suc ( bday 𝐴) ∖ dom 𝑇) × {2o}))
117, 8, 9, 10noetalem1 28017 . . 3 ((((𝐴 No 𝐴 ∈ V) ∧ (𝐵 No 𝐵 ∈ V) ∧ ∀𝑎𝐴𝑏𝐵 𝑎 <s 𝑏) ∧ (𝑂 ∈ On ∧ ( bday “ (𝐴𝐵)) ⊆ 𝑂)) → ((𝑆 No ∧ (∀𝑎𝐴 𝑎 <s 𝑆 ∧ ∀𝑏𝐵 𝑆 <s 𝑏 ∧ ( bday 𝑆) ⊆ 𝑂)) ∨ (𝑇 No ∧ (∀𝑎𝐴 𝑎 <s 𝑇 ∧ ∀𝑏𝐵 𝑇 <s 𝑏 ∧ ( bday 𝑇) ⊆ 𝑂))))
12 breq2 5107 . . . . . . 7 (𝑐 = 𝑆 → (𝑎 <s 𝑐𝑎 <s 𝑆))
1312ralbidv 3185 . . . . . 6 (𝑐 = 𝑆 → (∀𝑎𝐴 𝑎 <s 𝑐 ↔ ∀𝑎𝐴 𝑎 <s 𝑆))
14 breq1 5106 . . . . . . 7 (𝑐 = 𝑆 → (𝑐 <s 𝑏𝑆 <s 𝑏))
1514ralbidv 3185 . . . . . 6 (𝑐 = 𝑆 → (∀𝑏𝐵 𝑐 <s 𝑏 ↔ ∀𝑏𝐵 𝑆 <s 𝑏))
16 fveq2 6874 . . . . . . 7 (𝑐 = 𝑆 → ( bday 𝑐) = ( bday 𝑆))
1716sseq1d 3962 . . . . . 6 (𝑐 = 𝑆 → (( bday 𝑐) ⊆ 𝑂 ↔ ( bday 𝑆) ⊆ 𝑂))
1813, 15, 173anbi123d 1464 . . . . 5 (𝑐 = 𝑆 → ((∀𝑎𝐴 𝑎 <s 𝑐 ∧ ∀𝑏𝐵 𝑐 <s 𝑏 ∧ ( bday 𝑐) ⊆ 𝑂) ↔ (∀𝑎𝐴 𝑎 <s 𝑆 ∧ ∀𝑏𝐵 𝑆 <s 𝑏 ∧ ( bday 𝑆) ⊆ 𝑂)))
1918rspcev 3576 . . . 4 ((𝑆 No ∧ (∀𝑎𝐴 𝑎 <s 𝑆 ∧ ∀𝑏𝐵 𝑆 <s 𝑏 ∧ ( bday 𝑆) ⊆ 𝑂)) → ∃𝑐 No (∀𝑎𝐴 𝑎 <s 𝑐 ∧ ∀𝑏𝐵 𝑐 <s 𝑏 ∧ ( bday 𝑐) ⊆ 𝑂))
20 breq2 5107 . . . . . . 7 (𝑐 = 𝑇 → (𝑎 <s 𝑐𝑎 <s 𝑇))
2120ralbidv 3185 . . . . . 6 (𝑐 = 𝑇 → (∀𝑎𝐴 𝑎 <s 𝑐 ↔ ∀𝑎𝐴 𝑎 <s 𝑇))
22 breq1 5106 . . . . . . 7 (𝑐 = 𝑇 → (𝑐 <s 𝑏𝑇 <s 𝑏))
2322ralbidv 3185 . . . . . 6 (𝑐 = 𝑇 → (∀𝑏𝐵 𝑐 <s 𝑏 ↔ ∀𝑏𝐵 𝑇 <s 𝑏))
24 fveq2 6874 . . . . . . 7 (𝑐 = 𝑇 → ( bday 𝑐) = ( bday 𝑇))
2524sseq1d 3962 . . . . . 6 (𝑐 = 𝑇 → (( bday 𝑐) ⊆ 𝑂 ↔ ( bday 𝑇) ⊆ 𝑂))
2621, 23, 253anbi123d 1464 . . . . 5 (𝑐 = 𝑇 → ((∀𝑎𝐴 𝑎 <s 𝑐 ∧ ∀𝑏𝐵 𝑐 <s 𝑏 ∧ ( bday 𝑐) ⊆ 𝑂) ↔ (∀𝑎𝐴 𝑎 <s 𝑇 ∧ ∀𝑏𝐵 𝑇 <s 𝑏 ∧ ( bday 𝑇) ⊆ 𝑂)))
2726rspcev 3576 . . . 4 ((𝑇 No ∧ (∀𝑎𝐴 𝑎 <s 𝑇 ∧ ∀𝑏𝐵 𝑇 <s 𝑏 ∧ ( bday 𝑇) ⊆ 𝑂)) → ∃𝑐 No (∀𝑎𝐴 𝑎 <s 𝑐 ∧ ∀𝑏𝐵 𝑐 <s 𝑏 ∧ ( bday 𝑐) ⊆ 𝑂))
2819, 27jaoi 871 . . 3 (((𝑆 No ∧ (∀𝑎𝐴 𝑎 <s 𝑆 ∧ ∀𝑏𝐵 𝑆 <s 𝑏 ∧ ( bday 𝑆) ⊆ 𝑂)) ∨ (𝑇 No ∧ (∀𝑎𝐴 𝑎 <s 𝑇 ∧ ∀𝑏𝐵 𝑇 <s 𝑏 ∧ ( bday 𝑇) ⊆ 𝑂))) → ∃𝑐 No (∀𝑎𝐴 𝑎 <s 𝑐 ∧ ∀𝑏𝐵 𝑐 <s 𝑏 ∧ ( bday 𝑐) ⊆ 𝑂))
2911, 28syl 18 . 2 ((((𝐴 No 𝐴 ∈ V) ∧ (𝐵 No 𝐵 ∈ V) ∧ ∀𝑎𝐴𝑏𝐵 𝑎 <s 𝑏) ∧ (𝑂 ∈ On ∧ ( bday “ (𝐴𝐵)) ⊆ 𝑂)) → ∃𝑐 No (∀𝑎𝐴 𝑎 <s 𝑐 ∧ ∀𝑏𝐵 𝑐 <s 𝑏 ∧ ( bday 𝑐) ⊆ 𝑂))
306, 29sylan 592 1 ((((𝐴 No 𝐴𝑉) ∧ (𝐵 No 𝐵𝑊) ∧ ∀𝑎𝐴𝑏𝐵 𝑎 <s 𝑏) ∧ (𝑂 ∈ On ∧ ( bday “ (𝐴𝐵)) ⊆ 𝑂)) → ∃𝑐 No (∀𝑎𝐴 𝑎 <s 𝑐 ∧ ∀𝑏𝐵 𝑐 <s 𝑏 ∧ ( bday 𝑐) ⊆ 𝑂))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3  wi 4  wa 401  wo 861  w3a 1103   = wceq 1570  wcel 2145  {cab 2738  wral 3076  wrex 3086  Vcvv 3450  cdif 3896  cun 3897  wss 3899  ifcif 4482  {csn 4584  cop 4590   cuni 4867   class class class wbr 5103  cmpt 5186   × cxp 5646  dom cdm 5648  cres 5650  cima 5651  Oncon0 6352  suc csuc 6354  cio 6482  cfv 6528  crio 7365  1oc1o 8448  2oc2o 8449   No csur 27916   <s clts 27917   bday cbday 27918
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7735
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-tp 4589  df-op 4591  df-uni 4868  df-int 4908  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5543  df-eprel 5548  df-po 5556  df-so 5557  df-fr 5601  df-we 5603  df-xp 5654  df-rel 5655  df-cnv 5656  df-co 5657  df-dm 5658  df-rn 5659  df-res 5660  df-ima 5661  df-ord 6355  df-on 6356  df-suc 6358  df-iota 6484  df-fun 6530  df-fn 6531  df-f 6532  df-f1 6533  df-fo 6534  df-f1o 6535  df-fv 6536  df-riota 7366  df-1o 8455  df-2o 8456  df-no 27919  df-lts 27920  df-bday 27921
This theorem is used by:  noeta  28019
  Copyright terms: Public domain W3C validator