Metamath Proof Explorer


Theorem istrkgcb

Description: Property of being a Tarski geometry - congruence and betweenness part. (Contributed by Thierry Arnoux, 14-Mar-2019)

Ref Expression
Hypotheses istrkg.p P=BaseG
istrkg.d -˙=distG
istrkg.i I=ItvG
Assertion istrkgcb G𝒢TarskiCBGVxPyPzPuPaPbPcPvPxyyxIzbaIcx-˙y=a-˙by-˙z=b-˙cx-˙u=a-˙vy-˙u=b-˙vz-˙u=c-˙vxPyPaPbPzPyxIzy-˙z=a-˙b

Proof

Step Hyp Ref Expression
1 istrkg.p P=BaseG
2 istrkg.d -˙=distG
3 istrkg.i I=ItvG
4 simp1 p=Pd=-˙i=Ip=P
5 4 eqcomd p=Pd=-˙i=IP=p
6 5 adantr p=Pd=-˙i=IxPP=p
7 6 adantr p=Pd=-˙i=IxPyPP=p
8 7 adantr p=Pd=-˙i=IxPyPzPP=p
9 8 adantr p=Pd=-˙i=IxPyPzPuPP=p
10 9 adantr p=Pd=-˙i=IxPyPzPuPaPP=p
11 5 ad6antr p=Pd=-˙i=IxPyPzPuPaPbPP=p
12 6 ad6antr p=Pd=-˙i=IxPyPzPuPaPbPcPP=p
13 simpll3 p=Pd=-˙i=IxPyPi=I
14 13 ad6antr p=Pd=-˙i=IxPyPzPuPaPbPcPvPi=I
15 14 eqcomd p=Pd=-˙i=IxPyPzPuPaPbPcPvPI=i
16 15 oveqd p=Pd=-˙i=IxPyPzPuPaPbPcPvPxIz=xiz
17 16 eleq2d p=Pd=-˙i=IxPyPzPuPaPbPcPvPyxIzyxiz
18 15 oveqd p=Pd=-˙i=IxPyPzPuPaPbPcPvPaIc=aic
19 18 eleq2d p=Pd=-˙i=IxPyPzPuPaPbPcPvPbaIcbaic
20 17 19 3anbi23d p=Pd=-˙i=IxPyPzPuPaPbPcPvPxyyxIzbaIcxyyxizbaic
21 simpll2 p=Pd=-˙i=IxPyPd=-˙
22 21 ad6antr p=Pd=-˙i=IxPyPzPuPaPbPcPvPd=-˙
23 22 eqcomd p=Pd=-˙i=IxPyPzPuPaPbPcPvP-˙=d
24 23 oveqd p=Pd=-˙i=IxPyPzPuPaPbPcPvPx-˙y=xdy
25 23 oveqd p=Pd=-˙i=IxPyPzPuPaPbPcPvPa-˙b=adb
26 24 25 eqeq12d p=Pd=-˙i=IxPyPzPuPaPbPcPvPx-˙y=a-˙bxdy=adb
27 23 oveqd p=Pd=-˙i=IxPyPzPuPaPbPcPvPy-˙z=ydz
28 23 oveqd p=Pd=-˙i=IxPyPzPuPaPbPcPvPb-˙c=bdc
29 27 28 eqeq12d p=Pd=-˙i=IxPyPzPuPaPbPcPvPy-˙z=b-˙cydz=bdc
30 26 29 anbi12d p=Pd=-˙i=IxPyPzPuPaPbPcPvPx-˙y=a-˙by-˙z=b-˙cxdy=adbydz=bdc
31 23 oveqd p=Pd=-˙i=IxPyPzPuPaPbPcPvPx-˙u=xdu
32 23 oveqd p=Pd=-˙i=IxPyPzPuPaPbPcPvPa-˙v=adv
33 31 32 eqeq12d p=Pd=-˙i=IxPyPzPuPaPbPcPvPx-˙u=a-˙vxdu=adv
34 23 oveqd p=Pd=-˙i=IxPyPzPuPaPbPcPvPy-˙u=ydu
35 23 oveqd p=Pd=-˙i=IxPyPzPuPaPbPcPvPb-˙v=bdv
36 34 35 eqeq12d p=Pd=-˙i=IxPyPzPuPaPbPcPvPy-˙u=b-˙vydu=bdv
37 33 36 anbi12d p=Pd=-˙i=IxPyPzPuPaPbPcPvPx-˙u=a-˙vy-˙u=b-˙vxdu=advydu=bdv
38 30 37 anbi12d p=Pd=-˙i=IxPyPzPuPaPbPcPvPx-˙y=a-˙by-˙z=b-˙cx-˙u=a-˙vy-˙u=b-˙vxdy=adbydz=bdcxdu=advydu=bdv
39 20 38 anbi12d p=Pd=-˙i=IxPyPzPuPaPbPcPvPxyyxIzbaIcx-˙y=a-˙by-˙z=b-˙cx-˙u=a-˙vy-˙u=b-˙vxyyxizbaicxdy=adbydz=bdcxdu=advydu=bdv
40 23 oveqd p=Pd=-˙i=IxPyPzPuPaPbPcPvPz-˙u=zdu
41 23 oveqd p=Pd=-˙i=IxPyPzPuPaPbPcPvPc-˙v=cdv
42 40 41 eqeq12d p=Pd=-˙i=IxPyPzPuPaPbPcPvPz-˙u=c-˙vzdu=cdv
43 39 42 imbi12d p=Pd=-˙i=IxPyPzPuPaPbPcPvPxyyxIzbaIcx-˙y=a-˙by-˙z=b-˙cx-˙u=a-˙vy-˙u=b-˙vz-˙u=c-˙vxyyxizbaicxdy=adbydz=bdcxdu=advydu=bdvzdu=cdv
44 12 43 raleqbidva p=Pd=-˙i=IxPyPzPuPaPbPcPvPxyyxIzbaIcx-˙y=a-˙by-˙z=b-˙cx-˙u=a-˙vy-˙u=b-˙vz-˙u=c-˙vvpxyyxizbaicxdy=adbydz=bdcxdu=advydu=bdvzdu=cdv
45 11 44 raleqbidva p=Pd=-˙i=IxPyPzPuPaPbPcPvPxyyxIzbaIcx-˙y=a-˙by-˙z=b-˙cx-˙u=a-˙vy-˙u=b-˙vz-˙u=c-˙vcpvpxyyxizbaicxdy=adbydz=bdcxdu=advydu=bdvzdu=cdv
46 10 45 raleqbidva p=Pd=-˙i=IxPyPzPuPaPbPcPvPxyyxIzbaIcx-˙y=a-˙by-˙z=b-˙cx-˙u=a-˙vy-˙u=b-˙vz-˙u=c-˙vbpcpvpxyyxizbaicxdy=adbydz=bdcxdu=advydu=bdvzdu=cdv
47 9 46 raleqbidva p=Pd=-˙i=IxPyPzPuPaPbPcPvPxyyxIzbaIcx-˙y=a-˙by-˙z=b-˙cx-˙u=a-˙vy-˙u=b-˙vz-˙u=c-˙vapbpcpvpxyyxizbaicxdy=adbydz=bdcxdu=advydu=bdvzdu=cdv
48 8 47 raleqbidva p=Pd=-˙i=IxPyPzPuPaPbPcPvPxyyxIzbaIcx-˙y=a-˙by-˙z=b-˙cx-˙u=a-˙vy-˙u=b-˙vz-˙u=c-˙vupapbpcpvpxyyxizbaicxdy=adbydz=bdcxdu=advydu=bdvzdu=cdv
49 7 48 raleqbidva p=Pd=-˙i=IxPyPzPuPaPbPcPvPxyyxIzbaIcx-˙y=a-˙by-˙z=b-˙cx-˙u=a-˙vy-˙u=b-˙vz-˙u=c-˙vzpupapbpcpvpxyyxizbaicxdy=adbydz=bdcxdu=advydu=bdvzdu=cdv
50 6 49 raleqbidva p=Pd=-˙i=IxPyPzPuPaPbPcPvPxyyxIzbaIcx-˙y=a-˙by-˙z=b-˙cx-˙u=a-˙vy-˙u=b-˙vz-˙u=c-˙vypzpupapbpcpvpxyyxizbaicxdy=adbydz=bdcxdu=advydu=bdvzdu=cdv
51 5 50 raleqbidva p=Pd=-˙i=IxPyPzPuPaPbPcPvPxyyxIzbaIcx-˙y=a-˙by-˙z=b-˙cx-˙u=a-˙vy-˙u=b-˙vz-˙u=c-˙vxpypzpupapbpcpvpxyyxizbaicxdy=adbydz=bdcxdu=advydu=bdvzdu=cdv
52 7 adantr p=Pd=-˙i=IxPyPaPP=p
53 52 adantr p=Pd=-˙i=IxPyPaPbPP=p
54 13 ad3antrrr p=Pd=-˙i=IxPyPaPbPzPi=I
55 54 eqcomd p=Pd=-˙i=IxPyPaPbPzPI=i
56 55 oveqd p=Pd=-˙i=IxPyPaPbPzPxIz=xiz
57 56 eleq2d p=Pd=-˙i=IxPyPaPbPzPyxIzyxiz
58 21 ad3antrrr p=Pd=-˙i=IxPyPaPbPzPd=-˙
59 58 eqcomd p=Pd=-˙i=IxPyPaPbPzP-˙=d
60 59 oveqd p=Pd=-˙i=IxPyPaPbPzPy-˙z=ydz
61 59 oveqd p=Pd=-˙i=IxPyPaPbPzPa-˙b=adb
62 60 61 eqeq12d p=Pd=-˙i=IxPyPaPbPzPy-˙z=a-˙bydz=adb
63 57 62 anbi12d p=Pd=-˙i=IxPyPaPbPzPyxIzy-˙z=a-˙byxizydz=adb
64 53 63 rexeqbidva p=Pd=-˙i=IxPyPaPbPzPyxIzy-˙z=a-˙bzpyxizydz=adb
65 52 64 raleqbidva p=Pd=-˙i=IxPyPaPbPzPyxIzy-˙z=a-˙bbpzpyxizydz=adb
66 7 65 raleqbidva p=Pd=-˙i=IxPyPaPbPzPyxIzy-˙z=a-˙bapbpzpyxizydz=adb
67 6 66 raleqbidva p=Pd=-˙i=IxPyPaPbPzPyxIzy-˙z=a-˙bypapbpzpyxizydz=adb
68 5 67 raleqbidva p=Pd=-˙i=IxPyPaPbPzPyxIzy-˙z=a-˙bxpypapbpzpyxizydz=adb
69 51 68 anbi12d p=Pd=-˙i=IxPyPzPuPaPbPcPvPxyyxIzbaIcx-˙y=a-˙by-˙z=b-˙cx-˙u=a-˙vy-˙u=b-˙vz-˙u=c-˙vxPyPaPbPzPyxIzy-˙z=a-˙bxpypzpupapbpcpvpxyyxizbaicxdy=adbydz=bdcxdu=advydu=bdvzdu=cdvxpypapbpzpyxizydz=adb
70 1 2 3 69 sbcie3s f=G[˙Basef/p]˙[˙distf/d]˙[˙Itvf/i]˙xpypzpupapbpcpvpxyyxizbaicxdy=adbydz=bdcxdu=advydu=bdvzdu=cdvxpypapbpzpyxizydz=adbxPyPzPuPaPbPcPvPxyyxIzbaIcx-˙y=a-˙by-˙z=b-˙cx-˙u=a-˙vy-˙u=b-˙vz-˙u=c-˙vxPyPaPbPzPyxIzy-˙z=a-˙b
71 df-trkgcb 𝒢TarskiCB=f|[˙Basef/p]˙[˙distf/d]˙[˙Itvf/i]˙xpypzpupapbpcpvpxyyxizbaicxdy=adbydz=bdcxdu=advydu=bdvzdu=cdvxpypapbpzpyxizydz=adb
72 70 71 elab4g G𝒢TarskiCBGVxPyPzPuPaPbPcPvPxyyxIzbaIcx-˙y=a-˙by-˙z=b-˙cx-˙u=a-˙vy-˙u=b-˙vz-˙u=c-˙vxPyPaPbPzPyxIzy-˙z=a-˙b