chordthmlem - Metamath Proof Explorer

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

Theorem chordthmlem 26794

Description: If 𝑀 is the midpoint of AB and AQ = BQ, then QMB is a right angle. The proof uses ssscongptld 26784 to observe that, since AMQ and BMQ have equal sides, the angles QMB and QMA must be equal. Since they are supplementary, both must be right angles. (Contributed by David Moews, 28-Feb-2017.)

**Hypotheses**
Ref	Expression
chordthmlem.angdef	⊢ 𝐹 = (𝑥 ∈ (ℂ ∖ {0}), 𝑦 ∈ (ℂ ∖ {0}) ↦ (ℑ‘(log‘(𝑦 / 𝑥))))
chordthmlem.A	⊢ (𝜑 → 𝐴 ∈ ℂ)
chordthmlem.B	⊢ (𝜑 → 𝐵 ∈ ℂ)
chordthmlem.Q	⊢ (𝜑 → 𝑄 ∈ ℂ)
chordthmlem.M	⊢ (𝜑 → 𝑀 = ((𝐴 + 𝐵) / 2))
chordthmlem.ABequidistQ	⊢ (𝜑 → (abs‘(𝐴 − 𝑄)) = (abs‘(𝐵 − 𝑄)))
chordthmlem.AneB	⊢ (𝜑 → 𝐴 ≠ 𝐵)
chordthmlem.QneM	⊢ (𝜑 → 𝑄 ≠ 𝑀)

**Assertion**
Ref	Expression
chordthmlem	⊢ (𝜑 → ((𝑄 − 𝑀)𝐹(𝐵 − 𝑀)) ∈ {(π / 2), -(π / 2)})

Distinct variable groups: 𝑥,𝑦,𝐴 𝑥,𝐵,𝑦 𝑥,𝑀,𝑦 𝑥,𝑄,𝑦 Allowed substitution hints: 𝜑(𝑥,𝑦) 𝐹(𝑥,𝑦)

