Construction in GCLC language

dim 120 120

point B 20 40
point M_{a} 65 40
point M_{b} 95 67.5

color 220 0 0
fontsize 11

cmark_b B
cmark_b M_{a}
cmark_rt M_{b}
color 0 0 0
fontsize 10


% Constructing a point C such that BC/BM_{a}=2
towards C B M_{a} 2 
cmark_b C
color 200 200 200
drawsegment B C 
color 0 0 0



% Constructing a line L_{\_G18309} which passes through point B and point M_{b}
line L_{\_G18309} B M_{b} 

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


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

% Constructing a point P_{\_G18334} such that BP_{\_G18334}/BP_{\_G18410}=2
towards P_{\_G18334} B P_{\_G18410} 2 
cmark_r P_{\_G18334}
color 200 200 200
drawsegment B P_{\_G18334} 
color 0 0 0

% Constructing a point P_{\_G18379} such that BP_{\_G18379}/BP_{\_G18410}=3
towards P_{\_G18379} B P_{\_G18410} 3 
cmark_r P_{\_G18379}
color 200 200 200
drawsegment B P_{\_G18379} 
color 0 0 0

% Constructing a line L_{\_G18340} which passes through point M_{b} and point P_{\_G18379}
line L_{\_G18340} M_{b} P_{\_G18379} 

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


% Constructing a line L_{\_G18303} which contains the point P_{\_G18334} and is parallel to the line L_{\_G18340}
parallel L_{\_G18303} P_{\_G18334} L_{\_G18340} 

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


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



% Constructing a point A such that M_{a}A/M_{a}G=3
towards A M_{a} G 3 
cmark_t A
color 200 200 200
drawsegment M_{a} A 
color 0 0 0



drawsegment A B
drawsegment A C
drawsegment B C

% Non-degenerate conditions: 
% Determination conditions: