Users' Mathboxes Mathbox for Scott Fenton < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  frrlem14 Structured version   Visualization version   GIF version

Theorem frrlem14 33454
Description: Lemma for founded recursion. Finally, we tie all these threads together and show that dom 𝐹 = 𝐴 when given the right 𝑆. Specifically, we prove that there can be no 𝑅-minimal element of (𝐴 ∖ dom 𝐹). (Contributed by Scott Fenton, 7-Dec-2022.)
Hypotheses
Ref Expression
frrlem11.1 𝐵 = {𝑓 ∣ ∃𝑥(𝑓 Fn 𝑥 ∧ (𝑥𝐴 ∧ ∀𝑦𝑥 Pred(𝑅, 𝐴, 𝑦) ⊆ 𝑥) ∧ ∀𝑦𝑥 (𝑓𝑦) = (𝑦𝐺(𝑓 ↾ Pred(𝑅, 𝐴, 𝑦))))}
frrlem11.2 𝐹 = frecs(𝑅, 𝐴, 𝐺)
frrlem11.3 ((𝜑 ∧ (𝑔𝐵𝐵)) → ((𝑥𝑔𝑢𝑥𝑣) → 𝑢 = 𝑣))
frrlem11.4 𝐶 = ((𝐹𝑆) ∪ {⟨𝑧, (𝑧𝐺(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))⟩})
frrlem12.5 (𝜑𝑅 Fr 𝐴)
frrlem12.6 ((𝜑𝑧𝐴) → Pred(𝑅, 𝐴, 𝑧) ⊆ 𝑆)
frrlem12.7 ((𝜑𝑧𝐴) → ∀𝑤𝑆 Pred(𝑅, 𝐴, 𝑤) ⊆ 𝑆)
frrlem13.8 ((𝜑𝑧𝐴) → 𝑆 ∈ V)
frrlem13.9 ((𝜑𝑧𝐴) → 𝑆𝐴)
frrlem14.10 ((𝜑 ∧ (𝐴 ∖ dom 𝐹) ≠ ∅) → ∃𝑧 ∈ (𝐴 ∖ dom 𝐹)Pred(𝑅, (𝐴 ∖ dom 𝐹), 𝑧) = ∅)
Assertion
Ref Expression
frrlem14 (𝜑 → dom 𝐹 = 𝐴)
Distinct variable groups:   𝐴,𝑓,𝑥,𝑦,𝑧   𝑓,𝐺,𝑥,𝑦,𝑧   𝑅,𝑓,𝑥,𝑦,𝑧   𝐵,𝑔,,𝑧   𝑥,𝐹,𝑢,𝑣,𝑧   𝜑,𝑓,𝑧   𝑓,𝐹   𝜑,𝑔,,𝑥,𝑢,𝑣   𝐴,,𝑤,𝑓,𝑦,𝑥   𝑤,𝐺   𝑤,𝑅   𝑦,𝐹   𝑥,𝐵   𝑤,𝐶   𝑤,𝐹   𝜑,𝑤   𝑤,𝑆   𝑧,𝑤
Allowed substitution hints:   𝜑(𝑦)   𝐴(𝑣,𝑢,𝑔)   𝐵(𝑦,𝑤,𝑣,𝑢,𝑓)   𝐶(𝑥,𝑦,𝑧,𝑣,𝑢,𝑓,𝑔,)   𝑅(𝑣,𝑢,𝑔,)   𝑆(𝑥,𝑦,𝑧,𝑣,𝑢,𝑓,𝑔,)   𝐹(𝑔,)   𝐺(𝑣,𝑢,𝑔,)