**Proof of Theorem chordthmlem**
Step	Hyp	Ref	Expression
1		negpitopissre 26501	. . . . . 6 ⊢ (-π(,]π) ⊆ ℝ
2		chordthmlem.angdef	. . . . . . 7 ⊢ 𝐹 = (𝑥 ∈ (ℂ ∖ {0}), 𝑦 ∈ (ℂ ∖ {0}) ↦ (ℑ‘(log‘(𝑦 / 𝑥))))
3		chordthmlem.Q	. . . . . . . 8 ⊢ (𝜑 → 𝑄 ∈ ℂ)
4		chordthmlem.M	. . . . . . . . 9 ⊢ (𝜑 → 𝑀 = ((𝐴 + 𝐵) / 2))
5		chordthmlem.A	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐴 ∈ ℂ)
6		chordthmlem.B	. . . . . . . . . . 11 ⊢ (𝜑 → 𝐵 ∈ ℂ)
7	5, 6	addcld 11254	. . . . . . . . . 10 ⊢ (𝜑 → (𝐴 + 𝐵) ∈ ℂ)
8	7	halfcld 12486	. . . . . . . . 9 ⊢ (𝜑 → ((𝐴 + 𝐵) / 2) ∈ ℂ)
9	4, 8	eqeltrd 2834	. . . . . . . 8 ⊢ (𝜑 → 𝑀 ∈ ℂ)
10	3, 9	subcld 11594	. . . . . . 7 ⊢ (𝜑 → (𝑄 − 𝑀) ∈ ℂ)
11		chordthmlem.QneM	. . . . . . . 8 ⊢ (𝜑 → 𝑄 ≠ 𝑀)
12	3, 9, 11	subne0d 11603	. . . . . . 7 ⊢ (𝜑 → (𝑄 − 𝑀) ≠ 0)
13	6, 9	subcld 11594	. . . . . . 7 ⊢ (𝜑 → (𝐵 − 𝑀) ∈ ℂ)
14	4	oveq1d 7420	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑀 · 2) = (((𝐴 + 𝐵) / 2) · 2))
15	9	times2d 12485	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑀 · 2) = (𝑀 + 𝑀))
16		2cnd 12318	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 2 ∈ ℂ)
17		2ne0 12344	. . . . . . . . . . . . . . . 16 ⊢ 2 ≠ 0
18	17	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 2 ≠ 0)
19	7, 16, 18	divcan1d 12018	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((𝐴 + 𝐵) / 2) · 2) = (𝐴 + 𝐵))
20	14, 15, 19	3eqtr3d 2778	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑀 + 𝑀) = (𝐴 + 𝐵))
21		chordthmlem.AneB	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐴 ≠ 𝐵)
22	5, 6, 6, 21	addneintr2d 11443	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐴 + 𝐵) ≠ (𝐵 + 𝐵))
23	20, 22	eqnetrd 2999	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑀 + 𝑀) ≠ (𝐵 + 𝐵))
24	23	neneqd 2937	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ (𝑀 + 𝑀) = (𝐵 + 𝐵))
25		oveq12 7414	. . . . . . . . . . . 12 ⊢ ((𝑀 = 𝐵 ∧ 𝑀 = 𝐵) → (𝑀 + 𝑀) = (𝐵 + 𝐵))
26	25	anidms 566	. . . . . . . . . . 11 ⊢ (𝑀 = 𝐵 → (𝑀 + 𝑀) = (𝐵 + 𝐵))
27	24, 26	nsyl 140	. . . . . . . . . 10 ⊢ (𝜑 → ¬ 𝑀 = 𝐵)
28	27	neqned 2939	. . . . . . . . 9 ⊢ (𝜑 → 𝑀 ≠ 𝐵)
29	28	necomd 2987	. . . . . . . 8 ⊢ (𝜑 → 𝐵 ≠ 𝑀)
30	6, 9, 29	subne0d 11603	. . . . . . 7 ⊢ (𝜑 → (𝐵 − 𝑀) ≠ 0)
31	2, 10, 12, 13, 30	angcld 26767	. . . . . 6 ⊢ (𝜑 → ((𝑄 − 𝑀)𝐹(𝐵 − 𝑀)) ∈ (-π(,]π))
32	1, 31	sselid 3956	. . . . 5 ⊢ (𝜑 → ((𝑄 − 𝑀)𝐹(𝐵 − 𝑀)) ∈ ℝ)
33	32	recnd 11263	. . . 4 ⊢ (𝜑 → ((𝑄 − 𝑀)𝐹(𝐵 − 𝑀)) ∈ ℂ)
34	33	coscld 16149	. . 3 ⊢ (𝜑 → (cos‘((𝑄 − 𝑀)𝐹(𝐵 − 𝑀))) ∈ ℂ)
35	6, 9	negsubdi2d 11610	. . . . . . 7 ⊢ (𝜑 → -(𝐵 − 𝑀) = (𝑀 − 𝐵))
36	9, 9, 5, 6	addsubeq4d 11645	. . . . . . . 8 ⊢ (𝜑 → ((𝑀 + 𝑀) = (𝐴 + 𝐵) ↔ (𝐴 − 𝑀) = (𝑀 − 𝐵)))
37	20, 36	mpbid 232	. . . . . . 7 ⊢ (𝜑 → (𝐴 − 𝑀) = (𝑀 − 𝐵))
38	35, 37	eqtr4d 2773	. . . . . 6 ⊢ (𝜑 → -(𝐵 − 𝑀) = (𝐴 − 𝑀))
39	38	oveq2d 7421	. . . . 5 ⊢ (𝜑 → ((𝑄 − 𝑀)𝐹-(𝐵 − 𝑀)) = ((𝑄 − 𝑀)𝐹(𝐴 − 𝑀)))
40	39	fveq2d 6880	. . . 4 ⊢ (𝜑 → (cos‘((𝑄 − 𝑀)𝐹-(𝐵 − 𝑀))) = (cos‘((𝑄 − 𝑀)𝐹(𝐴 − 𝑀))))
41	2, 10, 12, 13, 30	cosangneg2d 26769	. . . 4 ⊢ (𝜑 → (cos‘((𝑄 − 𝑀)𝐹-(𝐵 − 𝑀))) = -(cos‘((𝑄 − 𝑀)𝐹(𝐵 − 𝑀))))
42	5, 5, 6, 21	addneintrd 11442	. . . . . . . . . 10 ⊢ (𝜑 → (𝐴 + 𝐴) ≠ (𝐴 + 𝐵))
43	42, 20	neeqtrrd 3006	. . . . . . . . 9 ⊢ (𝜑 → (𝐴 + 𝐴) ≠ (𝑀 + 𝑀))
44	43	necomd 2987	. . . . . . . 8 ⊢ (𝜑 → (𝑀 + 𝑀) ≠ (𝐴 + 𝐴))
45	44	neneqd 2937	. . . . . . 7 ⊢ (𝜑 → ¬ (𝑀 + 𝑀) = (𝐴 + 𝐴))
46		oveq12 7414	. . . . . . . 8 ⊢ ((𝑀 = 𝐴 ∧ 𝑀 = 𝐴) → (𝑀 + 𝑀) = (𝐴 + 𝐴))
47	46	anidms 566	. . . . . . 7 ⊢ (𝑀 = 𝐴 → (𝑀 + 𝑀) = (𝐴 + 𝐴))
48	45, 47	nsyl 140	. . . . . 6 ⊢ (𝜑 → ¬ 𝑀 = 𝐴)
49	48	neqned 2939	. . . . 5 ⊢ (𝜑 → 𝑀 ≠ 𝐴)
50		eqidd 2736	. . . . 5 ⊢ (𝜑 → (abs‘(𝑄 − 𝑀)) = (abs‘(𝑄 − 𝑀)))
51	5, 9	subcld 11594	. . . . . . 7 ⊢ (𝜑 → (𝐴 − 𝑀) ∈ ℂ)
52	51	absnegd 15468	. . . . . 6 ⊢ (𝜑 → (abs‘-(𝐴 − 𝑀)) = (abs‘(𝐴 − 𝑀)))
53	5, 9	negsubdi2d 11610	. . . . . . 7 ⊢ (𝜑 → -(𝐴 − 𝑀) = (𝑀 − 𝐴))
54	53	fveq2d 6880	. . . . . 6 ⊢ (𝜑 → (abs‘-(𝐴 − 𝑀)) = (abs‘(𝑀 − 𝐴)))
55	37	fveq2d 6880	. . . . . 6 ⊢ (𝜑 → (abs‘(𝐴 − 𝑀)) = (abs‘(𝑀 − 𝐵)))
56	52, 54, 55	3eqtr3d 2778	. . . . 5 ⊢ (𝜑 → (abs‘(𝑀 − 𝐴)) = (abs‘(𝑀 − 𝐵)))
57		chordthmlem.ABequidistQ	. . . . 5 ⊢ (𝜑 → (abs‘(𝐴 − 𝑄)) = (abs‘(𝐵 − 𝑄)))
58	2, 3, 9, 5, 3, 9, 6, 11, 49, 11, 28, 50, 56, 57	ssscongptld 26784	. . . 4 ⊢ (𝜑 → (cos‘((𝑄 − 𝑀)𝐹(𝐴 − 𝑀))) = (cos‘((𝑄 − 𝑀)𝐹(𝐵 − 𝑀))))
59	40, 41, 58	3eqtr3rd 2779	. . 3 ⊢ (𝜑 → (cos‘((𝑄 − 𝑀)𝐹(𝐵 − 𝑀))) = -(cos‘((𝑄 − 𝑀)𝐹(𝐵 − 𝑀))))
60	34, 59	eqnegad 11963	. 2 ⊢ (𝜑 → (cos‘((𝑄 − 𝑀)𝐹(𝐵 − 𝑀))) = 0)
61		coseq0negpitopi 26464	. . 3 ⊢ (((𝑄 − 𝑀)𝐹(𝐵 − 𝑀)) ∈ (-π(,]π) → ((cos‘((𝑄 − 𝑀)𝐹(𝐵 − 𝑀))) = 0 ↔ ((𝑄 − 𝑀)𝐹(𝐵 − 𝑀)) ∈ {(π / 2), -(π / 2)}))
62	31, 61	syl 17	. 2 ⊢ (𝜑 → ((cos‘((𝑄 − 𝑀)𝐹(𝐵 − 𝑀))) = 0 ↔ ((𝑄 − 𝑀)𝐹(𝐵 − 𝑀)) ∈ {(π / 2), -(π / 2)}))
63	60, 62	mpbid 232	1 ⊢ (𝜑 → ((𝑄 − 𝑀)𝐹(𝐵 − 𝑀)) ∈ {(π / 2), -(π / 2)})

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 = wceq 1540 ∈ wcel 2108 ≠ wne 2932 ∖ cdif 3923 {csn 4601 {cpr 4603 ‘cfv 6531 (class class class)co 7405 ∈ cmpo 7407 ℂcc 11127 ℝcr 11128 0cc0 11129 + caddc 11132 · cmul 11134 − cmin 11466 -cneg 11467 / cdiv 11894 2c2 12295 (,]cioc 13363 ℑcim 15117 abscabs 15253 cosccos 16080 πcpi 16082 logclog 26515

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2007 ax-8 2110 ax-9 2118 ax-10 2141 ax-11 2157 ax-12 2177 ax-ext 2707 ax-rep 5249 ax-sep 5266 ax-nul 5276 ax-pow 5335 ax-pr 5402 ax-un 7729 ax-inf2 9655 ax-cnex 11185 ax-resscn 11186 ax-1cn 11187 ax-icn 11188 ax-addcl 11189 ax-addrcl 11190 ax-mulcl 11191 ax-mulrcl 11192 ax-mulcom 11193 ax-addass 11194 ax-mulass 11195 ax-distr 11196 ax-i2m1 11197 ax-1ne0 11198 ax-1rid 11199 ax-rnegex 11200 ax-rrecex 11201 ax-cnre 11202 ax-pre-lttri 11203 ax-pre-lttrn 11204 ax-pre-ltadd 11205 ax-pre-mulgt0 11206 ax-pre-sup 11207 ax-addf 11208

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2065 df-mo 2539 df-eu 2568 df-clab 2714 df-cleq 2727 df-clel 2809 df-nfc 2885 df-ne 2933 df-nel 3037 df-ral 3052 df-rex 3061 df-rmo 3359 df-reu 3360 df-rab 3416 df-v 3461 df-sbc 3766 df-csb 3875 df-dif 3929 df-un 3931 df-in 3933 df-ss 3943 df-pss 3946 df-nul 4309 df-if 4501 df-pw 4577 df-sn 4602 df-pr 4604 df-tp 4606 df-op 4608 df-uni 4884 df-int 4923 df-iun 4969 df-iin 4970 df-br 5120 df-opab 5182 df-mpt 5202 df-tr 5230 df-id 5548 df-eprel 5553 df-po 5561 df-so 5562 df-fr 5606 df-se 5607 df-we 5608 df-xp 5660 df-rel 5661 df-cnv 5662 df-co 5663 df-dm 5664 df-rn 5665 df-res 5666 df-ima 5667 df-pred 6290 df-ord 6355 df-on 6356 df-lim 6357 df-suc 6358 df-iota 6484 df-fun 6533 df-fn 6534 df-f 6535 df-f1 6536 df-fo 6537 df-f1o 6538 df-fv 6539 df-isom 6540 df-riota 7362 df-ov 7408 df-oprab 7409 df-mpo 7410 df-of 7671 df-om 7862 df-1st 7988 df-2nd 7989 df-supp 8160 df-frecs 8280 df-wrecs 8311 df-recs 8385 df-rdg 8424 df-1o 8480 df-2o 8481 df-er 8719 df-map 8842 df-pm 8843 df-ixp 8912 df-en 8960 df-dom 8961 df-sdom 8962 df-fin 8963 df-fsupp 9374 df-fi 9423 df-sup 9454 df-inf 9455 df-oi 9524 df-card 9953 df-pnf 11271 df-mnf 11272 df-xr 11273 df-ltxr 11274 df-le 11275 df-sub 11468 df-neg 11469 df-div 11895 df-nn 12241 df-2 12303 df-3 12304 df-4 12305 df-5 12306 df-6 12307 df-7 12308 df-8 12309 df-9 12310 df-n0 12502 df-z 12589 df-dec 12709 df-uz 12853 df-q 12965 df-rp 13009 df-xneg 13128 df-xadd 13129 df-xmul 13130 df-ioo 13366 df-ioc 13367 df-ico 13368 df-icc 13369 df-fz 13525 df-fzo 13672 df-fl 13809 df-mod 13887 df-seq 14020 df-exp 14080 df-fac 14292 df-bc 14321 df-hash 14349 df-shft 15086 df-cj 15118 df-re 15119 df-im 15120 df-sqrt 15254 df-abs 15255 df-limsup 15487 df-clim 15504 df-rlim 15505 df-sum 15703 df-ef 16083 df-sin 16085 df-cos 16086 df-pi 16088 df-struct 17166 df-sets 17183 df-slot 17201 df-ndx 17213 df-base 17229 df-ress 17252 df-plusg 17284 df-mulr 17285 df-starv 17286 df-sca 17287 df-vsca 17288 df-ip 17289 df-tset 17290 df-ple 17291 df-ds 17293 df-unif 17294 df-hom 17295 df-cco 17296 df-rest 17436 df-topn 17437 df-0g 17455 df-gsum 17456 df-topgen 17457 df-pt 17458 df-prds 17461 df-xrs 17516 df-qtop 17521 df-imas 17522 df-xps 17524 df-mre 17598 df-mrc 17599 df-acs 17601 df-mgm 18618 df-sgrp 18697 df-mnd 18713 df-submnd 18762 df-mulg 19051 df-cntz 19300 df-cmn 19763 df-psmet 21307 df-xmet 21308 df-met 21309 df-bl 21310 df-mopn 21311 df-fbas 21312 df-fg 21313 df-cnfld 21316 df-top 22832 df-topon 22849 df-topsp 22871 df-bases 22884 df-cld 22957 df-ntr 22958 df-cls 22959 df-nei 23036 df-lp 23074 df-perf 23075 df-cn 23165 df-cnp 23166 df-haus 23253 df-tx 23500 df-hmeo 23693 df-fil 23784 df-fm 23876 df-flim 23877 df-flf 23878 df-xms 24259 df-ms 24260 df-tms 24261 df-cncf 24822 df-limc 25819 df-dv 25820 df-log 26517

This theorem is referenced by: chordthmlem2 26795

W3C validator