Theorem bj-bary1 34130

Description: Barycentric coordinates in one dimension. (Contributed by BJ, 6-Jun-2019.)

Hypotheses

Ref	Expression
bj-bary1.a	⊢ (𝜑 → 𝐴 ∈ ℂ)
bj-bary1.b	⊢ (𝜑 → 𝐵 ∈ ℂ)
bj-bary1.x	⊢ (𝜑 → 𝑋 ∈ ℂ)
bj-bary1.neq	⊢ (𝜑 → 𝐴 ≠ 𝐵)
bj-bary1.s	⊢ (𝜑 → 𝑆 ∈ ℂ)
bj-bary1.t	⊢ (𝜑 → 𝑇 ∈ ℂ)

Assertion

Ref	Expression
bj-bary1	⊢ (𝜑 → ((𝑋 = ((𝑆 · 𝐴) + (𝑇 · 𝐵)) ∧ (𝑆 + 𝑇) = 1) ↔ (𝑆 = ((𝐵 − 𝑋) / (𝐵 − 𝐴)) ∧ 𝑇 = ((𝑋 − 𝐴) / (𝐵 − 𝐴)))))

Proof of Theorem bj-bary1

Step	Hyp	Ref	Expression
1		bj-bary1.s	. . . . . . . . 9 ⊢ (𝜑 → 𝑆 ∈ ℂ)
2		bj-bary1.a	. . . . . . . . 9 ⊢ (𝜑 → 𝐴 ∈ ℂ)
3	1, 2	mulcld 10507	. . . . . . . 8 ⊢ (𝜑 → (𝑆 · 𝐴) ∈ ℂ)
4		bj-bary1.t	. . . . . . . . 9 ⊢ (𝜑 → 𝑇 ∈ ℂ)
5		bj-bary1.b	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 ∈ ℂ)
6	4, 5	mulcld 10507	. . . . . . . 8 ⊢ (𝜑 → (𝑇 · 𝐵) ∈ ℂ)
7	3, 6	addcomd 10689	. . . . . . 7 ⊢ (𝜑 → ((𝑆 · 𝐴) + (𝑇 · 𝐵)) = ((𝑇 · 𝐵) + (𝑆 · 𝐴)))
8	7	eqeq2d 2805	. . . . . 6 ⊢ (𝜑 → (𝑋 = ((𝑆 · 𝐴) + (𝑇 · 𝐵)) ↔ 𝑋 = ((𝑇 · 𝐵) + (𝑆 · 𝐴))))
9	8	biimpd 230	. . . . 5 ⊢ (𝜑 → (𝑋 = ((𝑆 · 𝐴) + (𝑇 · 𝐵)) → 𝑋 = ((𝑇 · 𝐵) + (𝑆 · 𝐴))))
10	1, 4	addcomd 10689	. . . . . . 7 ⊢ (𝜑 → (𝑆 + 𝑇) = (𝑇 + 𝑆))
11	10	eqeq1d 2797	. . . . . 6 ⊢ (𝜑 → ((𝑆 + 𝑇) = 1 ↔ (𝑇 + 𝑆) = 1))
12	11	biimpd 230	. . . . 5 ⊢ (𝜑 → ((𝑆 + 𝑇) = 1 → (𝑇 + 𝑆) = 1))
13		bj-bary1.x	. . . . . 6 ⊢ (𝜑 → 𝑋 ∈ ℂ)
14		bj-bary1.neq	. . . . . . 7 ⊢ (𝜑 → 𝐴 ≠ 𝐵)
15	14	necomd 3039	. . . . . 6 ⊢ (𝜑 → 𝐵 ≠ 𝐴)
16	5, 2, 13, 15, 4, 1	bj-bary1lem1 34129	. . . . 5 ⊢ (𝜑 → ((𝑋 = ((𝑇 · 𝐵) + (𝑆 · 𝐴)) ∧ (𝑇 + 𝑆) = 1) → 𝑆 = ((𝑋 − 𝐵) / (𝐴 − 𝐵))))
17	9, 12, 16	syl2and 607	. . . 4 ⊢ (𝜑 → ((𝑋 = ((𝑆 · 𝐴) + (𝑇 · 𝐵)) ∧ (𝑆 + 𝑇) = 1) → 𝑆 = ((𝑋 − 𝐵) / (𝐴 − 𝐵))))
18	13, 5, 2, 5, 14	div2subd 11314	. . . . 5 ⊢ (𝜑 → ((𝑋 − 𝐵) / (𝐴 − 𝐵)) = ((𝐵 − 𝑋) / (𝐵 − 𝐴)))
19	18	eqeq2d 2805	. . . 4 ⊢ (𝜑 → (𝑆 = ((𝑋 − 𝐵) / (𝐴 − 𝐵)) ↔ 𝑆 = ((𝐵 − 𝑋) / (𝐵 − 𝐴))))
20	17, 19	sylibd 240	. . 3 ⊢ (𝜑 → ((𝑋 = ((𝑆 · 𝐴) + (𝑇 · 𝐵)) ∧ (𝑆 + 𝑇) = 1) → 𝑆 = ((𝐵 − 𝑋) / (𝐵 − 𝐴))))
21	2, 5, 13, 14, 1, 4	bj-bary1lem1 34129	. . 3 ⊢ (𝜑 → ((𝑋 = ((𝑆 · 𝐴) + (𝑇 · 𝐵)) ∧ (𝑆 + 𝑇) = 1) → 𝑇 = ((𝑋 − 𝐴) / (𝐵 − 𝐴))))
22	20, 21	jcad 513	. 2 ⊢ (𝜑 → ((𝑋 = ((𝑆 · 𝐴) + (𝑇 · 𝐵)) ∧ (𝑆 + 𝑇) = 1) → (𝑆 = ((𝐵 − 𝑋) / (𝐵 − 𝐴)) ∧ 𝑇 = ((𝑋 − 𝐴) / (𝐵 − 𝐴)))))
23	2, 5, 13, 14	bj-bary1lem 34128	. . . 4 ⊢ (𝜑 → 𝑋 = ((((𝐵 − 𝑋) / (𝐵 − 𝐴)) · 𝐴) + (((𝑋 − 𝐴) / (𝐵 − 𝐴)) · 𝐵)))
24		oveq1 7023	. . . . . 6 ⊢ (𝑆 = ((𝐵 − 𝑋) / (𝐵 − 𝐴)) → (𝑆 · 𝐴) = (((𝐵 − 𝑋) / (𝐵 − 𝐴)) · 𝐴))
25		oveq1 7023	. . . . . 6 ⊢ (𝑇 = ((𝑋 − 𝐴) / (𝐵 − 𝐴)) → (𝑇 · 𝐵) = (((𝑋 − 𝐴) / (𝐵 − 𝐴)) · 𝐵))
26	24, 25	oveqan12d 7035	. . . . 5 ⊢ ((𝑆 = ((𝐵 − 𝑋) / (𝐵 − 𝐴)) ∧ 𝑇 = ((𝑋 − 𝐴) / (𝐵 − 𝐴))) → ((𝑆 · 𝐴) + (𝑇 · 𝐵)) = ((((𝐵 − 𝑋) / (𝐵 − 𝐴)) · 𝐴) + (((𝑋 − 𝐴) / (𝐵 − 𝐴)) · 𝐵)))
27	26	a1i 11	. . . 4 ⊢ (𝜑 → ((𝑆 = ((𝐵 − 𝑋) / (𝐵 − 𝐴)) ∧ 𝑇 = ((𝑋 − 𝐴) / (𝐵 − 𝐴))) → ((𝑆 · 𝐴) + (𝑇 · 𝐵)) = ((((𝐵 − 𝑋) / (𝐵 − 𝐴)) · 𝐴) + (((𝑋 − 𝐴) / (𝐵 − 𝐴)) · 𝐵))))
28		eqtr3 2818	. . . 4 ⊢ ((𝑋 = ((((𝐵 − 𝑋) / (𝐵 − 𝐴)) · 𝐴) + (((𝑋 − 𝐴) / (𝐵 − 𝐴)) · 𝐵)) ∧ ((𝑆 · 𝐴) + (𝑇 · 𝐵)) = ((((𝐵 − 𝑋) / (𝐵 − 𝐴)) · 𝐴) + (((𝑋 − 𝐴) / (𝐵 − 𝐴)) · 𝐵))) → 𝑋 = ((𝑆 · 𝐴) + (𝑇 · 𝐵)))
29	23, 27, 28	syl6an 680	. . 3 ⊢ (𝜑 → ((𝑆 = ((𝐵 − 𝑋) / (𝐵 − 𝐴)) ∧ 𝑇 = ((𝑋 − 𝐴) / (𝐵 − 𝐴))) → 𝑋 = ((𝑆 · 𝐴) + (𝑇 · 𝐵))))
30		oveq12 7025	. . . 4 ⊢ ((𝑆 = ((𝐵 − 𝑋) / (𝐵 − 𝐴)) ∧ 𝑇 = ((𝑋 − 𝐴) / (𝐵 − 𝐴))) → (𝑆 + 𝑇) = (((𝐵 − 𝑋) / (𝐵 − 𝐴)) + ((𝑋 − 𝐴) / (𝐵 − 𝐴))))
31	5, 13	subcld 10845	. . . . . . 7 ⊢ (𝜑 → (𝐵 − 𝑋) ∈ ℂ)
32	13, 2	subcld 10845	. . . . . . 7 ⊢ (𝜑 → (𝑋 − 𝐴) ∈ ℂ)
33	5, 2	subcld 10845	. . . . . . 7 ⊢ (𝜑 → (𝐵 − 𝐴) ∈ ℂ)
34	5, 2, 15	subne0d 10854	. . . . . . 7 ⊢ (𝜑 → (𝐵 − 𝐴) ≠ 0)
35	31, 32, 33, 34	divdird 11302	. . . . . 6 ⊢ (𝜑 → (((𝐵 − 𝑋) + (𝑋 − 𝐴)) / (𝐵 − 𝐴)) = (((𝐵 − 𝑋) / (𝐵 − 𝐴)) + ((𝑋 − 𝐴) / (𝐵 − 𝐴))))
36	5, 13, 2	npncand 10869	. . . . . . 7 ⊢ (𝜑 → ((𝐵 − 𝑋) + (𝑋 − 𝐴)) = (𝐵 − 𝐴))
37	33, 34, 36	diveq1bd 11312	. . . . . 6 ⊢ (𝜑 → (((𝐵 − 𝑋) + (𝑋 − 𝐴)) / (𝐵 − 𝐴)) = 1)
38	35, 37	eqtr3d 2833	. . . . 5 ⊢ (𝜑 → (((𝐵 − 𝑋) / (𝐵 − 𝐴)) + ((𝑋 − 𝐴) / (𝐵 − 𝐴))) = 1)
39	38	eqeq2d 2805	. . . 4 ⊢ (𝜑 → ((𝑆 + 𝑇) = (((𝐵 − 𝑋) / (𝐵 − 𝐴)) + ((𝑋 − 𝐴) / (𝐵 − 𝐴))) ↔ (𝑆 + 𝑇) = 1))
40	30, 39	syl5ib 245	. . 3 ⊢ (𝜑 → ((𝑆 = ((𝐵 − 𝑋) / (𝐵 − 𝐴)) ∧ 𝑇 = ((𝑋 − 𝐴) / (𝐵 − 𝐴))) → (𝑆 + 𝑇) = 1))
41	29, 40	jcad 513	. 2 ⊢ (𝜑 → ((𝑆 = ((𝐵 − 𝑋) / (𝐵 − 𝐴)) ∧ 𝑇 = ((𝑋 − 𝐴) / (𝐵 − 𝐴))) → (𝑋 = ((𝑆 · 𝐴) + (𝑇 · 𝐵)) ∧ (𝑆 + 𝑇) = 1)))
42	22, 41	impbid 213	1 ⊢ (𝜑 → ((𝑋 = ((𝑆 · 𝐴) + (𝑇 · 𝐵)) ∧ (𝑆 + 𝑇) = 1) ↔ (𝑆 = ((𝐵 − 𝑋) / (𝐵 − 𝐴)) ∧ 𝑇 = ((𝑋 − 𝐴) / (𝐵 − 𝐴)))))

