ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  tfr1onlemaccex GIF version

Theorem tfr1onlemaccex 6374
Description: We can define an acceptable function on any element of 𝑋.

As with many of the transfinite recursion theorems, we have hypotheses that state that 𝐹 is a function and that it is defined up to 𝑋. (Contributed by Jim Kingdon, 16-Mar-2022.)

Hypotheses
Ref Expression
tfr1on.f 𝐹 = recs(𝐺)
tfr1on.g (𝜑 → Fun 𝐺)
tfr1on.x (𝜑 → Ord 𝑋)
tfr1on.ex ((𝜑𝑥𝑋𝑓 Fn 𝑥) → (𝐺𝑓) ∈ V)
tfr1onlemsucfn.1 𝐴 = {𝑓 ∣ ∃𝑥𝑋 (𝑓 Fn 𝑥 ∧ ∀𝑦𝑥 (𝑓𝑦) = (𝐺‘(𝑓𝑦)))}
tfr1onlemaccex.u ((𝜑𝑥 𝑋) → suc 𝑥𝑋)
Assertion
Ref Expression
tfr1onlemaccex ((𝜑𝐶𝑋) → ∃𝑔(𝑔 Fn 𝐶 ∧ ∀𝑢𝐶 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))
Distinct variable groups:   𝑢,𝐴,𝑥   𝐶,𝑔,𝑢   𝑔,𝐺,𝑢,𝑥   𝑓,𝐺,𝑦,𝑥   𝑥,𝑋,𝑓   𝜑,𝑥   𝑦,𝑔   𝜑,𝑓
Allowed substitution hints:   𝜑(𝑦,𝑢,𝑔)   𝐴(𝑦,𝑓,𝑔)   𝐶(𝑥,𝑦,𝑓)   𝐹(𝑥,𝑦,𝑢,𝑓,𝑔)   𝑋(𝑦,𝑢,𝑔)

