Construction in GCLC language

dim 120 120

point O 65 51.14
point M_{c} 50 67.5
point H 80 72.73

color 220 0 0
fontsize 11

cmark_t O
cmark_lt M_{c}
cmark_rt H
color 0 0 0
fontsize 10


% Constructing a line L_{\_G32009} which passes through point O and point H
line L_{\_G32009} O H 

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


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

% Constructing a point P_{\_G32034} such that OP_{\_G32034}/OP_{\_G32110}=1
towards P_{\_G32034} O P_{\_G32110} 1 
cmark_r P_{\_G32034}
color 200 200 200
drawsegment O P_{\_G32034} 
color 0 0 0

% Constructing a point P_{\_G32079} such that OP_{\_G32079}/OP_{\_G32110}=3
towards P_{\_G32079} O P_{\_G32110} 3 
cmark_r P_{\_G32079}
color 200 200 200
drawsegment O P_{\_G32079} 
color 0 0 0

% Constructing a line L_{\_G32040} which passes through point H and point P_{\_G32079}
line L_{\_G32040} H P_{\_G32079} 

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


% Constructing a line L_{\_G32003} which contains the point P_{\_G32034} and is parallel to the line L_{\_G32040}
parallel L_{\_G32003} P_{\_G32034} L_{\_G32040} 

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


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



% Constructing a point C such that M_{c}C/M_{c}G=3
towards C M_{c} G 3 
cmark_b C
color 200 200 200
drawsegment M_{c} C 
color 0 0 0


% DET:  points O and M_{c} are not the same
% Constructing a line m_{c} which passes through point O and point M_{c}
line m_{c} O M_{c} 

color 200 200 200
drawline m_{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 m_{c} and which passes through point M_{c}
perp c M_{c} m_{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 O and M_{c} are not the same