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

Theorem ltpopr 7057
Description: Positive real 'less than' is a partial ordering. Remark ("< is transitive and irreflexive") preceding Proposition 11.2.3 of [HoTT], p. (varies). Lemma for ltsopr 7058. (Contributed by Jim Kingdon, 15-Dec-2019.)
Assertion
Ref Expression
ltpopr <P Po P

Proof of Theorem ltpopr
Dummy variables 𝑟 𝑞 𝑠 𝑡 𝑢 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 prop 6937 . . . . . . . 8 (𝑠P → ⟨(1st𝑠), (2nd𝑠)⟩ ∈ P)
2 prdisj 6954 . . . . . . . 8 ((⟨(1st𝑠), (2nd𝑠)⟩ ∈ P𝑞Q) → ¬ (𝑞 ∈ (1st𝑠) ∧ 𝑞 ∈ (2nd𝑠)))
31, 2sylan 277 . . . . . . 7 ((𝑠P𝑞Q) → ¬ (𝑞 ∈ (1st𝑠) ∧ 𝑞 ∈ (2nd𝑠)))
4 ancom 262 . . . . . . 7 ((𝑞 ∈ (1st𝑠) ∧ 𝑞 ∈ (2nd𝑠)) ↔ (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑠)))
53, 4sylnib 634 . . . . . 6 ((𝑠P𝑞Q) → ¬ (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑠)))
65nrexdv 2460 . . . . 5 (𝑠P → ¬ ∃𝑞Q (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑠)))
7 ltdfpr 6968 . . . . . 6 ((𝑠P𝑠P) → (𝑠<P 𝑠 ↔ ∃𝑞Q (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑠))))
87anidms 389 . . . . 5 (𝑠P → (𝑠<P 𝑠 ↔ ∃𝑞Q (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑠))))
96, 8mtbird 631 . . . 4 (𝑠P → ¬ 𝑠<P 𝑠)
109adantl 271 . . 3 ((⊤ ∧ 𝑠P) → ¬ 𝑠<P 𝑠)
11 ltdfpr 6968 . . . . . . . . . . 11 ((𝑠P𝑡P) → (𝑠<P 𝑡 ↔ ∃𝑞Q (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡))))
12113adant3 959 . . . . . . . . . 10 ((𝑠P𝑡P𝑢P) → (𝑠<P 𝑡 ↔ ∃𝑞Q (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡))))
13 ltdfpr 6968 . . . . . . . . . . 11 ((𝑡P𝑢P) → (𝑡<P 𝑢 ↔ ∃𝑟Q (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢))))
14133adant1 957 . . . . . . . . . 10 ((𝑠P𝑡P𝑢P) → (𝑡<P 𝑢 ↔ ∃𝑟Q (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢))))
1512, 14anbi12d 457 . . . . . . . . 9 ((𝑠P𝑡P𝑢P) → ((𝑠<P 𝑡𝑡<P 𝑢) ↔ (∃𝑞Q (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ ∃𝑟Q (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢)))))
16 reeanv 2529 . . . . . . . . 9 (∃𝑞Q𝑟Q ((𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢))) ↔ (∃𝑞Q (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ ∃𝑟Q (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢))))
1715, 16syl6bbr 196 . . . . . . . 8 ((𝑠P𝑡P𝑢P) → ((𝑠<P 𝑡𝑡<P 𝑢) ↔ ∃𝑞Q𝑟Q ((𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢)))))
1817biimpa 290 . . . . . . 7 (((𝑠P𝑡P𝑢P) ∧ (𝑠<P 𝑡𝑡<P 𝑢)) → ∃𝑞Q𝑟Q ((𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢))))
19 simprll 504 . . . . . . . . . . 11 ((((𝑠P𝑡P𝑢P) ∧ (𝑠<P 𝑡𝑡<P 𝑢)) ∧ ((𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢)))) → 𝑞 ∈ (2nd𝑠))
20 prop 6937 . . . . . . . . . . . . . . . . . 18 (𝑡P → ⟨(1st𝑡), (2nd𝑡)⟩ ∈ P)
21 prltlu 6949 . . . . . . . . . . . . . . . . . 18 ((⟨(1st𝑡), (2nd𝑡)⟩ ∈ P𝑞 ∈ (1st𝑡) ∧ 𝑟 ∈ (2nd𝑡)) → 𝑞 <Q 𝑟)
2220, 21syl3an1 1203 . . . . . . . . . . . . . . . . 17 ((𝑡P𝑞 ∈ (1st𝑡) ∧ 𝑟 ∈ (2nd𝑡)) → 𝑞 <Q 𝑟)
23223adant3r 1167 . . . . . . . . . . . . . . . 16 ((𝑡P𝑞 ∈ (1st𝑡) ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢))) → 𝑞 <Q 𝑟)
24233adant2l 1164 . . . . . . . . . . . . . . 15 ((𝑡P ∧ (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢))) → 𝑞 <Q 𝑟)
25243expb 1140 . . . . . . . . . . . . . 14 ((𝑡P ∧ ((𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢)))) → 𝑞 <Q 𝑟)
26253ad2antl2 1102 . . . . . . . . . . . . 13 (((𝑠P𝑡P𝑢P) ∧ ((𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢)))) → 𝑞 <Q 𝑟)
2726adantlr 461 . . . . . . . . . . . 12 ((((𝑠P𝑡P𝑢P) ∧ (𝑠<P 𝑡𝑡<P 𝑢)) ∧ ((𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢)))) → 𝑞 <Q 𝑟)
28 prop 6937 . . . . . . . . . . . . . . . . 17 (𝑢P → ⟨(1st𝑢), (2nd𝑢)⟩ ∈ P)
29 prcdnql 6946 . . . . . . . . . . . . . . . . 17 ((⟨(1st𝑢), (2nd𝑢)⟩ ∈ P𝑟 ∈ (1st𝑢)) → (𝑞 <Q 𝑟𝑞 ∈ (1st𝑢)))
3028, 29sylan 277 . . . . . . . . . . . . . . . 16 ((𝑢P𝑟 ∈ (1st𝑢)) → (𝑞 <Q 𝑟𝑞 ∈ (1st𝑢)))
3130adantrl 462 . . . . . . . . . . . . . . 15 ((𝑢P ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢))) → (𝑞 <Q 𝑟𝑞 ∈ (1st𝑢)))
3231adantrl 462 . . . . . . . . . . . . . 14 ((𝑢P ∧ ((𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢)))) → (𝑞 <Q 𝑟𝑞 ∈ (1st𝑢)))
33323ad2antl3 1103 . . . . . . . . . . . . 13 (((𝑠P𝑡P𝑢P) ∧ ((𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢)))) → (𝑞 <Q 𝑟𝑞 ∈ (1st𝑢)))
3433adantlr 461 . . . . . . . . . . . 12 ((((𝑠P𝑡P𝑢P) ∧ (𝑠<P 𝑡𝑡<P 𝑢)) ∧ ((𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢)))) → (𝑞 <Q 𝑟𝑞 ∈ (1st𝑢)))
3527, 34mpd 13 . . . . . . . . . . 11 ((((𝑠P𝑡P𝑢P) ∧ (𝑠<P 𝑡𝑡<P 𝑢)) ∧ ((𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢)))) → 𝑞 ∈ (1st𝑢))
3619, 35jca 300 . . . . . . . . . 10 ((((𝑠P𝑡P𝑢P) ∧ (𝑠<P 𝑡𝑡<P 𝑢)) ∧ ((𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢)))) → (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑢)))
3736ex 113 . . . . . . . . 9 (((𝑠P𝑡P𝑢P) ∧ (𝑠<P 𝑡𝑡<P 𝑢)) → (((𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢))) → (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑢))))
3837rexlimdvw 2486 . . . . . . . 8 (((𝑠P𝑡P𝑢P) ∧ (𝑠<P 𝑡𝑡<P 𝑢)) → (∃𝑟Q ((𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢))) → (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑢))))
3938reximdv 2468 . . . . . . 7 (((𝑠P𝑡P𝑢P) ∧ (𝑠<P 𝑡𝑡<P 𝑢)) → (∃𝑞Q𝑟Q ((𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑡)) ∧ (𝑟 ∈ (2nd𝑡) ∧ 𝑟 ∈ (1st𝑢))) → ∃𝑞Q (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑢))))
4018, 39mpd 13 . . . . . 6 (((𝑠P𝑡P𝑢P) ∧ (𝑠<P 𝑡𝑡<P 𝑢)) → ∃𝑞Q (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑢)))
41 ltdfpr 6968 . . . . . . . . 9 ((𝑠P𝑢P) → (𝑠<P 𝑢 ↔ ∃𝑞Q (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑢))))
42413adant2 958 . . . . . . . 8 ((𝑠P𝑡P𝑢P) → (𝑠<P 𝑢 ↔ ∃𝑞Q (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑢))))
4342biimprd 156 . . . . . . 7 ((𝑠P𝑡P𝑢P) → (∃𝑞Q (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑢)) → 𝑠<P 𝑢))
4443adantr 270 . . . . . 6 (((𝑠P𝑡P𝑢P) ∧ (𝑠<P 𝑡𝑡<P 𝑢)) → (∃𝑞Q (𝑞 ∈ (2nd𝑠) ∧ 𝑞 ∈ (1st𝑢)) → 𝑠<P 𝑢))
4540, 44mpd 13 . . . . 5 (((𝑠P𝑡P𝑢P) ∧ (𝑠<P 𝑡𝑡<P 𝑢)) → 𝑠<P 𝑢)
4645ex 113 . . . 4 ((𝑠P𝑡P𝑢P) → ((𝑠<P 𝑡𝑡<P 𝑢) → 𝑠<P 𝑢))
4746adantl 271 . . 3 ((⊤ ∧ (𝑠P𝑡P𝑢P)) → ((𝑠<P 𝑡𝑡<P 𝑢) → 𝑠<P 𝑢))
4810, 47ispod 4095 . 2 (⊤ → <P Po P)
4948trud 1294 1 <P Po P
Colors of variables: wff set class
Syntax hints:  ¬ wn 3  wi 4  wa 102  wb 103  w3a 920  wtru 1286  wcel 1434  wrex 2354  cop 3425   class class class wbr 3811   Po wpo 4085  cfv 4969  1st c1st 5844  2nd c2nd 5845  Qcnq 6742   <Q cltq 6747  Pcnp 6753  <P cltp 6757
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 577  ax-in2 578  ax-io 663  ax-5 1377  ax-7 1378  ax-gen 1379  ax-ie1 1423  ax-ie2 1424  ax-8 1436  ax-10 1437  ax-11 1438  ax-i12 1439  ax-bndl 1440  ax-4 1441  ax-13 1445  ax-14 1446  ax-17 1460  ax-i9 1464  ax-ial 1468  ax-i5r 1469  ax-ext 2065  ax-coll 3919  ax-sep 3922  ax-nul 3930  ax-pow 3974  ax-pr 4000  ax-un 4224  ax-setind 4316  ax-iinf 4366
This theorem depends on definitions:  df-bi 115  df-dc 777  df-3or 921  df-3an 922  df-tru 1288  df-fal 1291  df-nf 1391  df-sb 1688  df-eu 1946  df-mo 1947  df-clab 2070  df-cleq 2076  df-clel 2079  df-nfc 2212  df-ne 2250  df-ral 2358  df-rex 2359  df-reu 2360  df-rab 2362  df-v 2614  df-sbc 2827  df-csb 2920  df-dif 2986  df-un 2988  df-in 2990  df-ss 2997  df-nul 3270  df-pw 3408  df-sn 3428  df-pr 3429  df-op 3431  df-uni 3628  df-int 3663  df-iun 3706  df-br 3812  df-opab 3866  df-mpt 3867  df-tr 3902  df-eprel 4080  df-id 4084  df-po 4087  df-iso 4088  df-iord 4157  df-on 4159  df-suc 4162  df-iom 4369  df-xp 4407  df-rel 4408  df-cnv 4409  df-co 4410  df-dm 4411  df-rn 4412  df-res 4413  df-ima 4414  df-iota 4934  df-fun 4971  df-fn 4972  df-f 4973  df-f1 4974  df-fo 4975  df-f1o 4976  df-fv 4977  df-ov 5594  df-oprab 5595  df-mpt2 5596  df-1st 5846  df-2nd 5847  df-recs 6002  df-irdg 6067  df-oadd 6117  df-omul 6118  df-er 6222  df-ec 6224  df-qs 6228  df-ni 6766  df-mi 6768  df-lti 6769  df-enq 6809  df-nqqs 6810  df-ltnqqs 6815  df-inp 6928  df-iltp 6932
This theorem is referenced by:  ltsopr  7058
  Copyright terms: Public domain W3C validator