Construction in GCLC language

dim 120 120

point A 80 95
point H_{a} 80 40
point T_{b} 94.25 68.88

color 220 0 0
fontsize 11

cmark_t A
cmark_b H_{a}
cmark_rt T_{b}
color 0 0 0
fontsize 10

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

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



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

color 200 200 200
drawline b
color 0 0 0




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

color 200 200 200
drawline a
color 0 0 0



% NDG:  lines a and b are not parallel% DET:  lines a and b are not the same
% Constructing a point C which belongs to line a and line b
intersec C a b 
cmark_b C


% NDG:  points A and C are not the same; points C and T_{b} are not the same; points C and midpoint([A,T_{b}]) are not the same
% Constructing a point P_{\_G12670} which is an image of the point C in a rotation around the point T_{b} for the angle 90
rotate P_{\_G12670} T_{b} 90 C 
cmark_r P_{\_G12670}
color 200 200 200
drawarc_p T_{b} C 90 
color 0 0 0

% Constructing a line L_{\_G12673} which passes through point T_{b} and point P_{\_G12670}
line L_{\_G12673} T_{b} P_{\_G12670} 

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


% Constructing midpoint P_{\_G12676} of the segment CP_{\_G12670}
midpoint P_{\_G12676} C P_{\_G12670} 
cmark_r P_{\_G12676}

% Constructing a line L_{\_G12679} which passes through point A and point P_{\_G12676}
line L_{\_G12679} A P_{\_G12676} 

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


% Constructing a line L_{\_G12682} which passes through point C and point P_{\_G12676}
line L_{\_G12682} C P_{\_G12676} 

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


% Constructing a point P_{\_G12685} which belongs to line L_{\_G12673} and line L_{\_G12679}
intersec P_{\_G12685} L_{\_G12673} L_{\_G12679} 
cmark_r P_{\_G12685}

% Constructing a point P_{\_G12688} which belongs to line L_{\_G12673} and line L_{\_G12682}
intersec P_{\_G12688} L_{\_G12673} L_{\_G12682} 
cmark_r P_{\_G12688}

% Constructing a line L_{\_G12691} which passes through point A and point P_{\_G12688}
line L_{\_G12691} A P_{\_G12688} 

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


% Constructing a line L_{\_G12694} which passes through point C and point P_{\_G12685}
line L_{\_G12694} C P_{\_G12685} 

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


% Constructing a point P_{\_G12697} which belongs to line L_{\_G12691} and line L_{\_G12694}
intersec P_{\_G12697} L_{\_G12691} L_{\_G12694} 
cmark_r P_{\_G12697}

% Constructing a line L_{\_G12700} which passes through point P_{\_G12676} and point P_{\_G12697}
line L_{\_G12700} P_{\_G12676} P_{\_G12697} 

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


% Constructing a point T`_{b} which belongs to line L_{\_G12700} and line b
intersec T`_{b} L_{\_G12700} b 
cmark_r T`_{b}


% NDG:  points T_{b} and T`_{b} are not the same
% Constructing midpoint P_{\_G13531} of the segment T_{b}T`_{b}
midpoint P_{\_G13531} T_{b} T`_{b} 
cmark_r P_{\_G13531}

% Constructing a circle k_over(T_{b},T`_{b}) whose center is at point P_{\_G13531} and which passes through point T_{b}
circle k_over(T_{b},T`_{b}) P_{\_G13531} T_{b} 

color 200 200 200
drawcircle k_over(T_{b},T`_{b})
color 0 0 0



% NDG:  line a and circle k_over(T_{b},T`_{b}) intersect
% Constructing points B_{wc} and B which are in intersection of k_over(T_{b},T`_{b}) and a
intersec2 B_{wc} B k_over(T_{b},T`_{b}) a 
cmark_r B_{wc}
cmark_b B



drawsegment A B
drawsegment A C
drawsegment B C

% Non-degenerate conditions:  line a and circle k_over(T_{b},T`_{b}) intersect; points T_{b} and T`_{b} are not the same; points A and C are not the same; points C and T_{b} are not the same; points C and midpoint([A,T_{b}]) are not the same; lines a and b are not parallel
% Determination conditions:  lines a and b are not the same; points A and T_{b} are not the same; points A and H_{a} are not the same