Construction in GCLC language

dim 120 120

point A 80 95
point M_{a} 65 40
point H 80 72.73

color 220 0 0
fontsize 11

cmark_t A
cmark_b M_{a}
cmark_rt H
color 0 0 0
fontsize 10


% Constructing a line L_{\_G13875} which passes through point A and point M_{a}
line L_{\_G13875} A M_{a} 

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


% Constructing a point P_{\_G13976} with coordinates (0,0)
point P_{\_G13976} 0 0 
cmark_r P_{\_G13976}

% Constructing a point P_{\_G13900} such that AP_{\_G13900}/AP_{\_G13976}=2
towards P_{\_G13900} A P_{\_G13976} 2 
cmark_r P_{\_G13900}
color 200 200 200
drawsegment A P_{\_G13900} 
color 0 0 0

% Constructing a point P_{\_G13945} such that AP_{\_G13945}/AP_{\_G13976}=3
towards P_{\_G13945} A P_{\_G13976} 3 
cmark_r P_{\_G13945}
color 200 200 200
drawsegment A P_{\_G13945} 
color 0 0 0

% Constructing a line L_{\_G13906} which passes through point M_{a} and point P_{\_G13945}
line L_{\_G13906} M_{a} P_{\_G13945} 

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


% Constructing a line L_{\_G13869} which contains the point P_{\_G13900} and is parallel to the line L_{\_G13906}
parallel L_{\_G13869} P_{\_G13900} L_{\_G13906} 

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


% Constructing a point G which belongs to line L_{\_G13869} and line L_{\_G13875}
intersec G L_{\_G13869} L_{\_G13875} 
cmark_t G



% Constructing a point O such that HO/HG=1.5
towards O H G 1.5 
cmark_t O
color 200 200 200
drawsegment H O 
color 0 0 0


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

color 200 200 200
drawline h_{a}
color 0 0 0



% NDG:  points A and O are not the same
% Constructing a circle k(O,C) whose center is at point O and which passes through point A
circle k(O,C) O A 

color 200 200 200
drawcircle k(O,C)
color 0 0 0




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

color 200 200 200
drawline a
color 0 0 0



% NDG:  line a and circle k(O,C) intersect
% Constructing points C and B which are in intersection of k(O,C) and a
intersec2 C B k(O,C) a 
cmark_b C
cmark_b B



drawsegment A B
drawsegment A C
drawsegment B C

% Non-degenerate conditions:  line a and circle k(O,C) intersect; points A and O are not the same
% Determination conditions:  points A and H are not the same