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

Theorem mndodconglem 19508
Description: Lemma for mndodcong 19509. (Contributed by Mario Carneiro, 23-Sep-2015.)
Hypotheses
Ref Expression
odcl.1 𝑋 = (Base‘𝐺)
odcl.2 𝑂 = (od‘𝐺)
odid.3 · = (.g𝐺)
odid.4 0 = (0g𝐺)
mndodconglem.1 (𝜑𝐺 ∈ Mnd)
mndodconglem.2 (𝜑𝐴𝑋)
mndodconglem.3 (𝜑 → (𝑂𝐴) ∈ ℕ)
mndodconglem.4 (𝜑𝑀 ∈ ℕ0)
mndodconglem.5 (𝜑𝑁 ∈ ℕ0)
mndodconglem.6 (𝜑𝑀 < (𝑂𝐴))
mndodconglem.7 (𝜑𝑁 < (𝑂𝐴))
mndodconglem.8 (𝜑 → (𝑀 · 𝐴) = (𝑁 · 𝐴))
Assertion
Ref Expression
mndodconglem ((𝜑𝑀𝑁) → 𝑀 = 𝑁)

Proof of Theorem mndodconglem
StepHypRef Expression
1 mndodconglem.2 . . . . . . 7 (𝜑𝐴𝑋)
2 mndodconglem.3 . . . . . . . . . . 11 (𝜑 → (𝑂𝐴) ∈ ℕ)
32nnred 12260 . . . . . . . . . 10 (𝜑 → (𝑂𝐴) ∈ ℝ)
43recnd 11274 . . . . . . . . 9 (𝜑 → (𝑂𝐴) ∈ ℂ)
5 mndodconglem.4 . . . . . . . . . . 11 (𝜑𝑀 ∈ ℕ0)
65nn0red 12566 . . . . . . . . . 10 (𝜑𝑀 ∈ ℝ)
76recnd 11274 . . . . . . . . 9 (𝜑𝑀 ∈ ℂ)
8 mndodconglem.5 . . . . . . . . . . 11 (𝜑𝑁 ∈ ℕ0)
98nn0red 12566 . . . . . . . . . 10 (𝜑𝑁 ∈ ℝ)
109recnd 11274 . . . . . . . . 9 (𝜑𝑁 ∈ ℂ)
114, 7, 10addsubassd 11623 . . . . . . . 8 (𝜑 → (((𝑂𝐴) + 𝑀) − 𝑁) = ((𝑂𝐴) + (𝑀𝑁)))
122nnzd 12618 . . . . . . . . . . . 12 (𝜑 → (𝑂𝐴) ∈ ℤ)
135nn0zd 12617 . . . . . . . . . . . 12 (𝜑𝑀 ∈ ℤ)
1412, 13zaddcld 12703 . . . . . . . . . . 11 (𝜑 → ((𝑂𝐴) + 𝑀) ∈ ℤ)
1514zred 12699 . . . . . . . . . 10 (𝜑 → ((𝑂𝐴) + 𝑀) ∈ ℝ)
16 mndodconglem.7 . . . . . . . . . 10 (𝜑𝑁 < (𝑂𝐴))
17 nn0addge1 12551 . . . . . . . . . . 11 (((𝑂𝐴) ∈ ℝ ∧ 𝑀 ∈ ℕ0) → (𝑂𝐴) ≤ ((𝑂𝐴) + 𝑀))
183, 5, 17syl2anc 582 . . . . . . . . . 10 (𝜑 → (𝑂𝐴) ≤ ((𝑂𝐴) + 𝑀))
199, 3, 15, 16, 18ltletrd 11406 . . . . . . . . 9 (𝜑𝑁 < ((𝑂𝐴) + 𝑀))
208nn0zd 12617 . . . . . . . . . 10 (𝜑𝑁 ∈ ℤ)
21 znnsub 12641 . . . . . . . . . 10 ((𝑁 ∈ ℤ ∧ ((𝑂𝐴) + 𝑀) ∈ ℤ) → (𝑁 < ((𝑂𝐴) + 𝑀) ↔ (((𝑂𝐴) + 𝑀) − 𝑁) ∈ ℕ))
2220, 14, 21syl2anc 582 . . . . . . . . 9 (𝜑 → (𝑁 < ((𝑂𝐴) + 𝑀) ↔ (((𝑂𝐴) + 𝑀) − 𝑁) ∈ ℕ))
2319, 22mpbid 231 . . . . . . . 8 (𝜑 → (((𝑂𝐴) + 𝑀) − 𝑁) ∈ ℕ)
2411, 23eqeltrrd 2826 . . . . . . 7 (𝜑 → ((𝑂𝐴) + (𝑀𝑁)) ∈ ℕ)
254, 7, 10addsub12d 11626 . . . . . . . . 9 (𝜑 → ((𝑂𝐴) + (𝑀𝑁)) = (𝑀 + ((𝑂𝐴) − 𝑁)))
2625oveq1d 7434 . . . . . . . 8 (𝜑 → (((𝑂𝐴) + (𝑀𝑁)) · 𝐴) = ((𝑀 + ((𝑂𝐴) − 𝑁)) · 𝐴))
27 mndodconglem.8 . . . . . . . . . . 11 (𝜑 → (𝑀 · 𝐴) = (𝑁 · 𝐴))
2827oveq1d 7434 . . . . . . . . . 10 (𝜑 → ((𝑀 · 𝐴)(+g𝐺)(((𝑂𝐴) − 𝑁) · 𝐴)) = ((𝑁 · 𝐴)(+g𝐺)(((𝑂𝐴) − 𝑁) · 𝐴)))
29 mndodconglem.1 . . . . . . . . . . 11 (𝜑𝐺 ∈ Mnd)
30 znnsub 12641 . . . . . . . . . . . . . 14 ((𝑁 ∈ ℤ ∧ (𝑂𝐴) ∈ ℤ) → (𝑁 < (𝑂𝐴) ↔ ((𝑂𝐴) − 𝑁) ∈ ℕ))
3120, 12, 30syl2anc 582 . . . . . . . . . . . . 13 (𝜑 → (𝑁 < (𝑂𝐴) ↔ ((𝑂𝐴) − 𝑁) ∈ ℕ))
3216, 31mpbid 231 . . . . . . . . . . . 12 (𝜑 → ((𝑂𝐴) − 𝑁) ∈ ℕ)
3332nnnn0d 12565 . . . . . . . . . . 11 (𝜑 → ((𝑂𝐴) − 𝑁) ∈ ℕ0)
34 odcl.1 . . . . . . . . . . . 12 𝑋 = (Base‘𝐺)
35 odid.3 . . . . . . . . . . . 12 · = (.g𝐺)
36 eqid 2725 . . . . . . . . . . . 12 (+g𝐺) = (+g𝐺)
3734, 35, 36mulgnn0dir 19067 . . . . . . . . . . 11 ((𝐺 ∈ Mnd ∧ (𝑀 ∈ ℕ0 ∧ ((𝑂𝐴) − 𝑁) ∈ ℕ0𝐴𝑋)) → ((𝑀 + ((𝑂𝐴) − 𝑁)) · 𝐴) = ((𝑀 · 𝐴)(+g𝐺)(((𝑂𝐴) − 𝑁) · 𝐴)))
3829, 5, 33, 1, 37syl13anc 1369 . . . . . . . . . 10 (𝜑 → ((𝑀 + ((𝑂𝐴) − 𝑁)) · 𝐴) = ((𝑀 · 𝐴)(+g𝐺)(((𝑂𝐴) − 𝑁) · 𝐴)))
3934, 35, 36mulgnn0dir 19067 . . . . . . . . . . 11 ((𝐺 ∈ Mnd ∧ (𝑁 ∈ ℕ0 ∧ ((𝑂𝐴) − 𝑁) ∈ ℕ0𝐴𝑋)) → ((𝑁 + ((𝑂𝐴) − 𝑁)) · 𝐴) = ((𝑁 · 𝐴)(+g𝐺)(((𝑂𝐴) − 𝑁) · 𝐴)))
4029, 8, 33, 1, 39syl13anc 1369 . . . . . . . . . 10 (𝜑 → ((𝑁 + ((𝑂𝐴) − 𝑁)) · 𝐴) = ((𝑁 · 𝐴)(+g𝐺)(((𝑂𝐴) − 𝑁) · 𝐴)))
4128, 38, 403eqtr4d 2775 . . . . . . . . 9 (𝜑 → ((𝑀 + ((𝑂𝐴) − 𝑁)) · 𝐴) = ((𝑁 + ((𝑂𝐴) − 𝑁)) · 𝐴))
4210, 4pncan3d 11606 . . . . . . . . . . 11 (𝜑 → (𝑁 + ((𝑂𝐴) − 𝑁)) = (𝑂𝐴))
4342oveq1d 7434 . . . . . . . . . 10 (𝜑 → ((𝑁 + ((𝑂𝐴) − 𝑁)) · 𝐴) = ((𝑂𝐴) · 𝐴))
44 odcl.2 . . . . . . . . . . . 12 𝑂 = (od‘𝐺)
45 odid.4 . . . . . . . . . . . 12 0 = (0g𝐺)
4634, 44, 35, 45odid 19505 . . . . . . . . . . 11 (𝐴𝑋 → ((𝑂𝐴) · 𝐴) = 0 )
471, 46syl 17 . . . . . . . . . 10 (𝜑 → ((𝑂𝐴) · 𝐴) = 0 )
4843, 47eqtrd 2765 . . . . . . . . 9 (𝜑 → ((𝑁 + ((𝑂𝐴) − 𝑁)) · 𝐴) = 0 )
4941, 48eqtrd 2765 . . . . . . . 8 (𝜑 → ((𝑀 + ((𝑂𝐴) − 𝑁)) · 𝐴) = 0 )
5026, 49eqtrd 2765 . . . . . . 7 (𝜑 → (((𝑂𝐴) + (𝑀𝑁)) · 𝐴) = 0 )
5134, 44, 35, 45odlem2 19506 . . . . . . 7 ((𝐴𝑋 ∧ ((𝑂𝐴) + (𝑀𝑁)) ∈ ℕ ∧ (((𝑂𝐴) + (𝑀𝑁)) · 𝐴) = 0 ) → (𝑂𝐴) ∈ (1...((𝑂𝐴) + (𝑀𝑁))))
521, 24, 50, 51syl3anc 1368 . . . . . 6 (𝜑 → (𝑂𝐴) ∈ (1...((𝑂𝐴) + (𝑀𝑁))))
53 elfzle2 13540 . . . . . 6 ((𝑂𝐴) ∈ (1...((𝑂𝐴) + (𝑀𝑁))) → (𝑂𝐴) ≤ ((𝑂𝐴) + (𝑀𝑁)))
5452, 53syl 17 . . . . 5 (𝜑 → (𝑂𝐴) ≤ ((𝑂𝐴) + (𝑀𝑁)))
5513, 20zsubcld 12704 . . . . . . 7 (𝜑 → (𝑀𝑁) ∈ ℤ)
5655zred 12699 . . . . . 6 (𝜑 → (𝑀𝑁) ∈ ℝ)
573, 56addge01d 11834 . . . . 5 (𝜑 → (0 ≤ (𝑀𝑁) ↔ (𝑂𝐴) ≤ ((𝑂𝐴) + (𝑀𝑁))))
5854, 57mpbird 256 . . . 4 (𝜑 → 0 ≤ (𝑀𝑁))
596, 9subge0d 11836 . . . 4 (𝜑 → (0 ≤ (𝑀𝑁) ↔ 𝑁𝑀))
6058, 59mpbid 231 . . 3 (𝜑𝑁𝑀)
616, 9letri3d 11388 . . . 4 (𝜑 → (𝑀 = 𝑁 ↔ (𝑀𝑁𝑁𝑀)))
6261biimprd 247 . . 3 (𝜑 → ((𝑀𝑁𝑁𝑀) → 𝑀 = 𝑁))
6360, 62mpan2d 692 . 2 (𝜑 → (𝑀𝑁𝑀 = 𝑁))
6463imp 405 1 ((𝜑𝑀𝑁) → 𝑀 = 𝑁)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 394   = wceq 1533  wcel 2098   class class class wbr 5149  cfv 6549  (class class class)co 7419  cr 11139  0cc0 11140  1c1 11141   + caddc 11143   < clt 11280  cle 11281  cmin 11476  cn 12245  0cn0 12505  cz 12591  ...cfz 13519  Basecbs 17183  +gcplusg 17236  0gc0g 17424  Mndcmnd 18697  .gcmg 19031  odcod 19491
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2166  ax-ext 2696  ax-sep 5300  ax-nul 5307  ax-pow 5365  ax-pr 5429  ax-un 7741  ax-cnex 11196  ax-resscn 11197  ax-1cn 11198  ax-icn 11199  ax-addcl 11200  ax-addrcl 11201  ax-mulcl 11202  ax-mulrcl 11203  ax-mulcom 11204  ax-addass 11205  ax-mulass 11206  ax-distr 11207  ax-i2m1 11208  ax-1ne0 11209  ax-1rid 11210  ax-rnegex 11211  ax-rrecex 11212  ax-cnre 11213  ax-pre-lttri 11214  ax-pre-lttrn 11215  ax-pre-ltadd 11216  ax-pre-mulgt0 11217
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2528  df-eu 2557  df-clab 2703  df-cleq 2717  df-clel 2802  df-nfc 2877  df-ne 2930  df-nel 3036  df-ral 3051  df-rex 3060  df-rmo 3363  df-reu 3364  df-rab 3419  df-v 3463  df-sbc 3774  df-csb 3890  df-dif 3947  df-un 3949  df-in 3951  df-ss 3961  df-pss 3964  df-nul 4323  df-if 4531  df-pw 4606  df-sn 4631  df-pr 4633  df-op 4637  df-uni 4910  df-iun 4999  df-br 5150  df-opab 5212  df-mpt 5233  df-tr 5267  df-id 5576  df-eprel 5582  df-po 5590  df-so 5591  df-fr 5633  df-we 5635  df-xp 5684  df-rel 5685  df-cnv 5686  df-co 5687  df-dm 5688  df-rn 5689  df-res 5690  df-ima 5691  df-pred 6307  df-ord 6374  df-on 6375  df-lim 6376  df-suc 6377  df-iota 6501  df-fun 6551  df-fn 6552  df-f 6553  df-f1 6554  df-fo 6555  df-f1o 6556  df-fv 6557  df-riota 7375  df-ov 7422  df-oprab 7423  df-mpo 7424  df-om 7872  df-1st 7994  df-2nd 7995  df-frecs 8287  df-wrecs 8318  df-recs 8392  df-rdg 8431  df-er 8725  df-en 8965  df-dom 8966  df-sdom 8967  df-sup 9467  df-inf 9468  df-pnf 11282  df-mnf 11283  df-xr 11284  df-ltxr 11285  df-le 11286  df-sub 11478  df-neg 11479  df-nn 12246  df-n0 12506  df-z 12592  df-uz 12856  df-fz 13520  df-seq 14003  df-0g 17426  df-mgm 18603  df-sgrp 18682  df-mnd 18698  df-mulg 19032  df-od 19495
This theorem is referenced by:  mndodcong  19509
  Copyright terms: Public domain W3C validator