Construction in GCLC language

dim 120 120

point M_{a} 65 40
point T_{a} 70.86 40

color 220 0 0
fontsize 11

cmark_b M_{a}
cmark_b T_{a}
color 0 0 0
fontsize 10


% point B is given by the problem setting, but it has to belong to the line a which is constructible from the others objects given 
% DET:  points M_{a} and T_{a} are not the same
% Constructing a line a which passes through point M_{a} and point T_{a}
line a M_{a} T_{a} 

color 200 200 200
drawline a
color 0 0 0




% Constructing a point B such that M_{a}B/M_{a}T_{a}=0.7523881327647466
towards B M_{a} T_{a} 0.7523881327647466 
color 220 0 0
fontsize 11
cmark_b B
color 0 0 0
fontsize 10

color 200 200 200
drawsegment M_{a} T_{a} 
color 0 0 0



% Constructing a point C such that BC/BM_{a}=2
towards C B M_{a} 2 
cmark_b C
color 200 200 200
drawsegment B C 
color 0 0 0


% NDG:  points B and C are not the same; points C and T_{a} are not the same; points C and midpoint([B,T_{a}]) are not the same
% Constructing a point P_{\_G22942} which is an image of the point C in a rotation around the point T_{a} for the angle 90
rotate P_{\_G22942} T_{a} 90 C 
cmark_r P_{\_G22942}
color 200 200 200
drawarc_p T_{a} C 90 
color 0 0 0

% Constructing a line L_{\_G22945} which passes through point T_{a} and point P_{\_G22942}
line L_{\_G22945} T_{a} P_{\_G22942} 

color 200 200 200
drawline L_{\_G22945}
color 0 0 0


% Constructing midpoint P_{\_G22948} of the segment CP_{\_G22942}
midpoint P_{\_G22948} C P_{\_G22942} 
cmark_r P_{\_G22948}

% Constructing a line L_{\_G22951} which passes through point B and point P_{\_G22948}
line L_{\_G22951} B P_{\_G22948} 

color 200 200 200
drawline L_{\_G22951}
color 0 0 0


% Constructing a line L_{\_G22954} which passes through point C and point P_{\_G22948}
line L_{\_G22954} C P_{\_G22948} 

color 200 200 200
drawline L_{\_G22954}
color 0 0 0


% Constructing a point P_{\_G22957} which belongs to line L_{\_G22945} and line L_{\_G22951}
intersec P_{\_G22957} L_{\_G22945} L_{\_G22951} 
cmark_r P_{\_G22957}

% Constructing a point P_{\_G22960} which belongs to line L_{\_G22945} and line L_{\_G22954}
intersec P_{\_G22960} L_{\_G22945} L_{\_G22954} 
cmark_r P_{\_G22960}

% Constructing a line L_{\_G22963} which passes through point B and point P_{\_G22960}
line L_{\_G22963} B P_{\_G22960} 

color 200 200 200
drawline L_{\_G22963}
color 0 0 0


% Constructing a line L_{\_G22966} which passes through point C and point P_{\_G22957}
line L_{\_G22966} C P_{\_G22957} 

color 200 200 200
drawline L_{\_G22966}
color 0 0 0


% Constructing a point P_{\_G22969} which belongs to line L_{\_G22963} and line L_{\_G22966}
intersec P_{\_G22969} L_{\_G22963} L_{\_G22966} 
cmark_r P_{\_G22969}

% Constructing a line L_{\_G22972} which passes through point P_{\_G22948} and point P_{\_G22969}
line L_{\_G22972} P_{\_G22948} P_{\_G22969} 

color 200 200 200
drawline L_{\_G22972}
color 0 0 0


% Constructing a point T`_{a} which belongs to line L_{\_G22972} and line a
intersec T`_{a} L_{\_G22972} a 
cmark_r T`_{a}



% Constructing midpoint P_{\_G23842} of the segment T_{a}T`_{a}
midpoint P_{\_G23842} T_{a} T`_{a} 
cmark_r P_{\_G23842}

% Generating number V[_G23790] with value 0.7523881327647466
number V[_G23790] 0.7523881327647466 


% Calculating value V[_G23811] using formula V[_G23790]*360
expression V[_G23811]  { V[_G23790]*360  } 


% Constructing a point A which is an image of the point V[_G23811] in a rotation around the point T_{a} for the angle T`_{a}
rotate A T_{a} V[_G23811] T`_{a} 
cmark_t A
color 200 200 200
drawarc_p T_{a} T`_{a} V[_G23811] 
color 0 0 0



drawsegment A B
drawsegment A C
drawsegment B C

% Non-degenerate conditions:  points B and C are not the same; points C and T_{a} are not the same; points C and midpoint([B,T_{a}]) are not the same
% Determination conditions:  points M_{a} and T_{a} are not the same