MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  ltsrpr Structured version   Visualization version   GIF version

Theorem ltsrpr 11056
Description: Ordering of signed reals in terms of positive reals. (Contributed by NM, 20-Feb-1996.) (Revised by Mario Carneiro, 12-Aug-2015.) (New usage is discouraged.)
Assertion
Ref Expression
ltsrpr ([⟨𝐴, 𝐵⟩] ~R <R [⟨𝐶, 𝐷⟩] ~R ↔ (𝐴 +P 𝐷)<P (𝐵 +P 𝐶))

Proof of Theorem ltsrpr
Dummy variables 𝑥 𝑦 𝑧 𝑤 𝑣 𝑢 𝑓 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 enrer 11042 . . 3 ~R Er (P × P)
2 erdm 8698 . . 3 ( ~R Er (P × P) → dom ~R = (P × P))
31, 2ax-mp 5 . 2 dom ~R = (P × P)
4 df-nr 11035 . 2 R = ((P × P) / ~R )
5 ltrelsr 11047 . 2 <R ⊆ (R × R)
6 ltrelpr 10977 . 2 <P ⊆ (P × P)
7 0npr 10971 . 2 ¬ ∅ ∈ P
8 dmplp 10991 . 2 dom +P = (P × P)
9 enrex 11046 . . 3 ~R ∈ V
10 df-ltr 11038 . . 3 <R = {⟨𝑥, 𝑦⟩ ∣ ((𝑥R𝑦R) ∧ ∃𝑧𝑤𝑣𝑢((𝑥 = [⟨𝑧, 𝑤⟩] ~R𝑦 = [⟨𝑣, 𝑢⟩] ~R ) ∧ (𝑧 +P 𝑢)<P (𝑤 +P 𝑣)))}
11 addclpr 10997 . . . . . . 7 ((𝑤P𝑣P) → (𝑤 +P 𝑣) ∈ P)
1211ad2ant2lr 746 . . . . . 6 (((𝑧P𝑤P) ∧ (𝑣P𝑢P)) → (𝑤 +P 𝑣) ∈ P)
13 addclpr 10997 . . . . . . 7 ((𝐵P𝐶P) → (𝐵 +P 𝐶) ∈ P)
1413ad2ant2lr 746 . . . . . 6 (((𝐴P𝐵P) ∧ (𝐶P𝐷P)) → (𝐵 +P 𝐶) ∈ P)
1512, 14anim12ci 614 . . . . 5 ((((𝑧P𝑤P) ∧ (𝑣P𝑢P)) ∧ ((𝐴P𝐵P) ∧ (𝐶P𝐷P))) → ((𝐵 +P 𝐶) ∈ P ∧ (𝑤 +P 𝑣) ∈ P))
1615an4s 658 . . . 4 ((((𝑧P𝑤P) ∧ (𝐴P𝐵P)) ∧ ((𝑣P𝑢P) ∧ (𝐶P𝐷P))) → ((𝐵 +P 𝐶) ∈ P ∧ (𝑤 +P 𝑣) ∈ P))
17 enreceq 11045 . . . . . 6 (((𝑧P𝑤P) ∧ (𝐴P𝐵P)) → ([⟨𝑧, 𝑤⟩] ~R = [⟨𝐴, 𝐵⟩] ~R ↔ (𝑧 +P 𝐵) = (𝑤 +P 𝐴)))
18 enreceq 11045 . . . . . . 7 (((𝑣P𝑢P) ∧ (𝐶P𝐷P)) → ([⟨𝑣, 𝑢⟩] ~R = [⟨𝐶, 𝐷⟩] ~R ↔ (𝑣 +P 𝐷) = (𝑢 +P 𝐶)))
19 eqcom 2739 . . . . . . 7 ((𝑣 +P 𝐷) = (𝑢 +P 𝐶) ↔ (𝑢 +P 𝐶) = (𝑣 +P 𝐷))
2018, 19bitrdi 286 . . . . . 6 (((𝑣P𝑢P) ∧ (𝐶P𝐷P)) → ([⟨𝑣, 𝑢⟩] ~R = [⟨𝐶, 𝐷⟩] ~R ↔ (𝑢 +P 𝐶) = (𝑣 +P 𝐷)))
2117, 20bi2anan9 637 . . . . 5 ((((𝑧P𝑤P) ∧ (𝐴P𝐵P)) ∧ ((𝑣P𝑢P) ∧ (𝐶P𝐷P))) → (([⟨𝑧, 𝑤⟩] ~R = [⟨𝐴, 𝐵⟩] ~R ∧ [⟨𝑣, 𝑢⟩] ~R = [⟨𝐶, 𝐷⟩] ~R ) ↔ ((𝑧 +P 𝐵) = (𝑤 +P 𝐴) ∧ (𝑢 +P 𝐶) = (𝑣 +P 𝐷))))
22 oveq12 7403 . . . . . 6 (((𝑧 +P 𝐵) = (𝑤 +P 𝐴) ∧ (𝑢 +P 𝐶) = (𝑣 +P 𝐷)) → ((𝑧 +P 𝐵) +P (𝑢 +P 𝐶)) = ((𝑤 +P 𝐴) +P (𝑣 +P 𝐷)))
23 addcompr 11000 . . . . . . . . . 10 (𝑢 +P 𝐵) = (𝐵 +P 𝑢)
2423oveq1i 7404 . . . . . . . . 9 ((𝑢 +P 𝐵) +P 𝐶) = ((𝐵 +P 𝑢) +P 𝐶)
25 addasspr 11001 . . . . . . . . 9 ((𝑢 +P 𝐵) +P 𝐶) = (𝑢 +P (𝐵 +P 𝐶))
26 addasspr 11001 . . . . . . . . 9 ((𝐵 +P 𝑢) +P 𝐶) = (𝐵 +P (𝑢 +P 𝐶))
2724, 25, 263eqtr3i 2768 . . . . . . . 8 (𝑢 +P (𝐵 +P 𝐶)) = (𝐵 +P (𝑢 +P 𝐶))
2827oveq2i 7405 . . . . . . 7 (𝑧 +P (𝑢 +P (𝐵 +P 𝐶))) = (𝑧 +P (𝐵 +P (𝑢 +P 𝐶)))
29 addasspr 11001 . . . . . . 7 ((𝑧 +P 𝑢) +P (𝐵 +P 𝐶)) = (𝑧 +P (𝑢 +P (𝐵 +P 𝐶)))
30 addasspr 11001 . . . . . . 7 ((𝑧 +P 𝐵) +P (𝑢 +P 𝐶)) = (𝑧 +P (𝐵 +P (𝑢 +P 𝐶)))
3128, 29, 303eqtr4i 2770 . . . . . 6 ((𝑧 +P 𝑢) +P (𝐵 +P 𝐶)) = ((𝑧 +P 𝐵) +P (𝑢 +P 𝐶))
32 addcompr 11000 . . . . . . . . . 10 (𝑣 +P 𝐴) = (𝐴 +P 𝑣)
3332oveq1i 7404 . . . . . . . . 9 ((𝑣 +P 𝐴) +P 𝐷) = ((𝐴 +P 𝑣) +P 𝐷)
34 addasspr 11001 . . . . . . . . 9 ((𝑣 +P 𝐴) +P 𝐷) = (𝑣 +P (𝐴 +P 𝐷))
35 addasspr 11001 . . . . . . . . 9 ((𝐴 +P 𝑣) +P 𝐷) = (𝐴 +P (𝑣 +P 𝐷))
3633, 34, 353eqtr3i 2768 . . . . . . . 8 (𝑣 +P (𝐴 +P 𝐷)) = (𝐴 +P (𝑣 +P 𝐷))
3736oveq2i 7405 . . . . . . 7 (𝑤 +P (𝑣 +P (𝐴 +P 𝐷))) = (𝑤 +P (𝐴 +P (𝑣 +P 𝐷)))
38 addasspr 11001 . . . . . . 7 ((𝑤 +P 𝑣) +P (𝐴 +P 𝐷)) = (𝑤 +P (𝑣 +P (𝐴 +P 𝐷)))
39 addasspr 11001 . . . . . . 7 ((𝑤 +P 𝐴) +P (𝑣 +P 𝐷)) = (𝑤 +P (𝐴 +P (𝑣 +P 𝐷)))
4037, 38, 393eqtr4i 2770 . . . . . 6 ((𝑤 +P 𝑣) +P (𝐴 +P 𝐷)) = ((𝑤 +P 𝐴) +P (𝑣 +P 𝐷))
4122, 31, 403eqtr4g 2797 . . . . 5 (((𝑧 +P 𝐵) = (𝑤 +P 𝐴) ∧ (𝑢 +P 𝐶) = (𝑣 +P 𝐷)) → ((𝑧 +P 𝑢) +P (𝐵 +P 𝐶)) = ((𝑤 +P 𝑣) +P (𝐴 +P 𝐷)))
4221, 41syl6bi 252 . . . 4 ((((𝑧P𝑤P) ∧ (𝐴P𝐵P)) ∧ ((𝑣P𝑢P) ∧ (𝐶P𝐷P))) → (([⟨𝑧, 𝑤⟩] ~R = [⟨𝐴, 𝐵⟩] ~R ∧ [⟨𝑣, 𝑢⟩] ~R = [⟨𝐶, 𝐷⟩] ~R ) → ((𝑧 +P 𝑢) +P (𝐵 +P 𝐶)) = ((𝑤 +P 𝑣) +P (𝐴 +P 𝐷))))
43 ovex 7427 . . . . 5 (𝑧 +P 𝑢) ∈ V
44 ovex 7427 . . . . 5 (𝐵 +P 𝐶) ∈ V
45 ltapr 11024 . . . . 5 (𝑓P → (𝑥<P 𝑦 ↔ (𝑓 +P 𝑥)<P (𝑓 +P 𝑦)))
46 ovex 7427 . . . . 5 (𝑤 +P 𝑣) ∈ V
47 addcompr 11000 . . . . 5 (𝑥 +P 𝑦) = (𝑦 +P 𝑥)
48 ovex 7427 . . . . 5 (𝐴 +P 𝐷) ∈ V
4943, 44, 45, 46, 47, 48caovord3 7604 . . . 4 ((((𝐵 +P 𝐶) ∈ P ∧ (𝑤 +P 𝑣) ∈ P) ∧ ((𝑧 +P 𝑢) +P (𝐵 +P 𝐶)) = ((𝑤 +P 𝑣) +P (𝐴 +P 𝐷))) → ((𝑧 +P 𝑢)<P (𝑤 +P 𝑣) ↔ (𝐴 +P 𝐷)<P (𝐵 +P 𝐶)))
5016, 42, 49syl6an 682 . . 3 ((((𝑧P𝑤P) ∧ (𝐴P𝐵P)) ∧ ((𝑣P𝑢P) ∧ (𝐶P𝐷P))) → (([⟨𝑧, 𝑤⟩] ~R = [⟨𝐴, 𝐵⟩] ~R ∧ [⟨𝑣, 𝑢⟩] ~R = [⟨𝐶, 𝐷⟩] ~R ) → ((𝑧 +P 𝑢)<P (𝑤 +P 𝑣) ↔ (𝐴 +P 𝐷)<P (𝐵 +P 𝐶))))
519, 1, 4, 10, 50brecop 8789 . 2 (((𝐴P𝐵P) ∧ (𝐶P𝐷P)) → ([⟨𝐴, 𝐵⟩] ~R <R [⟨𝐶, 𝐷⟩] ~R ↔ (𝐴 +P 𝐷)<P (𝐵 +P 𝐶)))
523, 4, 5, 6, 7, 8, 51brecop2 8790 1 ([⟨𝐴, 𝐵⟩] ~R <R [⟨𝐶, 𝐷⟩] ~R ↔ (𝐴 +P 𝐷)<P (𝐵 +P 𝐶))
Colors of variables: wff setvar class
Syntax hints:  wb 205  wa 396   = wceq 1541  wcel 2106  cop 4629   class class class wbr 5142   × cxp 5668  dom cdm 5670  (class class class)co 7394   Er wer 8685  [cec 8686  Pcnp 10838   +P cpp 10840  <P cltp 10842   ~R cer 10843  Rcnr 10844   <R cltr 10850
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2703  ax-sep 5293  ax-nul 5300  ax-pow 5357  ax-pr 5421  ax-un 7709  ax-inf2 9620
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-ral 3062  df-rex 3071  df-rmo 3376  df-reu 3377  df-rab 3433  df-v 3476  df-sbc 3775  df-csb 3891  df-dif 3948  df-un 3950  df-in 3952  df-ss 3962  df-pss 3964  df-nul 4320  df-if 4524  df-pw 4599  df-sn 4624  df-pr 4626  df-op 4630  df-uni 4903  df-int 4945  df-iun 4993  df-br 5143  df-opab 5205  df-mpt 5226  df-tr 5260  df-id 5568  df-eprel 5574  df-po 5582  df-so 5583  df-fr 5625  df-we 5627  df-xp 5676  df-rel 5677  df-cnv 5678  df-co 5679  df-dm 5680  df-rn 5681  df-res 5682  df-ima 5683  df-pred 6290  df-ord 6357  df-on 6358  df-lim 6359  df-suc 6360  df-iota 6485  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-ov 7397  df-oprab 7398  df-mpo 7399  df-om 7840  df-1st 7959  df-2nd 7960  df-frecs 8250  df-wrecs 8281  df-recs 8355  df-rdg 8394  df-1o 8450  df-oadd 8454  df-omul 8455  df-er 8688  df-ec 8690  df-qs 8694  df-ni 10851  df-pli 10852  df-mi 10853  df-lti 10854  df-plpq 10887  df-mpq 10888  df-ltpq 10889  df-enq 10890  df-nq 10891  df-erq 10892  df-plq 10893  df-mq 10894  df-1nq 10895  df-rq 10896  df-ltnq 10897  df-np 10960  df-plp 10962  df-ltp 10964  df-enr 11034  df-nr 11035  df-ltr 11038
This theorem is referenced by:  gt0srpr  11057  ltsosr  11073  0lt1sr  11074  ltasr  11079  mappsrpr  11087  ltpsrpr  11088  map2psrpr  11089
  Copyright terms: Public domain W3C validator