Construction in GCLC language
dim 120 120
point C 110 40
point H_{a} 80 40
color 220 0 0
fontsize 11
cmark_b C
cmark_b H_{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 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 point B such that CB/CH_{a}=0.7875734259283986
towards B C H_{a} 0.7875734259283986
color 220 0 0
fontsize 11
cmark_b B
color 0 0 0
fontsize 10
color 200 200 200
drawsegment C H_{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
% Constructing a point P_{\_G16889} with coordinates (10,30)
point P_{\_G16889} 10 30
cmark_r P_{\_G16889}
% Constructing a line L_{\_G16892} which passes through point B and point H_{a}
line L_{\_G16892} B H_{a}
color 200 200 200
drawline L_{\_G16892}
color 0 0 0
% Constructing a line L_{\_G16895} which is perpendicular to line L_{\_G16892} and which passes through point H_{a}
perp L_{\_G16895} H_{a} L_{\_G16892}
color 200 200 200
drawline L_{\_G16895}
color 0 0 0
% Constructing a line L_{\_G16898} which passes through point B and point P_{\_G16889}
line L_{\_G16898} B P_{\_G16889}
color 200 200 200
drawline L_{\_G16898}
color 0 0 0
% Constructing a point A which belongs to line L_{\_G16898} and line L_{\_G16895}
intersec A L_{\_G16898} L_{\_G16895}
cmark_t A
drawsegment A B
drawsegment A C
drawsegment B C
% Non-degenerate conditions:
% Determination conditions: points C and H_{a} are not the same