Construction in GCLC language

dim 120 120

point M_{a} 65 40
point H_{a} 80 40

color 220 0 0
fontsize 11

cmark_b M_{a}
cmark_b H_{a}
color 0 0 0
fontsize 10


% point C 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 M_{a} and H_{a} are not the same
% Constructing a line a which passes through point M_{a} and point H_{a}
line a M_{a} H_{a} 

color 200 200 200
drawline a
color 0 0 0




% Constructing a point C such that M_{a}C/M_{a}H_{a}=0.4756429170605079
towards C M_{a} H_{a} 0.4756429170605079 
color 220 0 0
fontsize 11
cmark_b C
color 0 0 0
fontsize 10

color 200 200 200
drawsegment M_{a} H_{a} 
color 0 0 0



% Constructing a point B such that CB/CM_{a}=2
towards B C M_{a} 2 
cmark_b B
color 200 200 200
drawsegment C B 
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_{\_G45697} with coordinates (10,30)
point P_{\_G45697} 10 30 
cmark_r P_{\_G45697}

% Constructing a line L_{\_G45700} which passes through point C and point H_{a}
line L_{\_G45700} C H_{a} 

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


% Constructing a line L_{\_G45703} which is perpendicular to line L_{\_G45700} and which passes through point H_{a}
perp L_{\_G45703} H_{a} L_{\_G45700} 

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


% Constructing a line L_{\_G45706} which passes through point C and point P_{\_G45697}
line L_{\_G45706} C P_{\_G45697} 

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


% Constructing a point A which belongs to line L_{\_G45706} and line L_{\_G45703}
intersec A L_{\_G45706} L_{\_G45703} 
cmark_t A



drawsegment A B
drawsegment A C
drawsegment B C

% Non-degenerate conditions: 
% Determination conditions:  points M_{a} and H_{a} are not the same