Theorem enq0enq 7788

Description: Equivalence on positive fractions in terms of equivalence on nonnegative fractions. (Contributed by Jim Kingdon, 12-Nov-2019.)

Assertion

Ref	Expression
enq0enq	⊢ ~Q = ( ~Q0 ∩ ((N × N) × (N × N)))

Proof of Theorem enq0enq

Dummy variables 𝑣 𝑢 𝑤 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-enq0 7781	. . 3 ⊢ ~Q0 = {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣)))}
2		df-xp 4775	. . 3 ⊢ ((N × N) × (N × N)) = {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))}
3	1, 2	ineq12i 3430	. 2 ⊢ ( ~Q0 ∩ ((N × N) × (N × N))) = ({⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣)))} ∩ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))})
4		inopab 4907	. 2 ⊢ ({⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣)))} ∩ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))}) = {⟨𝑥, 𝑦⟩ ∣ (((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)))}
5		an32 568	. . . . . 6 ⊢ ((((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ↔ (((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))))
6		an4 592	. . . . . . . 8 ⊢ (((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ↔ ((𝑥 ∈ (ω × N) ∧ 𝑥 ∈ (N × N)) ∧ (𝑦 ∈ (ω × N) ∧ 𝑦 ∈ (N × N))))
7		pinn 7666	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ N → 𝑥 ∈ ω)
8	7	ssriv 3252	. . . . . . . . . . . 12 ⊢ N ⊆ ω
9		xpss1 4880	. . . . . . . . . . . 12 ⊢ (N ⊆ ω → (N × N) ⊆ (ω × N))
10	8, 9	ax-mp 5	. . . . . . . . . . 11 ⊢ (N × N) ⊆ (ω × N)
11	10	sseli 3244	. . . . . . . . . 10 ⊢ (𝑥 ∈ (N × N) → 𝑥 ∈ (ω × N))
12	11	pm4.71ri 396	. . . . . . . . 9 ⊢ (𝑥 ∈ (N × N) ↔ (𝑥 ∈ (ω × N) ∧ 𝑥 ∈ (N × N)))
13	10	sseli 3244	. . . . . . . . . 10 ⊢ (𝑦 ∈ (N × N) → 𝑦 ∈ (ω × N))
14	13	pm4.71ri 396	. . . . . . . . 9 ⊢ (𝑦 ∈ (N × N) ↔ (𝑦 ∈ (ω × N) ∧ 𝑦 ∈ (N × N)))
15	12, 14	anbi12i 464	. . . . . . . 8 ⊢ ((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ↔ ((𝑥 ∈ (ω × N) ∧ 𝑥 ∈ (N × N)) ∧ (𝑦 ∈ (ω × N) ∧ 𝑦 ∈ (N × N))))
16	6, 15	bitr4i 187	. . . . . . 7 ⊢ (((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ↔ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)))
17	16	anbi1i 462	. . . . . 6 ⊢ ((((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))) ↔ ((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))))
18	5, 17	bitri 184	. . . . 5 ⊢ ((((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ↔ ((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))))
19		eleq1 2301	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = ⟨𝑧, 𝑤⟩ → (𝑥 ∈ (N × N) ↔ ⟨𝑧, 𝑤⟩ ∈ (N × N)))
20		opelxp 4799	. . . . . . . . . . . . . . . . . . 19 ⊢ (⟨𝑧, 𝑤⟩ ∈ (N × N) ↔ (𝑧 ∈ N ∧ 𝑤 ∈ N))
21	19, 20	bitrdi 196	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = ⟨𝑧, 𝑤⟩ → (𝑥 ∈ (N × N) ↔ (𝑧 ∈ N ∧ 𝑤 ∈ N)))
22		eleq1 2301	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑦 = ⟨𝑣, 𝑢⟩ → (𝑦 ∈ (N × N) ↔ ⟨𝑣, 𝑢⟩ ∈ (N × N)))
23		opelxp 4799	. . . . . . . . . . . . . . . . . . 19 ⊢ (⟨𝑣, 𝑢⟩ ∈ (N × N) ↔ (𝑣 ∈ N ∧ 𝑢 ∈ N))
24	22, 23	bitrdi 196	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 = ⟨𝑣, 𝑢⟩ → (𝑦 ∈ (N × N) ↔ (𝑣 ∈ N ∧ 𝑢 ∈ N)))
25	21, 24	bi2anan9 614	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) → ((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ↔ ((𝑧 ∈ N ∧ 𝑤 ∈ N) ∧ (𝑣 ∈ N ∧ 𝑢 ∈ N))))
26	25	pm5.32i 458	. . . . . . . . . . . . . . . 16 ⊢ (((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ↔ ((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ ((𝑧 ∈ N ∧ 𝑤 ∈ N) ∧ (𝑣 ∈ N ∧ 𝑢 ∈ N))))
27	26	anbi1i 462	. . . . . . . . . . . . . . 15 ⊢ ((((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣)) ↔ (((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ ((𝑧 ∈ N ∧ 𝑤 ∈ N) ∧ (𝑣 ∈ N ∧ 𝑢 ∈ N))) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣)))
28		anass 405	. . . . . . . . . . . . . . 15 ⊢ ((((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ ((𝑧 ∈ N ∧ 𝑤 ∈ N) ∧ (𝑣 ∈ N ∧ 𝑢 ∈ N))) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣)) ↔ ((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (((𝑧 ∈ N ∧ 𝑤 ∈ N) ∧ (𝑣 ∈ N ∧ 𝑢 ∈ N)) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))))
29	27, 28	bitri 184	. . . . . . . . . . . . . 14 ⊢ ((((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣)) ↔ ((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (((𝑧 ∈ N ∧ 𝑤 ∈ N) ∧ (𝑣 ∈ N ∧ 𝑢 ∈ N)) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))))
30		mulpiord 7674	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑧 ∈ N ∧ 𝑢 ∈ N) → (𝑧 ·N 𝑢) = (𝑧 ·o 𝑢))
31		mulpiord 7674	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑤 ∈ N ∧ 𝑣 ∈ N) → (𝑤 ·N 𝑣) = (𝑤 ·o 𝑣))
32	30, 31	eqeqan12d 2254	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑧 ∈ N ∧ 𝑢 ∈ N) ∧ (𝑤 ∈ N ∧ 𝑣 ∈ N)) → ((𝑧 ·N 𝑢) = (𝑤 ·N 𝑣) ↔ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣)))
33	32	an42s 597	. . . . . . . . . . . . . . . 16 ⊢ (((𝑧 ∈ N ∧ 𝑤 ∈ N) ∧ (𝑣 ∈ N ∧ 𝑢 ∈ N)) → ((𝑧 ·N 𝑢) = (𝑤 ·N 𝑣) ↔ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣)))
34	33	pm5.32i 458	. . . . . . . . . . . . . . 15 ⊢ ((((𝑧 ∈ N ∧ 𝑤 ∈ N) ∧ (𝑣 ∈ N ∧ 𝑢 ∈ N)) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣)) ↔ (((𝑧 ∈ N ∧ 𝑤 ∈ N) ∧ (𝑣 ∈ N ∧ 𝑢 ∈ N)) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣)))
35	34	anbi2i 461	. . . . . . . . . . . . . 14 ⊢ (((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (((𝑧 ∈ N ∧ 𝑤 ∈ N) ∧ (𝑣 ∈ N ∧ 𝑢 ∈ N)) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣))) ↔ ((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (((𝑧 ∈ N ∧ 𝑤 ∈ N) ∧ (𝑣 ∈ N ∧ 𝑢 ∈ N)) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))))
36	29, 35	bitr4i 187	. . . . . . . . . . . . 13 ⊢ ((((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣)) ↔ ((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (((𝑧 ∈ N ∧ 𝑤 ∈ N) ∧ (𝑣 ∈ N ∧ 𝑢 ∈ N)) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣))))
37		anass 405	. . . . . . . . . . . . 13 ⊢ ((((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ ((𝑧 ∈ N ∧ 𝑤 ∈ N) ∧ (𝑣 ∈ N ∧ 𝑢 ∈ N))) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣)) ↔ ((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (((𝑧 ∈ N ∧ 𝑤 ∈ N) ∧ (𝑣 ∈ N ∧ 𝑢 ∈ N)) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣))))
38	36, 37	bitr4i 187	. . . . . . . . . . . 12 ⊢ ((((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣)) ↔ (((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ ((𝑧 ∈ N ∧ 𝑤 ∈ N) ∧ (𝑣 ∈ N ∧ 𝑢 ∈ N))) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣)))
39	26	anbi1i 462	. . . . . . . . . . . 12 ⊢ ((((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣)) ↔ (((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ ((𝑧 ∈ N ∧ 𝑤 ∈ N) ∧ (𝑣 ∈ N ∧ 𝑢 ∈ N))) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣)))
40	38, 39	bitr4i 187	. . . . . . . . . . 11 ⊢ ((((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣)) ↔ (((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣)))
41		ancom 266	. . . . . . . . . . . 12 ⊢ (((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ↔ ((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ (𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩)))
42	41	anbi1i 462	. . . . . . . . . . 11 ⊢ ((((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣)) ↔ (((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ (𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩)) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣)))
43	41	anbi1i 462	. . . . . . . . . . 11 ⊢ ((((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣)) ↔ (((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ (𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩)) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣)))
44	40, 42, 43	3bitr3i 210	. . . . . . . . . 10 ⊢ ((((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ (𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩)) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣)) ↔ (((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ (𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩)) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣)))
45		anass 405	. . . . . . . . . 10 ⊢ ((((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ (𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩)) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣)) ↔ ((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))))
46		anass 405	. . . . . . . . . 10 ⊢ ((((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ (𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩)) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣)) ↔ ((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣))))
47	44, 45, 46	3bitr3i 210	. . . . . . . . 9 ⊢ (((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))) ↔ ((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣))))
48	47	2exbii 1659	. . . . . . . 8 ⊢ (∃𝑣∃𝑢((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))) ↔ ∃𝑣∃𝑢((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣))))
49		19.42vv 1967	. . . . . . . 8 ⊢ (∃𝑣∃𝑢((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))) ↔ ((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))))
50		19.42vv 1967	. . . . . . . 8 ⊢ (∃𝑣∃𝑢((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣))) ↔ ((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣))))
51	48, 49, 50	3bitr3i 210	. . . . . . 7 ⊢ (((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))) ↔ ((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣))))
52	51	2exbii 1659	. . . . . 6 ⊢ (∃𝑧∃𝑤((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))) ↔ ∃𝑧∃𝑤((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣))))
53		19.42vv 1967	. . . . . 6 ⊢ (∃𝑧∃𝑤((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))) ↔ ((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))))
54		19.42vv 1967	. . . . . 6 ⊢ (∃𝑧∃𝑤((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣))) ↔ ((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣))))
55	52, 53, 54	3bitr3i 210	. . . . 5 ⊢ (((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))) ↔ ((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣))))
56	18, 55	bitri 184	. . . 4 ⊢ ((((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N))) ↔ ((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣))))
57	56	opabbii 4193	. . 3 ⊢ {⟨𝑥, 𝑦⟩ ∣ (((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)))} = {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣)))}
58		df-enq 7704	. . 3 ⊢ ~Q = {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·N 𝑢) = (𝑤 ·N 𝑣)))}
59	57, 58	eqtr4i 2262	. 2 ⊢ {⟨𝑥, 𝑦⟩ ∣ (((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·o 𝑢) = (𝑤 ·o 𝑣))) ∧ (𝑥 ∈ (N × N) ∧ 𝑦 ∈ (N × N)))} = ~Q
60	3, 4, 59	3eqtrri 2264	1 ⊢ ~Q = ( ~Q0 ∩ ((N × N) × (N × N)))

Syntax hints:   ∧ wa 104   ↔ wb 105   = wceq 1402  ∃wex 1545   ∈ wcel 2209   ∩ cin 3219   ⊆ wss 3220  ⟨cop 3708  {copab 4186  ωcom 4732   × cxp 4767  (class class class)co 6075   ·_o comu 6675  Ncnpi 7629   ·_N cmi 7631   ~_Q ceq 7636   ~_Q0 ceq0 7643

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 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-sep 4244  ax-pow 4306  ax-pr 4341

This theorem depends on definitions:  df-bi 117  df-3an 1011  df-tru 1405  df-nf 1514  df-sb 1816  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ral 2533  df-rex 2534  df-v 2823  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-pw 3687  df-sn 3711  df-pr 3712  df-op 3714  df-uni 3931  df-br 4126  df-opab 4188  df-xp 4775  df-rel 4776  df-res 4781  df-iota 5332  df-fv 5380  df-ov 6078  df-ni 7661  df-mi 7663  df-enq 7704  df-enq0 7781

This theorem is referenced by:  nqnq0pi  7795