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

Theorem nnnq0lem1 6636
Description: Decomposing non-negative fractions into natural numbers. Lemma for addnnnq0 6639 and mulnnnq0 6640. (Contributed by Jim Kingdon, 23-Nov-2019.)
Assertion
Ref Expression
nnnq0lem1 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → ((((𝑤 ∈ ω ∧ 𝑣N) ∧ (𝑠 ∈ ω ∧ 𝑓N)) ∧ ((𝑢 ∈ ω ∧ 𝑡N) ∧ (𝑔 ∈ ω ∧ N))) ∧ ((𝑤 ·𝑜 𝑓) = (𝑣 ·𝑜 𝑠) ∧ (𝑢 ·𝑜 ) = (𝑡 ·𝑜 𝑔))))
Distinct variable groups:   𝑧,𝑤,𝑣,𝑢,𝑡,𝑠,𝑞,𝑓,𝑔,,𝐴   𝑧,𝐵,𝑤,𝑣,𝑢,𝑡,𝑠,𝑞,𝑓,𝑔,
Allowed substitution hints:   𝐶(𝑧,𝑤,𝑣,𝑢,𝑡,𝑓,𝑔,,𝑠,𝑞)   𝐷(𝑧,𝑤,𝑣,𝑢,𝑡,𝑓,𝑔,,𝑠,𝑞)

