Metamath Proof Explorer


Theorem elcgrabasrd

Description: Helper theorem for the membership in the base set of the angle addition monoid. (Contributed by Thierry Arnoux, 23-Aug-2026)

Ref Expression
Hypotheses elcgrabasrd.a A = d P 0 ..^ 3 | d 0 d 1 d 1 d 2
elcgrabasrd.p φ P V
elcgrabasrd.x φ X P
elcgrabasrd.y φ Y P
elcgrabasrd.z φ Z P
elcgrabasrd.1 φ X Y
elcgrabasrd.2 φ Y Z
Assertion elcgrabasrd φ ⟨“ XYZ ”⟩ A

Proof

Step Hyp Ref Expression
1 elcgrabasrd.a A = d P 0 ..^ 3 | d 0 d 1 d 1 d 2
2 elcgrabasrd.p φ P V
3 elcgrabasrd.x φ X P
4 elcgrabasrd.y φ Y P
5 elcgrabasrd.z φ Z P
6 elcgrabasrd.1 φ X Y
7 elcgrabasrd.2 φ Y Z
8 fveq1 d = ⟨“ XYZ ”⟩ d 0 = ⟨“ XYZ ”⟩ 0
9 fveq1 d = ⟨“ XYZ ”⟩ d 1 = ⟨“ XYZ ”⟩ 1
10 8 9 neeq12d d = ⟨“ XYZ ”⟩ d 0 d 1 ⟨“ XYZ ”⟩ 0 ⟨“ XYZ ”⟩ 1
11 fveq1 d = ⟨“ XYZ ”⟩ d 2 = ⟨“ XYZ ”⟩ 2
12 9 11 neeq12d d = ⟨“ XYZ ”⟩ d 1 d 2 ⟨“ XYZ ”⟩ 1 ⟨“ XYZ ”⟩ 2
13 10 12 anbi12d d = ⟨“ XYZ ”⟩ d 0 d 1 d 1 d 2 ⟨“ XYZ ”⟩ 0 ⟨“ XYZ ”⟩ 1 ⟨“ XYZ ”⟩ 1 ⟨“ XYZ ”⟩ 2
14 2 3 4 5 s3rexrd φ ⟨“ XYZ ”⟩ P 0 ..^ 3
15 s3fv0 X P ⟨“ XYZ ”⟩ 0 = X
16 3 15 syl φ ⟨“ XYZ ”⟩ 0 = X
17 s3fv1 Y P ⟨“ XYZ ”⟩ 1 = Y
18 4 17 syl φ ⟨“ XYZ ”⟩ 1 = Y
19 6 16 18 3netr4d φ ⟨“ XYZ ”⟩ 0 ⟨“ XYZ ”⟩ 1
20 s3fv2 Z P ⟨“ XYZ ”⟩ 2 = Z
21 5 20 syl φ ⟨“ XYZ ”⟩ 2 = Z
22 7 18 21 3netr4d φ ⟨“ XYZ ”⟩ 1 ⟨“ XYZ ”⟩ 2
23 19 22 jca φ ⟨“ XYZ ”⟩ 0 ⟨“ XYZ ”⟩ 1 ⟨“ XYZ ”⟩ 1 ⟨“ XYZ ”⟩ 2
24 13 14 23 elrabd φ ⟨“ XYZ ”⟩ d P 0 ..^ 3 | d 0 d 1 d 1 d 2
25 24 1 eleqtrrdi φ ⟨“ XYZ ”⟩ A