Proof of Theorem frrlem14
StepHypRef Expression
1 frrlem11.1 . . . 4 𝐵 = {𝑓 ∣ ∃𝑥(𝑓 Fn 𝑥 ∧ (𝑥𝐴 ∧ ∀𝑦𝑥 Pred(𝑅, 𝐴, 𝑦) ⊆ 𝑥) ∧ ∀𝑦𝑥 (𝑓𝑦) = (𝑦𝐺(𝑓 ↾ Pred(𝑅, 𝐴, 𝑦))))}
2 frrlem11.2 . . . 4 𝐹 = frecs(𝑅, 𝐴, 𝐺)
31, 2frrlem7 33447 . . 3 dom 𝐹𝐴
43a1i 11 . 2 (𝜑 → dom 𝐹𝐴)
5 eldifn 4018 . . . . . . 7 (𝑧 ∈ (𝐴 ∖ dom 𝐹) → ¬ 𝑧 ∈ dom 𝐹)
65adantl 485 . . . . . 6 ((𝜑𝑧 ∈ (𝐴 ∖ dom 𝐹)) → ¬ 𝑧 ∈ dom 𝐹)
7 frrlem11.3 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑔𝐵𝐵)) → ((𝑥𝑔𝑢𝑥𝑣) → 𝑢 = 𝑣))
8 frrlem11.4 . . . . . . . . . . . 12 𝐶 = ((𝐹𝑆) ∪ {⟨𝑧, (𝑧𝐺(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))⟩})
9 frrlem12.5 . . . . . . . . . . . 12 (𝜑𝑅 Fr 𝐴)
10 frrlem12.6 . . . . . . . . . . . 12 ((𝜑𝑧𝐴) → Pred(𝑅, 𝐴, 𝑧) ⊆ 𝑆)
11 frrlem12.7 . . . . . . . . . . . 12 ((𝜑𝑧𝐴) → ∀𝑤𝑆 Pred(𝑅, 𝐴, 𝑤) ⊆ 𝑆)
12 frrlem13.8 . . . . . . . . . . . 12 ((𝜑𝑧𝐴) → 𝑆 ∈ V)
13 frrlem13.9 . . . . . . . . . . . 12 ((𝜑𝑧𝐴) → 𝑆𝐴)
141, 2, 7, 8, 9, 10, 11, 12, 13frrlem13 33453 . . . . . . . . . . 11 ((𝜑 ∧ (𝑧 ∈ (𝐴 ∖ dom 𝐹) ∧ Pred(𝑅, (𝐴 ∖ dom 𝐹), 𝑧) = ∅)) → 𝐶𝐵)
15 elssuni 4828 . . . . . . . . . . 11 (𝐶𝐵𝐶 𝐵)
1614, 15syl 17 . . . . . . . . . 10 ((𝜑 ∧ (𝑧 ∈ (𝐴 ∖ dom 𝐹) ∧ Pred(𝑅, (𝐴 ∖ dom 𝐹), 𝑧) = ∅)) → 𝐶 𝐵)
171, 2frrlem5 33445 . . . . . . . . . 10 𝐹 = 𝐵
1816, 17sseqtrrdi 3928 . . . . . . . . 9 ((𝜑 ∧ (𝑧 ∈ (𝐴 ∖ dom 𝐹) ∧ Pred(𝑅, (𝐴 ∖ dom 𝐹), 𝑧) = ∅)) → 𝐶𝐹)
19 dmss 5745 . . . . . . . . 9 (𝐶𝐹 → dom 𝐶 ⊆ dom 𝐹)
2018, 19syl 17 . . . . . . . 8 ((𝜑 ∧ (𝑧 ∈ (𝐴 ∖ dom 𝐹) ∧ Pred(𝑅, (𝐴 ∖ dom 𝐹), 𝑧) = ∅)) → dom 𝐶 ⊆ dom 𝐹)
21 ssun2 4063 . . . . . . . . . . 11 {𝑧} ⊆ (dom (𝐹𝑆) ∪ {𝑧})
22 vsnid 4553 . . . . . . . . . . 11 𝑧 ∈ {𝑧}
2321, 22sselii 3874 . . . . . . . . . 10 𝑧 ∈ (dom (𝐹𝑆) ∪ {𝑧})
248dmeqi 5747 . . . . . . . . . . 11 dom 𝐶 = dom ((𝐹𝑆) ∪ {⟨𝑧, (𝑧𝐺(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))⟩})
25 dmun 5753 . . . . . . . . . . 11 dom ((𝐹𝑆) ∪ {⟨𝑧, (𝑧𝐺(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))⟩}) = (dom (𝐹𝑆) ∪ dom {⟨𝑧, (𝑧𝐺(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))⟩})
26 ovex 7203 . . . . . . . . . . . . 13 (𝑧𝐺(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧))) ∈ V
2726dmsnop 6048 . . . . . . . . . . . 12 dom {⟨𝑧, (𝑧𝐺(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))⟩} = {𝑧}
2827uneq2i 4050 . . . . . . . . . . 11 (dom (𝐹𝑆) ∪ dom {⟨𝑧, (𝑧𝐺(𝐹 ↾ Pred(𝑅, 𝐴, 𝑧)))⟩}) = (dom (𝐹𝑆) ∪ {𝑧})
2924, 25, 283eqtri 2765 . . . . . . . . . 10 dom 𝐶 = (dom (𝐹𝑆) ∪ {𝑧})
3023, 29eleqtrri 2832 . . . . . . . . 9 𝑧 ∈ dom 𝐶
3130a1i 11 . . . . . . . 8 ((𝜑 ∧ (𝑧 ∈ (𝐴 ∖ dom 𝐹) ∧ Pred(𝑅, (𝐴 ∖ dom 𝐹), 𝑧) = ∅)) → 𝑧 ∈ dom 𝐶)
3220, 31sseldd 3878 . . . . . . 7 ((𝜑 ∧ (𝑧 ∈ (𝐴 ∖ dom 𝐹) ∧ Pred(𝑅, (𝐴 ∖ dom 𝐹), 𝑧) = ∅)) → 𝑧 ∈ dom 𝐹)
3332expr 460 . . . . . 6 ((𝜑𝑧 ∈ (𝐴 ∖ dom 𝐹)) → (Pred(𝑅, (𝐴 ∖ dom 𝐹), 𝑧) = ∅ → 𝑧 ∈ dom 𝐹))
346, 33mtod 201 . . . . 5 ((𝜑𝑧 ∈ (𝐴 ∖ dom 𝐹)) → ¬ Pred(𝑅, (𝐴 ∖ dom 𝐹), 𝑧) = ∅)
3534nrexdv 3180 . . . 4 (𝜑 → ¬ ∃𝑧 ∈ (𝐴 ∖ dom 𝐹)Pred(𝑅, (𝐴 ∖ dom 𝐹), 𝑧) = ∅)
36 df-ne 2935 . . . . . 6 ((𝐴 ∖ dom 𝐹) ≠ ∅ ↔ ¬ (𝐴 ∖ dom 𝐹) = ∅)
37 frrlem14.10 . . . . . 6 ((𝜑 ∧ (𝐴 ∖ dom 𝐹) ≠ ∅) → ∃𝑧 ∈ (𝐴 ∖ dom 𝐹)Pred(𝑅, (𝐴 ∖ dom 𝐹), 𝑧) = ∅)
3836, 37sylan2br 598 . . . . 5 ((𝜑 ∧ ¬ (𝐴 ∖ dom 𝐹) = ∅) → ∃𝑧 ∈ (𝐴 ∖ dom 𝐹)Pred(𝑅, (𝐴 ∖ dom 𝐹), 𝑧) = ∅)
3938ex 416 . . . 4 (𝜑 → (¬ (𝐴 ∖ dom 𝐹) = ∅ → ∃𝑧 ∈ (𝐴 ∖ dom 𝐹)Pred(𝑅, (𝐴 ∖ dom 𝐹), 𝑧) = ∅))
4035, 39mt3d 150 . . 3 (𝜑 → (𝐴 ∖ dom 𝐹) = ∅)
41 ssdif0 4252 . . 3 (𝐴 ⊆ dom 𝐹 ↔ (𝐴 ∖ dom 𝐹) = ∅)
4240, 41sylibr 237 . 2 (𝜑𝐴 ⊆ dom 𝐹)
434, 42eqssd 3894 1 (𝜑 → dom 𝐹 = 𝐴)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 399  w3a 1088   = wceq 1542  wex 1786  wcel 2114  {cab 2716  wne 2934  wral 3053  wrex 3054  Vcvv 3398  cdif 3840  cun 3841  wss 3843  c0 4211  {csn 4516  cop 4522   cuni 4796   class class class wbr 5030   Fr wfr 5480  dom cdm 5525  cres 5527  Predcpred 6128   Fn wfn 6334  cfv 6339  (class class class)co 7170  frecscfrecs 33435
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 1975  ax-7 2020  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2162  ax-12 2179  ax-ext 2710  ax-rep 5154  ax-sep 5167  ax-nul 5174  ax-pr 5296  ax-un 7479
This theorem depends on definitions:  df-bi 210  df-an 400  df-or 847  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1787  df-nf 1791  df-sb 2075  df-mo 2540  df-eu 2570  df-clab 2717  df-cleq 2730  df-clel 2811  df-nfc 2881  df-ne 2935  df-ral 3058  df-rex 3059  df-reu 3060  df-rab 3062  df-v 3400  df-sbc 3681  df-csb 3791  df-dif 3846  df-un 3848  df-in 3850  df-ss 3860  df-nul 4212  df-if 4415  df-sn 4517  df-pr 4519  df-op 4523  df-uni 4797  df-iun 4883  df-br 5031  df-opab 5093  df-mpt 5111  df-id 5429  df-fr 5483  df-xp 5531  df-rel 5532  df-cnv 5533  df-co 5534  df-dm 5535  df-rn 5536  df-res 5537  df-ima 5538  df-pred 6129  df-iota 6297  df-fun 6341  df-fn 6342  df-f 6343  df-f1 6344  df-fo 6345  df-f1o 6346  df-fv 6347  df-ov 7173  df-frecs 33436
This theorem is referenced by:  fpr1  33457  frr1  33462
  Copyright terms: Public domain W3C validator