gcdneg - Metamath Proof Explorer

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

Theorem gcdneg 15730

Description: Negating one operand of the gcd operator does not alter the result. (Contributed by Paul Chapman, 21-Mar-2011.)

**Assertion**
Ref	Expression
gcdneg	⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 gcd -𝑁) = (𝑀 gcd 𝑁))

**Proof of Theorem gcdneg**
Step	Hyp	Ref	Expression
1		oveq12 6985	. . . . 5 ⊢ ((𝑀 = 0 ∧ 𝑁 = 0) → (𝑀 gcd 𝑁) = (0 gcd 0))
2	1	adantl 474	. . . 4 ⊢ (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑀 = 0 ∧ 𝑁 = 0)) → (𝑀 gcd 𝑁) = (0 gcd 0))
3		zcn 11798	. . . . . . . . 9 ⊢ (𝑁 ∈ ℤ → 𝑁 ∈ ℂ)
4	3	negeq0d 10790	. . . . . . . 8 ⊢ (𝑁 ∈ ℤ → (𝑁 = 0 ↔ -𝑁 = 0))
5	4	anbi2d 619	. . . . . . 7 ⊢ (𝑁 ∈ ℤ → ((𝑀 = 0 ∧ 𝑁 = 0) ↔ (𝑀 = 0 ∧ -𝑁 = 0)))
6	5	adantl 474	. . . . . 6 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑀 = 0 ∧ 𝑁 = 0) ↔ (𝑀 = 0 ∧ -𝑁 = 0)))
7		oveq12 6985	. . . . . 6 ⊢ ((𝑀 = 0 ∧ -𝑁 = 0) → (𝑀 gcd -𝑁) = (0 gcd 0))
8	6, 7	syl6bi 245	. . . . 5 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑀 = 0 ∧ 𝑁 = 0) → (𝑀 gcd -𝑁) = (0 gcd 0)))
9	8	imp 398	. . . 4 ⊢ (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑀 = 0 ∧ 𝑁 = 0)) → (𝑀 gcd -𝑁) = (0 gcd 0))
10	2, 9	eqtr4d 2817	. . 3 ⊢ (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑀 = 0 ∧ 𝑁 = 0)) → (𝑀 gcd 𝑁) = (𝑀 gcd -𝑁))
11		gcddvds 15712	. . . . . . 7 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑀 gcd 𝑁) ∥ 𝑀 ∧ (𝑀 gcd 𝑁) ∥ 𝑁))
12		gcdcl 15715	. . . . . . . . . 10 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 gcd 𝑁) ∈ ℕ₀)
13	12	nn0zd 11898	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 gcd 𝑁) ∈ ℤ)
14		dvdsnegb 15487	. . . . . . . . 9 ⊢ (((𝑀 gcd 𝑁) ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑀 gcd 𝑁) ∥ 𝑁 ↔ (𝑀 gcd 𝑁) ∥ -𝑁))
15	13, 14	sylancom 579	. . . . . . . 8 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑀 gcd 𝑁) ∥ 𝑁 ↔ (𝑀 gcd 𝑁) ∥ -𝑁))
16	15	anbi2d 619	. . . . . . 7 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝑀 gcd 𝑁) ∥ 𝑀 ∧ (𝑀 gcd 𝑁) ∥ 𝑁) ↔ ((𝑀 gcd 𝑁) ∥ 𝑀 ∧ (𝑀 gcd 𝑁) ∥ -𝑁)))
17	11, 16	mpbid 224	. . . . . 6 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑀 gcd 𝑁) ∥ 𝑀 ∧ (𝑀 gcd 𝑁) ∥ -𝑁))
18	6	notbid 310	. . . . . . . 8 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (¬ (𝑀 = 0 ∧ 𝑁 = 0) ↔ ¬ (𝑀 = 0 ∧ -𝑁 = 0)))
19		simpl 475	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 𝑀 ∈ ℤ)
20		znegcl 11830	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℤ → -𝑁 ∈ ℤ)
21	20	adantl 474	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → -𝑁 ∈ ℤ)
22		dvdslegcd 15713	. . . . . . . . . 10 ⊢ ((((𝑀 gcd 𝑁) ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ -𝑁 ∈ ℤ) ∧ ¬ (𝑀 = 0 ∧ -𝑁 = 0)) → (((𝑀 gcd 𝑁) ∥ 𝑀 ∧ (𝑀 gcd 𝑁) ∥ -𝑁) → (𝑀 gcd 𝑁) ≤ (𝑀 gcd -𝑁)))
23	22	ex 405	. . . . . . . . 9 ⊢ (((𝑀 gcd 𝑁) ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ -𝑁 ∈ ℤ) → (¬ (𝑀 = 0 ∧ -𝑁 = 0) → (((𝑀 gcd 𝑁) ∥ 𝑀 ∧ (𝑀 gcd 𝑁) ∥ -𝑁) → (𝑀 gcd 𝑁) ≤ (𝑀 gcd -𝑁))))
24	13, 19, 21, 23	syl3anc 1351	. . . . . . . 8 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (¬ (𝑀 = 0 ∧ -𝑁 = 0) → (((𝑀 gcd 𝑁) ∥ 𝑀 ∧ (𝑀 gcd 𝑁) ∥ -𝑁) → (𝑀 gcd 𝑁) ≤ (𝑀 gcd -𝑁))))
25	18, 24	sylbid 232	. . . . . . 7 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (¬ (𝑀 = 0 ∧ 𝑁 = 0) → (((𝑀 gcd 𝑁) ∥ 𝑀 ∧ (𝑀 gcd 𝑁) ∥ -𝑁) → (𝑀 gcd 𝑁) ≤ (𝑀 gcd -𝑁))))
26	25	com12 32	. . . . . 6 ⊢ (¬ (𝑀 = 0 ∧ 𝑁 = 0) → ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝑀 gcd 𝑁) ∥ 𝑀 ∧ (𝑀 gcd 𝑁) ∥ -𝑁) → (𝑀 gcd 𝑁) ≤ (𝑀 gcd -𝑁))))
27	17, 26	mpdi 45	. . . . 5 ⊢ (¬ (𝑀 = 0 ∧ 𝑁 = 0) → ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 gcd 𝑁) ≤ (𝑀 gcd -𝑁)))
28	27	impcom 399	. . . 4 ⊢ (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ ¬ (𝑀 = 0 ∧ 𝑁 = 0)) → (𝑀 gcd 𝑁) ≤ (𝑀 gcd -𝑁))
29		gcddvds 15712	. . . . . . . 8 ⊢ ((𝑀 ∈ ℤ ∧ -𝑁 ∈ ℤ) → ((𝑀 gcd -𝑁) ∥ 𝑀 ∧ (𝑀 gcd -𝑁) ∥ -𝑁))
30	20, 29	sylan2 583	. . . . . . 7 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑀 gcd -𝑁) ∥ 𝑀 ∧ (𝑀 gcd -𝑁) ∥ -𝑁))
31		gcdcl 15715	. . . . . . . . . . 11 ⊢ ((𝑀 ∈ ℤ ∧ -𝑁 ∈ ℤ) → (𝑀 gcd -𝑁) ∈ ℕ₀)
32	31	nn0zd 11898	. . . . . . . . . 10 ⊢ ((𝑀 ∈ ℤ ∧ -𝑁 ∈ ℤ) → (𝑀 gcd -𝑁) ∈ ℤ)
33	20, 32	sylan2 583	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 gcd -𝑁) ∈ ℤ)
34		dvdsnegb 15487	. . . . . . . . 9 ⊢ (((𝑀 gcd -𝑁) ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑀 gcd -𝑁) ∥ 𝑁 ↔ (𝑀 gcd -𝑁) ∥ -𝑁))
35	33, 34	sylancom 579	. . . . . . . 8 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑀 gcd -𝑁) ∥ 𝑁 ↔ (𝑀 gcd -𝑁) ∥ -𝑁))
36	35	anbi2d 619	. . . . . . 7 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝑀 gcd -𝑁) ∥ 𝑀 ∧ (𝑀 gcd -𝑁) ∥ 𝑁) ↔ ((𝑀 gcd -𝑁) ∥ 𝑀 ∧ (𝑀 gcd -𝑁) ∥ -𝑁)))
37	30, 36	mpbird 249	. . . . . 6 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑀 gcd -𝑁) ∥ 𝑀 ∧ (𝑀 gcd -𝑁) ∥ 𝑁))
38		simpr 477	. . . . . . . 8 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 𝑁 ∈ ℤ)
39		dvdslegcd 15713	. . . . . . . . 9 ⊢ ((((𝑀 gcd -𝑁) ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ ¬ (𝑀 = 0 ∧ 𝑁 = 0)) → (((𝑀 gcd -𝑁) ∥ 𝑀 ∧ (𝑀 gcd -𝑁) ∥ 𝑁) → (𝑀 gcd -𝑁) ≤ (𝑀 gcd 𝑁)))
40	39	ex 405	. . . . . . . 8 ⊢ (((𝑀 gcd -𝑁) ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (¬ (𝑀 = 0 ∧ 𝑁 = 0) → (((𝑀 gcd -𝑁) ∥ 𝑀 ∧ (𝑀 gcd -𝑁) ∥ 𝑁) → (𝑀 gcd -𝑁) ≤ (𝑀 gcd 𝑁))))
41	33, 19, 38, 40	syl3anc 1351	. . . . . . 7 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (¬ (𝑀 = 0 ∧ 𝑁 = 0) → (((𝑀 gcd -𝑁) ∥ 𝑀 ∧ (𝑀 gcd -𝑁) ∥ 𝑁) → (𝑀 gcd -𝑁) ≤ (𝑀 gcd 𝑁))))
42	41	com12 32	. . . . . 6 ⊢ (¬ (𝑀 = 0 ∧ 𝑁 = 0) → ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝑀 gcd -𝑁) ∥ 𝑀 ∧ (𝑀 gcd -𝑁) ∥ 𝑁) → (𝑀 gcd -𝑁) ≤ (𝑀 gcd 𝑁))))
43	37, 42	mpdi 45	. . . . 5 ⊢ (¬ (𝑀 = 0 ∧ 𝑁 = 0) → ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 gcd -𝑁) ≤ (𝑀 gcd 𝑁)))
44	43	impcom 399	. . . 4 ⊢ (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ ¬ (𝑀 = 0 ∧ 𝑁 = 0)) → (𝑀 gcd -𝑁) ≤ (𝑀 gcd 𝑁))
45	13	zred 11900	. . . . . 6 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 gcd 𝑁) ∈ ℝ)
46	33	zred 11900	. . . . . 6 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 gcd -𝑁) ∈ ℝ)
47	45, 46	letri3d 10582	. . . . 5 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑀 gcd 𝑁) = (𝑀 gcd -𝑁) ↔ ((𝑀 gcd 𝑁) ≤ (𝑀 gcd -𝑁) ∧ (𝑀 gcd -𝑁) ≤ (𝑀 gcd 𝑁))))
48	47	adantr 473	. . . 4 ⊢ (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ ¬ (𝑀 = 0 ∧ 𝑁 = 0)) → ((𝑀 gcd 𝑁) = (𝑀 gcd -𝑁) ↔ ((𝑀 gcd 𝑁) ≤ (𝑀 gcd -𝑁) ∧ (𝑀 gcd -𝑁) ≤ (𝑀 gcd 𝑁))))
49	28, 44, 48	mpbir2and 700	. . 3 ⊢ (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ ¬ (𝑀 = 0 ∧ 𝑁 = 0)) → (𝑀 gcd 𝑁) = (𝑀 gcd -𝑁))
50	10, 49	pm2.61dan 800	. 2 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 gcd 𝑁) = (𝑀 gcd -𝑁))
51	50	eqcomd 2784	1 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 gcd -𝑁) = (𝑀 gcd 𝑁))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 198 ∧ wa 387 ∧ w3a 1068 = wceq 1507 ∈ wcel 2050 class class class wbr 4929 (class class class)co 6976 0cc0 10335 ≤ cle 10475 -cneg 10671 ℤcz 11793 ∥ cdvds 15467 gcd cgcd 15703

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1758 ax-4 1772 ax-5 1869 ax-6 1928 ax-7 1965 ax-8 2052 ax-9 2059 ax-10 2079 ax-11 2093 ax-12 2106 ax-13 2301 ax-ext 2750 ax-sep 5060 ax-nul 5067 ax-pow 5119 ax-pr 5186 ax-un 7279 ax-cnex 10391 ax-resscn 10392 ax-1cn 10393 ax-icn 10394 ax-addcl 10395 ax-addrcl 10396 ax-mulcl 10397 ax-mulrcl 10398 ax-mulcom 10399 ax-addass 10400 ax-mulass 10401 ax-distr 10402 ax-i2m1 10403 ax-1ne0 10404 ax-1rid 10405 ax-rnegex 10406 ax-rrecex 10407 ax-cnre 10408 ax-pre-lttri 10409 ax-pre-lttrn 10410 ax-pre-ltadd 10411 ax-pre-mulgt0 10412 ax-pre-sup 10413