Proof of Theorem tfr1onlemaccex
Dummy variables 𝑎 𝑏 𝑐 𝑑 𝑟 𝑠 𝑡 𝑧 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 tfr1on.x . . 3 (𝜑 → Ord 𝑋)
2 ordelon 4401 . . 3 ((Ord 𝑋𝐶𝑋) → 𝐶 ∈ On)
31, 2sylan 283 . 2 ((𝜑𝐶𝑋) → 𝐶 ∈ On)
4 eleq1 2252 . . . . 5 (𝑧 = 𝑤 → (𝑧𝑋𝑤𝑋))
54anbi2d 464 . . . 4 (𝑧 = 𝑤 → ((𝜑𝑧𝑋) ↔ (𝜑𝑤𝑋)))
6 fneq2 5324 . . . . . 6 (𝑧 = 𝑤 → (𝑔 Fn 𝑧𝑔 Fn 𝑤))
7 raleq 2686 . . . . . 6 (𝑧 = 𝑤 → (∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢)) ↔ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))
86, 7anbi12d 473 . . . . 5 (𝑧 = 𝑤 → ((𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢))) ↔ (𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
98exbidv 1836 . . . 4 (𝑧 = 𝑤 → (∃𝑔(𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢))) ↔ ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
105, 9imbi12d 234 . . 3 (𝑧 = 𝑤 → (((𝜑𝑧𝑋) → ∃𝑔(𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))) ↔ ((𝜑𝑤𝑋) → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))))
11 eleq1 2252 . . . . 5 (𝑧 = 𝐶 → (𝑧𝑋𝐶𝑋))
1211anbi2d 464 . . . 4 (𝑧 = 𝐶 → ((𝜑𝑧𝑋) ↔ (𝜑𝐶𝑋)))
13 fneq2 5324 . . . . . 6 (𝑧 = 𝐶 → (𝑔 Fn 𝑧𝑔 Fn 𝐶))
14 raleq 2686 . . . . . 6 (𝑧 = 𝐶 → (∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢)) ↔ ∀𝑢𝐶 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))
1513, 14anbi12d 473 . . . . 5 (𝑧 = 𝐶 → ((𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢))) ↔ (𝑔 Fn 𝐶 ∧ ∀𝑢𝐶 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
1615exbidv 1836 . . . 4 (𝑧 = 𝐶 → (∃𝑔(𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢))) ↔ ∃𝑔(𝑔 Fn 𝐶 ∧ ∀𝑢𝐶 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
1712, 16imbi12d 234 . . 3 (𝑧 = 𝐶 → (((𝜑𝑧𝑋) → ∃𝑔(𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))) ↔ ((𝜑𝐶𝑋) → ∃𝑔(𝑔 Fn 𝐶 ∧ ∀𝑢𝐶 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))))
18 tfr1on.f . . . . . . . . 9 𝐹 = recs(𝐺)
19 tfr1on.g . . . . . . . . . 10 (𝜑 → Fun 𝐺)
2019ad3antrrr 492 . . . . . . . . 9 ((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) → Fun 𝐺)
211ad3antrrr 492 . . . . . . . . 9 ((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) → Ord 𝑋)
22 tfr1on.ex . . . . . . . . . . . . . . . . 17 ((𝜑𝑥𝑋𝑓 Fn 𝑥) → (𝐺𝑓) ∈ V)
23223expia 1207 . . . . . . . . . . . . . . . 16 ((𝜑𝑥𝑋) → (𝑓 Fn 𝑥 → (𝐺𝑓) ∈ V))
2423alrimiv 1885 . . . . . . . . . . . . . . 15 ((𝜑𝑥𝑋) → ∀𝑓(𝑓 Fn 𝑥 → (𝐺𝑓) ∈ V))
25 fneq1 5323 . . . . . . . . . . . . . . . . 17 (𝑓 = → (𝑓 Fn 𝑥 Fn 𝑥))
26 fveq2 5534 . . . . . . . . . . . . . . . . . 18 (𝑓 = → (𝐺𝑓) = (𝐺))
2726eleq1d 2258 . . . . . . . . . . . . . . . . 17 (𝑓 = → ((𝐺𝑓) ∈ V ↔ (𝐺) ∈ V))
2825, 27imbi12d 234 . . . . . . . . . . . . . . . 16 (𝑓 = → ((𝑓 Fn 𝑥 → (𝐺𝑓) ∈ V) ↔ ( Fn 𝑥 → (𝐺) ∈ V)))
2928cbvalv 1929 . . . . . . . . . . . . . . 15 (∀𝑓(𝑓 Fn 𝑥 → (𝐺𝑓) ∈ V) ↔ ∀( Fn 𝑥 → (𝐺) ∈ V))
3024, 29sylib 122 . . . . . . . . . . . . . 14 ((𝜑𝑥𝑋) → ∀( Fn 𝑥 → (𝐺) ∈ V))
313019.21bi 1569 . . . . . . . . . . . . 13 ((𝜑𝑥𝑋) → ( Fn 𝑥 → (𝐺) ∈ V))
32313impia 1202 . . . . . . . . . . . 12 ((𝜑𝑥𝑋 Fn 𝑥) → (𝐺) ∈ V)
33323adant1r 1233 . . . . . . . . . . 11 (((𝜑𝑧 ∈ On) ∧ 𝑥𝑋 Fn 𝑥) → (𝐺) ∈ V)
34333adant1r 1233 . . . . . . . . . 10 ((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑥𝑋 Fn 𝑥) → (𝐺) ∈ V)
35343adant1r 1233 . . . . . . . . 9 (((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) ∧ 𝑥𝑋 Fn 𝑥) → (𝐺) ∈ V)
36 tfr1onlemsucfn.1 . . . . . . . . . 10 𝐴 = {𝑓 ∣ ∃𝑥𝑋 (𝑓 Fn 𝑥 ∧ ∀𝑦𝑥 (𝑓𝑦) = (𝐺‘(𝑓𝑦)))}
37 fveq1 5533 . . . . . . . . . . . . . . 15 (𝑓 = → (𝑓𝑦) = (𝑦))
38 reseq1 4919 . . . . . . . . . . . . . . . 16 (𝑓 = → (𝑓𝑦) = (𝑦))
3938fveq2d 5538 . . . . . . . . . . . . . . 15 (𝑓 = → (𝐺‘(𝑓𝑦)) = (𝐺‘(𝑦)))
4037, 39eqeq12d 2204 . . . . . . . . . . . . . 14 (𝑓 = → ((𝑓𝑦) = (𝐺‘(𝑓𝑦)) ↔ (𝑦) = (𝐺‘(𝑦))))
4140ralbidv 2490 . . . . . . . . . . . . 13 (𝑓 = → (∀𝑦𝑥 (𝑓𝑦) = (𝐺‘(𝑓𝑦)) ↔ ∀𝑦𝑥 (𝑦) = (𝐺‘(𝑦))))
4225, 41anbi12d 473 . . . . . . . . . . . 12 (𝑓 = → ((𝑓 Fn 𝑥 ∧ ∀𝑦𝑥 (𝑓𝑦) = (𝐺‘(𝑓𝑦))) ↔ ( Fn 𝑥 ∧ ∀𝑦𝑥 (𝑦) = (𝐺‘(𝑦)))))
4342rexbidv 2491 . . . . . . . . . . 11 (𝑓 = → (∃𝑥𝑋 (𝑓 Fn 𝑥 ∧ ∀𝑦𝑥 (𝑓𝑦) = (𝐺‘(𝑓𝑦))) ↔ ∃𝑥𝑋 ( Fn 𝑥 ∧ ∀𝑦𝑥 (𝑦) = (𝐺‘(𝑦)))))
4443cbvabv 2314 . . . . . . . . . 10 {𝑓 ∣ ∃𝑥𝑋 (𝑓 Fn 𝑥 ∧ ∀𝑦𝑥 (𝑓𝑦) = (𝐺‘(𝑓𝑦)))} = { ∣ ∃𝑥𝑋 ( Fn 𝑥 ∧ ∀𝑦𝑥 (𝑦) = (𝐺‘(𝑦)))}
4536, 44eqtri 2210 . . . . . . . . 9 𝐴 = { ∣ ∃𝑥𝑋 ( Fn 𝑥 ∧ ∀𝑦𝑥 (𝑦) = (𝐺‘(𝑦)))}
46 fneq1 5323 . . . . . . . . . . . . . . 15 (𝑟 = 𝑎 → (𝑟 Fn 𝑡𝑎 Fn 𝑡))
47 eleq1 2252 . . . . . . . . . . . . . . 15 (𝑟 = 𝑎 → (𝑟𝐴𝑎𝐴))
48 id 19 . . . . . . . . . . . . . . . . 17 (𝑟 = 𝑎𝑟 = 𝑎)
49 fveq2 5534 . . . . . . . . . . . . . . . . . . 19 (𝑟 = 𝑎 → (𝐺𝑟) = (𝐺𝑎))
5049opeq2d 3800 . . . . . . . . . . . . . . . . . 18 (𝑟 = 𝑎 → ⟨𝑡, (𝐺𝑟)⟩ = ⟨𝑡, (𝐺𝑎)⟩)
5150sneqd 3620 . . . . . . . . . . . . . . . . 17 (𝑟 = 𝑎 → {⟨𝑡, (𝐺𝑟)⟩} = {⟨𝑡, (𝐺𝑎)⟩})
5248, 51uneq12d 3305 . . . . . . . . . . . . . . . 16 (𝑟 = 𝑎 → (𝑟 ∪ {⟨𝑡, (𝐺𝑟)⟩}) = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩}))
5352eqeq2d 2201 . . . . . . . . . . . . . . 15 (𝑟 = 𝑎 → (𝑠 = (𝑟 ∪ {⟨𝑡, (𝐺𝑟)⟩}) ↔ 𝑠 = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩})))
5446, 47, 533anbi123d 1323 . . . . . . . . . . . . . 14 (𝑟 = 𝑎 → ((𝑟 Fn 𝑡𝑟𝐴𝑠 = (𝑟 ∪ {⟨𝑡, (𝐺𝑟)⟩})) ↔ (𝑎 Fn 𝑡𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩}))))
5554cbvexv 1930 . . . . . . . . . . . . 13 (∃𝑟(𝑟 Fn 𝑡𝑟𝐴𝑠 = (𝑟 ∪ {⟨𝑡, (𝐺𝑟)⟩})) ↔ ∃𝑎(𝑎 Fn 𝑡𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩})))
5655rexbii 2497 . . . . . . . . . . . 12 (∃𝑡𝑧𝑟(𝑟 Fn 𝑡𝑟𝐴𝑠 = (𝑟 ∪ {⟨𝑡, (𝐺𝑟)⟩})) ↔ ∃𝑡𝑧𝑎(𝑎 Fn 𝑡𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩})))
57 fneq2 5324 . . . . . . . . . . . . . . 15 (𝑡 = 𝑏 → (𝑎 Fn 𝑡𝑎 Fn 𝑏))
58 opeq1 3793 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑏 → ⟨𝑡, (𝐺𝑎)⟩ = ⟨𝑏, (𝐺𝑎)⟩)
5958sneqd 3620 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑏 → {⟨𝑡, (𝐺𝑎)⟩} = {⟨𝑏, (𝐺𝑎)⟩})
6059uneq2d 3304 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑏 → (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩}) = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))
6160eqeq2d 2201 . . . . . . . . . . . . . . 15 (𝑡 = 𝑏 → (𝑠 = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩}) ↔ 𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩})))
6257, 613anbi13d 1325 . . . . . . . . . . . . . 14 (𝑡 = 𝑏 → ((𝑎 Fn 𝑡𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩})) ↔ (𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))))
6362exbidv 1836 . . . . . . . . . . . . 13 (𝑡 = 𝑏 → (∃𝑎(𝑎 Fn 𝑡𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩})) ↔ ∃𝑎(𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))))
6463cbvrexv 2719 . . . . . . . . . . . 12 (∃𝑡𝑧𝑎(𝑎 Fn 𝑡𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩})) ↔ ∃𝑏𝑧𝑎(𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩})))
6556, 64bitri 184 . . . . . . . . . . 11 (∃𝑡𝑧𝑟(𝑟 Fn 𝑡𝑟𝐴𝑠 = (𝑟 ∪ {⟨𝑡, (𝐺𝑟)⟩})) ↔ ∃𝑏𝑧𝑎(𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩})))
6665abbii 2305 . . . . . . . . . 10 {𝑠 ∣ ∃𝑡𝑧𝑟(𝑟 Fn 𝑡𝑟𝐴𝑠 = (𝑟 ∪ {⟨𝑡, (𝐺𝑟)⟩}))} = {𝑠 ∣ ∃𝑏𝑧𝑎(𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))}
67 eqeq1 2196 . . . . . . . . . . . . . 14 (𝑠 = 𝑑 → (𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}) ↔ 𝑑 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩})))
68673anbi3d 1329 . . . . . . . . . . . . 13 (𝑠 = 𝑑 → ((𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩})) ↔ (𝑎 Fn 𝑏𝑎𝐴𝑑 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))))
6968exbidv 1836 . . . . . . . . . . . 12 (𝑠 = 𝑑 → (∃𝑎(𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩})) ↔ ∃𝑎(𝑎 Fn 𝑏𝑎𝐴𝑑 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))))
7069rexbidv 2491 . . . . . . . . . . 11 (𝑠 = 𝑑 → (∃𝑏𝑧𝑎(𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩})) ↔ ∃𝑏𝑧𝑎(𝑎 Fn 𝑏𝑎𝐴𝑑 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))))
7170cbvabv 2314 . . . . . . . . . 10 {𝑠 ∣ ∃𝑏𝑧𝑎(𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))} = {𝑑 ∣ ∃𝑏𝑧𝑎(𝑎 Fn 𝑏𝑎𝐴𝑑 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))}
7266, 71eqtri 2210 . . . . . . . . 9 {𝑠 ∣ ∃𝑡𝑧𝑟(𝑟 Fn 𝑡𝑟𝐴𝑠 = (𝑟 ∪ {⟨𝑡, (𝐺𝑟)⟩}))} = {𝑑 ∣ ∃𝑏𝑧𝑎(𝑎 Fn 𝑏𝑎𝐴𝑑 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))}
73 tfr1onlemaccex.u . . . . . . . . . . . 12 ((𝜑𝑥 𝑋) → suc 𝑥𝑋)
7473adantlr 477 . . . . . . . . . . 11 (((𝜑𝑧 ∈ On) ∧ 𝑥 𝑋) → suc 𝑥𝑋)
7574adantlr 477 . . . . . . . . . 10 ((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑥 𝑋) → suc 𝑥𝑋)
7675adantlr 477 . . . . . . . . 9 (((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) ∧ 𝑥 𝑋) → suc 𝑥𝑋)
77 simpr 110 . . . . . . . . 9 ((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) → 𝑧𝑋)
78 simpr 110 . . . . . . . . . . . 12 (((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) ∧ 𝑏𝑧) → 𝑏𝑧)
79 simplr 528 . . . . . . . . . . . 12 (((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) ∧ 𝑏𝑧) → 𝑧𝑋)
80 ordtr1 4406 . . . . . . . . . . . . . 14 (Ord 𝑋 → ((𝑏𝑧𝑧𝑋) → 𝑏𝑋))
811, 80syl 14 . . . . . . . . . . . . 13 (𝜑 → ((𝑏𝑧𝑧𝑋) → 𝑏𝑋))
8281ad4antr 494 . . . . . . . . . . . 12 (((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) ∧ 𝑏𝑧) → ((𝑏𝑧𝑧𝑋) → 𝑏𝑋))
8378, 79, 82mp2and 433 . . . . . . . . . . 11 (((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) ∧ 𝑏𝑧) → 𝑏𝑋)
84 eleq1 2252 . . . . . . . . . . . . . 14 (𝑤 = 𝑏 → (𝑤𝑋𝑏𝑋))
85 fneq2 5324 . . . . . . . . . . . . . . . 16 (𝑤 = 𝑏 → (𝑔 Fn 𝑤𝑔 Fn 𝑏))
86 raleq 2686 . . . . . . . . . . . . . . . 16 (𝑤 = 𝑏 → (∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢)) ↔ ∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))
8785, 86anbi12d 473 . . . . . . . . . . . . . . 15 (𝑤 = 𝑏 → ((𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))) ↔ (𝑔 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
8887exbidv 1836 . . . . . . . . . . . . . 14 (𝑤 = 𝑏 → (∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))) ↔ ∃𝑔(𝑔 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
8984, 88imbi12d 234 . . . . . . . . . . . . 13 (𝑤 = 𝑏 → ((𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))) ↔ (𝑏𝑋 → ∃𝑔(𝑔 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))))
90 simpllr 534 . . . . . . . . . . . . 13 (((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) ∧ 𝑏𝑧) → ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
9189, 90, 78rspcdva 2861 . . . . . . . . . . . 12 (((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) ∧ 𝑏𝑧) → (𝑏𝑋 → ∃𝑔(𝑔 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
92 fneq1 5323 . . . . . . . . . . . . . . 15 (𝑔 = 𝑎 → (𝑔 Fn 𝑏𝑎 Fn 𝑏))
93 fveq1 5533 . . . . . . . . . . . . . . . . 17 (𝑔 = 𝑎 → (𝑔𝑢) = (𝑎𝑢))
94 reseq1 4919 . . . . . . . . . . . . . . . . . 18 (𝑔 = 𝑎 → (𝑔𝑢) = (𝑎𝑢))
9594fveq2d 5538 . . . . . . . . . . . . . . . . 17 (𝑔 = 𝑎 → (𝐺‘(𝑔𝑢)) = (𝐺‘(𝑎𝑢)))
9693, 95eqeq12d 2204 . . . . . . . . . . . . . . . 16 (𝑔 = 𝑎 → ((𝑔𝑢) = (𝐺‘(𝑔𝑢)) ↔ (𝑎𝑢) = (𝐺‘(𝑎𝑢))))
9796ralbidv 2490 . . . . . . . . . . . . . . 15 (𝑔 = 𝑎 → (∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢)) ↔ ∀𝑢𝑏 (𝑎𝑢) = (𝐺‘(𝑎𝑢))))
9892, 97anbi12d 473 . . . . . . . . . . . . . 14 (𝑔 = 𝑎 → ((𝑔 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢))) ↔ (𝑎 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑎𝑢) = (𝐺‘(𝑎𝑢)))))
9998cbvexv 1930 . . . . . . . . . . . . 13 (∃𝑔(𝑔 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢))) ↔ ∃𝑎(𝑎 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑎𝑢) = (𝐺‘(𝑎𝑢))))
100 fveq2 5534 . . . . . . . . . . . . . . . . 17 (𝑢 = 𝑐 → (𝑎𝑢) = (𝑎𝑐))
101 reseq2 4920 . . . . . . . . . . . . . . . . . 18 (𝑢 = 𝑐 → (𝑎𝑢) = (𝑎𝑐))
102101fveq2d 5538 . . . . . . . . . . . . . . . . 17 (𝑢 = 𝑐 → (𝐺‘(𝑎𝑢)) = (𝐺‘(𝑎𝑐)))
103100, 102eqeq12d 2204 . . . . . . . . . . . . . . . 16 (𝑢 = 𝑐 → ((𝑎𝑢) = (𝐺‘(𝑎𝑢)) ↔ (𝑎𝑐) = (𝐺‘(𝑎𝑐))))
104103cbvralv 2718 . . . . . . . . . . . . . . 15 (∀𝑢𝑏 (𝑎𝑢) = (𝐺‘(𝑎𝑢)) ↔ ∀𝑐𝑏 (𝑎𝑐) = (𝐺‘(𝑎𝑐)))
105104anbi2i 457 . . . . . . . . . . . . . 14 ((𝑎 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑎𝑢) = (𝐺‘(𝑎𝑢))) ↔ (𝑎 Fn 𝑏 ∧ ∀𝑐𝑏 (𝑎𝑐) = (𝐺‘(𝑎𝑐))))
106105exbii 1616 . . . . . . . . . . . . 13 (∃𝑎(𝑎 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑎𝑢) = (𝐺‘(𝑎𝑢))) ↔ ∃𝑎(𝑎 Fn 𝑏 ∧ ∀𝑐𝑏 (𝑎𝑐) = (𝐺‘(𝑎𝑐))))
10799, 106bitri 184 . . . . . . . . . . . 12 (∃𝑔(𝑔 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢))) ↔ ∃𝑎(𝑎 Fn 𝑏 ∧ ∀𝑐𝑏 (𝑎𝑐) = (𝐺‘(𝑎𝑐))))
10891, 107imbitrdi 161 . . . . . . . . . . 11 (((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) ∧ 𝑏𝑧) → (𝑏𝑋 → ∃𝑎(𝑎 Fn 𝑏 ∧ ∀𝑐𝑏 (𝑎𝑐) = (𝐺‘(𝑎𝑐)))))
10983, 108mpd 13 . . . . . . . . . 10 (((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) ∧ 𝑏𝑧) → ∃𝑎(𝑎 Fn 𝑏 ∧ ∀𝑐𝑏 (𝑎𝑐) = (𝐺‘(𝑎𝑐))))
110109ralrimiva 2563 . . . . . . . . 9 ((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) → ∀𝑏𝑧𝑎(𝑎 Fn 𝑏 ∧ ∀𝑐𝑏 (𝑎𝑐) = (𝐺‘(𝑎𝑐))))
11118, 20, 21, 35, 45, 72, 76, 77, 110tfr1onlemex 6373 . . . . . . . 8 ((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) → ∃( Fn 𝑧 ∧ ∀𝑢𝑧 (𝑢) = (𝐺‘(𝑢))))
112 fneq1 5323 . . . . . . . . . 10 ( = 𝑔 → ( Fn 𝑧𝑔 Fn 𝑧))
113 fveq1 5533 . . . . . . . . . . . 12 ( = 𝑔 → (𝑢) = (𝑔𝑢))
114 reseq1 4919 . . . . . . . . . . . . 13 ( = 𝑔 → (𝑢) = (𝑔𝑢))
115114fveq2d 5538 . . . . . . . . . . . 12 ( = 𝑔 → (𝐺‘(𝑢)) = (𝐺‘(𝑔𝑢)))
116113, 115eqeq12d 2204 . . . . . . . . . . 11 ( = 𝑔 → ((𝑢) = (𝐺‘(𝑢)) ↔ (𝑔𝑢) = (𝐺‘(𝑔𝑢))))
117116ralbidv 2490 . . . . . . . . . 10 ( = 𝑔 → (∀𝑢𝑧 (𝑢) = (𝐺‘(𝑢)) ↔ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))
118112, 117anbi12d 473 . . . . . . . . 9 ( = 𝑔 → (( Fn 𝑧 ∧ ∀𝑢𝑧 (𝑢) = (𝐺‘(𝑢))) ↔ (𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
119118cbvexv 1930 . . . . . . . 8 (∃( Fn 𝑧 ∧ ∀𝑢𝑧 (𝑢) = (𝐺‘(𝑢))) ↔ ∃𝑔(𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))
120111, 119sylib 122 . . . . . . 7 ((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) → ∃𝑔(𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))
121120exp31 364 . . . . . 6 ((𝜑𝑧 ∈ On) → (∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))) → (𝑧𝑋 → ∃𝑔(𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))))
122121expcom 116 . . . . 5 (𝑧 ∈ On → (𝜑 → (∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))) → (𝑧𝑋 → ∃𝑔(𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))))
123122a2d 26 . . . 4 (𝑧 ∈ On → ((𝜑 → ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) → (𝜑 → (𝑧𝑋 → ∃𝑔(𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))))
124 impexp 263 . . . . . 6 (((𝜑𝑤𝑋) → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))) ↔ (𝜑 → (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))))
125124ralbii 2496 . . . . 5 (∀𝑤𝑧 ((𝜑𝑤𝑋) → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))) ↔ ∀𝑤𝑧 (𝜑 → (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))))
126 r19.21v 2567 . . . . 5 (∀𝑤𝑧 (𝜑 → (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ↔ (𝜑 → ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))))
127125, 126bitri 184 . . . 4 (∀𝑤𝑧 ((𝜑𝑤𝑋) → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))) ↔ (𝜑 → ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))))
128 impexp 263 . . . 4 (((𝜑𝑧𝑋) → ∃𝑔(𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))) ↔ (𝜑 → (𝑧𝑋 → ∃𝑔(𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))))
129123, 127, 1283imtr4g 205 . . 3 (𝑧 ∈ On → (∀𝑤𝑧 ((𝜑𝑤𝑋) → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))) → ((𝜑𝑧𝑋) → ∃𝑔(𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))))
13010, 17, 129tfis3 4603 . 2 (𝐶 ∈ On → ((𝜑𝐶𝑋) → ∃𝑔(𝑔 Fn 𝐶 ∧ ∀𝑢𝐶 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
1313, 130mpcom 36 1 ((𝜑𝐶𝑋) → ∃𝑔(𝑔 Fn 𝐶 ∧ ∀𝑢𝐶 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 104  w3a 980  wal 1362   = wceq 1364  wex 1503  wcel 2160  {cab 2175  wral 2468  wrex 2469  Vcvv 2752  cun 3142  {csn 3607  cop 3610   cuni 3824  Ord word 4380  Oncon0 4381  suc csuc 4383  cres 4646  Fun wfun 5229   Fn wfn 5230  cfv 5235  recscrecs 6330
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 615  ax-in2 616  ax-io 710  ax-5 1458  ax-7 1459  ax-gen 1460  ax-ie1 1504  ax-ie2 1505  ax-8 1515  ax-10 1516  ax-11 1517  ax-i12 1518  ax-bndl 1520  ax-4 1521  ax-17 1537  ax-i9 1541  ax-ial 1545  ax-i5r 1546  ax-13 2162  ax-14 2163  ax-ext 2171  ax-coll 4133  ax-sep 4136  ax-pow 4192  ax-pr 4227  ax-un 4451  ax-setind 4554
This theorem depends on definitions:  df-bi 117  df-3an 982  df-tru 1367  df-fal 1370  df-nf 1472  df-sb 1774  df-eu 2041  df-mo 2042  df-clab 2176  df-cleq 2182  df-clel 2185  df-nfc 2321  df-ne 2361  df-ral 2473  df-rex 2474  df-reu 2475  df-rab 2477  df-v 2754  df-sbc 2978  df-csb 3073  df-dif 3146  df-un 3148  df-in 3150  df-ss 3157  df-nul 3438  df-pw 3592  df-sn 3613  df-pr 3614  df-op 3616  df-uni 3825  df-iun 3903  df-br 4019  df-opab 4080  df-mpt 4081  df-tr 4117  df-id 4311  df-iord 4384  df-on 4386  df-suc 4389  df-xp 4650  df-rel 4651  df-cnv 4652  df-co 4653  df-dm 4654  df-rn 4655  df-res 4656  df-ima 4657  df-iota 5196  df-fun 5237  df-fn 5238  df-f 5239  df-f1 5240  df-fo 5241  df-f1o 5242  df-fv 5243  df-recs 6331
This theorem is referenced by:  tfr1onlemres  6375
  Copyright terms: Public domain W3C validator