Metamath Proof Explorer


Theorem angmgmaddeu6

Description: There exists a unique point s satisfying the conditions of angle addition. Case where the first angle is a zero angle, and the second angle is a straight angle. (Contributed by Thierry Arnoux, 23-Aug-2026)

Ref Expression
Hypotheses angmgmadd.p 𝑃 = ( Base ‘ 𝐺 )
angmgmadd.a 𝐴 = { 𝑑 ∈ ( 𝑃m ( 0 ..^ 3 ) ) ∣ ( ( 𝑑 ‘ 0 ) ≠ ( 𝑑 ‘ 1 ) ∧ ( 𝑑 ‘ 1 ) ≠ ( 𝑑 ‘ 2 ) ) }
angmgmadd.i 𝐼 = ( Itv ‘ 𝐺 )
angmgmadd.d = ( dist ‘ 𝐺 )
angmgmadd.c = ( cgrA ‘ 𝐺 )
angmgmadd.l 𝐿 = ( LineG ‘ 𝐺 )
angmgmadd.g ( 𝜑𝐺 ∈ TarskiG )
angmgmaddov.u ( 𝜑𝑈𝑃 )
angmgmaddov.v ( 𝜑𝑉𝑃 )
angmgmaddov.w ( 𝜑𝑊𝑃 )
angmgmaddov.x ( 𝜑𝑋𝑃 )
angmgmaddov.y ( 𝜑𝑌𝑃 )
angmgmaddov.z ( 𝜑𝑍𝑃 )
angmgmaddeu.1 ( 𝜑𝑈𝑉 )
angmgmaddeu.2 ( 𝜑𝑉𝑊 )
angmgmaddeu.3 ( 𝜑𝑋𝑌 )
angmgmaddeu.4 ( 𝜑𝑌𝑍 )
angmgmaddeu6.1 ( 𝜑𝑌 ∈ ( 𝑋 𝐼 𝑍 ) )
angmgmaddeu6.2 ( 𝜑𝑈 ( ( hlG ‘ 𝐺 ) ‘ 𝑉 ) 𝑊 )
Assertion angmgmaddeu6 ( 𝜑 → ∃! 𝑠𝑃 ( ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) )

Proof

