Theorem ltlesd 27741

Description: Surreal less-than implies less-than or equal. (Contributed by Scott Fenton, 16-Feb-2025.)

Hypotheses

Ref	Expression
ltlesd.1	⊢ (𝜑 → 𝐴 ∈ No )
ltlesd.2	⊢ (𝜑 → 𝐵 ∈ No )
ltlesd.3	⊢ (𝜑 → 𝐴 <s 𝐵)

Assertion

Ref	Expression
ltlesd	⊢ (𝜑 → 𝐴 ≤s 𝐵)

Proof of Theorem ltlesd

Step	Hyp	Ref	Expression
1		ltlesd.1	. . . 4 ⊢ (𝜑 → 𝐴 ∈ No )
2		ltlesd.2	. . . 4 ⊢ (𝜑 → 𝐵 ∈ No )
3	1, 2	jca 511	. . 3 ⊢ (𝜑 → (𝐴 ∈ No ∧ 𝐵 ∈ No ))
4		ltlesd.3	. . 3 ⊢ (𝜑 → 𝐴 <s 𝐵)
5		ltsasym 27716	. . 3 ⊢ ((𝐴 ∈ No ∧ 𝐵 ∈ No ) → (𝐴 <s 𝐵 → ¬ 𝐵 <s 𝐴))
6	3, 4, 5	sylc 65	. 2 ⊢ (𝜑 → ¬ 𝐵 <s 𝐴)
7		lenlts 27720	. . 3 ⊢ ((𝐴 ∈ No ∧ 𝐵 ∈ No ) → (𝐴 ≤s 𝐵 ↔ ¬ 𝐵 <s 𝐴))
8	1, 2, 7	syl2anc 584	. 2 ⊢ (𝜑 → (𝐴 ≤s 𝐵 ↔ ¬ 𝐵 <s 𝐴))
9	6, 8	mpbird 257	1 ⊢ (𝜑 → 𝐴 ≤s 𝐵)

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∈ wcel 2113   class class class wbr 5098   No csur 27607   <s clts 27608   ≤s cles 27712

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-10 2146  ax-11 2162  ax-12 2184  ax-ext 2708  ax-sep 5241  ax-nul 5251  ax-pr 5377

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2068  df-mo 2539  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2811  df-nfc 2885  df-ne 2933  df-ral 3052  df-rex 3061  df-rab 3400  df-v 3442  df-sbc 3741  df-csb 3850  df-dif 3904  df-un 3906  df-in 3908  df-ss 3918  df-pss 3921  df-nul 4286  df-if 4480  df-pw 4556  df-sn 4581  df-pr 4583  df-tp 4585  df-op 4587  df-uni 4864  df-br 5099  df-opab 5161  df-mpt 5180  df-tr 5206  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-ord 6320  df-on 6321  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-fv 6500  df-1o 8397  df-2o 8398  df-no 27610  df-lts 27611  df-les 27713

This theorem is referenced by:  ltlesnd  27743  lemulsd  28134  mulsge0d  28142  mulsuniflem  28145  ltmuls12ad  28179  ltonold  28257  oncutlt  28260  onnolt  28262  n0sge0  28334  uzsind  28401  halfcut  28454  bdaypw2n0bndlem  28459  bdayfinbndlem1  28463  elreno2  28491  1reno  28493