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

Theorem mulgt0sr 7768
Description: The product of two positive signed reals is positive. (Contributed by NM, 13-May-1996.)
Assertion
Ref Expression
mulgt0sr ((0R <R 𝐴 ∧ 0R <R 𝐵) → 0R <R (𝐴 ·R 𝐵))

Proof of Theorem mulgt0sr
Dummy variables 𝑥 𝑦 𝑧 𝑤 𝑣 𝑢 𝑓 𝑔 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 ltrelsr 7728 . . . . 5 <R ⊆ (R × R)
21brel 4675 . . . 4 (0R <R 𝐴 → (0RR𝐴R))
32simprd 114 . . 3 (0R <R 𝐴𝐴R)
41brel 4675 . . . 4 (0R <R 𝐵 → (0RR𝐵R))
54simprd 114 . . 3 (0R <R 𝐵𝐵R)
63, 5anim12i 338 . 2 ((0R <R 𝐴 ∧ 0R <R 𝐵) → (𝐴R𝐵R))
7 df-nr 7717 . . 3 R = ((P × P) / ~R )
8 breq2 4004 . . . . 5 ([⟨𝑥, 𝑦⟩] ~R = 𝐴 → (0R <R [⟨𝑥, 𝑦⟩] ~R ↔ 0R <R 𝐴))
98anbi1d 465 . . . 4 ([⟨𝑥, 𝑦⟩] ~R = 𝐴 → ((0R <R [⟨𝑥, 𝑦⟩] ~R ∧ 0R <R [⟨𝑧, 𝑤⟩] ~R ) ↔ (0R <R 𝐴 ∧ 0R <R [⟨𝑧, 𝑤⟩] ~R )))
10 oveq1 5876 . . . . 5 ([⟨𝑥, 𝑦⟩] ~R = 𝐴 → ([⟨𝑥, 𝑦⟩] ~R ·R [⟨𝑧, 𝑤⟩] ~R ) = (𝐴 ·R [⟨𝑧, 𝑤⟩] ~R ))
1110breq2d 4012 . . . 4 ([⟨𝑥, 𝑦⟩] ~R = 𝐴 → (0R <R ([⟨𝑥, 𝑦⟩] ~R ·R [⟨𝑧, 𝑤⟩] ~R ) ↔ 0R <R (𝐴 ·R [⟨𝑧, 𝑤⟩] ~R )))
129, 11imbi12d 234 . . 3 ([⟨𝑥, 𝑦⟩] ~R = 𝐴 → (((0R <R [⟨𝑥, 𝑦⟩] ~R ∧ 0R <R [⟨𝑧, 𝑤⟩] ~R ) → 0R <R ([⟨𝑥, 𝑦⟩] ~R ·R [⟨𝑧, 𝑤⟩] ~R )) ↔ ((0R <R 𝐴 ∧ 0R <R [⟨𝑧, 𝑤⟩] ~R ) → 0R <R (𝐴 ·R [⟨𝑧, 𝑤⟩] ~R ))))
13 breq2 4004 . . . . 5 ([⟨𝑧, 𝑤⟩] ~R = 𝐵 → (0R <R [⟨𝑧, 𝑤⟩] ~R ↔ 0R <R 𝐵))
1413anbi2d 464 . . . 4 ([⟨𝑧, 𝑤⟩] ~R = 𝐵 → ((0R <R 𝐴 ∧ 0R <R [⟨𝑧, 𝑤⟩] ~R ) ↔ (0R <R 𝐴 ∧ 0R <R 𝐵)))
15 oveq2 5877 . . . . 5 ([⟨𝑧, 𝑤⟩] ~R = 𝐵 → (𝐴 ·R [⟨𝑧, 𝑤⟩] ~R ) = (𝐴 ·R 𝐵))
1615breq2d 4012 . . . 4 ([⟨𝑧, 𝑤⟩] ~R = 𝐵 → (0R <R (𝐴 ·R [⟨𝑧, 𝑤⟩] ~R ) ↔ 0R <R (𝐴 ·R 𝐵)))
1714, 16imbi12d 234 . . 3 ([⟨𝑧, 𝑤⟩] ~R = 𝐵 → (((0R <R 𝐴 ∧ 0R <R [⟨𝑧, 𝑤⟩] ~R ) → 0R <R (𝐴 ·R [⟨𝑧, 𝑤⟩] ~R )) ↔ ((0R <R 𝐴 ∧ 0R <R 𝐵) → 0R <R (𝐴 ·R 𝐵))))
18 gt0srpr 7738 . . . . 5 (0R <R [⟨𝑥, 𝑦⟩] ~R𝑦<P 𝑥)
19 gt0srpr 7738 . . . . 5 (0R <R [⟨𝑧, 𝑤⟩] ~R𝑤<P 𝑧)
2018, 19anbi12i 460 . . . 4 ((0R <R [⟨𝑥, 𝑦⟩] ~R ∧ 0R <R [⟨𝑧, 𝑤⟩] ~R ) ↔ (𝑦<P 𝑥𝑤<P 𝑧))
21 ltexpri 7603 . . . . . . 7 (𝑦<P 𝑥 → ∃𝑣P (𝑦 +P 𝑣) = 𝑥)
22 ltexpri 7603 . . . . . . . . 9 (𝑤<P 𝑧 → ∃𝑢P (𝑤 +P 𝑢) = 𝑧)
23 addclpr 7527 . . . . . . . . . . . . . 14 ((𝑓P𝑔P) → (𝑓 +P 𝑔) ∈ P)
2423adantl 277 . . . . . . . . . . . . 13 ((((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) ∧ (𝑓P𝑔P)) → (𝑓 +P 𝑔) ∈ P)
25 simplrr 536 . . . . . . . . . . . . . . 15 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (𝑦 +P 𝑣) = 𝑥)
26 simplr 528 . . . . . . . . . . . . . . . . 17 (((𝑥P𝑦P) ∧ (𝑧P𝑤P)) → 𝑦P)
2726ad2antrr 488 . . . . . . . . . . . . . . . 16 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → 𝑦P)
28 simplrl 535 . . . . . . . . . . . . . . . 16 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → 𝑣P)
2924, 27, 28caovcld 6022 . . . . . . . . . . . . . . 15 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (𝑦 +P 𝑣) ∈ P)
3025, 29eqeltrrd 2255 . . . . . . . . . . . . . 14 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → 𝑥P)
31 simplrr 536 . . . . . . . . . . . . . . 15 ((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) → 𝑤P)
3231adantr 276 . . . . . . . . . . . . . 14 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → 𝑤P)
33 mulclpr 7562 . . . . . . . . . . . . . 14 ((𝑥P𝑤P) → (𝑥 ·P 𝑤) ∈ P)
3430, 32, 33syl2anc 411 . . . . . . . . . . . . 13 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (𝑥 ·P 𝑤) ∈ P)
35 simplrl 535 . . . . . . . . . . . . . . 15 ((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) → 𝑧P)
3635adantr 276 . . . . . . . . . . . . . 14 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → 𝑧P)
37 mulclpr 7562 . . . . . . . . . . . . . 14 ((𝑦P𝑧P) → (𝑦 ·P 𝑧) ∈ P)
3827, 36, 37syl2anc 411 . . . . . . . . . . . . 13 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (𝑦 ·P 𝑧) ∈ P)
3924, 34, 38caovcld 6022 . . . . . . . . . . . 12 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧)) ∈ P)
40 simprl 529 . . . . . . . . . . . . 13 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → 𝑢P)
41 mulclpr 7562 . . . . . . . . . . . . 13 ((𝑣P𝑢P) → (𝑣 ·P 𝑢) ∈ P)
4228, 40, 41syl2anc 411 . . . . . . . . . . . 12 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (𝑣 ·P 𝑢) ∈ P)
43 ltaddpr 7587 . . . . . . . . . . . 12 ((((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧)) ∈ P ∧ (𝑣 ·P 𝑢) ∈ P) → ((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧))<P (((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧)) +P (𝑣 ·P 𝑢)))
4439, 42, 43syl2anc 411 . . . . . . . . . . 11 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧))<P (((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧)) +P (𝑣 ·P 𝑢)))
45 simprr 531 . . . . . . . . . . . . . . 15 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (𝑤 +P 𝑢) = 𝑧)
46 oveq12 5878 . . . . . . . . . . . . . . . 16 (((𝑦 +P 𝑣) = 𝑥 ∧ (𝑤 +P 𝑢) = 𝑧) → ((𝑦 +P 𝑣) ·P (𝑤 +P 𝑢)) = (𝑥 ·P 𝑧))
4746oveq1d 5884 . . . . . . . . . . . . . . 15 (((𝑦 +P 𝑣) = 𝑥 ∧ (𝑤 +P 𝑢) = 𝑧) → (((𝑦 +P 𝑣) ·P (𝑤 +P 𝑢)) +P ((𝑦 ·P 𝑤) +P (𝑣 ·P 𝑤))) = ((𝑥 ·P 𝑧) +P ((𝑦 ·P 𝑤) +P (𝑣 ·P 𝑤))))
4825, 45, 47syl2anc 411 . . . . . . . . . . . . . 14 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (((𝑦 +P 𝑣) ·P (𝑤 +P 𝑢)) +P ((𝑦 ·P 𝑤) +P (𝑣 ·P 𝑤))) = ((𝑥 ·P 𝑧) +P ((𝑦 ·P 𝑤) +P (𝑣 ·P 𝑤))))
49 distrprg 7578 . . . . . . . . . . . . . . . . . . 19 ((𝑦P𝑤P𝑢P) → (𝑦 ·P (𝑤 +P 𝑢)) = ((𝑦 ·P 𝑤) +P (𝑦 ·P 𝑢)))
5027, 32, 40, 49syl3anc 1238 . . . . . . . . . . . . . . . . . 18 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (𝑦 ·P (𝑤 +P 𝑢)) = ((𝑦 ·P 𝑤) +P (𝑦 ·P 𝑢)))
51 oveq2 5877 . . . . . . . . . . . . . . . . . . . 20 ((𝑤 +P 𝑢) = 𝑧 → (𝑦 ·P (𝑤 +P 𝑢)) = (𝑦 ·P 𝑧))
5251adantl 277 . . . . . . . . . . . . . . . . . . 19 ((𝑢P ∧ (𝑤 +P 𝑢) = 𝑧) → (𝑦 ·P (𝑤 +P 𝑢)) = (𝑦 ·P 𝑧))
5352adantl 277 . . . . . . . . . . . . . . . . . 18 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (𝑦 ·P (𝑤 +P 𝑢)) = (𝑦 ·P 𝑧))
5450, 53eqtr3d 2212 . . . . . . . . . . . . . . . . 17 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑦 ·P 𝑤) +P (𝑦 ·P 𝑢)) = (𝑦 ·P 𝑧))
5554oveq1d 5884 . . . . . . . . . . . . . . . 16 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (((𝑦 ·P 𝑤) +P (𝑦 ·P 𝑢)) +P ((𝑣 ·P 𝑤) +P (𝑣 ·P 𝑢))) = ((𝑦 ·P 𝑧) +P ((𝑣 ·P 𝑤) +P (𝑣 ·P 𝑢))))
56 distrprg 7578 . . . . . . . . . . . . . . . . . . . 20 ((𝑓P𝑔PP) → (𝑓 ·P (𝑔 +P )) = ((𝑓 ·P 𝑔) +P (𝑓 ·P )))
5756adantl 277 . . . . . . . . . . . . . . . . . . 19 ((((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) ∧ (𝑓P𝑔PP)) → (𝑓 ·P (𝑔 +P )) = ((𝑓 ·P 𝑔) +P (𝑓 ·P )))
58 mulcomprg 7570 . . . . . . . . . . . . . . . . . . . 20 ((𝑓P𝑔P) → (𝑓 ·P 𝑔) = (𝑔 ·P 𝑓))
5958adantl 277 . . . . . . . . . . . . . . . . . . 19 ((((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) ∧ (𝑓P𝑔P)) → (𝑓 ·P 𝑔) = (𝑔 ·P 𝑓))
6057, 27, 28, 32, 24, 59caovdir2d 6045 . . . . . . . . . . . . . . . . . 18 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑦 +P 𝑣) ·P 𝑤) = ((𝑦 ·P 𝑤) +P (𝑣 ·P 𝑤)))
6157, 27, 28, 40, 24, 59caovdir2d 6045 . . . . . . . . . . . . . . . . . 18 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑦 +P 𝑣) ·P 𝑢) = ((𝑦 ·P 𝑢) +P (𝑣 ·P 𝑢)))
6260, 61oveq12d 5887 . . . . . . . . . . . . . . . . 17 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (((𝑦 +P 𝑣) ·P 𝑤) +P ((𝑦 +P 𝑣) ·P 𝑢)) = (((𝑦 ·P 𝑤) +P (𝑣 ·P 𝑤)) +P ((𝑦 ·P 𝑢) +P (𝑣 ·P 𝑢))))
63 distrprg 7578 . . . . . . . . . . . . . . . . . 18 (((𝑦 +P 𝑣) ∈ P𝑤P𝑢P) → ((𝑦 +P 𝑣) ·P (𝑤 +P 𝑢)) = (((𝑦 +P 𝑣) ·P 𝑤) +P ((𝑦 +P 𝑣) ·P 𝑢)))
6429, 32, 40, 63syl3anc 1238 . . . . . . . . . . . . . . . . 17 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑦 +P 𝑣) ·P (𝑤 +P 𝑢)) = (((𝑦 +P 𝑣) ·P 𝑤) +P ((𝑦 +P 𝑣) ·P 𝑢)))
65 mulclpr 7562 . . . . . . . . . . . . . . . . . . 19 ((𝑦P𝑤P) → (𝑦 ·P 𝑤) ∈ P)
6627, 32, 65syl2anc 411 . . . . . . . . . . . . . . . . . 18 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (𝑦 ·P 𝑤) ∈ P)
67 mulclpr 7562 . . . . . . . . . . . . . . . . . . 19 ((𝑦P𝑢P) → (𝑦 ·P 𝑢) ∈ P)
6827, 40, 67syl2anc 411 . . . . . . . . . . . . . . . . . 18 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (𝑦 ·P 𝑢) ∈ P)
69 mulclpr 7562 . . . . . . . . . . . . . . . . . . 19 ((𝑣P𝑤P) → (𝑣 ·P 𝑤) ∈ P)
7028, 32, 69syl2anc 411 . . . . . . . . . . . . . . . . . 18 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (𝑣 ·P 𝑤) ∈ P)
71 addcomprg 7568 . . . . . . . . . . . . . . . . . . 19 ((𝑓P𝑔P) → (𝑓 +P 𝑔) = (𝑔 +P 𝑓))
7271adantl 277 . . . . . . . . . . . . . . . . . 18 ((((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) ∧ (𝑓P𝑔P)) → (𝑓 +P 𝑔) = (𝑔 +P 𝑓))
73 addassprg 7569 . . . . . . . . . . . . . . . . . . 19 ((𝑓P𝑔PP) → ((𝑓 +P 𝑔) +P ) = (𝑓 +P (𝑔 +P )))
7473adantl 277 . . . . . . . . . . . . . . . . . 18 ((((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) ∧ (𝑓P𝑔PP)) → ((𝑓 +P 𝑔) +P ) = (𝑓 +P (𝑔 +P )))
7566, 68, 70, 72, 74, 42, 24caov4d 6053 . . . . . . . . . . . . . . . . 17 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (((𝑦 ·P 𝑤) +P (𝑦 ·P 𝑢)) +P ((𝑣 ·P 𝑤) +P (𝑣 ·P 𝑢))) = (((𝑦 ·P 𝑤) +P (𝑣 ·P 𝑤)) +P ((𝑦 ·P 𝑢) +P (𝑣 ·P 𝑢))))
7662, 64, 753eqtr4d 2220 . . . . . . . . . . . . . . . 16 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑦 +P 𝑣) ·P (𝑤 +P 𝑢)) = (((𝑦 ·P 𝑤) +P (𝑦 ·P 𝑢)) +P ((𝑣 ·P 𝑤) +P (𝑣 ·P 𝑢))))
7770, 38, 42, 72, 74caov12d 6050 . . . . . . . . . . . . . . . 16 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑣 ·P 𝑤) +P ((𝑦 ·P 𝑧) +P (𝑣 ·P 𝑢))) = ((𝑦 ·P 𝑧) +P ((𝑣 ·P 𝑤) +P (𝑣 ·P 𝑢))))
7855, 76, 773eqtr4d 2220 . . . . . . . . . . . . . . 15 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑦 +P 𝑣) ·P (𝑤 +P 𝑢)) = ((𝑣 ·P 𝑤) +P ((𝑦 ·P 𝑧) +P (𝑣 ·P 𝑢))))
79 oveq1 5876 . . . . . . . . . . . . . . . . . 18 ((𝑦 +P 𝑣) = 𝑥 → ((𝑦 +P 𝑣) ·P 𝑤) = (𝑥 ·P 𝑤))
8079adantl 277 . . . . . . . . . . . . . . . . 17 ((𝑣P ∧ (𝑦 +P 𝑣) = 𝑥) → ((𝑦 +P 𝑣) ·P 𝑤) = (𝑥 ·P 𝑤))
8180ad2antlr 489 . . . . . . . . . . . . . . . 16 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑦 +P 𝑣) ·P 𝑤) = (𝑥 ·P 𝑤))
8260, 81eqtr3d 2212 . . . . . . . . . . . . . . 15 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑦 ·P 𝑤) +P (𝑣 ·P 𝑤)) = (𝑥 ·P 𝑤))
8378, 82oveq12d 5887 . . . . . . . . . . . . . 14 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (((𝑦 +P 𝑣) ·P (𝑤 +P 𝑢)) +P ((𝑦 ·P 𝑤) +P (𝑣 ·P 𝑤))) = (((𝑣 ·P 𝑤) +P ((𝑦 ·P 𝑧) +P (𝑣 ·P 𝑢))) +P (𝑥 ·P 𝑤)))
8448, 83eqtr3d 2212 . . . . . . . . . . . . 13 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑥 ·P 𝑧) +P ((𝑦 ·P 𝑤) +P (𝑣 ·P 𝑤))) = (((𝑣 ·P 𝑤) +P ((𝑦 ·P 𝑧) +P (𝑣 ·P 𝑢))) +P (𝑥 ·P 𝑤)))
85 mulclpr 7562 . . . . . . . . . . . . . . . 16 ((𝑥P𝑧P) → (𝑥 ·P 𝑧) ∈ P)
8630, 36, 85syl2anc 411 . . . . . . . . . . . . . . 15 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (𝑥 ·P 𝑧) ∈ P)
87 addassprg 7569 . . . . . . . . . . . . . . 15 (((𝑥 ·P 𝑧) ∈ P ∧ (𝑦 ·P 𝑤) ∈ P ∧ (𝑣 ·P 𝑤) ∈ P) → (((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)) +P (𝑣 ·P 𝑤)) = ((𝑥 ·P 𝑧) +P ((𝑦 ·P 𝑤) +P (𝑣 ·P 𝑤))))
8886, 66, 70, 87syl3anc 1238 . . . . . . . . . . . . . 14 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)) +P (𝑣 ·P 𝑤)) = ((𝑥 ·P 𝑧) +P ((𝑦 ·P 𝑤) +P (𝑣 ·P 𝑤))))
89 addclpr 7527 . . . . . . . . . . . . . . . 16 (((𝑥 ·P 𝑧) ∈ P ∧ (𝑦 ·P 𝑤) ∈ P) → ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)) ∈ P)
9086, 66, 89syl2anc 411 . . . . . . . . . . . . . . 15 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)) ∈ P)
91 addcomprg 7568 . . . . . . . . . . . . . . 15 ((((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)) ∈ P ∧ (𝑣 ·P 𝑤) ∈ P) → (((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)) +P (𝑣 ·P 𝑤)) = ((𝑣 ·P 𝑤) +P ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤))))
9290, 70, 91syl2anc 411 . . . . . . . . . . . . . 14 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)) +P (𝑣 ·P 𝑤)) = ((𝑣 ·P 𝑤) +P ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤))))
9388, 92eqtr3d 2212 . . . . . . . . . . . . 13 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑥 ·P 𝑧) +P ((𝑦 ·P 𝑤) +P (𝑣 ·P 𝑤))) = ((𝑣 ·P 𝑤) +P ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤))))
9424, 38, 42caovcld 6022 . . . . . . . . . . . . . . 15 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑦 ·P 𝑧) +P (𝑣 ·P 𝑢)) ∈ P)
95 addassprg 7569 . . . . . . . . . . . . . . 15 (((𝑣 ·P 𝑤) ∈ P ∧ (𝑥 ·P 𝑤) ∈ P ∧ ((𝑦 ·P 𝑧) +P (𝑣 ·P 𝑢)) ∈ P) → (((𝑣 ·P 𝑤) +P (𝑥 ·P 𝑤)) +P ((𝑦 ·P 𝑧) +P (𝑣 ·P 𝑢))) = ((𝑣 ·P 𝑤) +P ((𝑥 ·P 𝑤) +P ((𝑦 ·P 𝑧) +P (𝑣 ·P 𝑢)))))
9670, 34, 94, 95syl3anc 1238 . . . . . . . . . . . . . 14 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (((𝑣 ·P 𝑤) +P (𝑥 ·P 𝑤)) +P ((𝑦 ·P 𝑧) +P (𝑣 ·P 𝑢))) = ((𝑣 ·P 𝑤) +P ((𝑥 ·P 𝑤) +P ((𝑦 ·P 𝑧) +P (𝑣 ·P 𝑢)))))
9770, 94, 34, 72, 74caov32d 6049 . . . . . . . . . . . . . 14 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (((𝑣 ·P 𝑤) +P ((𝑦 ·P 𝑧) +P (𝑣 ·P 𝑢))) +P (𝑥 ·P 𝑤)) = (((𝑣 ·P 𝑤) +P (𝑥 ·P 𝑤)) +P ((𝑦 ·P 𝑧) +P (𝑣 ·P 𝑢))))
98 addassprg 7569 . . . . . . . . . . . . . . . 16 (((𝑥 ·P 𝑤) ∈ P ∧ (𝑦 ·P 𝑧) ∈ P ∧ (𝑣 ·P 𝑢) ∈ P) → (((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧)) +P (𝑣 ·P 𝑢)) = ((𝑥 ·P 𝑤) +P ((𝑦 ·P 𝑧) +P (𝑣 ·P 𝑢))))
9934, 38, 42, 98syl3anc 1238 . . . . . . . . . . . . . . 15 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧)) +P (𝑣 ·P 𝑢)) = ((𝑥 ·P 𝑤) +P ((𝑦 ·P 𝑧) +P (𝑣 ·P 𝑢))))
10099oveq2d 5885 . . . . . . . . . . . . . 14 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑣 ·P 𝑤) +P (((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧)) +P (𝑣 ·P 𝑢))) = ((𝑣 ·P 𝑤) +P ((𝑥 ·P 𝑤) +P ((𝑦 ·P 𝑧) +P (𝑣 ·P 𝑢)))))
10196, 97, 1003eqtr4d 2220 . . . . . . . . . . . . 13 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (((𝑣 ·P 𝑤) +P ((𝑦 ·P 𝑧) +P (𝑣 ·P 𝑢))) +P (𝑥 ·P 𝑤)) = ((𝑣 ·P 𝑤) +P (((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧)) +P (𝑣 ·P 𝑢))))
10284, 93, 1013eqtr3d 2218 . . . . . . . . . . . 12 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑣 ·P 𝑤) +P ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤))) = ((𝑣 ·P 𝑤) +P (((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧)) +P (𝑣 ·P 𝑢))))
10324, 39, 42caovcld 6022 . . . . . . . . . . . . 13 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧)) +P (𝑣 ·P 𝑢)) ∈ P)
104 addcanprg 7606 . . . . . . . . . . . . 13 (((𝑣 ·P 𝑤) ∈ P ∧ ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)) ∈ P ∧ (((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧)) +P (𝑣 ·P 𝑢)) ∈ P) → (((𝑣 ·P 𝑤) +P ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤))) = ((𝑣 ·P 𝑤) +P (((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧)) +P (𝑣 ·P 𝑢))) → ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)) = (((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧)) +P (𝑣 ·P 𝑢))))
10570, 90, 103, 104syl3anc 1238 . . . . . . . . . . . 12 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → (((𝑣 ·P 𝑤) +P ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤))) = ((𝑣 ·P 𝑤) +P (((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧)) +P (𝑣 ·P 𝑢))) → ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)) = (((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧)) +P (𝑣 ·P 𝑢))))
106102, 105mpd 13 . . . . . . . . . . 11 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)) = (((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧)) +P (𝑣 ·P 𝑢)))
10744, 106breqtrrd 4028 . . . . . . . . . 10 (((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) ∧ (𝑢P ∧ (𝑤 +P 𝑢) = 𝑧)) → ((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧))<P ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)))
108107rexlimdvaa 2595 . . . . . . . . 9 ((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) → (∃𝑢P (𝑤 +P 𝑢) = 𝑧 → ((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧))<P ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤))))
10922, 108syl5 32 . . . . . . . 8 ((((𝑥P𝑦P) ∧ (𝑧P𝑤P)) ∧ (𝑣P ∧ (𝑦 +P 𝑣) = 𝑥)) → (𝑤<P 𝑧 → ((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧))<P ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤))))
110109rexlimdvaa 2595 . . . . . . 7 (((𝑥P𝑦P) ∧ (𝑧P𝑤P)) → (∃𝑣P (𝑦 +P 𝑣) = 𝑥 → (𝑤<P 𝑧 → ((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧))<P ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)))))
11121, 110syl5 32 . . . . . 6 (((𝑥P𝑦P) ∧ (𝑧P𝑤P)) → (𝑦<P 𝑥 → (𝑤<P 𝑧 → ((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧))<P ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)))))
112111impd 254 . . . . 5 (((𝑥P𝑦P) ∧ (𝑧P𝑤P)) → ((𝑦<P 𝑥𝑤<P 𝑧) → ((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧))<P ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤))))
113 mulsrpr 7736 . . . . . . 7 (((𝑥P𝑦P) ∧ (𝑧P𝑤P)) → ([⟨𝑥, 𝑦⟩] ~R ·R [⟨𝑧, 𝑤⟩] ~R ) = [⟨((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)), ((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧))⟩] ~R )
114113breq2d 4012 . . . . . 6 (((𝑥P𝑦P) ∧ (𝑧P𝑤P)) → (0R <R ([⟨𝑥, 𝑦⟩] ~R ·R [⟨𝑧, 𝑤⟩] ~R ) ↔ 0R <R [⟨((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)), ((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧))⟩] ~R ))
115 gt0srpr 7738 . . . . . 6 (0R <R [⟨((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)), ((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧))⟩] ~R ↔ ((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧))<P ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤)))
116114, 115bitrdi 196 . . . . 5 (((𝑥P𝑦P) ∧ (𝑧P𝑤P)) → (0R <R ([⟨𝑥, 𝑦⟩] ~R ·R [⟨𝑧, 𝑤⟩] ~R ) ↔ ((𝑥 ·P 𝑤) +P (𝑦 ·P 𝑧))<P ((𝑥 ·P 𝑧) +P (𝑦 ·P 𝑤))))
117112, 116sylibrd 169 . . . 4 (((𝑥P𝑦P) ∧ (𝑧P𝑤P)) → ((𝑦<P 𝑥𝑤<P 𝑧) → 0R <R ([⟨𝑥, 𝑦⟩] ~R ·R [⟨𝑧, 𝑤⟩] ~R )))
11820, 117biimtrid 152 . . 3 (((𝑥P𝑦P) ∧ (𝑧P𝑤P)) → ((0R <R [⟨𝑥, 𝑦⟩] ~R ∧ 0R <R [⟨𝑧, 𝑤⟩] ~R ) → 0R <R ([⟨𝑥, 𝑦⟩] ~R ·R [⟨𝑧, 𝑤⟩] ~R )))
1197, 12, 17, 1182ecoptocl 6617 . 2 ((𝐴R𝐵R) → ((0R <R 𝐴 ∧ 0R <R 𝐵) → 0R <R (𝐴 ·R 𝐵)))
1206, 119mpcom 36 1 ((0R <R 𝐴 ∧ 0R <R 𝐵) → 0R <R (𝐴 ·R 𝐵))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 104  w3a 978   = wceq 1353  wcel 2148  wrex 2456  cop 3594   class class class wbr 4000  (class class class)co 5869  [cec 6527  Pcnp 7281   +P cpp 7283   ·P cmp 7284  <P cltp 7285   ~R cer 7286  Rcnr 7287  0Rc0r 7288   ·R cmr 7292   <R cltr 7293
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 614  ax-in2 615  ax-io 709  ax-5 1447  ax-7 1448  ax-gen 1449  ax-ie1 1493  ax-ie2 1494  ax-8 1504  ax-10 1505  ax-11 1506  ax-i12 1507  ax-bndl 1509  ax-4 1510  ax-17 1526  ax-i9 1530  ax-ial 1534  ax-i5r 1535  ax-13 2150  ax-14 2151  ax-ext 2159  ax-coll 4115  ax-sep 4118  ax-nul 4126  ax-pow 4171  ax-pr 4206  ax-un 4430  ax-setind 4533  ax-iinf 4584
This theorem depends on definitions:  df-bi 117  df-dc 835  df-3or 979  df-3an 980  df-tru 1356  df-fal 1359  df-nf 1461  df-sb 1763  df-eu 2029  df-mo 2030  df-clab 2164  df-cleq 2170  df-clel 2173  df-nfc 2308  df-ne 2348  df-ral 2460  df-rex 2461  df-reu 2462  df-rab 2464  df-v 2739  df-sbc 2963  df-csb 3058  df-dif 3131  df-un 3133  df-in 3135  df-ss 3142  df-nul 3423  df-pw 3576  df-sn 3597  df-pr 3598  df-op 3600  df-uni 3808  df-int 3843  df-iun 3886  df-br 4001  df-opab 4062  df-mpt 4063  df-tr 4099  df-eprel 4286  df-id 4290  df-po 4293  df-iso 4294  df-iord 4363  df-on 4365  df-suc 4368  df-iom 4587  df-xp 4629  df-rel 4630  df-cnv 4631  df-co 4632  df-dm 4633  df-rn 4634  df-res 4635  df-ima 4636  df-iota 5174  df-fun 5214  df-fn 5215  df-f 5216  df-f1 5217  df-fo 5218  df-f1o 5219  df-fv 5220  df-ov 5872  df-oprab 5873  df-mpo 5874  df-1st 6135  df-2nd 6136  df-recs 6300  df-irdg 6365  df-1o 6411  df-2o 6412  df-oadd 6415  df-omul 6416  df-er 6529  df-ec 6531  df-qs 6535  df-ni 7294  df-pli 7295  df-mi 7296  df-lti 7297  df-plpq 7334  df-mpq 7335  df-enq 7337  df-nqqs 7338  df-plqqs 7339  df-mqqs 7340  df-1nqqs 7341  df-rq 7342  df-ltnqqs 7343  df-enq0 7414  df-nq0 7415  df-0nq0 7416  df-plq0 7417  df-mq0 7418  df-inp 7456  df-i1p 7457  df-iplp 7458  df-imp 7459  df-iltp 7460  df-enr 7716  df-nr 7717  df-mr 7719  df-ltr 7720  df-0r 7721
This theorem is referenced by:  axpre-mulgt0  7877
  Copyright terms: Public domain W3C validator