Step Hyp Ref Expression
1 angmgmadd.p 𝑃 = ( Base ‘ 𝐺 )
2 angmgmadd.a 𝐴 = { 𝑑 ∈ ( 𝑃m ( 0 ..^ 3 ) ) ∣ ( ( 𝑑 ‘ 0 ) ≠ ( 𝑑 ‘ 1 ) ∧ ( 𝑑 ‘ 1 ) ≠ ( 𝑑 ‘ 2 ) ) }
3 angmgmadd.i 𝐼 = ( Itv ‘ 𝐺 )
4 angmgmadd.d = ( dist ‘ 𝐺 )
5 angmgmadd.c = ( cgrA ‘ 𝐺 )
6 angmgmadd.l 𝐿 = ( LineG ‘ 𝐺 )
7 angmgmadd.g ( 𝜑𝐺 ∈ TarskiG )
8 angmgmaddov.u ( 𝜑𝑈𝑃 )
9 angmgmaddov.v ( 𝜑𝑉𝑃 )
10 angmgmaddov.w ( 𝜑𝑊𝑃 )
11 angmgmaddov.x ( 𝜑𝑋𝑃 )
12 angmgmaddov.y ( 𝜑𝑌𝑃 )
13 angmgmaddov.z ( 𝜑𝑍𝑃 )
14 angmgmaddeu.1 ( 𝜑𝑈𝑉 )
15 angmgmaddeu.2 ( 𝜑𝑉𝑊 )
16 angmgmaddeu.3 ( 𝜑𝑋𝑌 )
17 angmgmaddeu.4 ( 𝜑𝑌𝑍 )
18 angmgmaddeu6.1 ( 𝜑𝑌 ∈ ( 𝑋 𝐼 𝑍 ) )
19 angmgmaddeu6.2 ( 𝜑𝑈 ( ( hlG ‘ 𝐺 ) ‘ 𝑉 ) 𝑊 )
20 eqid ( hlG ‘ 𝐺 ) = ( hlG ‘ 𝐺 )
21 17 necomd ( 𝜑𝑍𝑌 )
22 14 necomd ( 𝜑𝑉𝑈 )
23 1 3 20 12 9 8 7 13 4 21 22 hlcgreu ( 𝜑 → ∃! 𝑠𝑃 ( 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) )
24 7 ad3antrrr ( ( ( ( 𝜑𝑠𝑃 ) ∧ 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝐺 ∈ TarskiG )
25 simpllr ( ( ( ( 𝜑𝑠𝑃 ) ∧ 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝑠𝑃 )
26 13 ad3antrrr ( ( ( ( 𝜑𝑠𝑃 ) ∧ 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝑍𝑃 )
27 12 ad3antrrr ( ( ( ( 𝜑𝑠𝑃 ) ∧ 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝑌𝑃 )
28 simplr ( ( ( ( 𝜑𝑠𝑃 ) ∧ 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 )
29 1 3 20 25 26 27 24 28 hlcomd ( ( ( ( 𝜑𝑠𝑃 ) ∧ 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝑍 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑠 )
30 19 ad3antrrr ( ( ( ( 𝜑𝑠𝑃 ) ∧ 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝑈 ( ( hlG ‘ 𝐺 ) ‘ 𝑉 ) 𝑊 )
31 9 ad3antrrr ( ( ( ( 𝜑𝑠𝑃 ) ∧ 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝑉𝑃 )
32 1 5 20 24 29 30 27 31 zerocgra ( ( ( ( 𝜑𝑠𝑃 ) ∧ 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ )
33 simpr ( ( ( ( 𝜑𝑠𝑃 ) ∧ 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) )
34 32 33 jca ( ( ( ( 𝜑𝑠𝑃 ) ∧ 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → ( ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) )
35 34 anasss ( ( ( 𝜑𝑠𝑃 ) ∧ ( 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) ) → ( ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) )
36 13 ad3antrrr ( ( ( ( 𝜑𝑠𝑃 ) ∧ ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝑍𝑃 )
37 simpllr ( ( ( ( 𝜑𝑠𝑃 ) ∧ ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝑠𝑃 )
38 12 ad3antrrr ( ( ( ( 𝜑𝑠𝑃 ) ∧ ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝑌𝑃 )
39 7 ad3antrrr ( ( ( ( 𝜑𝑠𝑃 ) ∧ ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝐺 ∈ TarskiG )
40 8 ad3antrrr ( ( ( ( 𝜑𝑠𝑃 ) ∧ ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝑈𝑃 )
41 9 ad3antrrr ( ( ( ( 𝜑𝑠𝑃 ) ∧ ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝑉𝑃 )
42 10 ad3antrrr ( ( ( ( 𝜑𝑠𝑃 ) ∧ ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝑊𝑃 )
43 5 a1i ( ( ( ( 𝜑𝑠𝑃 ) ∧ ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → = ( cgrA ‘ 𝐺 ) )
44 simplr ( ( ( ( 𝜑𝑠𝑃 ) ∧ ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ )
45 43 44 breqdi ( ( ( ( 𝜑𝑠𝑃 ) ∧ ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → ⟨“ 𝑍 𝑌 𝑠 ”⟩ ( cgrA ‘ 𝐺 ) ⟨“ 𝑈 𝑉 𝑊 ”⟩ )
46 1 3 39 20 36 38 37 40 41 42 45 cgracom ( ( ( ( 𝜑𝑠𝑃 ) ∧ ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → ⟨“ 𝑈 𝑉 𝑊 ”⟩ ( cgrA ‘ 𝐺 ) ⟨“ 𝑍 𝑌 𝑠 ”⟩ )
47 19 ad3antrrr ( ( ( ( 𝜑𝑠𝑃 ) ∧ ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝑈 ( ( hlG ‘ 𝐺 ) ‘ 𝑉 ) 𝑊 )
48 1 3 4 39 40 41 42 36 38 37 46 20 47 cgrahl ( ( ( ( 𝜑𝑠𝑃 ) ∧ ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝑍 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑠 )
49 1 3 20 36 37 38 39 48 hlcomd ( ( ( ( 𝜑𝑠𝑃 ) ∧ ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 )
50 simpr ( ( ( ( 𝜑𝑠𝑃 ) ∧ ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) )
51 49 50 jca ( ( ( ( 𝜑𝑠𝑃 ) ∧ ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ) ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) → ( 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) )
52 51 anasss ( ( ( 𝜑𝑠𝑃 ) ∧ ( ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) ) → ( 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) )
53 35 52 impbida ( ( 𝜑𝑠𝑃 ) → ( ( 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) ↔ ( ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) ) )
54 53 reubidva ( 𝜑 → ( ∃! 𝑠𝑃 ( 𝑠 ( ( hlG ‘ 𝐺 ) ‘ 𝑌 ) 𝑍 ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) ↔ ∃! 𝑠𝑃 ( ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) ) )
55 23 54 mpbid ( 𝜑 → ∃! 𝑠𝑃 ( ⟨“ 𝑍 𝑌 𝑠 ”⟩ ⟨“ 𝑈 𝑉 𝑊 ”⟩ ∧ ( 𝑌 𝑠 ) = ( 𝑉 𝑈 ) ) )