Proof of Theorem nnnq0lem1
StepHypRef Expression
1 enq0er 6625 . . . . . 6 ~Q0 Er (ω × N)
2 erdm 6139 . . . . . 6 ( ~Q0 Er (ω × N) → dom ~Q0 = (ω × N))
31, 2ax-mp 7 . . . . 5 dom ~Q0 = (ω × N)
4 simpll 495 . . . . . 6 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → 𝐴 ∈ ((ω × N) / ~Q0 ))
5 simplll 499 . . . . . . . 8 ((((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 )) → 𝐴 = [⟨𝑤, 𝑣⟩] ~Q0 )
65eleq1d 2147 . . . . . . 7 ((((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 )) → (𝐴 ∈ ((ω × N) / ~Q0 ) ↔ [⟨𝑤, 𝑣⟩] ~Q0 ∈ ((ω × N) / ~Q0 )))
76adantl 271 . . . . . 6 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → (𝐴 ∈ ((ω × N) / ~Q0 ) ↔ [⟨𝑤, 𝑣⟩] ~Q0 ∈ ((ω × N) / ~Q0 )))
84, 7mpbid 145 . . . . 5 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → [⟨𝑤, 𝑣⟩] ~Q0 ∈ ((ω × N) / ~Q0 ))
9 ecelqsdm 6199 . . . . 5 ((dom ~Q0 = (ω × N) ∧ [⟨𝑤, 𝑣⟩] ~Q0 ∈ ((ω × N) / ~Q0 )) → ⟨𝑤, 𝑣⟩ ∈ (ω × N))
103, 8, 9sylancr 405 . . . 4 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → ⟨𝑤, 𝑣⟩ ∈ (ω × N))
11 opelxp 4392 . . . 4 (⟨𝑤, 𝑣⟩ ∈ (ω × N) ↔ (𝑤 ∈ ω ∧ 𝑣N))
1210, 11sylib 120 . . 3 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → (𝑤 ∈ ω ∧ 𝑣N))
13 simprll 503 . . . . . . . 8 ((((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 )) → 𝐴 = [⟨𝑠, 𝑓⟩] ~Q0 )
1413eleq1d 2147 . . . . . . 7 ((((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 )) → (𝐴 ∈ ((ω × N) / ~Q0 ) ↔ [⟨𝑠, 𝑓⟩] ~Q0 ∈ ((ω × N) / ~Q0 )))
1514adantl 271 . . . . . 6 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → (𝐴 ∈ ((ω × N) / ~Q0 ) ↔ [⟨𝑠, 𝑓⟩] ~Q0 ∈ ((ω × N) / ~Q0 )))
164, 15mpbid 145 . . . . 5 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → [⟨𝑠, 𝑓⟩] ~Q0 ∈ ((ω × N) / ~Q0 ))
17 ecelqsdm 6199 . . . . 5 ((dom ~Q0 = (ω × N) ∧ [⟨𝑠, 𝑓⟩] ~Q0 ∈ ((ω × N) / ~Q0 )) → ⟨𝑠, 𝑓⟩ ∈ (ω × N))
183, 16, 17sylancr 405 . . . 4 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → ⟨𝑠, 𝑓⟩ ∈ (ω × N))
19 opelxp 4392 . . . 4 (⟨𝑠, 𝑓⟩ ∈ (ω × N) ↔ (𝑠 ∈ ω ∧ 𝑓N))
2018, 19sylib 120 . . 3 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → (𝑠 ∈ ω ∧ 𝑓N))
2112, 20jca 300 . 2 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → ((𝑤 ∈ ω ∧ 𝑣N) ∧ (𝑠 ∈ ω ∧ 𝑓N)))
22 simplr 496 . . . . . 6 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → 𝐵 ∈ ((ω × N) / ~Q0 ))
23 simpllr 500 . . . . . . . 8 ((((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 )) → 𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 )
2423eleq1d 2147 . . . . . . 7 ((((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 )) → (𝐵 ∈ ((ω × N) / ~Q0 ) ↔ [⟨𝑢, 𝑡⟩] ~Q0 ∈ ((ω × N) / ~Q0 )))
2524adantl 271 . . . . . 6 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → (𝐵 ∈ ((ω × N) / ~Q0 ) ↔ [⟨𝑢, 𝑡⟩] ~Q0 ∈ ((ω × N) / ~Q0 )))
2622, 25mpbid 145 . . . . 5 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → [⟨𝑢, 𝑡⟩] ~Q0 ∈ ((ω × N) / ~Q0 ))
27 ecelqsdm 6199 . . . . 5 ((dom ~Q0 = (ω × N) ∧ [⟨𝑢, 𝑡⟩] ~Q0 ∈ ((ω × N) / ~Q0 )) → ⟨𝑢, 𝑡⟩ ∈ (ω × N))
283, 26, 27sylancr 405 . . . 4 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → ⟨𝑢, 𝑡⟩ ∈ (ω × N))
29 opelxp 4392 . . . 4 (⟨𝑢, 𝑡⟩ ∈ (ω × N) ↔ (𝑢 ∈ ω ∧ 𝑡N))
3028, 29sylib 120 . . 3 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → (𝑢 ∈ ω ∧ 𝑡N))
31 simprlr 504 . . . . . . . 8 ((((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 )) → 𝐵 = [⟨𝑔, ⟩] ~Q0 )
3231eleq1d 2147 . . . . . . 7 ((((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 )) → (𝐵 ∈ ((ω × N) / ~Q0 ) ↔ [⟨𝑔, ⟩] ~Q0 ∈ ((ω × N) / ~Q0 )))
3332adantl 271 . . . . . 6 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → (𝐵 ∈ ((ω × N) / ~Q0 ) ↔ [⟨𝑔, ⟩] ~Q0 ∈ ((ω × N) / ~Q0 )))
3422, 33mpbid 145 . . . . 5 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → [⟨𝑔, ⟩] ~Q0 ∈ ((ω × N) / ~Q0 ))
35 ecelqsdm 6199 . . . . 5 ((dom ~Q0 = (ω × N) ∧ [⟨𝑔, ⟩] ~Q0 ∈ ((ω × N) / ~Q0 )) → ⟨𝑔, ⟩ ∈ (ω × N))
363, 34, 35sylancr 405 . . . 4 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → ⟨𝑔, ⟩ ∈ (ω × N))
37 opelxp 4392 . . . 4 (⟨𝑔, ⟩ ∈ (ω × N) ↔ (𝑔 ∈ ω ∧ N))
3836, 37sylib 120 . . 3 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → (𝑔 ∈ ω ∧ N))
3930, 38jca 300 . 2 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → ((𝑢 ∈ ω ∧ 𝑡N) ∧ (𝑔 ∈ ω ∧ N)))
405, 13eqtr3d 2115 . . . . . 6 ((((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 )) → [⟨𝑤, 𝑣⟩] ~Q0 = [⟨𝑠, 𝑓⟩] ~Q0 )
4140adantl 271 . . . . 5 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → [⟨𝑤, 𝑣⟩] ~Q0 = [⟨𝑠, 𝑓⟩] ~Q0 )
421a1i 9 . . . . . 6 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → ~Q0 Er (ω × N))
4342, 10erth 6173 . . . . 5 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → (⟨𝑤, 𝑣⟩ ~Q0𝑠, 𝑓⟩ ↔ [⟨𝑤, 𝑣⟩] ~Q0 = [⟨𝑠, 𝑓⟩] ~Q0 ))
4441, 43mpbird 165 . . . 4 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → ⟨𝑤, 𝑣⟩ ~Q0𝑠, 𝑓⟩)
45 enq0breq 6626 . . . . 5 (((𝑤 ∈ ω ∧ 𝑣N) ∧ (𝑠 ∈ ω ∧ 𝑓N)) → (⟨𝑤, 𝑣⟩ ~Q0𝑠, 𝑓⟩ ↔ (𝑤 ·𝑜 𝑓) = (𝑣 ·𝑜 𝑠)))
4612, 20, 45syl2anc 403 . . . 4 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → (⟨𝑤, 𝑣⟩ ~Q0𝑠, 𝑓⟩ ↔ (𝑤 ·𝑜 𝑓) = (𝑣 ·𝑜 𝑠)))
4744, 46mpbid 145 . . 3 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → (𝑤 ·𝑜 𝑓) = (𝑣 ·𝑜 𝑠))
4823, 31eqtr3d 2115 . . . . . 6 ((((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 )) → [⟨𝑢, 𝑡⟩] ~Q0 = [⟨𝑔, ⟩] ~Q0 )
4948adantl 271 . . . . 5 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → [⟨𝑢, 𝑡⟩] ~Q0 = [⟨𝑔, ⟩] ~Q0 )
5042, 28erth 6173 . . . . 5 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → (⟨𝑢, 𝑡⟩ ~Q0𝑔, ⟩ ↔ [⟨𝑢, 𝑡⟩] ~Q0 = [⟨𝑔, ⟩] ~Q0 ))
5149, 50mpbird 165 . . . 4 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → ⟨𝑢, 𝑡⟩ ~Q0𝑔, ⟩)
52 enq0breq 6626 . . . . 5 (((𝑢 ∈ ω ∧ 𝑡N) ∧ (𝑔 ∈ ω ∧ N)) → (⟨𝑢, 𝑡⟩ ~Q0𝑔, ⟩ ↔ (𝑢 ·𝑜 ) = (𝑡 ·𝑜 𝑔)))
5330, 38, 52syl2anc 403 . . . 4 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → (⟨𝑢, 𝑡⟩ ~Q0𝑔, ⟩ ↔ (𝑢 ·𝑜 ) = (𝑡 ·𝑜 𝑔)))
5451, 53mpbid 145 . . 3 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → (𝑢 ·𝑜 ) = (𝑡 ·𝑜 𝑔))
5547, 54jca 300 . 2 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → ((𝑤 ·𝑜 𝑓) = (𝑣 ·𝑜 𝑠) ∧ (𝑢 ·𝑜 ) = (𝑡 ·𝑜 𝑔)))
5621, 39, 55jca31 302 1 (((𝐴 ∈ ((ω × N) / ~Q0 ) ∧ 𝐵 ∈ ((ω × N) / ~Q0 )) ∧ (((𝐴 = [⟨𝑤, 𝑣⟩] ~Q0𝐵 = [⟨𝑢, 𝑡⟩] ~Q0 ) ∧ 𝑧 = [𝐶] ~Q0 ) ∧ ((𝐴 = [⟨𝑠, 𝑓⟩] ~Q0𝐵 = [⟨𝑔, ⟩] ~Q0 ) ∧ 𝑞 = [𝐷] ~Q0 ))) → ((((𝑤 ∈ ω ∧ 𝑣N) ∧ (𝑠 ∈ ω ∧ 𝑓N)) ∧ ((𝑢 ∈ ω ∧ 𝑡N) ∧ (𝑔 ∈ ω ∧ N))) ∧ ((𝑤 ·𝑜 𝑓) = (𝑣 ·𝑜 𝑠) ∧ (𝑢 ·𝑜 ) = (𝑡 ·𝑜 𝑔))))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 102  wb 103   = wceq 1284  wcel 1433  cop 3401   class class class wbr 3785  ωcom 4331   × cxp 4361  dom cdm 4363  (class class class)co 5532   ·𝑜 comu 6022   Er wer 6126  [cec 6127   / cqs 6128  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-dc 776  df-3or 920  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-er 6129  df-ec 6131  df-qs 6135  df-ni 6494  df-enq0 6614
This theorem is referenced by:  addnq0mo  6637  mulnq0mo  6638
  Copyright terms: Public domain W3C validator