Construction in GCLC language

dim 120 120

point O 65 51.14
point M_{b} 95 67.5
point H 80 72.73

color 220 0 0
fontsize 11

cmark_t O
cmark_rt M_{b}
cmark_rt H
color 0 0 0
fontsize 10


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

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


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

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

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

% Constructing a line L_{\_G50653} which passes through point H and point P_{\_G50692}
line L_{\_G50653} H P_{\_G50692} 

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


% Constructing a line L_{\_G50616} which contains the point P_{\_G50647} and is parallel to the line L_{\_G50653}
parallel L_{\_G50616} P_{\_G50647} L_{\_G50653} 

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


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



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


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

color 200 200 200
drawline m_{b}
color 0 0 0



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

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




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

color 200 200 200
drawline b
color 0 0 0



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



drawsegment A B
drawsegment A C
drawsegment B C

% Non-degenerate conditions:  line b and circle k(O,C) intersect; points B and O are not the same
% Determination conditions:  points O and M_{b} are not the same