Theorem letri3 8038

Description: Tightness of real apartness. (Contributed by NM, 14-May-1999.)

Assertion

Ref	Expression
letri3	⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 = 𝐵 ↔ (𝐴 ≤ 𝐵 ∧ 𝐵 ≤ 𝐴)))

Proof of Theorem letri3

Step	Hyp	Ref	Expression
1		lttri3 8037	. . 3 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 = 𝐵 ↔ (¬ 𝐴 < 𝐵 ∧ ¬ 𝐵 < 𝐴)))
2		ancom 266	. . 3 ⊢ ((¬ 𝐵 < 𝐴 ∧ ¬ 𝐴 < 𝐵) ↔ (¬ 𝐴 < 𝐵 ∧ ¬ 𝐵 < 𝐴))
3	1, 2	bitr4di 198	. 2 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 = 𝐵 ↔ (¬ 𝐵 < 𝐴 ∧ ¬ 𝐴 < 𝐵)))
4		lenlt 8033	. . 3 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 ≤ 𝐵 ↔ ¬ 𝐵 < 𝐴))
5		lenlt 8033	. . . 4 ⊢ ((𝐵 ∈ ℝ ∧ 𝐴 ∈ ℝ) → (𝐵 ≤ 𝐴 ↔ ¬ 𝐴 < 𝐵))
6	5	ancoms 268	. . 3 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐵 ≤ 𝐴 ↔ ¬ 𝐴 < 𝐵))
7	4, 6	anbi12d 473	. 2 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ((𝐴 ≤ 𝐵 ∧ 𝐵 ≤ 𝐴) ↔ (¬ 𝐵 < 𝐴 ∧ ¬ 𝐴 < 𝐵)))
8	3, 7	bitr4d 191	1 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 = 𝐵 ↔ (𝐴 ≤ 𝐵 ∧ 𝐵 ≤ 𝐴)))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 104   ↔ wb 105   = wceq 1353   ∈ wcel 2148   class class class wbr 4004  ℝcr 7810   < clt 7992   ≤ cle 7993

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 614  ax-in2 615  ax-io 709  ax-5 1447  ax-7 1448  ax-gen 1449  ax-ie1 1493  ax-ie2 1494  ax-8 1504  ax-10 1505  ax-11 1506  ax-i12 1507  ax-bndl 1509  ax-4 1510  ax-17 1526  ax-i9 1530  ax-ial 1534  ax-i5r 1535  ax-13 2150  ax-14 2151  ax-ext 2159  ax-sep 4122  ax-pow 4175  ax-pr 4210  ax-un 4434  ax-setind 4537  ax-cnex 7902  ax-resscn 7903  ax-pre-ltirr 7923  ax-pre-apti 7926

This theorem depends on definitions:  df-bi 117  df-3an 980  df-tru 1356  df-fal 1359  df-nf 1461  df-sb 1763  df-eu 2029  df-mo 2030  df-clab 2164  df-cleq 2170  df-clel 2173  df-nfc 2308  df-ne 2348  df-nel 2443  df-ral 2460  df-rex 2461  df-rab 2464  df-v 2740  df-dif 3132  df-un 3134  df-in 3136  df-ss 3143  df-pw 3578  df-sn 3599  df-pr 3600  df-op 3602  df-uni 3811  df-br 4005  df-opab 4066  df-xp 4633  df-cnv 4635  df-pnf 7994  df-mnf 7995  df-xr 7996  df-ltxr 7997  df-le 7998

This theorem is referenced by:  eqlelt  8044  letri3i  8056  letri3d  8073  lesub0  8436  lbreu  8902  nnle1eq1  8943  nn0le0eq0  9204  nn0lt10b  9333  zextle  9344  uz11  9550  uzin  9560  nn01to3  9617  elfz1eq  10035  fsum00  11470  dvdsabseq  11853  nn0seqcvgd  12041  infpnlem1  12357  lgsdir  14439  lgsabs1  14443