legov3 - Metamath Proof Explorer

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

Theorem legov3 28114

Description: An equivalent definition of the less-than relationship, from the strict relation. (Contributed by Thierry Arnoux, 15-Dec-2019.)

**Hypotheses**
Ref	Expression
legval.p	⊢ 𝑃 = (Base‘𝐺)
legval.d	⊢ − = (dist‘𝐺)
legval.i	⊢ 𝐼 = (Itv‘𝐺)
legval.l	⊢ ≤ = (≤G‘𝐺)
legval.g	⊢ (𝜑 → 𝐺 ∈ TarskiG)
legso.a	⊢ 𝐸 = ( − “ (𝑃 × 𝑃))
legso.f	⊢ (𝜑 → Fun − )
legso.l	⊢ < = (( ≤ ↾ 𝐸) ∖ I )
legso.d	⊢ (𝜑 → (𝑃 × 𝑃) ⊆ dom − )
ltgov.a	⊢ (𝜑 → 𝐴 ∈ 𝑃)
ltgov.b	⊢ (𝜑 → 𝐵 ∈ 𝑃)

**Assertion**
Ref	Expression
legov3	⊢ (𝜑 → ((𝐴 − 𝐵) ≤ (𝐶 − 𝐷) ↔ ((𝐴 − 𝐵) < (𝐶 − 𝐷) ∨ (𝐴 − 𝐵) = (𝐶 − 𝐷))))

