Construction in GCLC language

dim 120 120

point C 110 40
point M_{c} 50 67.5
point H 80 72.73

color 220 0 0
fontsize 11

cmark_b C
cmark_lt M_{c}
cmark_rt H
color 0 0 0
fontsize 10


% Constructing a line L_{\_G52790} which passes through point C and point M_{c}
line L_{\_G52790} C M_{c} 

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


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

% Constructing a point P_{\_G52815} such that CP_{\_G52815}/CP_{\_G52891}=2
towards P_{\_G52815} C P_{\_G52891} 2 
cmark_r P_{\_G52815}
color 200 200 200
drawsegment C P_{\_G52815} 
color 0 0 0

% Constructing a point P_{\_G52860} such that CP_{\_G52860}/CP_{\_G52891}=3
towards P_{\_G52860} C P_{\_G52891} 3 
cmark_r P_{\_G52860}
color 200 200 200
drawsegment C P_{\_G52860} 
color 0 0 0

% Constructing a line L_{\_G52821} which passes through point M_{c} and point P_{\_G52860}
line L_{\_G52821} M_{c} P_{\_G52860} 

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


% Constructing a line L_{\_G52784} which contains the point P_{\_G52815} and is parallel to the line L_{\_G52821}
parallel L_{\_G52784} P_{\_G52815} L_{\_G52821} 

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


% Constructing a point G which belongs to line L_{\_G52784} and line L_{\_G52790}
intersec G L_{\_G52784} L_{\_G52790} 
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 C and H are not the same
% Constructing a line h_{c} which passes through point C and point H
line h_{c} C H 

color 200 200 200
drawline h_{c}
color 0 0 0



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

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




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

color 200 200 200
drawline c
color 0 0 0



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



drawsegment A B
drawsegment A C
drawsegment B C

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