Syntax hints:   → wi 4   ↔ wb 207   ∧ wa 396   = wceq 1522   ∈ wcel 2081   ≠ wne 2984  (class class class)co 7016  ℂcc 10381  1c1 10384   + caddc 10386   · cmul 10388   − cmin 10717   / cdiv 11145

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1777  ax-4 1791  ax-5 1888  ax-6 1947  ax-7 1992  ax-8 2083  ax-9 2091  ax-10 2112  ax-11 2126  ax-12 2141  ax-13 2344  ax-ext 2769  ax-sep 5094  ax-nul 5101  ax-pow 5157  ax-pr 5221  ax-un 7319  ax-resscn 10440  ax-1cn 10441  ax-icn 10442  ax-addcl 10443  ax-addrcl 10444  ax-mulcl 10445  ax-mulrcl 10446  ax-mulcom 10447  ax-addass 10448  ax-mulass 10449  ax-distr 10450  ax-i2m1 10451  ax-1ne0 10452  ax-1rid 10453  ax-rnegex 10454  ax-rrecex 10455  ax-cnre 10456  ax-pre-lttri 10457  ax-pre-lttrn 10458  ax-pre-ltadd 10459  ax-pre-mulgt0 10460

This theorem depends on definitions:  df-bi 208  df-an 397  df-or 843  df-3or 1081  df-3an 1082  df-tru 1525  df-ex 1762  df-nf 1766  df-sb 2043  df-mo 2576  df-eu 2612  df-clab 2776  df-cleq 2788  df-clel 2863  df-nfc 2935  df-ne 2985  df-nel 3091  df-ral 3110  df-rex 3111  df-reu 3112  df-rmo 3113  df-rab 3114  df-v 3439  df-sbc 3707  df-csb 3812  df-dif 3862  df-un 3864  df-in 3866  df-ss 3874  df-nul 4212  df-if 4382  df-pw 4455  df-sn 4473  df-pr 4475  df-op 4479  df-uni 4746  df-br 4963  df-opab 5025  df-mpt 5042  df-id 5348  df-po 5362  df-so 5363  df-xp 5449  df-rel 5450  df-cnv 5451  df-co 5452  df-dm 5453  df-rn 5454  df-res 5455  df-ima 5456  df-iota 6189  df-fun 6227  df-fn 6228  df-f 6229  df-f1 6230  df-fo 6231  df-f1o 6232  df-fv 6233  df-riota 6977  df-ov 7019  df-oprab 7020  df-mpo 7021  df-er 8139  df-en 8358  df-dom 8359  df-sdom 8360  df-pnf 10523  df-mnf 10524  df-xr 10525  df-ltxr 10526  df-le 10527  df-sub 10719  df-neg 10720  df-div 11146

This theorem is referenced by: (None)