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

Theorem ltsosr 8138
Description: Signed real 'less than' is a strict ordering. (Contributed by NM, 19-Feb-1996.)
Assertion
Ref Expression
ltsosr <R Or R

Proof of Theorem ltsosr
Dummy variables 𝑎 𝑏 𝑐 𝑑 𝑒 𝑓 𝑟 𝑠 𝑡 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 ltposr 8137 . 2 <R Po R
2 df-nr 8101 . . . 4 R = ((P × P) / ~R )
3 breq1 4134 . . . . 5 ([⟨𝑎, 𝑏⟩] ~R = 𝑥 → ([⟨𝑎, 𝑏⟩] ~R <R [⟨𝑐, 𝑑⟩] ~R ↔ 𝑥 <R [⟨𝑐, 𝑑⟩] ~R ))
4 breq1 4134 . . . . . 6 ([⟨𝑎, 𝑏⟩] ~R = 𝑥 → ([⟨𝑎, 𝑏⟩] ~R <R [⟨𝑒, 𝑓⟩] ~R ↔ 𝑥 <R [⟨𝑒, 𝑓⟩] ~R ))
54orbi1d 803 . . . . 5 ([⟨𝑎, 𝑏⟩] ~R = 𝑥 → (([⟨𝑎, 𝑏⟩] ~R <R [⟨𝑒, 𝑓⟩] ~R ∨ [⟨𝑒, 𝑓⟩] ~R <R [⟨𝑐, 𝑑⟩] ~R ) ↔ (𝑥 <R [⟨𝑒, 𝑓⟩] ~R ∨ [⟨𝑒, 𝑓⟩] ~R <R [⟨𝑐, 𝑑⟩] ~R )))
63, 5imbi12d 234 . . . 4 ([⟨𝑎, 𝑏⟩] ~R = 𝑥 → (([⟨𝑎, 𝑏⟩] ~R <R [⟨𝑐, 𝑑⟩] ~R → ([⟨𝑎, 𝑏⟩] ~R <R [⟨𝑒, 𝑓⟩] ~R ∨ [⟨𝑒, 𝑓⟩] ~R <R [⟨𝑐, 𝑑⟩] ~R )) ↔ (𝑥 <R [⟨𝑐, 𝑑⟩] ~R → (𝑥 <R [⟨𝑒, 𝑓⟩] ~R ∨ [⟨𝑒, 𝑓⟩] ~R <R [⟨𝑐, 𝑑⟩] ~R ))))
7 breq2 4135 . . . . 5 ([⟨𝑐, 𝑑⟩] ~R = 𝑦 → (𝑥 <R [⟨𝑐, 𝑑⟩] ~R ↔ 𝑥 <R 𝑦))
8 breq2 4135 . . . . . 6 ([⟨𝑐, 𝑑⟩] ~R = 𝑦 → ([⟨𝑒, 𝑓⟩] ~R <R [⟨𝑐, 𝑑⟩] ~R ↔ [⟨𝑒, 𝑓⟩] ~R <R 𝑦))
98orbi2d 802 . . . . 5 ([⟨𝑐, 𝑑⟩] ~R = 𝑦 → ((𝑥 <R [⟨𝑒, 𝑓⟩] ~R ∨ [⟨𝑒, 𝑓⟩] ~R <R [⟨𝑐, 𝑑⟩] ~R ) ↔ (𝑥 <R [⟨𝑒, 𝑓⟩] ~R ∨ [⟨𝑒, 𝑓⟩] ~R <R 𝑦)))
107, 9imbi12d 234 . . . 4 ([⟨𝑐, 𝑑⟩] ~R = 𝑦 → ((𝑥 <R [⟨𝑐, 𝑑⟩] ~R → (𝑥 <R [⟨𝑒, 𝑓⟩] ~R ∨ [⟨𝑒, 𝑓⟩] ~R <R [⟨𝑐, 𝑑⟩] ~R )) ↔ (𝑥 <R 𝑦 → (𝑥 <R [⟨𝑒, 𝑓⟩] ~R ∨ [⟨𝑒, 𝑓⟩] ~R <R 𝑦))))
11 breq2 4135 . . . . . 6 ([⟨𝑒, 𝑓⟩] ~R = 𝑧 → (𝑥 <R [⟨𝑒, 𝑓⟩] ~R ↔ 𝑥 <R 𝑧))
12 breq1 4134 . . . . . 6 ([⟨𝑒, 𝑓⟩] ~R = 𝑧 → ([⟨𝑒, 𝑓⟩] ~R <R 𝑦 ↔ 𝑧 <R 𝑦))
1311, 12orbi12d 805 . . . . 5 ([⟨𝑒, 𝑓⟩] ~R = 𝑧 → ((𝑥 <R [⟨𝑒, 𝑓⟩] ~R ∨ [⟨𝑒, 𝑓⟩] ~R <R 𝑦) ↔ (𝑥 <R 𝑧 ∨ 𝑧 <R 𝑦)))
1413imbi2d 230 . . . 4 ([⟨𝑒, 𝑓⟩] ~R = 𝑧 → ((𝑥 <R 𝑦 → (𝑥 <R [⟨𝑒, 𝑓⟩] ~R ∨ [⟨𝑒, 𝑓⟩] ~R <R 𝑦)) ↔ (𝑥 <R 𝑦 → (𝑥 <R 𝑧 ∨ 𝑧 <R 𝑦))))
15 simp1l 1052 . . . . . . . . 9 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → 𝑎 ∈ P)
16 simp3r 1057 . . . . . . . . 9 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → 𝑓 ∈ P)
17 addclpr 7911 . . . . . . . . 9 ((𝑎 ∈ P ∧ 𝑓 ∈ P) → (𝑎 +P 𝑓) ∈ P)
1815, 16, 17syl2anc 415 . . . . . . . 8 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → (𝑎 +P 𝑓) ∈ P)
19 simp2r 1055 . . . . . . . 8 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → 𝑑 ∈ P)
20 addclpr 7911 . . . . . . . 8 (((𝑎 +P 𝑓) ∈ P ∧ 𝑑 ∈ P) → ((𝑎 +P 𝑓) +P 𝑑) ∈ P)
2118, 19, 20syl2anc 415 . . . . . . 7 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ((𝑎 +P 𝑓) +P 𝑑) ∈ P)
22 simp2l 1054 . . . . . . . . 9 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → 𝑐 ∈ P)
23 addclpr 7911 . . . . . . . . 9 ((𝑓 ∈ P ∧ 𝑐 ∈ P) → (𝑓 +P 𝑐) ∈ P)
2416, 22, 23syl2anc 415 . . . . . . . 8 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → (𝑓 +P 𝑐) ∈ P)
25 simp1r 1053 . . . . . . . 8 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → 𝑏 ∈ P)
26 addclpr 7911 . . . . . . . 8 (((𝑓 +P 𝑐) ∈ P ∧ 𝑏 ∈ P) → ((𝑓 +P 𝑐) +P 𝑏) ∈ P)
2724, 25, 26syl2anc 415 . . . . . . 7 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ((𝑓 +P 𝑐) +P 𝑏) ∈ P)
28 simp3l 1056 . . . . . . . . 9 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → 𝑒 ∈ P)
29 addclpr 7911 . . . . . . . . 9 ((𝑏 ∈ P ∧ 𝑒 ∈ P) → (𝑏 +P 𝑒) ∈ P)
3025, 28, 29syl2anc 415 . . . . . . . 8 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → (𝑏 +P 𝑒) ∈ P)
31 addclpr 7911 . . . . . . . 8 (((𝑏 +P 𝑒) ∈ P ∧ 𝑑 ∈ P) → ((𝑏 +P 𝑒) +P 𝑑) ∈ P)
3230, 19, 31syl2anc 415 . . . . . . 7 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ((𝑏 +P 𝑒) +P 𝑑) ∈ P)
33 ltsopr 7970 . . . . . . . 8 <P Or P
34 sowlin 4467 . . . . . . . 8 ((<P Or 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 𝑏))))
3533, 34mpan 428 . . . . . . 7 ((((𝑎 +P 𝑓) +P 𝑑) ∈ P ∧ ((𝑓 +P 𝑐) +P 𝑏) ∈ P ∧ ((𝑏 +P 𝑒) +P 𝑑) ∈ P) → (((𝑎 +P 𝑓) +P 𝑑)<P ((𝑓 +P 𝑐) +P 𝑏) → (((𝑎 +P 𝑓) +P 𝑑)<P ((𝑏 +P 𝑒) +P 𝑑) ∨ ((𝑏 +P 𝑒) +P 𝑑)<P ((𝑓 +P 𝑐) +P 𝑏))))
3621, 27, 32, 35syl3anc 1278 . . . . . 6 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → (((𝑎 +P 𝑓) +P 𝑑)<P ((𝑓 +P 𝑐) +P 𝑏) → (((𝑎 +P 𝑓) +P 𝑑)<P ((𝑏 +P 𝑒) +P 𝑑) ∨ ((𝑏 +P 𝑒) +P 𝑑)<P ((𝑓 +P 𝑐) +P 𝑏))))
37 addclpr 7911 . . . . . . . . 9 ((𝑎 ∈ P ∧ 𝑑 ∈ P) → (𝑎 +P 𝑑) ∈ P)
3815, 19, 37syl2anc 415 . . . . . . . 8 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → (𝑎 +P 𝑑) ∈ P)
39 addclpr 7911 . . . . . . . . 9 ((𝑏 ∈ P ∧ 𝑐 ∈ P) → (𝑏 +P 𝑐) ∈ P)
4025, 22, 39syl2anc 415 . . . . . . . 8 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → (𝑏 +P 𝑐) ∈ P)
41 ltaprg 7993 . . . . . . . 8 (((𝑎 +P 𝑑) ∈ P ∧ (𝑏 +P 𝑐) ∈ P ∧ 𝑓 ∈ P) → ((𝑎 +P 𝑑)<P (𝑏 +P 𝑐) ↔ (𝑓 +P (𝑎 +P 𝑑))<P (𝑓 +P (𝑏 +P 𝑐))))
4238, 40, 16, 41syl3anc 1278 . . . . . . 7 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ((𝑎 +P 𝑑)<P (𝑏 +P 𝑐) ↔ (𝑓 +P (𝑎 +P 𝑑))<P (𝑓 +P (𝑏 +P 𝑐))))
43 addcomprg 7952 . . . . . . . . . . 11 ((𝑟 ∈ P ∧ 𝑠 ∈ P) → (𝑟 +P 𝑠) = (𝑠 +P 𝑟))
4443adantl 277 . . . . . . . . . 10 ((((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) ∧ (𝑟 ∈ P ∧ 𝑠 ∈ P)) → (𝑟 +P 𝑠) = (𝑠 +P 𝑟))
45 addassprg 7953 . . . . . . . . . . 11 ((𝑟 ∈ P ∧ 𝑠 ∈ P ∧ 𝑡 ∈ P) → ((𝑟 +P 𝑠) +P 𝑡) = (𝑟 +P (𝑠 +P 𝑡)))
4645adantl 277 . . . . . . . . . 10 ((((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) ∧ (𝑟 ∈ P ∧ 𝑠 ∈ P ∧ 𝑡 ∈ P)) → ((𝑟 +P 𝑠) +P 𝑡) = (𝑟 +P (𝑠 +P 𝑡)))
4716, 15, 19, 44, 46caov12d 6274 . . . . . . . . 9 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → (𝑓 +P (𝑎 +P 𝑑)) = (𝑎 +P (𝑓 +P 𝑑)))
4846, 15, 16, 19caovassd 6252 . . . . . . . . 9 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ((𝑎 +P 𝑓) +P 𝑑) = (𝑎 +P (𝑓 +P 𝑑)))
4947, 48eqtr4d 2274 . . . . . . . 8 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → (𝑓 +P (𝑎 +P 𝑑)) = ((𝑎 +P 𝑓) +P 𝑑))
5046, 16, 25, 22caovassd 6252 . . . . . . . . 9 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ((𝑓 +P 𝑏) +P 𝑐) = (𝑓 +P (𝑏 +P 𝑐)))
5116, 25, 22, 44, 46caov32d 6273 . . . . . . . . 9 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ((𝑓 +P 𝑏) +P 𝑐) = ((𝑓 +P 𝑐) +P 𝑏))
5250, 51eqtr3d 2273 . . . . . . . 8 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → (𝑓 +P (𝑏 +P 𝑐)) = ((𝑓 +P 𝑐) +P 𝑏))
5349, 52breq12d 4144 . . . . . . 7 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ((𝑓 +P (𝑎 +P 𝑑))<P (𝑓 +P (𝑏 +P 𝑐)) ↔ ((𝑎 +P 𝑓) +P 𝑑)<P ((𝑓 +P 𝑐) +P 𝑏)))
5442, 53bitrd 188 . . . . . 6 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ((𝑎 +P 𝑑)<P (𝑏 +P 𝑐) ↔ ((𝑎 +P 𝑓) +P 𝑑)<P ((𝑓 +P 𝑐) +P 𝑏)))
55 ltaprg 7993 . . . . . . . . 9 ((𝑟 ∈ P ∧ 𝑠 ∈ P ∧ 𝑡 ∈ P) → (𝑟<P 𝑠 ↔ (𝑡 +P 𝑟)<P (𝑡 +P 𝑠)))
5655adantl 277 . . . . . . . 8 ((((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) ∧ (𝑟 ∈ P ∧ 𝑠 ∈ P ∧ 𝑡 ∈ P)) → (𝑟<P 𝑠 ↔ (𝑡 +P 𝑟)<P (𝑡 +P 𝑠)))
5756, 18, 30, 19, 44caovord2d 6262 . . . . . . 7 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ((𝑎 +P 𝑓)<P (𝑏 +P 𝑒) ↔ ((𝑎 +P 𝑓) +P 𝑑)<P ((𝑏 +P 𝑒) +P 𝑑)))
58 addclpr 7911 . . . . . . . . . 10 ((𝑒 ∈ P ∧ 𝑑 ∈ P) → (𝑒 +P 𝑑) ∈ P)
5928, 19, 58syl2anc 415 . . . . . . . . 9 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → (𝑒 +P 𝑑) ∈ P)
6056, 59, 24, 25, 44caovord2d 6262 . . . . . . . 8 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ((𝑒 +P 𝑑)<P (𝑓 +P 𝑐) ↔ ((𝑒 +P 𝑑) +P 𝑏)<P ((𝑓 +P 𝑐) +P 𝑏)))
6146, 25, 28, 19caovassd 6252 . . . . . . . . . 10 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ((𝑏 +P 𝑒) +P 𝑑) = (𝑏 +P (𝑒 +P 𝑑)))
6244, 25, 59caovcomd 6249 . . . . . . . . . 10 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → (𝑏 +P (𝑒 +P 𝑑)) = ((𝑒 +P 𝑑) +P 𝑏))
6361, 62eqtrd 2271 . . . . . . . . 9 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ((𝑏 +P 𝑒) +P 𝑑) = ((𝑒 +P 𝑑) +P 𝑏))
6463breq1d 4141 . . . . . . . 8 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → (((𝑏 +P 𝑒) +P 𝑑)<P ((𝑓 +P 𝑐) +P 𝑏) ↔ ((𝑒 +P 𝑑) +P 𝑏)<P ((𝑓 +P 𝑐) +P 𝑏)))
6560, 64bitr4d 191 . . . . . . 7 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ((𝑒 +P 𝑑)<P (𝑓 +P 𝑐) ↔ ((𝑏 +P 𝑒) +P 𝑑)<P ((𝑓 +P 𝑐) +P 𝑏)))
6657, 65orbi12d 805 . . . . . 6 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → (((𝑎 +P 𝑓)<P (𝑏 +P 𝑒) ∨ (𝑒 +P 𝑑)<P (𝑓 +P 𝑐)) ↔ (((𝑎 +P 𝑓) +P 𝑑)<P ((𝑏 +P 𝑒) +P 𝑑) ∨ ((𝑏 +P 𝑒) +P 𝑑)<P ((𝑓 +P 𝑐) +P 𝑏))))
6736, 54, 663imtr4d 203 . . . . 5 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ((𝑎 +P 𝑑)<P (𝑏 +P 𝑐) → ((𝑎 +P 𝑓)<P (𝑏 +P 𝑒) ∨ (𝑒 +P 𝑑)<P (𝑓 +P 𝑐))))
68 ltsrprg 8121 . . . . . 6 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P)) → ([⟨𝑎, 𝑏⟩] ~R <R [⟨𝑐, 𝑑⟩] ~R ↔ (𝑎 +P 𝑑)<P (𝑏 +P 𝑐)))
69683adant3 1048 . . . . 5 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ([⟨𝑎, 𝑏⟩] ~R <R [⟨𝑐, 𝑑⟩] ~R ↔ (𝑎 +P 𝑑)<P (𝑏 +P 𝑐)))
70 ltsrprg 8121 . . . . . . 7 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ([⟨𝑎, 𝑏⟩] ~R <R [⟨𝑒, 𝑓⟩] ~R ↔ (𝑎 +P 𝑓)<P (𝑏 +P 𝑒)))
71703adant2 1047 . . . . . 6 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ([⟨𝑎, 𝑏⟩] ~R <R [⟨𝑒, 𝑓⟩] ~R ↔ (𝑎 +P 𝑓)<P (𝑏 +P 𝑒)))
72 ltsrprg 8121 . . . . . . . 8 (((𝑒 ∈ P ∧ 𝑓 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P)) → ([⟨𝑒, 𝑓⟩] ~R <R [⟨𝑐, 𝑑⟩] ~R ↔ (𝑒 +P 𝑑)<P (𝑓 +P 𝑐)))
7372ancoms 268 . . . . . . 7 (((𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ([⟨𝑒, 𝑓⟩] ~R <R [⟨𝑐, 𝑑⟩] ~R ↔ (𝑒 +P 𝑑)<P (𝑓 +P 𝑐)))
74733adant1 1046 . . . . . 6 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ([⟨𝑒, 𝑓⟩] ~R <R [⟨𝑐, 𝑑⟩] ~R ↔ (𝑒 +P 𝑑)<P (𝑓 +P 𝑐)))
7571, 74orbi12d 805 . . . . 5 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → (([⟨𝑎, 𝑏⟩] ~R <R [⟨𝑒, 𝑓⟩] ~R ∨ [⟨𝑒, 𝑓⟩] ~R <R [⟨𝑐, 𝑑⟩] ~R ) ↔ ((𝑎 +P 𝑓)<P (𝑏 +P 𝑒) ∨ (𝑒 +P 𝑑)<P (𝑓 +P 𝑐))))
7667, 69, 753imtr4d 203 . . . 4 (((𝑎 ∈ P ∧ 𝑏 ∈ P) ∧ (𝑐 ∈ P ∧ 𝑑 ∈ P) ∧ (𝑒 ∈ P ∧ 𝑓 ∈ P)) → ([⟨𝑎, 𝑏⟩] ~R <R [⟨𝑐, 𝑑⟩] ~R → ([⟨𝑎, 𝑏⟩] ~R <R [⟨𝑒, 𝑓⟩] ~R ∨ [⟨𝑒, 𝑓⟩] ~R <R [⟨𝑐, 𝑑⟩] ~R )))
772, 6, 10, 14, 763ecoptocl 6902 . . 3 ((𝑥 ∈ R ∧ 𝑦 ∈ R ∧ 𝑧 ∈ R) → (𝑥 <R 𝑦 → (𝑥 <R 𝑧 ∨ 𝑧 <R 𝑦)))
7877rgen3 2637 . 2 ∀𝑥 ∈ R ∀𝑦 ∈ R ∀𝑧 ∈ R (𝑥 <R 𝑦 → (𝑥 <R 𝑧 ∨ 𝑧 <R 𝑦))
79 df-iso 4444 . 2 ( <R Or R ↔ ( <R Po R ∧ ∀𝑥 ∈ R ∀𝑦 ∈ R ∀𝑧 ∈ R (𝑥 <R 𝑦 → (𝑥 <R 𝑧 ∨ 𝑧 <R 𝑦))))
801, 78, 79mpbir2an 955 1 <R Or R
Colors of variables:    wff set class
This proof depends on syntax axioms:   → wi 4   ∧ wa 104   ↔ wb 105   ∨ wo 720   ∧ w3a 1009   = wceq 1402   ∈ wcel 2209  ∀wral 2528  ⟨cop 3712   class class class wbr 4131   Po wpo 4441   Or wor 4442  (class class class)co 6088  [cec 6809  Pcnp 7665   +P cpp 7667  <P cltp 7669   ~R cer 7670  Rcnr 7671   <R cltr 7677
This proof depends on 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-coll 4248  ax-sep 4251  ax-nul 4261  ax-pow 4313  ax-pr 4348  ax-un 4580  ax-setind 4686  ax-iinf 4737
This proof depends on definitions:  df-bi 117  df-dc 847  df-3or 1010  df-3an 1011  df-tru 1405  df-fal 1408  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-ral 2533  df-rex 2534  df-reu 2535  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-nul 3521  df-pw 3690  df-sn 3715  df-pr 3716  df-op 3718  df-uni 3936  df-int 3971  df-iun 4014  df-br 4132  df-opab 4194  df-mpt 4195  df-tr 4232  df-eprel 4436  df-id 4440  df-po 4443  df-iso 4444  df-iord 4513  df-on 4515  df-suc 4518  df-iom 4740  df-xp 4782  df-rel 4783  df-cnv 4784  df-co 4785  df-dm 4786  df-rn 4787  df-res 4788  df-ima 4789  df-iota 5340  df-fun 5382  df-fn 5383  df-f 5384  df-f1 5385  df-fo 5386  df-f1o 5387  df-fv 5388  df-ov 6091  df-oprab 6092  df-mpo 6093  df-1st 6378  df-2nd 6379  df-recs 6580  df-irdg 6645  df-1o 6691  df-2o 6692  df-oadd 6695  df-omul 6696  df-er 6811  df-ec 6813  df-qs 6817  df-ni 7678  df-pli 7679  df-mi 7680  df-lti 7681  df-plpq 7718  df-mpq 7719  df-enq 7721  df-nqqs 7722  df-plqqs 7723  df-mqqs 7724  df-1nqqs 7725  df-rq 7726  df-ltnqqs 7727  df-enq0 7798  df-nq0 7799  df-0nq0 7800  df-plq0 7801  df-mq0 7802  df-inp 7840  df-iplp 7842  df-iltp 7844  df-enr 8100  df-nr 8101  df-ltr 8104
This theorem is used by:  1ne0sr  8140  addgt0sr  8149  caucvgsrlemcl  8163  caucvgsrlemfv  8165  suplocsrlemb  8180  suplocsrlempr  8181  suplocsrlem  8182  axpre-ltirr  8256  axpre-ltwlin  8257  axpre-lttrn  8258
  Copyright terms: Public domain W3C validator