precsex - Metamath Proof Explorer

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

Theorem precsex 28481

Description: Every positive surreal has a reciprocal. Theorem 10(iv) of [Conway] p. 21. (Contributed by Scott Fenton, 15-Mar-2025.)

**Assertion**
Ref	Expression
precsex	⊢ ((𝐴 ∈ No ∧ 0_s <s 𝐴) → ∃𝑦 ∈ No (𝐴 ·_s 𝑦) = 1_s )

Distinct variable group: 𝑦,𝐴

Proof of Theorem precsex Dummy variables 𝑎 𝑏 𝑥 𝑥_𝑂 𝑥_𝐿 𝑥_𝑅 𝑦_𝐿 𝑦_𝑅 𝑧 𝑧_𝐿 𝑧_𝑅 𝑙 𝑚 𝑝 𝑞 𝑟 𝑠 𝑡 𝑢 𝑤 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		breq2 5111	. . . 4 ⊢ (𝑧 = 𝑥_𝑂 → ( 0_s <s 𝑧 ↔ 0_s <s 𝑥_𝑂))
2		oveq1 7423	. . . . . 6 ⊢ (𝑧 = 𝑥_𝑂 → (𝑧 ·_s 𝑦) = (𝑥_𝑂 ·_s 𝑦))
3	2	eqeq1d 2764	. . . . 5 ⊢ (𝑧 = 𝑥_𝑂 → ((𝑧 ·_s 𝑦) = 1_s ↔ (𝑥_𝑂 ·_s 𝑦) = 1_s ))
4	3	rexbidv 3188	. . . 4 ⊢ (𝑧 = 𝑥_𝑂 → (∃𝑦 ∈ No (𝑧 ·_s 𝑦) = 1_s ↔ ∃𝑦 ∈ No (𝑥_𝑂 ·_s 𝑦) = 1_s ))
5	1, 4	imbi12d 347	. . 3 ⊢ (𝑧 = 𝑥_𝑂 → (( 0_s <s 𝑧 → ∃𝑦 ∈ No (𝑧 ·_s 𝑦) = 1_s ) ↔ ( 0_s <s 𝑥_𝑂 → ∃𝑦 ∈ No (𝑥_𝑂 ·_s 𝑦) = 1_s )))
6		breq2 5111	. . . 4 ⊢ (𝑧 = 𝐴 → ( 0_s <s 𝑧 ↔ 0_s <s 𝐴))
7		oveq1 7423	. . . . . 6 ⊢ (𝑧 = 𝐴 → (𝑧 ·_s 𝑦) = (𝐴 ·_s 𝑦))
8	7	eqeq1d 2764	. . . . 5 ⊢ (𝑧 = 𝐴 → ((𝑧 ·_s 𝑦) = 1_s ↔ (𝐴 ·_s 𝑦) = 1_s ))
9	8	rexbidv 3188	. . . 4 ⊢ (𝑧 = 𝐴 → (∃𝑦 ∈ No (𝑧 ·_s 𝑦) = 1_s ↔ ∃𝑦 ∈ No (𝐴 ·_s 𝑦) = 1_s ))
10	6, 9	imbi12d 347	. . 3 ⊢ (𝑧 = 𝐴 → (( 0_s <s 𝑧 → ∃𝑦 ∈ No (𝑧 ·_s 𝑦) = 1_s ) ↔ ( 0_s <s 𝐴 → ∃𝑦 ∈ No (𝐴 ·_s 𝑦) = 1_s )))
11		eqid 2762	. . . . . . . . 9 ⊢ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩) = rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)
12	11	precsexlemcbv 28469	. . . . . . . 8 ⊢ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩) = rec((𝑝 ∈ V ↦ ⦋(1^st ‘𝑝) / 𝑙⦌⦋(2^nd ‘𝑝) / 𝑟⦌⟨(𝑙 ∪ ({𝑎 ∣ ∃𝑥_𝑅 ∈ ( R ‘𝑧)∃𝑦_𝐿 ∈ 𝑙 𝑎 = (( 1_s +_s ((𝑥_𝑅 -_s 𝑧) ·_s 𝑦_𝐿)) /_su 𝑥_𝑅)} ∪ {𝑎 ∣ ∃𝑥_𝐿 ∈ {𝑥 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑥}∃𝑦_𝑅 ∈ 𝑟 𝑎 = (( 1_s +_s ((𝑥_𝐿 -_s 𝑧) ·_s 𝑦_𝑅)) /_su 𝑥_𝐿)})), (𝑟 ∪ ({𝑎 ∣ ∃𝑥_𝐿 ∈ {𝑥 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑥}∃𝑦_𝐿 ∈ 𝑙 𝑎 = (( 1_s +_s ((𝑥_𝐿 -_s 𝑧) ·_s 𝑦_𝐿)) /_su 𝑥_𝐿)} ∪ {𝑎 ∣ ∃𝑥_𝑅 ∈ ( R ‘𝑧)∃𝑦_𝑅 ∈ 𝑟 𝑎 = (( 1_s +_s ((𝑥_𝑅 -_s 𝑧) ·_s 𝑦_𝑅)) /_su 𝑥_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)
13		eqid 2762	. . . . . . . 8 ⊢ (1^st ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) = (1^st ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩))
14		eqid 2762	. . . . . . . 8 ⊢ (2^nd ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) = (2^nd ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩))
15		simp1 1154	. . . . . . . 8 ⊢ ((𝑧 ∈ No ∧ 0_s <s 𝑧 ∧ ∀𝑥_𝑂 ∈ (( L ‘𝑧) ∪ ( R ‘𝑧))( 0_s <s 𝑥_𝑂 → ∃𝑦 ∈ No (𝑥_𝑂 ·_s 𝑦) = 1_s )) → 𝑧 ∈ No )
16		simp2 1155	. . . . . . . 8 ⊢ ((𝑧 ∈ No ∧ 0_s <s 𝑧 ∧ ∀𝑥_𝑂 ∈ (( L ‘𝑧) ∪ ( R ‘𝑧))( 0_s <s 𝑥_𝑂 → ∃𝑦 ∈ No (𝑥_𝑂 ·_s 𝑦) = 1_s )) → 0_s <s 𝑧)
17		simp3 1156	. . . . . . . 8 ⊢ ((𝑧 ∈ No ∧ 0_s <s 𝑧 ∧ ∀𝑥_𝑂 ∈ (( L ‘𝑧) ∪ ( R ‘𝑧))( 0_s <s 𝑥_𝑂 → ∃𝑦 ∈ No (𝑥_𝑂 ·_s 𝑦) = 1_s )) → ∀𝑥_𝑂 ∈ (( L ‘𝑧) ∪ ( R ‘𝑧))( 0_s <s 𝑥_𝑂 → ∃𝑦 ∈ No (𝑥_𝑂 ·_s 𝑦) = 1_s ))
18	12, 13, 14, 15, 16, 17	precsexlem10 28479	. . . . . . 7 ⊢ ((𝑧 ∈ No ∧ 0_s <s 𝑧 ∧ ∀𝑥_𝑂 ∈ (( L ‘𝑧) ∪ ( R ‘𝑧))( 0_s <s 𝑥_𝑂 → ∃𝑦 ∈ No (𝑥_𝑂 ·_s 𝑦) = 1_s )) → ∪ ((1^st ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω) <<s ∪ ((2^nd ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω))
19	18	cutscld 28046	. . . . . 6 ⊢ ((𝑧 ∈ No ∧ 0_s <s 𝑧 ∧ ∀𝑥_𝑂 ∈ (( L ‘𝑧) ∪ ( R ‘𝑧))( 0_s <s 𝑥_𝑂 → ∃𝑦 ∈ No (𝑥_𝑂 ·_s 𝑦) = 1_s )) → (∪ ((1^st ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω) \|s ∪ ((2^nd ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω)) ∈ No )
20		eqid 2762	. . . . . . 7 ⊢ (∪ ((1^st ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω) \|s ∪ ((2^nd ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω)) = (∪ ((1^st ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω) \|s ∪ ((2^nd ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω))
21	12, 13, 14, 15, 16, 17, 20	precsexlem11 28480	. . . . . 6 ⊢ ((𝑧 ∈ No ∧ 0_s <s 𝑧 ∧ ∀𝑥_𝑂 ∈ (( L ‘𝑧) ∪ ( R ‘𝑧))( 0_s <s 𝑥_𝑂 → ∃𝑦 ∈ No (𝑥_𝑂 ·_s 𝑦) = 1_s )) → (𝑧 ·_s (∪ ((1^st ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω) \|s ∪ ((2^nd ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω))) = 1_s )
22		oveq2 7424	. . . . . . . 8 ⊢ (𝑦 = (∪ ((1^st ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω) \|s ∪ ((2^nd ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω)) → (𝑧 ·_s 𝑦) = (𝑧 ·_s (∪ ((1^st ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω) \|s ∪ ((2^nd ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω))))
23	22	eqeq1d 2764	. . . . . . 7 ⊢ (𝑦 = (∪ ((1^st ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω) \|s ∪ ((2^nd ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω)) → ((𝑧 ·_s 𝑦) = 1_s ↔ (𝑧 ·_s (∪ ((1^st ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω) \|s ∪ ((2^nd ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω))) = 1_s ))
24	23	rspcev 3579	. . . . . 6 ⊢ (((∪ ((1^st ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω) \|s ∪ ((2^nd ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω)) ∈ No ∧ (𝑧 ·_s (∪ ((1^st ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω) \|s ∪ ((2^nd ∘ rec((𝑞 ∈ V ↦ ⦋(1^st ‘𝑞) / 𝑚⦌⦋(2^nd ‘𝑞) / 𝑠⦌⟨(𝑚 ∪ ({𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝑅)} ∪ {𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝐿)})), (𝑠 ∪ ({𝑏 ∣ ∃𝑧_𝐿 ∈ {𝑢 ∈ ( L ‘𝑧) ∣ 0_s <s 𝑢}∃𝑤 ∈ 𝑚 𝑏 = (( 1_s +_s ((𝑧_𝐿 -_s 𝑧) ·_s 𝑤)) /_su 𝑧_𝐿)} ∪ {𝑏 ∣ ∃𝑧_𝑅 ∈ ( R ‘𝑧)∃𝑡 ∈ 𝑠 𝑏 = (( 1_s +_s ((𝑧_𝑅 -_s 𝑧) ·_s 𝑡)) /_su 𝑧_𝑅)}))⟩), ⟨{ 0_s }, ∅⟩)) “ ω))) = 1_s ) → ∃𝑦 ∈ No (𝑧 ·_s 𝑦) = 1_s )
25	19, 21, 24	syl2anc 596	. . . . 5 ⊢ ((𝑧 ∈ No ∧ 0_s <s 𝑧 ∧ ∀𝑥_𝑂 ∈ (( L ‘𝑧) ∪ ( R ‘𝑧))( 0_s <s 𝑥_𝑂 → ∃𝑦 ∈ No (𝑥_𝑂 ·_s 𝑦) = 1_s )) → ∃𝑦 ∈ No (𝑧 ·_s 𝑦) = 1_s )
26	25	3exp 1137	. . . 4 ⊢ (𝑧 ∈ No → ( 0_s <s 𝑧 → (∀𝑥_𝑂 ∈ (( L ‘𝑧) ∪ ( R ‘𝑧))( 0_s <s 𝑥_𝑂 → ∃𝑦 ∈ No (𝑥_𝑂 ·_s 𝑦) = 1_s ) → ∃𝑦 ∈ No (𝑧 ·_s 𝑦) = 1_s )))
27	26	com23 87	. . 3 ⊢ (𝑧 ∈ No → (∀𝑥_𝑂 ∈ (( L ‘𝑧) ∪ ( R ‘𝑧))( 0_s <s 𝑥_𝑂 → ∃𝑦 ∈ No (𝑥_𝑂 ·_s 𝑦) = 1_s ) → ( 0_s <s 𝑧 → ∃𝑦 ∈ No (𝑧 ·_s 𝑦) = 1_s )))
28	5, 10, 27	noinds 28208	. 2 ⊢ (𝐴 ∈ No → ( 0_s <s 𝐴 → ∃𝑦 ∈ No (𝐴 ·_s 𝑦) = 1_s ))
29	28	imp 412	1 ⊢ ((𝐴 ∈ No ∧ 0_s <s 𝐴) → ∃𝑦 ∈ No (𝐴 ·_s 𝑦) = 1_s )

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ∧ wa 401 ∧ w3a 1103 = wceq 1570 ∈ wcel 2145 {cab 2740 ∀wral 3078 ∃wrex 3088 {crab 3414 Vcvv 3453 ⦋csb 3850 ∪ cun 3900 ∅c0 4282 {csn 4587 ⟨cop 4593 ∪ cuni 4870 class class class wbr 5107 ↦ cmpt 5190 “ cima 5662 ∘ ccom 5663 ‘cfv 6537 (class class class)co 7416 ωcom 7865 1^st c1st 7987 2^nd c2nd 7988 reccrdg 8401 No csur 27874 <s clts 27875 |s ccuts 28022 0_s c0s 28068 1_s c1s 28069 L cleft 28088 R cright 28089 +_s cadds 28222 -_s csubs 28283 ·_s cmuls 28369 /_su cdivs 28450

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 2215 ax-ext 2734 ax-rep 5236 ax-sep 5255 ax-nul 5267 ax-pow 5334 ax-pr 5402 ax-un 7739 ax-dc 10451

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 2566 df-eu 2596 df-clab 2741 df-cleq 2754 df-clel 2837 df-nfc 2911 df-ne 2958 df-ral 3079 df-rex 3089 df-rmo 3367 df-reu 3368 df-rab 3415 df-v 3455 df-sbc 3743 df-csb 3851 df-dif 3905 df-un 3907 df-in 3909 df-ss 3919 df-pss 3922 df-nul 4283 df-if 4486 df-pw 4562 df-sn 4588 df-pr 4590 df-tp 4592 df-op 4594 df-ot 4596 df-uni 4871 df-int 4911 df-iun 4956 df-br 5108 df-opab 5172 df-mpt 5191 df-tr 5217 df-id 5554 df-eprel 5559 df-po 5567 df-so 5568 df-fr 5612 df-se 5613 df-we 5614 df-xp 5665 df-rel 5666 df-cnv 5667 df-co 5668 df-dm 5669 df-rn 5670 df-res 5671 df-ima 5672 df-pred 6303 df-ord 6364 df-on 6365 df-lim 6366 df-suc 6367 df-iota 6493 df-fun 6539 df-fn 6540 df-f 6541 df-f1 6542 df-fo 6543 df-f1o 6544 df-fv 6545 df-riota 7373 df-ov 7419 df-oprab 7420 df-mpo 7421 df-om 7866 df-1st 7989 df-2nd 7990 df-frecs 8283 df-wrecs 8314 df-recs 8363 df-rdg 8402 df-1o 8458 df-2o 8459 df-oadd 8462 df-nadd 8657 df-no 27877 df-lts 27878 df-bday 27879 df-les 27979 df-slts 28021 df-cuts 28023 df-0s 28070 df-1s 28071 df-made 28090 df-old 28091 df-left 28093 df-right 28094 df-norec 28201 df-norec2 28212 df-adds 28223 df-negs 28284 df-subs 28285 df-muls 28370 df-divs 28451

This theorem is used by: recsex 28482

W3C validator