Construction in GCLC language

dim 120 120

point C 110 40
point H_{a} 80 40
point T_{c} 55.38 72.43

color 220 0 0
fontsize 11

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

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

color 200 200 200
drawline a
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:  point T_{c} is not incident to the line a
% Constructing a point P_{\_G43197} which is a foot of the point T_{c} on the line a
foot P_{\_G43197} T_{c} a 
cmark_r P_{\_G43197}
color 200 200 200
drawline T_{c} P_{\_G43197} 
color 0 0 0

% Constructing a circle k(T_{c},foot[T_{c},b]) whose center is at point T_{c} and which passes through point P_{\_G43197}
circle k(T_{c},foot[T_{c},b]) T_{c} P_{\_G43197} 

color 200 200 200
drawcircle k(T_{c},foot[T_{c},b])
color 0 0 0



% NDG:  point C is outside the circle k(T_{c},foot[T_{c},b])
% Constructing a point P_{\_G43588} which is a foot of the point T_{c} on the line a
foot P_{\_G43588} T_{c} a 
cmark_r P_{\_G43588}
color 200 200 200
drawline T_{c} P_{\_G43588} 
color 0 0 0

% Constructing a line L_{\_G43591} which passes through point T_{c} and point C
line L_{\_G43591} T_{c} C 

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


% Constructing a point P_{\_G43594} which is an image of the point P_{\_G43588} in the symmetry to point/line L_{\_G43591}
sim P_{\_G43594} L_{\_G43591} P_{\_G43588} 
cmark_r P_{\_G43594}

% Constructing a line b which passes through point C and point P_{\_G43594}
line b C P_{\_G43594} 

color 200 200 200
drawline b
color 0 0 0



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


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

color 200 200 200
drawline c
color 0 0 0



% NDG:  lines a and c are not parallel% DET:  lines a and c are not the same
% Constructing a point B which belongs to line a and line c
intersec B a c 
cmark_b B



drawsegment A B
drawsegment A C
drawsegment B C

% Non-degenerate conditions:  lines a and c are not parallel; lines b and h_{a} are not parallel; point C is outside the circle k(T_{c},foot[T_{c},b]); point T_{c} is not incident to the line a
% Determination conditions:  lines a and c are not the same; points T_{c} and A are not the same; lines b and h_{a} are not the same; points C and H_{a} are not the same