Construction in GCLC language

dim 120 120

point A 80 95
point H_{b} 89.36 77.83
point T_{a} 70.86 40

color 220 0 0
fontsize 11

cmark_t A
cmark_rt H_{b}
cmark_b T_{a}
color 0 0 0
fontsize 10

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

color 200 200 200
drawline b
color 0 0 0




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

color 200 200 200
drawline h_{b}
color 0 0 0



% NDG:  point T_{a} is not incident to the line b
% Constructing a point P_{\_G21651} which is a foot of the point T_{a} on the line b
foot P_{\_G21651} T_{a} b 
cmark_r P_{\_G21651}
color 200 200 200
drawline T_{a} P_{\_G21651} 
color 0 0 0

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

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



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

% Constructing a line L_{\_G22045} which passes through point T_{a} and point A
line L_{\_G22045} T_{a} A 

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


% Constructing a point P_{\_G22048} which is an image of the point P_{\_G22042} in the symmetry to point/line L_{\_G22045}
sim P_{\_G22048} L_{\_G22045} P_{\_G22042} 
cmark_r P_{\_G22048}

% Constructing a line c which passes through point A and point P_{\_G22048}
line c A P_{\_G22048} 

color 200 200 200
drawline c
color 0 0 0



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


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

color 200 200 200
drawline a
color 0 0 0



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



drawsegment A B
drawsegment A C
drawsegment B C

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