Theorem zdceq 9392

Description: Equality of integers is decidable. (Contributed by Jim Kingdon, 14-Mar-2020.)

Assertion

Ref	Expression
zdceq	⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → DECID 𝐴 = 𝐵)

Proof of Theorem zdceq

Step	Hyp	Ref	Expression
1		ztri3or 9360	. 2 ⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝐴 < 𝐵 ∨ 𝐴 = 𝐵 ∨ 𝐵 < 𝐴))
2		zre 9321	. . . 4 ⊢ (𝐴 ∈ ℤ → 𝐴 ∈ ℝ)
3		ltne 8104	. . . . . . . 8 ⊢ ((𝐴 ∈ ℝ ∧ 𝐴 < 𝐵) → 𝐵 ≠ 𝐴)
4	3	necomd 2450	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝐴 < 𝐵) → 𝐴 ≠ 𝐵)
5		olc 712	. . . . . . . 8 ⊢ (𝐴 ≠ 𝐵 → (𝐴 = 𝐵 ∨ 𝐴 ≠ 𝐵))
6		dcne 2375	. . . . . . . 8 ⊢ (DECID 𝐴 = 𝐵 ↔ (𝐴 = 𝐵 ∨ 𝐴 ≠ 𝐵))
7	5, 6	sylibr 134	. . . . . . 7 ⊢ (𝐴 ≠ 𝐵 → DECID 𝐴 = 𝐵)
8	4, 7	syl 14	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐴 < 𝐵) → DECID 𝐴 = 𝐵)
9	8	ex 115	. . . . 5 ⊢ (𝐴 ∈ ℝ → (𝐴 < 𝐵 → DECID 𝐴 = 𝐵))
10	9	adantr 276	. . . 4 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℤ) → (𝐴 < 𝐵 → DECID 𝐴 = 𝐵))
11	2, 10	sylan 283	. . 3 ⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝐴 < 𝐵 → DECID 𝐴 = 𝐵))
12		orc 713	. . . . 5 ⊢ (𝐴 = 𝐵 → (𝐴 = 𝐵 ∨ 𝐴 ≠ 𝐵))
13	12, 6	sylibr 134	. . . 4 ⊢ (𝐴 = 𝐵 → DECID 𝐴 = 𝐵)
14	13	a1i 9	. . 3 ⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝐴 = 𝐵 → DECID 𝐴 = 𝐵))
15		zre 9321	. . . . 5 ⊢ (𝐵 ∈ ℤ → 𝐵 ∈ ℝ)
16		ltne 8104	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ ∧ 𝐵 < 𝐴) → 𝐴 ≠ 𝐵)
17	16, 7	syl 14	. . . . . 6 ⊢ ((𝐵 ∈ ℝ ∧ 𝐵 < 𝐴) → DECID 𝐴 = 𝐵)
18	17	ex 115	. . . . 5 ⊢ (𝐵 ∈ ℝ → (𝐵 < 𝐴 → DECID 𝐴 = 𝐵))
19	15, 18	syl 14	. . . 4 ⊢ (𝐵 ∈ ℤ → (𝐵 < 𝐴 → DECID 𝐴 = 𝐵))
20	19	adantl 277	. . 3 ⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝐵 < 𝐴 → DECID 𝐴 = 𝐵))
21	11, 14, 20	3jaod 1315	. 2 ⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → ((𝐴 < 𝐵 ∨ 𝐴 = 𝐵 ∨ 𝐵 < 𝐴) → DECID 𝐴 = 𝐵))
22	1, 21	mpd 13	1 ⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → DECID 𝐴 = 𝐵)

