Construction in GCLC language

dim 120 120

point B 20 40
point H_{a} 80 40
point T_{c} 55.38 72.43

color 220 0 0
fontsize 11

cmark_b B
cmark_b H_{a}
cmark_lt T_{c}
color 0 0 0
fontsize 10

% DET:  points B and H_{a} are not the same
% Constructing a line a which passes through point B and point H_{a}
line a B H_{a} 

color 200 200 200
drawline a
color 0 0 0



% DET:  points B and T_{c} are not the same
% Constructing a line c which passes through point B and point T_{c}
line c B T_{c} 

color 200 200 200
drawline c
color 0 0 0




% Constructing a line h_{a} which is perpendicular to line a and which passes through point H_{a}
perp h_{a} H_{a} a 

color 200 200 200
drawline h_{a}
color 0 0 0



% NDG:  lines h_{a} and c are not parallel% DET:  lines h_{a} and c are not the same
% Constructing a point A which belongs to line h_{a} and line c
intersec A h_{a} c 
cmark_t A


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

% Constructing a line L_{\_G22076} which passes through point T_{c} and point P_{\_G22073}
line L_{\_G22076} T_{c} P_{\_G22073} 

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


% Constructing midpoint P_{\_G22079} of the segment BP_{\_G22073}
midpoint P_{\_G22079} B P_{\_G22073} 
cmark_r P_{\_G22079}

% Constructing a line L_{\_G22082} which passes through point A and point P_{\_G22079}
line L_{\_G22082} A P_{\_G22079} 

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


% Constructing a line L_{\_G22085} which passes through point B and point P_{\_G22079}
line L_{\_G22085} B P_{\_G22079} 

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


% Constructing a point P_{\_G22088} which belongs to line L_{\_G22076} and line L_{\_G22082}
intersec P_{\_G22088} L_{\_G22076} L_{\_G22082} 
cmark_r P_{\_G22088}

% Constructing a point P_{\_G22091} which belongs to line L_{\_G22076} and line L_{\_G22085}
intersec P_{\_G22091} L_{\_G22076} L_{\_G22085} 
cmark_r P_{\_G22091}

% Constructing a line L_{\_G22094} which passes through point A and point P_{\_G22091}
line L_{\_G22094} A P_{\_G22091} 

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


% Constructing a line L_{\_G22097} which passes through point B and point P_{\_G22088}
line L_{\_G22097} B P_{\_G22088} 

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


% Constructing a point P_{\_G22100} which belongs to line L_{\_G22094} and line L_{\_G22097}
intersec P_{\_G22100} L_{\_G22094} L_{\_G22097} 
cmark_r P_{\_G22100}

% Constructing a line L_{\_G22103} which passes through point P_{\_G22079} and point P_{\_G22100}
line L_{\_G22103} P_{\_G22079} P_{\_G22100} 

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


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


% NDG:  points T_{c} and T`_{c} are not the same
% Constructing midpoint P_{\_G22934} of the segment T_{c}T`_{c}
midpoint P_{\_G22934} T_{c} T`_{c} 
cmark_r P_{\_G22934}

% Constructing a circle k_over(T_{c},T`_{c}) whose center is at point P_{\_G22934} and which passes through point T_{c}
circle k_over(T_{c},T`_{c}) P_{\_G22934} T_{c} 

color 200 200 200
drawcircle k_over(T_{c},T`_{c})
color 0 0 0



% NDG:  line a and circle k_over(T_{c},T`_{c}) intersect
% Constructing points C_{wb} and C which are in intersection of k_over(T_{c},T`_{c}) and a
intersec2 C_{wb} C k_over(T_{c},T`_{c}) a 
cmark_r C_{wb}
cmark_b C



drawsegment A B
drawsegment A C
drawsegment B C

% Non-degenerate conditions:  line a and circle k_over(T_{c},T`_{c}) intersect; points T_{c} and T`_{c} are not the same; points A and B are not the same; points B and T_{c} are not the same; points B and midpoint([A,T_{c}]) are not the same; lines h_{a} and c are not parallel
% Determination conditions:  lines h_{a} and c are not the same; points B and T_{c} are not the same; points B and H_{a} are not the same