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

Theorem fmlasuc0 34364
Description: The valid Godel formulas of height (𝑁 + 1). (Contributed by AV, 18-Sep-2023.)
Assertion
Ref Expression
fmlasuc0 (𝑁 ∈ Ο‰ β†’ (Fmlaβ€˜suc 𝑁) = ((Fmlaβ€˜π‘) βˆͺ {π‘₯ ∣ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))}))
Distinct variable groups:   𝑒,𝑁,𝑣,π‘₯   𝑒,𝑖,𝑣,π‘₯
Allowed substitution hint:   𝑁(𝑖)

Proof of Theorem fmlasuc0
Dummy variables 𝑓 𝑦 𝑛 𝑗 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 df-fmla 34325 . . 3 Fmla = (𝑛 ∈ suc Ο‰ ↦ dom ((βˆ… Sat βˆ…)β€˜π‘›))
2 fveq2 6889 . . . 4 (𝑛 = suc 𝑁 β†’ ((βˆ… Sat βˆ…)β€˜π‘›) = ((βˆ… Sat βˆ…)β€˜suc 𝑁))
32dmeqd 5904 . . 3 (𝑛 = suc 𝑁 β†’ dom ((βˆ… Sat βˆ…)β€˜π‘›) = dom ((βˆ… Sat βˆ…)β€˜suc 𝑁))
4 omsucelsucb 8455 . . . 4 (𝑁 ∈ Ο‰ ↔ suc 𝑁 ∈ suc Ο‰)
54biimpi 215 . . 3 (𝑁 ∈ Ο‰ β†’ suc 𝑁 ∈ suc Ο‰)
6 fvex 6902 . . . . 5 ((βˆ… Sat βˆ…)β€˜suc 𝑁) ∈ V
76dmex 7899 . . . 4 dom ((βˆ… Sat βˆ…)β€˜suc 𝑁) ∈ V
87a1i 11 . . 3 (𝑁 ∈ Ο‰ β†’ dom ((βˆ… Sat βˆ…)β€˜suc 𝑁) ∈ V)
91, 3, 5, 8fvmptd3 7019 . 2 (𝑁 ∈ Ο‰ β†’ (Fmlaβ€˜suc 𝑁) = dom ((βˆ… Sat βˆ…)β€˜suc 𝑁))
10 satf0sucom 34353 . . . . 5 (suc 𝑁 ∈ suc Ο‰ β†’ ((βˆ… Sat βˆ…)β€˜suc 𝑁) = (rec((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})), {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘– ∈ Ο‰ βˆƒπ‘— ∈ Ο‰ π‘₯ = (π‘–βˆˆπ‘”π‘—))})β€˜suc 𝑁))
115, 10syl 17 . . . 4 (𝑁 ∈ Ο‰ β†’ ((βˆ… Sat βˆ…)β€˜suc 𝑁) = (rec((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})), {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘– ∈ Ο‰ βˆƒπ‘— ∈ Ο‰ π‘₯ = (π‘–βˆˆπ‘”π‘—))})β€˜suc 𝑁))
12 nnon 7858 . . . . 5 (𝑁 ∈ Ο‰ β†’ 𝑁 ∈ On)
13 rdgsuc 8421 . . . . 5 (𝑁 ∈ On β†’ (rec((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})), {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘– ∈ Ο‰ βˆƒπ‘— ∈ Ο‰ π‘₯ = (π‘–βˆˆπ‘”π‘—))})β€˜suc 𝑁) = ((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}))β€˜(rec((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})), {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘– ∈ Ο‰ βˆƒπ‘— ∈ Ο‰ π‘₯ = (π‘–βˆˆπ‘”π‘—))})β€˜π‘)))
1412, 13syl 17 . . . 4 (𝑁 ∈ Ο‰ β†’ (rec((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})), {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘– ∈ Ο‰ βˆƒπ‘— ∈ Ο‰ π‘₯ = (π‘–βˆˆπ‘”π‘—))})β€˜suc 𝑁) = ((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}))β€˜(rec((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})), {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘– ∈ Ο‰ βˆƒπ‘— ∈ Ο‰ π‘₯ = (π‘–βˆˆπ‘”π‘—))})β€˜π‘)))
1511, 14eqtrd 2773 . . 3 (𝑁 ∈ Ο‰ β†’ ((βˆ… Sat βˆ…)β€˜suc 𝑁) = ((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}))β€˜(rec((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})), {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘– ∈ Ο‰ βˆƒπ‘— ∈ Ο‰ π‘₯ = (π‘–βˆˆπ‘”π‘—))})β€˜π‘)))
1615dmeqd 5904 . 2 (𝑁 ∈ Ο‰ β†’ dom ((βˆ… Sat βˆ…)β€˜suc 𝑁) = dom ((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}))β€˜(rec((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})), {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘– ∈ Ο‰ βˆƒπ‘— ∈ Ο‰ π‘₯ = (π‘–βˆˆπ‘”π‘—))})β€˜π‘)))
17 elelsuc 6435 . . . . . . . 8 (𝑁 ∈ Ο‰ β†’ 𝑁 ∈ suc Ο‰)
18 satf0sucom 34353 . . . . . . . . 9 (𝑁 ∈ suc Ο‰ β†’ ((βˆ… Sat βˆ…)β€˜π‘) = (rec((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})), {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘– ∈ Ο‰ βˆƒπ‘— ∈ Ο‰ π‘₯ = (π‘–βˆˆπ‘”π‘—))})β€˜π‘))
1918eqcomd 2739 . . . . . . . 8 (𝑁 ∈ suc Ο‰ β†’ (rec((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})), {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘– ∈ Ο‰ βˆƒπ‘— ∈ Ο‰ π‘₯ = (π‘–βˆˆπ‘”π‘—))})β€˜π‘) = ((βˆ… Sat βˆ…)β€˜π‘))
2017, 19syl 17 . . . . . . 7 (𝑁 ∈ Ο‰ β†’ (rec((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})), {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘– ∈ Ο‰ βˆƒπ‘— ∈ Ο‰ π‘₯ = (π‘–βˆˆπ‘”π‘—))})β€˜π‘) = ((βˆ… Sat βˆ…)β€˜π‘))
2120fveq2d 6893 . . . . . 6 (𝑁 ∈ Ο‰ β†’ ((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}))β€˜(rec((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})), {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘– ∈ Ο‰ βˆƒπ‘— ∈ Ο‰ π‘₯ = (π‘–βˆˆπ‘”π‘—))})β€˜π‘)) = ((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}))β€˜((βˆ… Sat βˆ…)β€˜π‘)))
22 eqidd 2734 . . . . . . 7 (𝑁 ∈ Ο‰ β†’ (𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})) = (𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})))
23 id 22 . . . . . . . . 9 (𝑓 = ((βˆ… Sat βˆ…)β€˜π‘) β†’ 𝑓 = ((βˆ… Sat βˆ…)β€˜π‘))
24 rexeq 3322 . . . . . . . . . . . . 13 (𝑓 = ((βˆ… Sat βˆ…)β€˜π‘) β†’ (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ↔ βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£))))
2524orbi1d 916 . . . . . . . . . . . 12 (𝑓 = ((βˆ… Sat βˆ…)β€˜π‘) β†’ ((βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)) ↔ (βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))))
2625rexeqbi1dv 3335 . . . . . . . . . . 11 (𝑓 = ((βˆ… Sat βˆ…)β€˜π‘) β†’ (βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)) ↔ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))))
2726anbi2d 630 . . . . . . . . . 10 (𝑓 = ((βˆ… Sat βˆ…)β€˜π‘) β†’ ((𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))) ↔ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))))
2827opabbidv 5214 . . . . . . . . 9 (𝑓 = ((βˆ… Sat βˆ…)β€˜π‘) β†’ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))} = {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})
2923, 28uneq12d 4164 . . . . . . . 8 (𝑓 = ((βˆ… Sat βˆ…)β€˜π‘) β†’ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}) = (((βˆ… Sat βˆ…)β€˜π‘) βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}))
3029adantl 483 . . . . . . 7 ((𝑁 ∈ Ο‰ ∧ 𝑓 = ((βˆ… Sat βˆ…)β€˜π‘)) β†’ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}) = (((βˆ… Sat βˆ…)β€˜π‘) βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}))
31 fvex 6902 . . . . . . . 8 ((βˆ… Sat βˆ…)β€˜π‘) ∈ V
3231a1i 11 . . . . . . 7 (𝑁 ∈ Ο‰ β†’ ((βˆ… Sat βˆ…)β€˜π‘) ∈ V)
33 peano1 7876 . . . . . . . . . . . . 13 βˆ… ∈ Ο‰
34 eleq1 2822 . . . . . . . . . . . . 13 (𝑦 = βˆ… β†’ (𝑦 ∈ Ο‰ ↔ βˆ… ∈ Ο‰))
3533, 34mpbiri 258 . . . . . . . . . . . 12 (𝑦 = βˆ… β†’ 𝑦 ∈ Ο‰)
3635adantr 482 . . . . . . . . . . 11 ((𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))) β†’ 𝑦 ∈ Ο‰)
3736pm4.71ri 562 . . . . . . . . . 10 ((𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))) ↔ (𝑦 ∈ Ο‰ ∧ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))))
3837opabbii 5215 . . . . . . . . 9 {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))} = {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 ∈ Ο‰ ∧ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))))}
39 omex 9635 . . . . . . . . . . . 12 Ο‰ ∈ V
40 id 22 . . . . . . . . . . . . 13 (Ο‰ ∈ V β†’ Ο‰ ∈ V)
41 unab 4298 . . . . . . . . . . . . . . . . 17 ({π‘₯ ∣ βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£))} βˆͺ {π‘₯ ∣ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)}) = {π‘₯ ∣ (βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))}
4231abrexex 7946 . . . . . . . . . . . . . . . . . 18 {π‘₯ ∣ βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£))} ∈ V
4339abrexex 7946 . . . . . . . . . . . . . . . . . 18 {π‘₯ ∣ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)} ∈ V
4442, 43unex 7730 . . . . . . . . . . . . . . . . 17 ({π‘₯ ∣ βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£))} βˆͺ {π‘₯ ∣ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)}) ∈ V
4541, 44eqeltrri 2831 . . . . . . . . . . . . . . . 16 {π‘₯ ∣ (βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))} ∈ V
4645a1i 11 . . . . . . . . . . . . . . 15 (((Ο‰ ∈ V ∧ 𝑦 ∈ Ο‰) ∧ 𝑒 ∈ ((βˆ… Sat βˆ…)β€˜π‘)) β†’ {π‘₯ ∣ (βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))} ∈ V)
4746ralrimiva 3147 . . . . . . . . . . . . . 14 ((Ο‰ ∈ V ∧ 𝑦 ∈ Ο‰) β†’ βˆ€π‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘){π‘₯ ∣ (βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))} ∈ V)
48 abrexex2g 7948 . . . . . . . . . . . . . 14 ((((βˆ… Sat βˆ…)β€˜π‘) ∈ V ∧ βˆ€π‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘){π‘₯ ∣ (βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))} ∈ V) β†’ {π‘₯ ∣ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))} ∈ V)
4931, 47, 48sylancr 588 . . . . . . . . . . . . 13 ((Ο‰ ∈ V ∧ 𝑦 ∈ Ο‰) β†’ {π‘₯ ∣ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))} ∈ V)
5040, 49opabex3rd 7950 . . . . . . . . . . . 12 (Ο‰ ∈ V β†’ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 ∈ Ο‰ ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))} ∈ V)
5139, 50ax-mp 5 . . . . . . . . . . 11 {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 ∈ Ο‰ ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))} ∈ V
52 simpr 486 . . . . . . . . . . . . 13 ((𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))) β†’ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))
5352anim2i 618 . . . . . . . . . . . 12 ((𝑦 ∈ Ο‰ ∧ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))) β†’ (𝑦 ∈ Ο‰ ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))))
5453ssopab2i 5550 . . . . . . . . . . 11 {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 ∈ Ο‰ ∧ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))))} βŠ† {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 ∈ Ο‰ ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}
5551, 54ssexi 5322 . . . . . . . . . 10 {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 ∈ Ο‰ ∧ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))))} ∈ V
5655a1i 11 . . . . . . . . 9 (𝑁 ∈ Ο‰ β†’ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 ∈ Ο‰ ∧ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))))} ∈ V)
5738, 56eqeltrid 2838 . . . . . . . 8 (𝑁 ∈ Ο‰ β†’ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))} ∈ V)
58 unexg 7733 . . . . . . . 8 ((((βˆ… Sat βˆ…)β€˜π‘) ∈ V ∧ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))} ∈ V) β†’ (((βˆ… Sat βˆ…)β€˜π‘) βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}) ∈ V)
5931, 57, 58sylancr 588 . . . . . . 7 (𝑁 ∈ Ο‰ β†’ (((βˆ… Sat βˆ…)β€˜π‘) βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}) ∈ V)
6022, 30, 32, 59fvmptd 7003 . . . . . 6 (𝑁 ∈ Ο‰ β†’ ((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}))β€˜((βˆ… Sat βˆ…)β€˜π‘)) = (((βˆ… Sat βˆ…)β€˜π‘) βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}))
6121, 60eqtrd 2773 . . . . 5 (𝑁 ∈ Ο‰ β†’ ((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}))β€˜(rec((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})), {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘– ∈ Ο‰ βˆƒπ‘— ∈ Ο‰ π‘₯ = (π‘–βˆˆπ‘”π‘—))})β€˜π‘)) = (((βˆ… Sat βˆ…)β€˜π‘) βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}))
6261dmeqd 5904 . . . 4 (𝑁 ∈ Ο‰ β†’ dom ((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}))β€˜(rec((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})), {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘– ∈ Ο‰ βˆƒπ‘— ∈ Ο‰ π‘₯ = (π‘–βˆˆπ‘”π‘—))})β€˜π‘)) = dom (((βˆ… Sat βˆ…)β€˜π‘) βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}))
63 dmun 5909 . . . 4 dom (((βˆ… Sat βˆ…)β€˜π‘) βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}) = (dom ((βˆ… Sat βˆ…)β€˜π‘) βˆͺ dom {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})
6462, 63eqtrdi 2789 . . 3 (𝑁 ∈ Ο‰ β†’ dom ((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}))β€˜(rec((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})), {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘– ∈ Ο‰ βˆƒπ‘— ∈ Ο‰ π‘₯ = (π‘–βˆˆπ‘”π‘—))})β€˜π‘)) = (dom ((βˆ… Sat βˆ…)β€˜π‘) βˆͺ dom {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}))
65 fmlafv 34360 . . . . . 6 (𝑁 ∈ suc Ο‰ β†’ (Fmlaβ€˜π‘) = dom ((βˆ… Sat βˆ…)β€˜π‘))
6617, 65syl 17 . . . . 5 (𝑁 ∈ Ο‰ β†’ (Fmlaβ€˜π‘) = dom ((βˆ… Sat βˆ…)β€˜π‘))
6766eqcomd 2739 . . . 4 (𝑁 ∈ Ο‰ β†’ dom ((βˆ… Sat βˆ…)β€˜π‘) = (Fmlaβ€˜π‘))
68 dmopab 5914 . . . . . 6 dom {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))} = {π‘₯ ∣ βˆƒπ‘¦(𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}
6968a1i 11 . . . . 5 (𝑁 ∈ Ο‰ β†’ dom {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))} = {π‘₯ ∣ βˆƒπ‘¦(𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})
70 0ex 5307 . . . . . . . 8 βˆ… ∈ V
7170isseti 3490 . . . . . . 7 βˆƒπ‘¦ 𝑦 = βˆ…
72 19.41v 1954 . . . . . . 7 (βˆƒπ‘¦(𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))) ↔ (βˆƒπ‘¦ 𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))))
7371, 72mpbiran 708 . . . . . 6 (βˆƒπ‘¦(𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))) ↔ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))
7473abbii 2803 . . . . 5 {π‘₯ ∣ βˆƒπ‘¦(𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))} = {π‘₯ ∣ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))}
7569, 74eqtrdi 2789 . . . 4 (𝑁 ∈ Ο‰ β†’ dom {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))} = {π‘₯ ∣ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))})
7667, 75uneq12d 4164 . . 3 (𝑁 ∈ Ο‰ β†’ (dom ((βˆ… Sat βˆ…)β€˜π‘) βˆͺ dom {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}) = ((Fmlaβ€˜π‘) βˆͺ {π‘₯ ∣ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))}))
7764, 76eqtrd 2773 . 2 (𝑁 ∈ Ο‰ β†’ dom ((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))}))β€˜(rec((𝑓 ∈ V ↦ (𝑓 βˆͺ {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘’ ∈ 𝑓 (βˆƒπ‘£ ∈ 𝑓 π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’)))})), {⟨π‘₯, π‘¦βŸ© ∣ (𝑦 = βˆ… ∧ βˆƒπ‘– ∈ Ο‰ βˆƒπ‘— ∈ Ο‰ π‘₯ = (π‘–βˆˆπ‘”π‘—))})β€˜π‘)) = ((Fmlaβ€˜π‘) βˆͺ {π‘₯ ∣ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))}))
789, 16, 773eqtrd 2777 1 (𝑁 ∈ Ο‰ β†’ (Fmlaβ€˜suc 𝑁) = ((Fmlaβ€˜π‘) βˆͺ {π‘₯ ∣ βˆƒπ‘’ ∈ ((βˆ… Sat βˆ…)β€˜π‘)(βˆƒπ‘£ ∈ ((βˆ… Sat βˆ…)β€˜π‘)π‘₯ = ((1st β€˜π‘’)βŠΌπ‘”(1st β€˜π‘£)) ∨ βˆƒπ‘– ∈ Ο‰ π‘₯ = βˆ€π‘”π‘–(1st β€˜π‘’))}))
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ∧ wa 397   ∨ wo 846   = wceq 1542  βˆƒwex 1782   ∈ wcel 2107  {cab 2710  βˆ€wral 3062  βˆƒwrex 3071  Vcvv 3475   βˆͺ cun 3946  βˆ…c0 4322  {copab 5210   ↦ cmpt 5231  dom cdm 5676  Oncon0 6362  suc csuc 6364  β€˜cfv 6541  (class class class)co 7406  Ο‰com 7852  1st c1st 7970  reccrdg 8406  βˆˆπ‘”cgoe 34313  βŠΌπ‘”cgna 34314  βˆ€π‘”cgol 34315   Sat csat 34316  Fmlacfmla 34317
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7722  ax-inf2 9633
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-ral 3063  df-rex 3072  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-iun 4999  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-pred 6298  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6493  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-ov 7409  df-oprab 7410  df-mpo 7411  df-om 7853  df-1st 7972  df-2nd 7973  df-frecs 8263  df-wrecs 8294  df-recs 8368  df-rdg 8407  df-map 8819  df-sat 34323  df-fmla 34325
This theorem is referenced by:  fmlafvel  34365  fmlasuc  34366
  Copyright terms: Public domain W3C validator