Syntax hints:   → wi 4   ∧ wa 104   ∨ wo 709  DECID wdc 835   ∨ w3o 979   = wceq 1364   ∈ wcel 2164   ≠ wne 2364   class class class wbr 4029  ℝcr 7871   < clt 8054  ℤcz 9317

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 615  ax-in2 616  ax-io 710  ax-5 1458  ax-7 1459  ax-gen 1460  ax-ie1 1504  ax-ie2 1505  ax-8 1515  ax-10 1516  ax-11 1517  ax-i12 1518  ax-bndl 1520  ax-4 1521  ax-17 1537  ax-i9 1541  ax-ial 1545  ax-i5r 1546  ax-13 2166  ax-14 2167  ax-ext 2175  ax-sep 4147  ax-pow 4203  ax-pr 4238  ax-un 4464  ax-setind 4569  ax-cnex 7963  ax-resscn 7964  ax-1cn 7965  ax-1re 7966  ax-icn 7967  ax-addcl 7968  ax-addrcl 7969  ax-mulcl 7970  ax-addcom 7972  ax-addass 7974  ax-distr 7976  ax-i2m1 7977  ax-0lt1 7978  ax-0id 7980  ax-rnegex 7981  ax-cnre 7983  ax-pre-ltirr 7984  ax-pre-ltwlin 7985  ax-pre-lttrn 7986  ax-pre-ltadd 7988

This theorem depends on definitions:  df-bi 117  df-dc 836  df-3or 981  df-3an 982  df-tru 1367  df-fal 1370  df-nf 1472  df-sb 1774  df-eu 2045  df-mo 2046  df-clab 2180  df-cleq 2186  df-clel 2189  df-nfc 2325  df-ne 2365  df-nel 2460  df-ral 2477  df-rex 2478  df-reu 2479  df-rab 2481  df-v 2762  df-sbc 2986  df-dif 3155  df-un 3157  df-in 3159  df-ss 3166  df-pw 3603  df-sn 3624  df-pr 3625  df-op 3627  df-uni 3836  df-int 3871  df-br 4030  df-opab 4091  df-id 4324  df-xp 4665  df-rel 4666  df-cnv 4667  df-co 4668  df-dm 4669  df-iota 5215  df-fun 5256  df-fv 5262  df-riota 5873  df-ov 5921  df-oprab 5922  df-mpo 5923  df-pnf 8056  df-mnf 8057  df-xr 8058  df-ltxr 8059  df-le 8060  df-sub 8192  df-neg 8193  df-inn 8983  df-n0 9241  df-z 9318

This theorem is referenced by:  nn0n0n1ge2b  9396  nn0lt2  9398  prime  9416  elnn1uz2  9672  iseqf1olemqcl  10570  iseqf1olemnab  10572  iseqf1olemab  10573  seq3f1olemstep  10585  exp3val  10612  hashfzp1  10895  fprod1p  11742  dvdsdc  11941  zdvdsdc  11955  dvdsabseq  11989  alzdvds  11996  fzo0dvdseq  11999  gcdmndc  12081  gcdsupex  12094  gcdsupcl  12095  gcd0id  12116  gcdaddm  12121  dfgcd2  12151  gcdmultiplez  12158  dvdssq  12168  nn0seqcvgd  12179  algcvgblem  12187  eucalgval2  12191  lcmmndc  12200  lcmdvds  12217  lcmid  12218  mulgcddvds  12232  cncongr2  12242  isprm3  12256  isprm4  12257  prm2orodd  12264  rpexp  12291  phivalfi  12350  phiprmpw  12360  phimullem  12363  eulerthlemfi  12366  hashgcdeq  12377  phisum  12378  pcxnn0cl  12448  pcge0  12451  pcdvdsb  12458  pcneg  12463  pcdvdstr  12465  pcgcd1  12466  pc2dvds  12468  pcz  12470  pcprmpw2  12471  pcmpt  12481  4sqlemafi  12533  4sqleminfi  12535  4sqexercise1  12536  4sqexercise2  12537  4sqlemsdc  12538  4sqlem11  12539  4sqlem19  12547  ennnfonelemim  12581  unbendc  12611  strsetsid  12651  mulgval  13192  mulgfng  13194  subgmulg  13258  znf1o  14139  ply1term  14889  lgsval  15120  lgsfvalg  15121  lgsfcl2  15122  lgscllem  15123  lgsval2lem  15126  lgsneg1  15141  lgsdir2  15149  lgsdirprm  15150  lgsdir  15151  lgsne0  15154  lgsprme0  15158  lgsdirnn0  15163  lgsdinn0  15164  lgsquadlem1  15191  2sqlem9  15211  nninffeq  15510  nconstwlpolem  15555