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

Theorem tfr1onlemaccex 6457
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 4448 . . 3 ((Ord 𝑋𝐶𝑋) → 𝐶 ∈ On)
31, 2sylan 283 . 2 ((𝜑𝐶𝑋) → 𝐶 ∈ On)
4 eleq1 2270 . . . . 5 (𝑧 = 𝑤 → (𝑧𝑋𝑤𝑋))
54anbi2d 464 . . . 4 (𝑧 = 𝑤 → ((𝜑𝑧𝑋) ↔ (𝜑𝑤𝑋)))
6 fneq2 5382 . . . . . 6 (𝑧 = 𝑤 → (𝑔 Fn 𝑧𝑔 Fn 𝑤))
7 raleq 2705 . . . . . 6 (𝑧 = 𝑤 → (∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢)) ↔ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))
86, 7anbi12d 473 . . . . 5 (𝑧 = 𝑤 → ((𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢))) ↔ (𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
98exbidv 1849 . . . 4 (𝑧 = 𝑤 → (∃𝑔(𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢))) ↔ ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
105, 9imbi12d 234 . . 3 (𝑧 = 𝑤 → (((𝜑𝑧𝑋) → ∃𝑔(𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))) ↔ ((𝜑𝑤𝑋) → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))))
11 eleq1 2270 . . . . 5 (𝑧 = 𝐶 → (𝑧𝑋𝐶𝑋))
1211anbi2d 464 . . . 4 (𝑧 = 𝐶 → ((𝜑𝑧𝑋) ↔ (𝜑𝐶𝑋)))
13 fneq2 5382 . . . . . 6 (𝑧 = 𝐶 → (𝑔 Fn 𝑧𝑔 Fn 𝐶))
14 raleq 2705 . . . . . 6 (𝑧 = 𝐶 → (∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢)) ↔ ∀𝑢𝐶 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))
1513, 14anbi12d 473 . . . . 5 (𝑧 = 𝐶 → ((𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢))) ↔ (𝑔 Fn 𝐶 ∧ ∀𝑢𝐶 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
1615exbidv 1849 . . . 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 1208 . . . . . . . . . . . . . . . 16 ((𝜑𝑥𝑋) → (𝑓 Fn 𝑥 → (𝐺𝑓) ∈ V))
2423alrimiv 1898 . . . . . . . . . . . . . . 15 ((𝜑𝑥𝑋) → ∀𝑓(𝑓 Fn 𝑥 → (𝐺𝑓) ∈ V))
25 fneq1 5381 . . . . . . . . . . . . . . . . 17 (𝑓 = → (𝑓 Fn 𝑥 Fn 𝑥))
26 fveq2 5599 . . . . . . . . . . . . . . . . . 18 (𝑓 = → (𝐺𝑓) = (𝐺))
2726eleq1d 2276 . . . . . . . . . . . . . . . . 17 (𝑓 = → ((𝐺𝑓) ∈ V ↔ (𝐺) ∈ V))
2825, 27imbi12d 234 . . . . . . . . . . . . . . . 16 (𝑓 = → ((𝑓 Fn 𝑥 → (𝐺𝑓) ∈ V) ↔ ( Fn 𝑥 → (𝐺) ∈ V)))
2928cbvalv 1942 . . . . . . . . . . . . . . 15 (∀𝑓(𝑓 Fn 𝑥 → (𝐺𝑓) ∈ V) ↔ ∀( Fn 𝑥 → (𝐺) ∈ V))
3024, 29sylib 122 . . . . . . . . . . . . . 14 ((𝜑𝑥𝑋) → ∀( Fn 𝑥 → (𝐺) ∈ V))
313019.21bi 1582 . . . . . . . . . . . . 13 ((𝜑𝑥𝑋) → ( Fn 𝑥 → (𝐺) ∈ V))
32313impia 1203 . . . . . . . . . . . 12 ((𝜑𝑥𝑋 Fn 𝑥) → (𝐺) ∈ V)
33323adant1r 1234 . . . . . . . . . . 11 (((𝜑𝑧 ∈ On) ∧ 𝑥𝑋 Fn 𝑥) → (𝐺) ∈ V)
34333adant1r 1234 . . . . . . . . . 10 ((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑥𝑋 Fn 𝑥) → (𝐺) ∈ V)
35343adant1r 1234 . . . . . . . . 9 (((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) ∧ 𝑥𝑋 Fn 𝑥) → (𝐺) ∈ V)
36 tfr1onlemsucfn.1 . . . . . . . . . 10 𝐴 = {𝑓 ∣ ∃𝑥𝑋 (𝑓 Fn 𝑥 ∧ ∀𝑦𝑥 (𝑓𝑦) = (𝐺‘(𝑓𝑦)))}
37 fveq1 5598 . . . . . . . . . . . . . . 15 (𝑓 = → (𝑓𝑦) = (𝑦))
38 reseq1 4972 . . . . . . . . . . . . . . . 16 (𝑓 = → (𝑓𝑦) = (𝑦))
3938fveq2d 5603 . . . . . . . . . . . . . . 15 (𝑓 = → (𝐺‘(𝑓𝑦)) = (𝐺‘(𝑦)))
4037, 39eqeq12d 2222 . . . . . . . . . . . . . 14 (𝑓 = → ((𝑓𝑦) = (𝐺‘(𝑓𝑦)) ↔ (𝑦) = (𝐺‘(𝑦))))
4140ralbidv 2508 . . . . . . . . . . . . 13 (𝑓 = → (∀𝑦𝑥 (𝑓𝑦) = (𝐺‘(𝑓𝑦)) ↔ ∀𝑦𝑥 (𝑦) = (𝐺‘(𝑦))))
4225, 41anbi12d 473 . . . . . . . . . . . 12 (𝑓 = → ((𝑓 Fn 𝑥 ∧ ∀𝑦𝑥 (𝑓𝑦) = (𝐺‘(𝑓𝑦))) ↔ ( Fn 𝑥 ∧ ∀𝑦𝑥 (𝑦) = (𝐺‘(𝑦)))))
4342rexbidv 2509 . . . . . . . . . . 11 (𝑓 = → (∃𝑥𝑋 (𝑓 Fn 𝑥 ∧ ∀𝑦𝑥 (𝑓𝑦) = (𝐺‘(𝑓𝑦))) ↔ ∃𝑥𝑋 ( Fn 𝑥 ∧ ∀𝑦𝑥 (𝑦) = (𝐺‘(𝑦)))))
4443cbvabv 2332 . . . . . . . . . 10 {𝑓 ∣ ∃𝑥𝑋 (𝑓 Fn 𝑥 ∧ ∀𝑦𝑥 (𝑓𝑦) = (𝐺‘(𝑓𝑦)))} = { ∣ ∃𝑥𝑋 ( Fn 𝑥 ∧ ∀𝑦𝑥 (𝑦) = (𝐺‘(𝑦)))}
4536, 44eqtri 2228 . . . . . . . . 9 𝐴 = { ∣ ∃𝑥𝑋 ( Fn 𝑥 ∧ ∀𝑦𝑥 (𝑦) = (𝐺‘(𝑦)))}
46 fneq1 5381 . . . . . . . . . . . . . . 15 (𝑟 = 𝑎 → (𝑟 Fn 𝑡𝑎 Fn 𝑡))
47 eleq1 2270 . . . . . . . . . . . . . . 15 (𝑟 = 𝑎 → (𝑟𝐴𝑎𝐴))
48 id 19 . . . . . . . . . . . . . . . . 17 (𝑟 = 𝑎𝑟 = 𝑎)
49 fveq2 5599 . . . . . . . . . . . . . . . . . . 19 (𝑟 = 𝑎 → (𝐺𝑟) = (𝐺𝑎))
5049opeq2d 3840 . . . . . . . . . . . . . . . . . 18 (𝑟 = 𝑎 → ⟨𝑡, (𝐺𝑟)⟩ = ⟨𝑡, (𝐺𝑎)⟩)
5150sneqd 3656 . . . . . . . . . . . . . . . . 17 (𝑟 = 𝑎 → {⟨𝑡, (𝐺𝑟)⟩} = {⟨𝑡, (𝐺𝑎)⟩})
5248, 51uneq12d 3336 . . . . . . . . . . . . . . . 16 (𝑟 = 𝑎 → (𝑟 ∪ {⟨𝑡, (𝐺𝑟)⟩}) = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩}))
5352eqeq2d 2219 . . . . . . . . . . . . . . 15 (𝑟 = 𝑎 → (𝑠 = (𝑟 ∪ {⟨𝑡, (𝐺𝑟)⟩}) ↔ 𝑠 = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩})))
5446, 47, 533anbi123d 1325 . . . . . . . . . . . . . 14 (𝑟 = 𝑎 → ((𝑟 Fn 𝑡𝑟𝐴𝑠 = (𝑟 ∪ {⟨𝑡, (𝐺𝑟)⟩})) ↔ (𝑎 Fn 𝑡𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩}))))
5554cbvexv 1943 . . . . . . . . . . . . 13 (∃𝑟(𝑟 Fn 𝑡𝑟𝐴𝑠 = (𝑟 ∪ {⟨𝑡, (𝐺𝑟)⟩})) ↔ ∃𝑎(𝑎 Fn 𝑡𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩})))
5655rexbii 2515 . . . . . . . . . . . 12 (∃𝑡𝑧𝑟(𝑟 Fn 𝑡𝑟𝐴𝑠 = (𝑟 ∪ {⟨𝑡, (𝐺𝑟)⟩})) ↔ ∃𝑡𝑧𝑎(𝑎 Fn 𝑡𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩})))
57 fneq2 5382 . . . . . . . . . . . . . . 15 (𝑡 = 𝑏 → (𝑎 Fn 𝑡𝑎 Fn 𝑏))
58 opeq1 3833 . . . . . . . . . . . . . . . . . 18 (𝑡 = 𝑏 → ⟨𝑡, (𝐺𝑎)⟩ = ⟨𝑏, (𝐺𝑎)⟩)
5958sneqd 3656 . . . . . . . . . . . . . . . . 17 (𝑡 = 𝑏 → {⟨𝑡, (𝐺𝑎)⟩} = {⟨𝑏, (𝐺𝑎)⟩})
6059uneq2d 3335 . . . . . . . . . . . . . . . 16 (𝑡 = 𝑏 → (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩}) = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))
6160eqeq2d 2219 . . . . . . . . . . . . . . 15 (𝑡 = 𝑏 → (𝑠 = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩}) ↔ 𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩})))
6257, 613anbi13d 1327 . . . . . . . . . . . . . 14 (𝑡 = 𝑏 → ((𝑎 Fn 𝑡𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩})) ↔ (𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))))
6362exbidv 1849 . . . . . . . . . . . . 13 (𝑡 = 𝑏 → (∃𝑎(𝑎 Fn 𝑡𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩})) ↔ ∃𝑎(𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))))
6463cbvrexv 2743 . . . . . . . . . . . 12 (∃𝑡𝑧𝑎(𝑎 Fn 𝑡𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑡, (𝐺𝑎)⟩})) ↔ ∃𝑏𝑧𝑎(𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩})))
6556, 64bitri 184 . . . . . . . . . . 11 (∃𝑡𝑧𝑟(𝑟 Fn 𝑡𝑟𝐴𝑠 = (𝑟 ∪ {⟨𝑡, (𝐺𝑟)⟩})) ↔ ∃𝑏𝑧𝑎(𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩})))
6665abbii 2323 . . . . . . . . . 10 {𝑠 ∣ ∃𝑡𝑧𝑟(𝑟 Fn 𝑡𝑟𝐴𝑠 = (𝑟 ∪ {⟨𝑡, (𝐺𝑟)⟩}))} = {𝑠 ∣ ∃𝑏𝑧𝑎(𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))}
67 eqeq1 2214 . . . . . . . . . . . . . 14 (𝑠 = 𝑑 → (𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}) ↔ 𝑑 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩})))
68673anbi3d 1331 . . . . . . . . . . . . 13 (𝑠 = 𝑑 → ((𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩})) ↔ (𝑎 Fn 𝑏𝑎𝐴𝑑 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))))
6968exbidv 1849 . . . . . . . . . . . 12 (𝑠 = 𝑑 → (∃𝑎(𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩})) ↔ ∃𝑎(𝑎 Fn 𝑏𝑎𝐴𝑑 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))))
7069rexbidv 2509 . . . . . . . . . . 11 (𝑠 = 𝑑 → (∃𝑏𝑧𝑎(𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩})) ↔ ∃𝑏𝑧𝑎(𝑎 Fn 𝑏𝑎𝐴𝑑 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))))
7170cbvabv 2332 . . . . . . . . . 10 {𝑠 ∣ ∃𝑏𝑧𝑎(𝑎 Fn 𝑏𝑎𝐴𝑠 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))} = {𝑑 ∣ ∃𝑏𝑧𝑎(𝑎 Fn 𝑏𝑎𝐴𝑑 = (𝑎 ∪ {⟨𝑏, (𝐺𝑎)⟩}))}
7266, 71eqtri 2228 . . . . . . . . 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 4453 . . . . . . . . . . . . . 14 (Ord 𝑋 → ((𝑏𝑧𝑧𝑋) → 𝑏𝑋))
811, 80syl 14 . . . . . . . . . . . . 13 (𝜑 → ((𝑏𝑧𝑧𝑋) → 𝑏𝑋))
8281ad4antr 494 . . . . . . . . . . . 12 (((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) ∧ 𝑏𝑧) → ((𝑏𝑧𝑧𝑋) → 𝑏𝑋))
8378, 79, 82mp2and 433 . . . . . . . . . . 11 (((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) ∧ 𝑏𝑧) → 𝑏𝑋)
84 eleq1 2270 . . . . . . . . . . . . . 14 (𝑤 = 𝑏 → (𝑤𝑋𝑏𝑋))
85 fneq2 5382 . . . . . . . . . . . . . . . 16 (𝑤 = 𝑏 → (𝑔 Fn 𝑤𝑔 Fn 𝑏))
86 raleq 2705 . . . . . . . . . . . . . . . 16 (𝑤 = 𝑏 → (∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢)) ↔ ∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))
8785, 86anbi12d 473 . . . . . . . . . . . . . . 15 (𝑤 = 𝑏 → ((𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))) ↔ (𝑔 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
8887exbidv 1849 . . . . . . . . . . . . . 14 (𝑤 = 𝑏 → (∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))) ↔ ∃𝑔(𝑔 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
8984, 88imbi12d 234 . . . . . . . . . . . . 13 (𝑤 = 𝑏 → ((𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))) ↔ (𝑏𝑋 → ∃𝑔(𝑔 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))))
90 simpllr 534 . . . . . . . . . . . . 13 (((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) ∧ 𝑏𝑧) → ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
9189, 90, 78rspcdva 2889 . . . . . . . . . . . 12 (((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) ∧ 𝑏𝑧) → (𝑏𝑋 → ∃𝑔(𝑔 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
92 fneq1 5381 . . . . . . . . . . . . . . 15 (𝑔 = 𝑎 → (𝑔 Fn 𝑏𝑎 Fn 𝑏))
93 fveq1 5598 . . . . . . . . . . . . . . . . 17 (𝑔 = 𝑎 → (𝑔𝑢) = (𝑎𝑢))
94 reseq1 4972 . . . . . . . . . . . . . . . . . 18 (𝑔 = 𝑎 → (𝑔𝑢) = (𝑎𝑢))
9594fveq2d 5603 . . . . . . . . . . . . . . . . 17 (𝑔 = 𝑎 → (𝐺‘(𝑔𝑢)) = (𝐺‘(𝑎𝑢)))
9693, 95eqeq12d 2222 . . . . . . . . . . . . . . . 16 (𝑔 = 𝑎 → ((𝑔𝑢) = (𝐺‘(𝑔𝑢)) ↔ (𝑎𝑢) = (𝐺‘(𝑎𝑢))))
9796ralbidv 2508 . . . . . . . . . . . . . . 15 (𝑔 = 𝑎 → (∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢)) ↔ ∀𝑢𝑏 (𝑎𝑢) = (𝐺‘(𝑎𝑢))))
9892, 97anbi12d 473 . . . . . . . . . . . . . 14 (𝑔 = 𝑎 → ((𝑔 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢))) ↔ (𝑎 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑎𝑢) = (𝐺‘(𝑎𝑢)))))
9998cbvexv 1943 . . . . . . . . . . . . 13 (∃𝑔(𝑔 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢))) ↔ ∃𝑎(𝑎 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑎𝑢) = (𝐺‘(𝑎𝑢))))
100 fveq2 5599 . . . . . . . . . . . . . . . . 17 (𝑢 = 𝑐 → (𝑎𝑢) = (𝑎𝑐))
101 reseq2 4973 . . . . . . . . . . . . . . . . . 18 (𝑢 = 𝑐 → (𝑎𝑢) = (𝑎𝑐))
102101fveq2d 5603 . . . . . . . . . . . . . . . . 17 (𝑢 = 𝑐 → (𝐺‘(𝑎𝑢)) = (𝐺‘(𝑎𝑐)))
103100, 102eqeq12d 2222 . . . . . . . . . . . . . . . 16 (𝑢 = 𝑐 → ((𝑎𝑢) = (𝐺‘(𝑎𝑢)) ↔ (𝑎𝑐) = (𝐺‘(𝑎𝑐))))
104103cbvralv 2742 . . . . . . . . . . . . . . 15 (∀𝑢𝑏 (𝑎𝑢) = (𝐺‘(𝑎𝑢)) ↔ ∀𝑐𝑏 (𝑎𝑐) = (𝐺‘(𝑎𝑐)))
105104anbi2i 457 . . . . . . . . . . . . . 14 ((𝑎 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑎𝑢) = (𝐺‘(𝑎𝑢))) ↔ (𝑎 Fn 𝑏 ∧ ∀𝑐𝑏 (𝑎𝑐) = (𝐺‘(𝑎𝑐))))
106105exbii 1629 . . . . . . . . . . . . 13 (∃𝑎(𝑎 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑎𝑢) = (𝐺‘(𝑎𝑢))) ↔ ∃𝑎(𝑎 Fn 𝑏 ∧ ∀𝑐𝑏 (𝑎𝑐) = (𝐺‘(𝑎𝑐))))
10799, 106bitri 184 . . . . . . . . . . . 12 (∃𝑔(𝑔 Fn 𝑏 ∧ ∀𝑢𝑏 (𝑔𝑢) = (𝐺‘(𝑔𝑢))) ↔ ∃𝑎(𝑎 Fn 𝑏 ∧ ∀𝑐𝑏 (𝑎𝑐) = (𝐺‘(𝑎𝑐))))
10891, 107imbitrdi 161 . . . . . . . . . . 11 (((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) ∧ 𝑏𝑧) → (𝑏𝑋 → ∃𝑎(𝑎 Fn 𝑏 ∧ ∀𝑐𝑏 (𝑎𝑐) = (𝐺‘(𝑎𝑐)))))
10983, 108mpd 13 . . . . . . . . . 10 (((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) ∧ 𝑏𝑧) → ∃𝑎(𝑎 Fn 𝑏 ∧ ∀𝑐𝑏 (𝑎𝑐) = (𝐺‘(𝑎𝑐))))
110109ralrimiva 2581 . . . . . . . . 9 ((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) → ∀𝑏𝑧𝑎(𝑎 Fn 𝑏 ∧ ∀𝑐𝑏 (𝑎𝑐) = (𝐺‘(𝑎𝑐))))
11118, 20, 21, 35, 45, 72, 76, 77, 110tfr1onlemex 6456 . . . . . . . 8 ((((𝜑𝑧 ∈ On) ∧ ∀𝑤𝑧 (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))) ∧ 𝑧𝑋) → ∃( Fn 𝑧 ∧ ∀𝑢𝑧 (𝑢) = (𝐺‘(𝑢))))
112 fneq1 5381 . . . . . . . . . 10 ( = 𝑔 → ( Fn 𝑧𝑔 Fn 𝑧))
113 fveq1 5598 . . . . . . . . . . . 12 ( = 𝑔 → (𝑢) = (𝑔𝑢))
114 reseq1 4972 . . . . . . . . . . . . 13 ( = 𝑔 → (𝑢) = (𝑔𝑢))
115114fveq2d 5603 . . . . . . . . . . . 12 ( = 𝑔 → (𝐺‘(𝑢)) = (𝐺‘(𝑔𝑢)))
116113, 115eqeq12d 2222 . . . . . . . . . . 11 ( = 𝑔 → ((𝑢) = (𝐺‘(𝑢)) ↔ (𝑔𝑢) = (𝐺‘(𝑔𝑢))))
117116ralbidv 2508 . . . . . . . . . 10 ( = 𝑔 → (∀𝑢𝑧 (𝑢) = (𝐺‘(𝑢)) ↔ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))
118112, 117anbi12d 473 . . . . . . . . 9 ( = 𝑔 → (( Fn 𝑧 ∧ ∀𝑢𝑧 (𝑢) = (𝐺‘(𝑢))) ↔ (𝑔 Fn 𝑧 ∧ ∀𝑢𝑧 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
119118cbvexv 1943 . . . . . . . 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 2514 . . . . 5 (∀𝑤𝑧 ((𝜑𝑤𝑋) → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))) ↔ ∀𝑤𝑧 (𝜑 → (𝑤𝑋 → ∃𝑔(𝑔 Fn 𝑤 ∧ ∀𝑢𝑤 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))))
126 r19.21v 2585 . . . . 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 4652 . 2 (𝐶 ∈ On → ((𝜑𝐶𝑋) → ∃𝑔(𝑔 Fn 𝐶 ∧ ∀𝑢𝐶 (𝑔𝑢) = (𝐺‘(𝑔𝑢)))))
1313, 130mpcom 36 1 ((𝜑𝐶𝑋) → ∃𝑔(𝑔 Fn 𝐶 ∧ ∀𝑢𝐶 (𝑔𝑢) = (𝐺‘(𝑔𝑢))))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 104  w3a 981  wal 1371   = wceq 1373  wex 1516  wcel 2178  {cab 2193  wral 2486  wrex 2487  Vcvv 2776  cun 3172  {csn 3643  cop 3646   cuni 3864  Ord word 4427  Oncon0 4428  suc csuc 4430  cres 4695  Fun wfun 5284   Fn wfn 5285  cfv 5290  recscrecs 6413
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 711  ax-5 1471  ax-7 1472  ax-gen 1473  ax-ie1 1517  ax-ie2 1518  ax-8 1528  ax-10 1529  ax-11 1530  ax-i12 1531  ax-bndl 1533  ax-4 1534  ax-17 1550  ax-i9 1554  ax-ial 1558  ax-i5r 1559  ax-13 2180  ax-14 2181  ax-ext 2189  ax-coll 4175  ax-sep 4178  ax-pow 4234  ax-pr 4269  ax-un 4498  ax-setind 4603
This theorem depends on definitions:  df-bi 117  df-3an 983  df-tru 1376  df-fal 1379  df-nf 1485  df-sb 1787  df-eu 2058  df-mo 2059  df-clab 2194  df-cleq 2200  df-clel 2203  df-nfc 2339  df-ne 2379  df-ral 2491  df-rex 2492  df-reu 2493  df-rab 2495  df-v 2778  df-sbc 3006  df-csb 3102  df-dif 3176  df-un 3178  df-in 3180  df-ss 3187  df-nul 3469  df-pw 3628  df-sn 3649  df-pr 3650  df-op 3652  df-uni 3865  df-iun 3943  df-br 4060  df-opab 4122  df-mpt 4123  df-tr 4159  df-id 4358  df-iord 4431  df-on 4433  df-suc 4436  df-xp 4699  df-rel 4700  df-cnv 4701  df-co 4702  df-dm 4703  df-rn 4704  df-res 4705  df-ima 4706  df-iota 5251  df-fun 5292  df-fn 5293  df-f 5294  df-f1 5295  df-fo 5296  df-f1o 5297  df-fv 5298  df-recs 6414
This theorem is referenced by:  tfr1onlemres  6458
  Copyright terms: Public domain W3C validator