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 28537

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 5106	. . . 4 ⊢ (𝑧 = 𝑥_𝑂 → ( 0_s <s 𝑧 ↔ 0_s <s 𝑥_𝑂))
2		oveq1 7415	. . . . . 6 ⊢ (𝑧 = 𝑥_𝑂 → (𝑧 ·_s 𝑦) = (𝑥_𝑂 ·_s 𝑦))
3	2	eqeq1d 2762	. . . . 5 ⊢ (𝑧 = 𝑥_𝑂 → ((𝑧 ·_s 𝑦) = 1_s ↔ (𝑥_𝑂 ·_s 𝑦) = 1_s ))
4	3	rexbidv 3186	. . . 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 5106	. . . 4 ⊢ (𝑧 = 𝐴 → ( 0_s <s 𝑧 ↔ 0_s <s 𝐴))
7		oveq1 7415	. . . . . 6 ⊢ (𝑧 = 𝐴 → (𝑧 ·_s 𝑦) = (𝐴 ·_s 𝑦))
8	7	eqeq1d 2762	. . . . 5 ⊢ (𝑧 = 𝐴 → ((𝑧 ·_s 𝑦) = 1_s ↔ (𝐴 ·_s 𝑦) = 1_s ))
9	8	rexbidv 3186	. . . 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 2760	. . . . . . . . 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 28525	. . . . . . . 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 2760	. . . . . . . 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 2760	. . . . . . . 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 28535	. . . . . . 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 28102	. . . . . 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 2760	. . . . . . 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 28536	. . . . . 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 7416	. . . . . . . 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 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 }, ∅⟩)) “ ω)) → ((𝑧 ·_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 3576	. . . . . 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 28264	. 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 2738 ∀wral 3076 ∃wrex 3086 {crab 3412 Vcvv 3450 ⦋csb 3846 ∪ cun 3896 ∅c0 4278 {csn 4583 ⟨cop 4589 ∪ cuni 4866 class class class wbr 5102 ↦ cmpt 5185 “ cima 5650 ∘ ccom 5651 ‘cfv 6527 (class class class)co 7408 ωcom 7860 1^st c1st 7982 2^nd c2nd 7983 reccrdg 8395 No csur 27930 <s clts 27931 |s ccuts 28078 0_s c0s 28124 1_s c1s 28125 L cleft 28144 R cright 28145 +_s cadds 28278 -_s csubs 28339 ·_s cmuls 28425 /_su cdivs 28506

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 2213 ax-ext 2732 ax-rep 5231 ax-sep 5248 ax-nul 5259 ax-pow 5326 ax-pr 5390 ax-un 7734 ax-dc 10495

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 2564 df-eu 2594 df-clab 2739 df-cleq 2752 df-clel 2835 df-nfc 2909 df-ne 2956 df-ral 3077 df-rex 3087 df-rmo 3365 df-reu 3366 df-rab 3413 df-v 3452 df-sbc 3739 df-csb 3847 df-dif 3901 df-un 3903 df-in 3905 df-ss 3915 df-pss 3918 df-nul 4279 df-if 4482 df-pw 4558 df-sn 4584 df-pr 4586 df-tp 4588 df-op 4590 df-ot 4592 df-uni 4867 df-int 4907 df-iun 4952 df-br 5103 df-opab 5167 df-mpt 5186 df-tr 5212 df-id 5542 df-eprel 5547 df-po 5555 df-so 5556 df-fr 5600 df-se 5601 df-we 5602 df-xp 5653 df-rel 5654 df-cnv 5655 df-co 5656 df-dm 5657 df-rn 5658 df-res 5659 df-ima 5660 df-pred 6293 df-ord 6354 df-on 6355 df-lim 6356 df-suc 6357 df-iota 6483 df-fun 6529 df-fn 6530 df-f 6531 df-f1 6532 df-fo 6533 df-f1o 6534 df-fv 6535 df-riota 7365 df-ov 7411 df-oprab 7412 df-mpo 7413 df-om 7861 df-1st 7984 df-2nd 7985 df-frecs 8277 df-wrecs 8308 df-recs 8357 df-rdg 8396 df-1o 8454 df-2o 8455 df-oadd 8458 df-nadd 8653 df-no 27933 df-lts 27934 df-bday 27935 df-les 28035 df-slts 28077 df-cuts 28079 df-0s 28126 df-1s 28127 df-made 28146 df-old 28147 df-left 28149 df-right 28150 df-norec 28257 df-norec2 28268 df-adds 28279 df-negs 28340 df-subs 28341 df-muls 28426 df-divs 28507

This theorem is used by: recsex 28538

W3C validator