This theorem depends on definitions: df-bi 199 df-an 388 df-or 834 df-3or 1069 df-3an 1070 df-tru 1510 df-ex 1743 df-nf 1747 df-sb 2016 df-mo 2547 df-eu 2584 df-clab 2759 df-cleq 2771 df-clel 2846 df-nfc 2918 df-ne 2968 df-nel 3074 df-ral 3093 df-rex 3094 df-reu 3095 df-rmo 3096 df-rab 3097 df-v 3417 df-sbc 3682 df-csb 3787 df-dif 3832 df-un 3834 df-in 3836 df-ss 3843 df-pss 3845 df-nul 4179 df-if 4351 df-pw 4424 df-sn 4442 df-pr 4444 df-tp 4446 df-op 4448 df-uni 4713 df-iun 4794 df-br 4930 df-opab 4992 df-mpt 5009 df-tr 5031 df-id 5312 df-eprel 5317 df-po 5326 df-so 5327 df-fr 5366 df-we 5368 df-xp 5413 df-rel 5414 df-cnv 5415 df-co 5416 df-dm 5417 df-rn 5418 df-res 5419 df-ima 5420 df-pred 5986 df-ord 6032 df-on 6033 df-lim 6034 df-suc 6035 df-iota 6152 df-fun 6190 df-fn 6191 df-f 6192 df-f1 6193 df-fo 6194 df-f1o 6195 df-fv 6196 df-riota 6937 df-ov 6979 df-oprab 6980 df-mpo 6981 df-om 7397 df-2nd 7502 df-wrecs 7750 df-recs 7812 df-rdg 7850 df-er 8089 df-en 8307 df-dom 8308 df-sdom 8309 df-sup 8701 df-inf 8702 df-pnf 10476 df-mnf 10477 df-xr 10478 df-ltxr 10479 df-le 10480 df-sub 10672 df-neg 10673 df-div 11099 df-nn 11440 df-2 11503 df-3 11504 df-n0 11708 df-z 11794 df-uz 12059 df-rp 12205 df-seq 13185 df-exp 13245 df-cj 14319 df-re 14320 df-im 14321 df-sqrt 14455 df-abs 14456 df-dvds 15468 df-gcd 15704

This theorem is referenced by: neggcd 15731 gcdabs 15737 odinv 18449 divnumden2 30287

W3C validator