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 25887

Description: If 𝑀 is the midpoint of AB and AQ = BQ, then QMB is a right angle. The proof uses ssscongptld 25877 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 25601	. . . . . 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 10925	. . . . . . . . . 10 ⊢ (𝜑 → (𝐴 + 𝐵) ∈ ℂ)
8	7	halfcld 12148	. . . . . . . . 9 ⊢ (𝜑 → ((𝐴 + 𝐵) / 2) ∈ ℂ)
9	4, 8	eqeltrd 2839	. . . . . . . 8 ⊢ (𝜑 → 𝑀 ∈ ℂ)
10	3, 9	subcld 11262	. . . . . . 7 ⊢ (𝜑 → (𝑄 − 𝑀) ∈ ℂ)
11		chordthmlem.QneM	. . . . . . . 8 ⊢ (𝜑 → 𝑄 ≠ 𝑀)
12	3, 9, 11	subne0d 11271	. . . . . . 7 ⊢ (𝜑 → (𝑄 − 𝑀) ≠ 0)
13	6, 9	subcld 11262	. . . . . . 7 ⊢ (𝜑 → (𝐵 − 𝑀) ∈ ℂ)
14	4	oveq1d 7270	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑀 · 2) = (((𝐴 + 𝐵) / 2) · 2))
15	9	times2d 12147	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑀 · 2) = (𝑀 + 𝑀))
16		2cnd 11981	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 2 ∈ ℂ)
17		2ne0 12007	. . . . . . . . . . . . . . . 16 ⊢ 2 ≠ 0
18	17	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 2 ≠ 0)
19	7, 16, 18	divcan1d 11682	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((𝐴 + 𝐵) / 2) · 2) = (𝐴 + 𝐵))
20	14, 15, 19	3eqtr3d 2786	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑀 + 𝑀) = (𝐴 + 𝐵))
21		chordthmlem.AneB	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐴 ≠ 𝐵)
22	5, 6, 6, 21	addneintr2d 11113	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐴 + 𝐵) ≠ (𝐵 + 𝐵))
23	20, 22	eqnetrd 3010	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑀 + 𝑀) ≠ (𝐵 + 𝐵))
24	23	neneqd 2947	. . . . . . . . . . 11 ⊢ (𝜑 → ¬ (𝑀 + 𝑀) = (𝐵 + 𝐵))
25		oveq12 7264	. . . . . . . . . . . 12 ⊢ ((𝑀 = 𝐵 ∧ 𝑀 = 𝐵) → (𝑀 + 𝑀) = (𝐵 + 𝐵))
26	25	anidms 566	. . . . . . . . . . 11 ⊢ (𝑀 = 𝐵 → (𝑀 + 𝑀) = (𝐵 + 𝐵))
27	24, 26	nsyl 140	. . . . . . . . . 10 ⊢ (𝜑 → ¬ 𝑀 = 𝐵)
28	27	neqned 2949	. . . . . . . . 9 ⊢ (𝜑 → 𝑀 ≠ 𝐵)
29	28	necomd 2998	. . . . . . . 8 ⊢ (𝜑 → 𝐵 ≠ 𝑀)
30	6, 9, 29	subne0d 11271	. . . . . . 7 ⊢ (𝜑 → (𝐵 − 𝑀) ≠ 0)
31	2, 10, 12, 13, 30	angcld 25860	. . . . . 6 ⊢ (𝜑 → ((𝑄 − 𝑀)𝐹(𝐵 − 𝑀)) ∈ (-π(,]π))
32	1, 31	sselid 3915	. . . . 5 ⊢ (𝜑 → ((𝑄 − 𝑀)𝐹(𝐵 − 𝑀)) ∈ ℝ)
33	32	recnd 10934	. . . 4 ⊢ (𝜑 → ((𝑄 − 𝑀)𝐹(𝐵 − 𝑀)) ∈ ℂ)
34	33	coscld 15768	. . 3 ⊢ (𝜑 → (cos‘((𝑄 − 𝑀)𝐹(𝐵 − 𝑀))) ∈ ℂ)
35	6, 9	negsubdi2d 11278	. . . . . . 7 ⊢ (𝜑 → -(𝐵 − 𝑀) = (𝑀 − 𝐵))
36	9, 9, 5, 6	addsubeq4d 11313	. . . . . . . 8 ⊢ (𝜑 → ((𝑀 + 𝑀) = (𝐴 + 𝐵) ↔ (𝐴 − 𝑀) = (𝑀 − 𝐵)))
37	20, 36	mpbid 231	. . . . . . 7 ⊢ (𝜑 → (𝐴 − 𝑀) = (𝑀 − 𝐵))
38	35, 37	eqtr4d 2781	. . . . . 6 ⊢ (𝜑 → -(𝐵 − 𝑀) = (𝐴 − 𝑀))
39	38	oveq2d 7271	. . . . 5 ⊢ (𝜑 → ((𝑄 − 𝑀)𝐹-(𝐵 − 𝑀)) = ((𝑄 − 𝑀)𝐹(𝐴 − 𝑀)))
40	39	fveq2d 6760	. . . 4 ⊢ (𝜑 → (cos‘((𝑄 − 𝑀)𝐹-(𝐵 − 𝑀))) = (cos‘((𝑄 − 𝑀)𝐹(𝐴 − 𝑀))))
41	2, 10, 12, 13, 30	cosangneg2d 25862	. . . 4 ⊢ (𝜑 → (cos‘((𝑄 − 𝑀)𝐹-(𝐵 − 𝑀))) = -(cos‘((𝑄 − 𝑀)𝐹(𝐵 − 𝑀))))
42	5, 5, 6, 21	addneintrd 11112	. . . . . . . . . 10 ⊢ (𝜑 → (𝐴 + 𝐴) ≠ (𝐴 + 𝐵))
43	42, 20	neeqtrrd 3017	. . . . . . . . 9 ⊢ (𝜑 → (𝐴 + 𝐴) ≠ (𝑀 + 𝑀))
44	43	necomd 2998	. . . . . . . 8 ⊢ (𝜑 → (𝑀 + 𝑀) ≠ (𝐴 + 𝐴))
45	44	neneqd 2947	. . . . . . 7 ⊢ (𝜑 → ¬ (𝑀 + 𝑀) = (𝐴 + 𝐴))
46		oveq12 7264	. . . . . . . 8 ⊢ ((𝑀 = 𝐴 ∧ 𝑀 = 𝐴) → (𝑀 + 𝑀) = (𝐴 + 𝐴))
47	46	anidms 566	. . . . . . 7 ⊢ (𝑀 = 𝐴 → (𝑀 + 𝑀) = (𝐴 + 𝐴))
48	45, 47	nsyl 140	. . . . . 6 ⊢ (𝜑 → ¬ 𝑀 = 𝐴)
49	48	neqned 2949	. . . . 5 ⊢ (𝜑 → 𝑀 ≠ 𝐴)
50		eqidd 2739	. . . . 5 ⊢ (𝜑 → (abs‘(𝑄 − 𝑀)) = (abs‘(𝑄 − 𝑀)))
51	5, 9	subcld 11262	. . . . . . 7 ⊢ (𝜑 → (𝐴 − 𝑀) ∈ ℂ)
52	51	absnegd 15089	. . . . . 6 ⊢ (𝜑 → (abs‘-(𝐴 − 𝑀)) = (abs‘(𝐴 − 𝑀)))
53	5, 9	negsubdi2d 11278	. . . . . . 7 ⊢ (𝜑 → -(𝐴 − 𝑀) = (𝑀 − 𝐴))
54	53	fveq2d 6760	. . . . . 6 ⊢ (𝜑 → (abs‘-(𝐴 − 𝑀)) = (abs‘(𝑀 − 𝐴)))
55	37	fveq2d 6760	. . . . . 6 ⊢ (𝜑 → (abs‘(𝐴 − 𝑀)) = (abs‘(𝑀 − 𝐵)))
56	52, 54, 55	3eqtr3d 2786	. . . . 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 25877	. . . 4 ⊢ (𝜑 → (cos‘((𝑄 − 𝑀)𝐹(𝐴 − 𝑀))) = (cos‘((𝑄 − 𝑀)𝐹(𝐵 − 𝑀))))
59	40, 41, 58	3eqtr3rd 2787	. . 3 ⊢ (𝜑 → (cos‘((𝑄 − 𝑀)𝐹(𝐵 − 𝑀))) = -(cos‘((𝑄 − 𝑀)𝐹(𝐵 − 𝑀))))
60	34, 59	eqnegad 11627	. 2 ⊢ (𝜑 → (cos‘((𝑄 − 𝑀)𝐹(𝐵 − 𝑀))) = 0)
61		coseq0negpitopi 25565	. . 3 ⊢ (((𝑄 − 𝑀)𝐹(𝐵 − 𝑀)) ∈ (-π(,]π) → ((cos‘((𝑄 − 𝑀)𝐹(𝐵 − 𝑀))) = 0 ↔ ((𝑄 − 𝑀)𝐹(𝐵 − 𝑀)) ∈ {(π / 2), -(π / 2)}))
62	31, 61	syl 17	. 2 ⊢ (𝜑 → ((cos‘((𝑄 − 𝑀)𝐹(𝐵 − 𝑀))) = 0 ↔ ((𝑄 − 𝑀)𝐹(𝐵 − 𝑀)) ∈ {(π / 2), -(π / 2)}))
63	60, 62	mpbid 231	1 ⊢ (𝜑 → ((𝑄 − 𝑀)𝐹(𝐵 − 𝑀)) ∈ {(π / 2), -(π / 2)})

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 205 = wceq 1539 ∈ wcel 2108 ≠ wne 2942 ∖ cdif 3880 {csn 4558 {cpr 4560 ‘cfv 6418 (class class class)co 7255 ∈ cmpo 7257 ℂcc 10800 ℝcr 10801 0cc0 10802 + caddc 10805 · cmul 10807 − cmin 11135 -cneg 11136 / cdiv 11562 2c2 11958 (,]cioc 13009 ℑcim 14737 abscabs 14873 cosccos 15702 πcpi 15704 logclog 25615

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1799 ax-4 1813 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2110 ax-9 2118 ax-10 2139 ax-11 2156 ax-12 2173 ax-ext 2709 ax-rep 5205 ax-sep 5218 ax-nul 5225 ax-pow 5283 ax-pr 5347 ax-un 7566 ax-inf2 9329 ax-cnex 10858 ax-resscn 10859 ax-1cn 10860 ax-icn 10861 ax-addcl 10862 ax-addrcl 10863 ax-mulcl 10864 ax-mulrcl 10865 ax-mulcom 10866 ax-addass 10867 ax-mulass 10868 ax-distr 10869 ax-i2m1 10870 ax-1ne0 10871 ax-1rid 10872 ax-rnegex 10873 ax-rrecex 10874 ax-cnre 10875 ax-pre-lttri 10876 ax-pre-lttrn 10877 ax-pre-ltadd 10878 ax-pre-mulgt0 10879 ax-pre-sup 10880 ax-addf 10881 ax-mulf 10882

This theorem depends on definitions: df-bi 206 df-an 396 df-or 844 df-3or 1086 df-3an 1087 df-tru 1542 df-fal 1552 df-ex 1784 df-nf 1788 df-sb 2069 df-mo 2540 df-eu 2569 df-clab 2716 df-cleq 2730 df-clel 2817 df-nfc 2888 df-ne 2943 df-nel 3049 df-ral 3068 df-rex 3069 df-reu 3070 df-rmo 3071 df-rab 3072 df-v 3424 df-sbc 3712 df-csb 3829 df-dif 3886 df-un 3888 df-in 3890 df-ss 3900 df-pss 3902 df-nul 4254 df-if 4457 df-pw 4532 df-sn 4559 df-pr 4561 df-tp 4563 df-op 4565 df-uni 4837 df-int 4877 df-iun 4923 df-iin 4924 df-br 5071 df-opab 5133 df-mpt 5154 df-tr 5188 df-id 5480 df-eprel 5486 df-po 5494 df-so 5495 df-fr 5535 df-se 5536 df-we 5537 df-xp 5586 df-rel 5587 df-cnv 5588 df-co 5589 df-dm 5590 df-rn 5591 df-res 5592 df-ima 5593 df-pred 6191 df-ord 6254 df-on 6255 df-lim 6256 df-suc 6257 df-iota 6376 df-fun 6420 df-fn 6421 df-f 6422 df-f1 6423 df-fo 6424 df-f1o 6425 df-fv 6426 df-isom 6427 df-riota 7212 df-ov 7258 df-oprab 7259 df-mpo 7260 df-of 7511 df-om 7688 df-1st 7804 df-2nd 7805 df-supp 7949 df-frecs 8068 df-wrecs 8099 df-recs 8173 df-rdg 8212 df-1o 8267 df-2o 8268 df-er 8456 df-map 8575 df-pm 8576 df-ixp 8644 df-en 8692 df-dom 8693 df-sdom 8694 df-fin 8695 df-fsupp 9059 df-fi 9100 df-sup 9131 df-inf 9132 df-oi 9199 df-card 9628 df-pnf 10942 df-mnf 10943 df-xr 10944 df-ltxr 10945 df-le 10946 df-sub 11137 df-neg 11138 df-div 11563 df-nn 11904 df-2 11966 df-3 11967 df-4 11968 df-5 11969 df-6 11970 df-7 11971 df-8 11972 df-9 11973 df-n0 12164 df-z 12250 df-dec 12367 df-uz 12512 df-q 12618 df-rp 12660 df-xneg 12777 df-xadd 12778 df-xmul 12779 df-ioo 13012 df-ioc 13013 df-ico 13014 df-icc 13015 df-fz 13169 df-fzo 13312 df-fl 13440 df-mod 13518 df-seq 13650 df-exp 13711 df-fac 13916 df-bc 13945 df-hash 13973 df-shft 14706 df-cj 14738 df-re 14739 df-im 14740 df-sqrt 14874 df-abs 14875 df-limsup 15108 df-clim 15125 df-rlim 15126 df-sum 15326 df-ef 15705 df-sin 15707 df-cos 15708 df-pi 15710 df-struct 16776 df-sets 16793 df-slot 16811 df-ndx 16823 df-base 16841 df-ress 16868 df-plusg 16901 df-mulr 16902 df-starv 16903 df-sca 16904 df-vsca 16905 df-ip 16906 df-tset 16907 df-ple 16908 df-ds 16910 df-unif 16911 df-hom 16912 df-cco 16913 df-rest 17050 df-topn 17051 df-0g 17069 df-gsum 17070 df-topgen 17071 df-pt 17072 df-prds 17075 df-xrs 17130 df-qtop 17135 df-imas 17136 df-xps 17138 df-mre 17212 df-mrc 17213 df-acs 17215 df-mgm 18241 df-sgrp 18290 df-mnd 18301 df-submnd 18346 df-mulg 18616 df-cntz 18838 df-cmn 19303 df-psmet 20502 df-xmet 20503 df-met 20504 df-bl 20505 df-mopn 20506 df-fbas 20507 df-fg 20508 df-cnfld 20511 df-top 21951 df-topon 21968 df-topsp 21990 df-bases 22004 df-cld 22078 df-ntr 22079 df-cls 22080 df-nei 22157 df-lp 22195 df-perf 22196 df-cn 22286 df-cnp 22287 df-haus 22374 df-tx 22621 df-hmeo 22814 df-fil 22905 df-fm 22997 df-flim 22998 df-flf 22999 df-xms 23381 df-ms 23382 df-tms 23383 df-cncf 23947 df-limc 24935 df-dv 24936 df-log 25617

This theorem is referenced by: chordthmlem2 25888

W3C validator