Construction in GCLC language

dim 120 120

point B 20 40
point H_{b} 89.36 77.83
point I 74.37 61.15

color 220 0 0
fontsize 11

cmark_b B
cmark_rt H_{b}
cmark_b I
color 0 0 0
fontsize 10

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

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




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

color 200 200 200
drawline b
color 0 0 0



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

% Constructing a circle k(I,P_{a}) whose center is at point I and which passes through point P_{\_G47952}
circle k(I,P_{a}) I P_{\_G47952} 

color 200 200 200
drawcircle k(I,P_{a})
color 0 0 0



% NDG:  point B is outside the circle k(I,P_{a})
% Constructing midpoint P_{\_G48186} of the segment BI
midpoint P_{\_G48186} B I 
cmark_r P_{\_G48186}

% Constructing a circle C_{\_G48189} whose center is at point P_{\_G48186} and which passes through point B
circle C_{\_G48189} P_{\_G48186} B 

color 200 200 200
drawcircle C_{\_G48189}
color 0 0 0


% Constructing points P_{\_G48192} and P_{\_G48195} which are in intersection of C_{\_G48189} and k(I,P_{a})
intersec2 P_{\_G48192} P_{\_G48195} C_{\_G48189} k(I,P_{a}) 
cmark_r P_{\_G48192}
cmark_r P_{\_G48195}

% Constructing a line c which passes through point B and point P_{\_G48192}
line c B P_{\_G48192} 

color 200 200 200
drawline c
color 0 0 0


% Constructing a line a which passes through point B and point P_{\_G48195}
line a B P_{\_G48195} 

color 200 200 200
drawline a
color 0 0 0



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


% 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 b are not parallel; point B is outside the circle k(I,P_{a}); point I is not incident to the line b
% Determination conditions:  lines b and a are not the same; lines c and b are not the same; points B and H_{b} are not the same