**Proof of Theorem legov3**
Step	Hyp	Ref	Expression
1		legval.p	. . . 4 ⊢ 𝑃 = (Base‘𝐺)
2		legval.d	. . . 4 ⊢ − = (dist‘𝐺)
3		legval.i	. . . 4 ⊢ 𝐼 = (Itv‘𝐺)
4		legval.l	. . . 4 ⊢ ≤ = (≤G‘𝐺)
5		legval.g	. . . 4 ⊢ (𝜑 → 𝐺 ∈ TarskiG)
6		legso.a	. . . 4 ⊢ 𝐸 = ( − “ (𝑃 × 𝑃))
7		legso.f	. . . 4 ⊢ (𝜑 → Fun − )
8		legso.l	. . . 4 ⊢ < = (( ≤ ↾ 𝐸) ∖ I )
9		legso.d	. . . 4 ⊢ (𝜑 → (𝑃 × 𝑃) ⊆ dom − )
10		ltgov.a	. . . 4 ⊢ (𝜑 → 𝐴 ∈ 𝑃)
11		ltgov.b	. . . 4 ⊢ (𝜑 → 𝐵 ∈ 𝑃)
12	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11	ltgov 28113	. . 3 ⊢ (𝜑 → ((𝐴 − 𝐵) < (𝐶 − 𝐷) ↔ ((𝐴 − 𝐵) ≤ (𝐶 − 𝐷) ∧ (𝐴 − 𝐵) ≠ (𝐶 − 𝐷))))
13	12	orbi1d 913	. 2 ⊢ (𝜑 → (((𝐴 − 𝐵) < (𝐶 − 𝐷) ∨ (𝐴 − 𝐵) = (𝐶 − 𝐷)) ↔ (((𝐴 − 𝐵) ≤ (𝐶 − 𝐷) ∧ (𝐴 − 𝐵) ≠ (𝐶 − 𝐷)) ∨ (𝐴 − 𝐵) = (𝐶 − 𝐷))))
14		simprl 767	. . . 4 ⊢ (((𝜑 ∧ (((𝐴 − 𝐵) ≤ (𝐶 − 𝐷) ∧ (𝐴 − 𝐵) ≠ (𝐶 − 𝐷)) ∨ (𝐴 − 𝐵) = (𝐶 − 𝐷))) ∧ ((𝐴 − 𝐵) ≤ (𝐶 − 𝐷) ∧ (𝐴 − 𝐵) ≠ (𝐶 − 𝐷))) → (𝐴 − 𝐵) ≤ (𝐶 − 𝐷))
15	1, 2, 3, 4, 5, 10, 11	legid 28103	. . . . . . 7 ⊢ (𝜑 → (𝐴 − 𝐵) ≤ (𝐴 − 𝐵))
16	15	adantr 479	. . . . . 6 ⊢ ((𝜑 ∧ (𝐴 − 𝐵) = (𝐶 − 𝐷)) → (𝐴 − 𝐵) ≤ (𝐴 − 𝐵))
17		simpr 483	. . . . . 6 ⊢ ((𝜑 ∧ (𝐴 − 𝐵) = (𝐶 − 𝐷)) → (𝐴 − 𝐵) = (𝐶 − 𝐷))
18	16, 17	breqtrd 5175	. . . . 5 ⊢ ((𝜑 ∧ (𝐴 − 𝐵) = (𝐶 − 𝐷)) → (𝐴 − 𝐵) ≤ (𝐶 − 𝐷))
19	18	adantlr 711	. . . 4 ⊢ (((𝜑 ∧ (((𝐴 − 𝐵) ≤ (𝐶 − 𝐷) ∧ (𝐴 − 𝐵) ≠ (𝐶 − 𝐷)) ∨ (𝐴 − 𝐵) = (𝐶 − 𝐷))) ∧ (𝐴 − 𝐵) = (𝐶 − 𝐷)) → (𝐴 − 𝐵) ≤ (𝐶 − 𝐷))
20		simpr 483	. . . 4 ⊢ ((𝜑 ∧ (((𝐴 − 𝐵) ≤ (𝐶 − 𝐷) ∧ (𝐴 − 𝐵) ≠ (𝐶 − 𝐷)) ∨ (𝐴 − 𝐵) = (𝐶 − 𝐷))) → (((𝐴 − 𝐵) ≤ (𝐶 − 𝐷) ∧ (𝐴 − 𝐵) ≠ (𝐶 − 𝐷)) ∨ (𝐴 − 𝐵) = (𝐶 − 𝐷)))
21	14, 19, 20	mpjaodan 955	. . 3 ⊢ ((𝜑 ∧ (((𝐴 − 𝐵) ≤ (𝐶 − 𝐷) ∧ (𝐴 − 𝐵) ≠ (𝐶 − 𝐷)) ∨ (𝐴 − 𝐵) = (𝐶 − 𝐷))) → (𝐴 − 𝐵) ≤ (𝐶 − 𝐷))
22		simplr 765	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴 − 𝐵) ≤ (𝐶 − 𝐷)) ∧ ¬ (𝐴 − 𝐵) = (𝐶 − 𝐷)) → (𝐴 − 𝐵) ≤ (𝐶 − 𝐷))
23		simpr 483	. . . . . . . 8 ⊢ (((𝜑 ∧ (𝐴 − 𝐵) ≤ (𝐶 − 𝐷)) ∧ ¬ (𝐴 − 𝐵) = (𝐶 − 𝐷)) → ¬ (𝐴 − 𝐵) = (𝐶 − 𝐷))
24	23	neqned 2945	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐴 − 𝐵) ≤ (𝐶 − 𝐷)) ∧ ¬ (𝐴 − 𝐵) = (𝐶 − 𝐷)) → (𝐴 − 𝐵) ≠ (𝐶 − 𝐷))
25	22, 24	jca 510	. . . . . 6 ⊢ (((𝜑 ∧ (𝐴 − 𝐵) ≤ (𝐶 − 𝐷)) ∧ ¬ (𝐴 − 𝐵) = (𝐶 − 𝐷)) → ((𝐴 − 𝐵) ≤ (𝐶 − 𝐷) ∧ (𝐴 − 𝐵) ≠ (𝐶 − 𝐷)))
26	25	ex 411	. . . . 5 ⊢ ((𝜑 ∧ (𝐴 − 𝐵) ≤ (𝐶 − 𝐷)) → (¬ (𝐴 − 𝐵) = (𝐶 − 𝐷) → ((𝐴 − 𝐵) ≤ (𝐶 − 𝐷) ∧ (𝐴 − 𝐵) ≠ (𝐶 − 𝐷))))
27	26	orrd 859	. . . 4 ⊢ ((𝜑 ∧ (𝐴 − 𝐵) ≤ (𝐶 − 𝐷)) → ((𝐴 − 𝐵) = (𝐶 − 𝐷) ∨ ((𝐴 − 𝐵) ≤ (𝐶 − 𝐷) ∧ (𝐴 − 𝐵) ≠ (𝐶 − 𝐷))))
28	27	orcomd 867	. . 3 ⊢ ((𝜑 ∧ (𝐴 − 𝐵) ≤ (𝐶 − 𝐷)) → (((𝐴 − 𝐵) ≤ (𝐶 − 𝐷) ∧ (𝐴 − 𝐵) ≠ (𝐶 − 𝐷)) ∨ (𝐴 − 𝐵) = (𝐶 − 𝐷)))
29	21, 28	impbida 797	. 2 ⊢ (𝜑 → ((((𝐴 − 𝐵) ≤ (𝐶 − 𝐷) ∧ (𝐴 − 𝐵) ≠ (𝐶 − 𝐷)) ∨ (𝐴 − 𝐵) = (𝐶 − 𝐷)) ↔ (𝐴 − 𝐵) ≤ (𝐶 − 𝐷)))
30	13, 29	bitr2d 279	1 ⊢ (𝜑 → ((𝐴 − 𝐵) ≤ (𝐶 − 𝐷) ↔ ((𝐴 − 𝐵) < (𝐶 − 𝐷) ∨ (𝐴 − 𝐵) = (𝐶 − 𝐷))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 205 ∧ wa 394 ∨ wo 843 = wceq 1539 ∈ wcel 2104 ≠ wne 2938 ∖ cdif 3946 ⊆ wss 3949 class class class wbr 5149 I cid 5574 × cxp 5675 dom cdm 5677 ↾ cres 5679 “ cima 5680 Fun wfun 6538 ‘cfv 6544 (class class class)co 7413 Basecbs 17150 distcds 17212 TarskiGcstrkg 27943 Itvcitv 27949 ≤Gcleg 28098

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1911 ax-6 1969 ax-7 2009 ax-8 2106 ax-9 2114 ax-10 2135 ax-11 2152 ax-12 2169 ax-ext 2701 ax-rep 5286 ax-sep 5300 ax-nul 5307 ax-pow 5364 ax-pr 5428 ax-un 7729 ax-cnex 11170 ax-resscn 11171 ax-1cn 11172 ax-icn 11173 ax-addcl 11174 ax-addrcl 11175 ax-mulcl 11176 ax-mulrcl 11177 ax-mulcom 11178 ax-addass 11179 ax-mulass 11180 ax-distr 11181 ax-i2m1 11182 ax-1ne0 11183 ax-1rid 11184 ax-rnegex 11185 ax-rrecex 11186 ax-cnre 11187 ax-pre-lttri 11188 ax-pre-lttrn 11189 ax-pre-ltadd 11190 ax-pre-mulgt0 11191

This theorem depends on definitions: df-bi 206 df-an 395 df-or 844 df-3or 1086 df-3an 1087 df-tru 1542 df-fal 1552 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2532 df-eu 2561 df-clab 2708 df-cleq 2722 df-clel 2808 df-nfc 2883 df-ne 2939 df-nel 3045 df-ral 3060 df-rex 3069 df-reu 3375 df-rab 3431 df-v 3474 df-sbc 3779 df-csb 3895 df-dif 3952 df-un 3954 df-in 3956 df-ss 3966 df-pss 3968 df-nul 4324 df-if 4530 df-pw 4605 df-sn 4630 df-pr 4632 df-tp 4634 df-op 4636 df-uni 4910 df-int 4952 df-iun 5000 df-br 5150 df-opab 5212 df-mpt 5233 df-tr 5267 df-id 5575 df-eprel 5581 df-po 5589 df-so 5590 df-fr 5632 df-we 5634 df-xp 5683 df-rel 5684 df-cnv 5685 df-co 5686 df-dm 5687 df-rn 5688 df-res 5689 df-ima 5690 df-pred 6301 df-ord 6368 df-on 6369 df-lim 6370 df-suc 6371 df-iota 6496 df-fun 6546 df-fn 6547 df-f 6548 df-f1 6549 df-fo 6550 df-f1o 6551 df-fv 6552 df-riota 7369 df-ov 7416 df-oprab 7417 df-mpo 7418 df-om 7860 df-1st 7979 df-2nd 7980 df-frecs 8270 df-wrecs 8301 df-recs 8375 df-rdg 8414 df-1o 8470 df-oadd 8474 df-er 8707 df-pm 8827 df-en 8944 df-dom 8945 df-sdom 8946 df-fin 8947 df-dju 9900 df-card 9938 df-pnf 11256 df-mnf 11257 df-xr 11258 df-ltxr 11259 df-le 11260 df-sub 11452 df-neg 11453 df-nn 12219 df-2 12281 df-3 12282 df-n0 12479 df-xnn0 12551 df-z 12565 df-uz 12829 df-fz 13491 df-fzo 13634 df-hash 14297 df-word 14471 df-concat 14527 df-s1 14552 df-s2 14805 df-s3 14806 df-trkgc 27964 df-trkgb 27965 df-trkgcb 27966 df-trkg 27969 df-cgrg 28027 df-leg 28099

This theorem is referenced by: legso 28115

W3C validator