Theorem enq0sym 6622

Description: The equivalence relation for non-negative fractions is symmetric. Lemma for enq0er 6625. (Contributed by Jim Kingdon, 14-Nov-2019.)

Assertion

Ref	Expression
enq0sym	⊢ (𝑓 ~Q0 𝑔 → 𝑔 ~Q0 𝑓)

Proof of Theorem enq0sym

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

Step	Hyp	Ref	Expression
1		vex 2604	. . . . . . . 8 ⊢ 𝑓 ∈ V
2		vex 2604	. . . . . . . 8 ⊢ 𝑔 ∈ V
3		eleq1 2141	. . . . . . . . . 10 ⊢ (𝑥 = 𝑓 → (𝑥 ∈ (ω × N) ↔ 𝑓 ∈ (ω × N)))
4	3	anbi1d 452	. . . . . . . . 9 ⊢ (𝑥 = 𝑓 → ((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ↔ (𝑓 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N))))
5		eqeq1 2087	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑓 → (𝑥 = ⟨𝑧, 𝑤⟩ ↔ 𝑓 = ⟨𝑧, 𝑤⟩))
6	5	anbi1d 452	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑓 → ((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ↔ (𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩)))
7	6	anbi1d 452	. . . . . . . . . 10 ⊢ (𝑥 = 𝑓 → (((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣)) ↔ ((𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣))))
8	7	4exbidv 1791	. . . . . . . . 9 ⊢ (𝑥 = 𝑓 → (∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣)) ↔ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣))))
9	4, 8	anbi12d 456	. . . . . . . 8 ⊢ (𝑥 = 𝑓 → (((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣))) ↔ ((𝑓 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣)))))
10		eleq1 2141	. . . . . . . . . 10 ⊢ (𝑦 = 𝑔 → (𝑦 ∈ (ω × N) ↔ 𝑔 ∈ (ω × N)))
11	10	anbi2d 451	. . . . . . . . 9 ⊢ (𝑦 = 𝑔 → ((𝑓 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ↔ (𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N))))
12		eqeq1 2087	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑔 → (𝑦 = ⟨𝑣, 𝑢⟩ ↔ 𝑔 = ⟨𝑣, 𝑢⟩))
13	12	anbi2d 451	. . . . . . . . . . 11 ⊢ (𝑦 = 𝑔 → ((𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ↔ (𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑔 = ⟨𝑣, 𝑢⟩)))
14	13	anbi1d 452	. . . . . . . . . 10 ⊢ (𝑦 = 𝑔 → (((𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣)) ↔ ((𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑔 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣))))
15	14	4exbidv 1791	. . . . . . . . 9 ⊢ (𝑦 = 𝑔 → (∃𝑧∃𝑤∃𝑣∃𝑢((𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣)) ↔ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑔 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣))))
16	11, 15	anbi12d 456	. . . . . . . 8 ⊢ (𝑦 = 𝑔 → (((𝑓 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣))) ↔ ((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑔 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣)))))
17		df-enq0 6614	. . . . . . . 8 ⊢ ~Q0 = {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣)))}
18	1, 2, 9, 16, 17	brab 4027	. . . . . . 7 ⊢ (𝑓 ~Q0 𝑔 ↔ ((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑔 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣))))
19	18	biimpi 118	. . . . . 6 ⊢ (𝑓 ~Q0 𝑔 → ((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑔 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣))))
20		opeq12 3572	. . . . . . . . . . 11 ⊢ ((𝑧 = 𝑎 ∧ 𝑤 = 𝑏) → ⟨𝑧, 𝑤⟩ = ⟨𝑎, 𝑏⟩)
21	20	eqeq2d 2092	. . . . . . . . . 10 ⊢ ((𝑧 = 𝑎 ∧ 𝑤 = 𝑏) → (𝑓 = ⟨𝑧, 𝑤⟩ ↔ 𝑓 = ⟨𝑎, 𝑏⟩))
22	21	anbi1d 452	. . . . . . . . 9 ⊢ ((𝑧 = 𝑎 ∧ 𝑤 = 𝑏) → ((𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑔 = ⟨𝑣, 𝑢⟩) ↔ (𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑣, 𝑢⟩)))
23		simpl 107	. . . . . . . . . . 11 ⊢ ((𝑧 = 𝑎 ∧ 𝑤 = 𝑏) → 𝑧 = 𝑎)
24	23	oveq1d 5547	. . . . . . . . . 10 ⊢ ((𝑧 = 𝑎 ∧ 𝑤 = 𝑏) → (𝑧 ·𝑜 𝑢) = (𝑎 ·𝑜 𝑢))
25		simpr 108	. . . . . . . . . . 11 ⊢ ((𝑧 = 𝑎 ∧ 𝑤 = 𝑏) → 𝑤 = 𝑏)
26	25	oveq1d 5547	. . . . . . . . . 10 ⊢ ((𝑧 = 𝑎 ∧ 𝑤 = 𝑏) → (𝑤 ·𝑜 𝑣) = (𝑏 ·𝑜 𝑣))
27	24, 26	eqeq12d 2095	. . . . . . . . 9 ⊢ ((𝑧 = 𝑎 ∧ 𝑤 = 𝑏) → ((𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣) ↔ (𝑎 ·𝑜 𝑢) = (𝑏 ·𝑜 𝑣)))
28	22, 27	anbi12d 456	. . . . . . . 8 ⊢ ((𝑧 = 𝑎 ∧ 𝑤 = 𝑏) → (((𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑔 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣)) ↔ ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑣, 𝑢⟩) ∧ (𝑎 ·𝑜 𝑢) = (𝑏 ·𝑜 𝑣))))
29		opeq12 3572	. . . . . . . . . . 11 ⊢ ((𝑣 = 𝑐 ∧ 𝑢 = 𝑑) → ⟨𝑣, 𝑢⟩ = ⟨𝑐, 𝑑⟩)
30	29	eqeq2d 2092	. . . . . . . . . 10 ⊢ ((𝑣 = 𝑐 ∧ 𝑢 = 𝑑) → (𝑔 = ⟨𝑣, 𝑢⟩ ↔ 𝑔 = ⟨𝑐, 𝑑⟩))
31	30	anbi2d 451	. . . . . . . . 9 ⊢ ((𝑣 = 𝑐 ∧ 𝑢 = 𝑑) → ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑣, 𝑢⟩) ↔ (𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩)))
32		simpr 108	. . . . . . . . . . 11 ⊢ ((𝑣 = 𝑐 ∧ 𝑢 = 𝑑) → 𝑢 = 𝑑)
33	32	oveq2d 5548	. . . . . . . . . 10 ⊢ ((𝑣 = 𝑐 ∧ 𝑢 = 𝑑) → (𝑎 ·𝑜 𝑢) = (𝑎 ·𝑜 𝑑))
34		simpl 107	. . . . . . . . . . 11 ⊢ ((𝑣 = 𝑐 ∧ 𝑢 = 𝑑) → 𝑣 = 𝑐)
35	34	oveq2d 5548	. . . . . . . . . 10 ⊢ ((𝑣 = 𝑐 ∧ 𝑢 = 𝑑) → (𝑏 ·𝑜 𝑣) = (𝑏 ·𝑜 𝑐))
36	33, 35	eqeq12d 2095	. . . . . . . . 9 ⊢ ((𝑣 = 𝑐 ∧ 𝑢 = 𝑑) → ((𝑎 ·𝑜 𝑢) = (𝑏 ·𝑜 𝑣) ↔ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐)))
37	31, 36	anbi12d 456	. . . . . . . 8 ⊢ ((𝑣 = 𝑐 ∧ 𝑢 = 𝑑) → (((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑣, 𝑢⟩) ∧ (𝑎 ·𝑜 𝑢) = (𝑏 ·𝑜 𝑣)) ↔ ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))))
38	28, 37	cbvex4v 1846	. . . . . . 7 ⊢ (∃𝑧∃𝑤∃𝑣∃𝑢((𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑔 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣)) ↔ ∃𝑎∃𝑏∃𝑐∃𝑑((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐)))
39	38	anbi2i 444	. . . . . 6 ⊢ (((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑓 = ⟨𝑧, 𝑤⟩ ∧ 𝑔 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣))) ↔ ((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ∃𝑎∃𝑏∃𝑐∃𝑑((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))))
40	19, 39	sylib 120	. . . . 5 ⊢ (𝑓 ~Q0 𝑔 → ((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ∃𝑎∃𝑏∃𝑐∃𝑑((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))))
41		19.42vv 1829	. . . . 5 ⊢ (∃𝑎∃𝑏((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ∃𝑐∃𝑑((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))) ↔ ((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ∃𝑎∃𝑏∃𝑐∃𝑑((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))))
42	40, 41	sylibr 132	. . . 4 ⊢ (𝑓 ~Q0 𝑔 → ∃𝑎∃𝑏((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ∃𝑐∃𝑑((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))))
43		19.42vv 1829	. . . . 5 ⊢ (∃𝑐∃𝑑((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))) ↔ ((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ∃𝑐∃𝑑((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))))
44	43	2exbii 1537	. . . 4 ⊢ (∃𝑎∃𝑏∃𝑐∃𝑑((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))) ↔ ∃𝑎∃𝑏((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ∃𝑐∃𝑑((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))))
45	42, 44	sylibr 132	. . 3 ⊢ (𝑓 ~Q0 𝑔 → ∃𝑎∃𝑏∃𝑐∃𝑑((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))))
46		pm3.22 261	. . . . . . 7 ⊢ ((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) → (𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)))
47	46	adantr 270	. . . . . 6 ⊢ (((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))) → (𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)))
48		pm3.22 261	. . . . . . 7 ⊢ ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) → (𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩))
49	48	ad2antrl 473	. . . . . 6 ⊢ (((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))) → (𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩))
50		simprr 498	. . . . . . . 8 ⊢ (((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))) → (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))
51		eleq1 2141	. . . . . . . . . . . . . 14 ⊢ (𝑓 = ⟨𝑎, 𝑏⟩ → (𝑓 ∈ (ω × N) ↔ ⟨𝑎, 𝑏⟩ ∈ (ω × N)))
52		opelxp 4392	. . . . . . . . . . . . . 14 ⊢ (⟨𝑎, 𝑏⟩ ∈ (ω × N) ↔ (𝑎 ∈ ω ∧ 𝑏 ∈ N))
53	51, 52	syl6bb 194	. . . . . . . . . . . . 13 ⊢ (𝑓 = ⟨𝑎, 𝑏⟩ → (𝑓 ∈ (ω × N) ↔ (𝑎 ∈ ω ∧ 𝑏 ∈ N)))
54	53	biimpcd 157	. . . . . . . . . . . 12 ⊢ (𝑓 ∈ (ω × N) → (𝑓 = ⟨𝑎, 𝑏⟩ → (𝑎 ∈ ω ∧ 𝑏 ∈ N)))
55		eleq1 2141	. . . . . . . . . . . . . 14 ⊢ (𝑔 = ⟨𝑐, 𝑑⟩ → (𝑔 ∈ (ω × N) ↔ ⟨𝑐, 𝑑⟩ ∈ (ω × N)))
56		opelxp 4392	. . . . . . . . . . . . . 14 ⊢ (⟨𝑐, 𝑑⟩ ∈ (ω × N) ↔ (𝑐 ∈ ω ∧ 𝑑 ∈ N))
57	55, 56	syl6bb 194	. . . . . . . . . . . . 13 ⊢ (𝑔 = ⟨𝑐, 𝑑⟩ → (𝑔 ∈ (ω × N) ↔ (𝑐 ∈ ω ∧ 𝑑 ∈ N)))
58	57	biimpcd 157	. . . . . . . . . . . 12 ⊢ (𝑔 ∈ (ω × N) → (𝑔 = ⟨𝑐, 𝑑⟩ → (𝑐 ∈ ω ∧ 𝑑 ∈ N)))
59	54, 58	im2anan9 562	. . . . . . . . . . 11 ⊢ ((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) → ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) → ((𝑎 ∈ ω ∧ 𝑏 ∈ N) ∧ (𝑐 ∈ ω ∧ 𝑑 ∈ N))))
60	59	imp 122	. . . . . . . . . 10 ⊢ (((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ (𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩)) → ((𝑎 ∈ ω ∧ 𝑏 ∈ N) ∧ (𝑐 ∈ ω ∧ 𝑑 ∈ N)))
61	60	adantrr 462	. . . . . . . . 9 ⊢ (((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))) → ((𝑎 ∈ ω ∧ 𝑏 ∈ N) ∧ (𝑐 ∈ ω ∧ 𝑑 ∈ N)))
62		pinn 6499	. . . . . . . . . . . 12 ⊢ (𝑑 ∈ N → 𝑑 ∈ ω)
63		nnmcom 6091	. . . . . . . . . . . 12 ⊢ ((𝑎 ∈ ω ∧ 𝑑 ∈ ω) → (𝑎 ·𝑜 𝑑) = (𝑑 ·𝑜 𝑎))
64	62, 63	sylan2 280	. . . . . . . . . . 11 ⊢ ((𝑎 ∈ ω ∧ 𝑑 ∈ N) → (𝑎 ·𝑜 𝑑) = (𝑑 ·𝑜 𝑎))
65		pinn 6499	. . . . . . . . . . . 12 ⊢ (𝑏 ∈ N → 𝑏 ∈ ω)
66		nnmcom 6091	. . . . . . . . . . . 12 ⊢ ((𝑏 ∈ ω ∧ 𝑐 ∈ ω) → (𝑏 ·𝑜 𝑐) = (𝑐 ·𝑜 𝑏))
67	65, 66	sylan 277	. . . . . . . . . . 11 ⊢ ((𝑏 ∈ N ∧ 𝑐 ∈ ω) → (𝑏 ·𝑜 𝑐) = (𝑐 ·𝑜 𝑏))
68	64, 67	eqeqan12d 2096	. . . . . . . . . 10 ⊢ (((𝑎 ∈ ω ∧ 𝑑 ∈ N) ∧ (𝑏 ∈ N ∧ 𝑐 ∈ ω)) → ((𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐) ↔ (𝑑 ·𝑜 𝑎) = (𝑐 ·𝑜 𝑏)))
69	68	an42s 553	. . . . . . . . 9 ⊢ (((𝑎 ∈ ω ∧ 𝑏 ∈ N) ∧ (𝑐 ∈ ω ∧ 𝑑 ∈ N)) → ((𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐) ↔ (𝑑 ·𝑜 𝑎) = (𝑐 ·𝑜 𝑏)))
70	61, 69	syl 14	. . . . . . . 8 ⊢ (((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))) → ((𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐) ↔ (𝑑 ·𝑜 𝑎) = (𝑐 ·𝑜 𝑏)))
71	50, 70	mpbid 145	. . . . . . 7 ⊢ (((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))) → (𝑑 ·𝑜 𝑎) = (𝑐 ·𝑜 𝑏))
72	71	eqcomd 2086	. . . . . 6 ⊢ (((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))) → (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))
73	47, 49, 72	jca32 303	. . . . 5 ⊢ (((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))) → ((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))))
74	73	2eximi 1532	. . . 4 ⊢ (∃𝑐∃𝑑((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))) → ∃𝑐∃𝑑((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))))
75	74	2eximi 1532	. . 3 ⊢ (∃𝑎∃𝑏∃𝑐∃𝑑((𝑓 ∈ (ω × N) ∧ 𝑔 ∈ (ω × N)) ∧ ((𝑓 = ⟨𝑎, 𝑏⟩ ∧ 𝑔 = ⟨𝑐, 𝑑⟩) ∧ (𝑎 ·𝑜 𝑑) = (𝑏 ·𝑜 𝑐))) → ∃𝑎∃𝑏∃𝑐∃𝑑((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))))
76	45, 75	syl 14	. 2 ⊢ (𝑓 ~Q0 𝑔 → ∃𝑎∃𝑏∃𝑐∃𝑑((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))))
77		exrot4 1621	. . 3 ⊢ (∃𝑎∃𝑏∃𝑐∃𝑑((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))) ↔ ∃𝑐∃𝑑∃𝑎∃𝑏((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))))
78		19.42vv 1829	. . . . 5 ⊢ (∃𝑎∃𝑏((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))) ↔ ((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ∃𝑎∃𝑏((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))))
79	78	2exbii 1537	. . . 4 ⊢ (∃𝑐∃𝑑∃𝑎∃𝑏((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))) ↔ ∃𝑐∃𝑑((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ∃𝑎∃𝑏((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))))
80		19.42vv 1829	. . . . 5 ⊢ (∃𝑐∃𝑑((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ∃𝑎∃𝑏((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))) ↔ ((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ∃𝑐∃𝑑∃𝑎∃𝑏((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))))
81		opeq12 3572	. . . . . . . . . 10 ⊢ ((𝑧 = 𝑐 ∧ 𝑤 = 𝑑) → ⟨𝑧, 𝑤⟩ = ⟨𝑐, 𝑑⟩)
82	81	eqeq2d 2092	. . . . . . . . 9 ⊢ ((𝑧 = 𝑐 ∧ 𝑤 = 𝑑) → (𝑔 = ⟨𝑧, 𝑤⟩ ↔ 𝑔 = ⟨𝑐, 𝑑⟩))
83	82	anbi1d 452	. . . . . . . 8 ⊢ ((𝑧 = 𝑐 ∧ 𝑤 = 𝑑) → ((𝑔 = ⟨𝑧, 𝑤⟩ ∧ 𝑓 = ⟨𝑣, 𝑢⟩) ↔ (𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑣, 𝑢⟩)))
84		simpl 107	. . . . . . . . . 10 ⊢ ((𝑧 = 𝑐 ∧ 𝑤 = 𝑑) → 𝑧 = 𝑐)
85	84	oveq1d 5547	. . . . . . . . 9 ⊢ ((𝑧 = 𝑐 ∧ 𝑤 = 𝑑) → (𝑧 ·𝑜 𝑢) = (𝑐 ·𝑜 𝑢))
86		simpr 108	. . . . . . . . . 10 ⊢ ((𝑧 = 𝑐 ∧ 𝑤 = 𝑑) → 𝑤 = 𝑑)
87	86	oveq1d 5547	. . . . . . . . 9 ⊢ ((𝑧 = 𝑐 ∧ 𝑤 = 𝑑) → (𝑤 ·𝑜 𝑣) = (𝑑 ·𝑜 𝑣))
88	85, 87	eqeq12d 2095	. . . . . . . 8 ⊢ ((𝑧 = 𝑐 ∧ 𝑤 = 𝑑) → ((𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣) ↔ (𝑐 ·𝑜 𝑢) = (𝑑 ·𝑜 𝑣)))
89	83, 88	anbi12d 456	. . . . . . 7 ⊢ ((𝑧 = 𝑐 ∧ 𝑤 = 𝑑) → (((𝑔 = ⟨𝑧, 𝑤⟩ ∧ 𝑓 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣)) ↔ ((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑣, 𝑢⟩) ∧ (𝑐 ·𝑜 𝑢) = (𝑑 ·𝑜 𝑣))))
90		opeq12 3572	. . . . . . . . . 10 ⊢ ((𝑣 = 𝑎 ∧ 𝑢 = 𝑏) → ⟨𝑣, 𝑢⟩ = ⟨𝑎, 𝑏⟩)
91	90	eqeq2d 2092	. . . . . . . . 9 ⊢ ((𝑣 = 𝑎 ∧ 𝑢 = 𝑏) → (𝑓 = ⟨𝑣, 𝑢⟩ ↔ 𝑓 = ⟨𝑎, 𝑏⟩))
92	91	anbi2d 451	. . . . . . . 8 ⊢ ((𝑣 = 𝑎 ∧ 𝑢 = 𝑏) → ((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑣, 𝑢⟩) ↔ (𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩)))
93		simpr 108	. . . . . . . . . 10 ⊢ ((𝑣 = 𝑎 ∧ 𝑢 = 𝑏) → 𝑢 = 𝑏)
94	93	oveq2d 5548	. . . . . . . . 9 ⊢ ((𝑣 = 𝑎 ∧ 𝑢 = 𝑏) → (𝑐 ·𝑜 𝑢) = (𝑐 ·𝑜 𝑏))
95		simpl 107	. . . . . . . . . 10 ⊢ ((𝑣 = 𝑎 ∧ 𝑢 = 𝑏) → 𝑣 = 𝑎)
96	95	oveq2d 5548	. . . . . . . . 9 ⊢ ((𝑣 = 𝑎 ∧ 𝑢 = 𝑏) → (𝑑 ·𝑜 𝑣) = (𝑑 ·𝑜 𝑎))
97	94, 96	eqeq12d 2095	. . . . . . . 8 ⊢ ((𝑣 = 𝑎 ∧ 𝑢 = 𝑏) → ((𝑐 ·𝑜 𝑢) = (𝑑 ·𝑜 𝑣) ↔ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎)))
98	92, 97	anbi12d 456	. . . . . . 7 ⊢ ((𝑣 = 𝑎 ∧ 𝑢 = 𝑏) → (((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑣, 𝑢⟩) ∧ (𝑐 ·𝑜 𝑢) = (𝑑 ·𝑜 𝑣)) ↔ ((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))))
99	89, 98	cbvex4v 1846	. . . . . 6 ⊢ (∃𝑧∃𝑤∃𝑣∃𝑢((𝑔 = ⟨𝑧, 𝑤⟩ ∧ 𝑓 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣)) ↔ ∃𝑐∃𝑑∃𝑎∃𝑏((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎)))
100		eleq1 2141	. . . . . . . . . 10 ⊢ (𝑥 = 𝑔 → (𝑥 ∈ (ω × N) ↔ 𝑔 ∈ (ω × N)))
101	100	anbi1d 452	. . . . . . . . 9 ⊢ (𝑥 = 𝑔 → ((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ↔ (𝑔 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N))))
102		eqeq1 2087	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑔 → (𝑥 = ⟨𝑧, 𝑤⟩ ↔ 𝑔 = ⟨𝑧, 𝑤⟩))
103	102	anbi1d 452	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑔 → ((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ↔ (𝑔 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩)))
104	103	anbi1d 452	. . . . . . . . . 10 ⊢ (𝑥 = 𝑔 → (((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣)) ↔ ((𝑔 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣))))
105	104	4exbidv 1791	. . . . . . . . 9 ⊢ (𝑥 = 𝑔 → (∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣)) ↔ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑔 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣))))
106	101, 105	anbi12d 456	. . . . . . . 8 ⊢ (𝑥 = 𝑔 → (((𝑥 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑥 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣))) ↔ ((𝑔 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑔 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣)))))
107		eleq1 2141	. . . . . . . . . 10 ⊢ (𝑦 = 𝑓 → (𝑦 ∈ (ω × N) ↔ 𝑓 ∈ (ω × N)))
108	107	anbi2d 451	. . . . . . . . 9 ⊢ (𝑦 = 𝑓 → ((𝑔 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ↔ (𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N))))
109		eqeq1 2087	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑓 → (𝑦 = ⟨𝑣, 𝑢⟩ ↔ 𝑓 = ⟨𝑣, 𝑢⟩))
110	109	anbi2d 451	. . . . . . . . . . 11 ⊢ (𝑦 = 𝑓 → ((𝑔 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ↔ (𝑔 = ⟨𝑧, 𝑤⟩ ∧ 𝑓 = ⟨𝑣, 𝑢⟩)))
111	110	anbi1d 452	. . . . . . . . . 10 ⊢ (𝑦 = 𝑓 → (((𝑔 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣)) ↔ ((𝑔 = ⟨𝑧, 𝑤⟩ ∧ 𝑓 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣))))
112	111	4exbidv 1791	. . . . . . . . 9 ⊢ (𝑦 = 𝑓 → (∃𝑧∃𝑤∃𝑣∃𝑢((𝑔 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣)) ↔ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑔 = ⟨𝑧, 𝑤⟩ ∧ 𝑓 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣))))
113	108, 112	anbi12d 456	. . . . . . . 8 ⊢ (𝑦 = 𝑓 → (((𝑔 ∈ (ω × N) ∧ 𝑦 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑔 = ⟨𝑧, 𝑤⟩ ∧ 𝑦 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣))) ↔ ((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑔 = ⟨𝑧, 𝑤⟩ ∧ 𝑓 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣)))))
114	2, 1, 106, 113, 17	brab 4027	. . . . . . 7 ⊢ (𝑔 ~Q0 𝑓 ↔ ((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑔 = ⟨𝑧, 𝑤⟩ ∧ 𝑓 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣))))
115	114	biimpri 131	. . . . . 6 ⊢ (((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ∃𝑧∃𝑤∃𝑣∃𝑢((𝑔 = ⟨𝑧, 𝑤⟩ ∧ 𝑓 = ⟨𝑣, 𝑢⟩) ∧ (𝑧 ·𝑜 𝑢) = (𝑤 ·𝑜 𝑣))) → 𝑔 ~Q0 𝑓)
116	99, 115	sylan2br 282	. . . . 5 ⊢ (((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ∃𝑐∃𝑑∃𝑎∃𝑏((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))) → 𝑔 ~Q0 𝑓)
117	80, 116	sylbi 119	. . . 4 ⊢ (∃𝑐∃𝑑((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ∃𝑎∃𝑏((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))) → 𝑔 ~Q0 𝑓)
118	79, 117	sylbi 119	. . 3 ⊢ (∃𝑐∃𝑑∃𝑎∃𝑏((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))) → 𝑔 ~Q0 𝑓)
119	77, 118	sylbi 119	. 2 ⊢ (∃𝑎∃𝑏∃𝑐∃𝑑((𝑔 ∈ (ω × N) ∧ 𝑓 ∈ (ω × N)) ∧ ((𝑔 = ⟨𝑐, 𝑑⟩ ∧ 𝑓 = ⟨𝑎, 𝑏⟩) ∧ (𝑐 ·𝑜 𝑏) = (𝑑 ·𝑜 𝑎))) → 𝑔 ~Q0 𝑓)
120	76, 119	syl 14	1 ⊢ (𝑓 ~Q0 𝑔 → 𝑔 ~Q0 𝑓)

Syntax hints:   → wi 4   ∧ wa 102   ↔ wb 103   = wceq 1284  ∃wex 1421   ∈ wcel 1433  ⟨cop 3401   class class class wbr 3785  ωcom 4331   × cxp 4361  (class class class)co 5532   ·_𝑜 comu 6022  Ncnpi 6462   ~_Q0 ceq0 6476

This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-in1 576  ax-in2 577  ax-io 662  ax-5 1376  ax-7 1377  ax-gen 1378  ax-ie1 1422  ax-ie2 1423  ax-8 1435  ax-10 1436  ax-11 1437  ax-i12 1438  ax-bndl 1439  ax-4 1440  ax-13 1444  ax-14 1445  ax-17 1459  ax-i9 1463  ax-ial 1467  ax-i5r 1468  ax-ext 2063  ax-coll 3893  ax-sep 3896  ax-nul 3904  ax-pow 3948  ax-pr 3964  ax-un 4188  ax-setind 4280  ax-iinf 4329

This theorem depends on definitions:  df-bi 115  df-3an 921  df-tru 1287  df-fal 1290  df-nf 1390  df-sb 1686  df-eu 1944  df-mo 1945  df-clab 2068  df-cleq 2074  df-clel 2077  df-nfc 2208  df-ne 2246  df-ral 2353  df-rex 2354  df-reu 2355  df-rab 2357  df-v 2603  df-sbc 2816  df-csb 2909  df-dif 2975  df-un 2977  df-in 2979  df-ss 2986  df-nul 3252  df-pw 3384  df-sn 3404  df-pr 3405  df-op 3407  df-uni 3602  df-int 3637  df-iun 3680  df-br 3786  df-opab 3840  df-mpt 3841  df-tr 3876  df-id 4048  df-iord 4121  df-on 4123  df-suc 4126  df-iom 4332  df-xp 4369  df-rel 4370  df-cnv 4371  df-co 4372  df-dm 4373  df-rn 4374  df-res 4375  df-ima 4376  df-iota 4887  df-fun 4924  df-fn 4925  df-f 4926  df-f1 4927  df-fo 4928  df-f1o 4929  df-fv 4930  df-ov 5535  df-oprab 5536  df-mpt2 5537  df-1st 5787  df-2nd 5788  df-recs 5943  df-irdg 5980  df-oadd 6028  df-omul 6029  df-ni 6494  df-enq0 6614

This theorem is referenced by:  enq0er  6625