Construction in GCLC language

dim 120 120

point H_{a} 80 40
point H_{b} 89.36 77.83
point T_{b} 94.25 68.88

color 220 0 0
fontsize 11

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

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

color 200 200 200
drawline H_{a}H_{b}
color 0 0 0



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

color 200 200 200
drawline b
color 0 0 0




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

color 200 200 200
drawline h_{b}
color 0 0 0



% NDG:  points H_{b} and T_{b} are not the same; points H_{a} and H_{b} are not the same% DET:  points H_{b} and T_{b} are not the same
% Constructing an angle V[_G93812] which is equal to the angle H_{a}H_{b}T_{b}
angle_o V[_G93812] H_{a} H_{b} T_{b} 


% Calculating value angle[_G93891] using formula 1/pow(2,0)*V[_G93812]+0/pow(2,0)*180
expression angle[_G93891]  { 1/pow(2,0)*V[_G93812]+0/pow(2,0)*180  } 


% Constructing a point P_{\_G93888} which is an image of the point T_{b} in a rotation around the point H_{b} for the angle 1/pow(2,0)*V[_G93812]+0/pow(2,0)*180
rotate P_{\_G93888} H_{b} angle[_G93891] T_{b} 
cmark_r P_{\_G93888}
color 200 200 200
drawarc_p H_{b} T_{b} angle[_G93891] 
color 0 0 0

% Constructing a line H_{b}H_{c} which passes through point H_{b} and point P_{\_G93888}
line H_{b}H_{c} H_{b} P_{\_G93888} 

color 200 200 200
drawline H_{b}H_{c}
color 0 0 0



% NDG:  points H_{a} and H_{b} are not the same; points H_{b} and T_{b} are not the same; points T_{b} and H_{a} are not the same
% Constructing an angle angle[_G94368] which is equal to the angle H_{a}H_{b}T_{b}
angle_o angle[_G94368] H_{a} H_{b} T_{b} 


% Calculating value angle[_G94379] using formula 90-(1/pow(2,1)*angle[_G94368]+0/pow(2,0)*180)
expression angle[_G94379]  { 90-(1/pow(2,1)*angle[_G94368]+0/pow(2,0)*180)  } 


% Constructing a line L_{\_G94450} which passes through point T_{b} and point H_{a}
line L_{\_G94450} T_{b} H_{a} 

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


% Constructing bisector L_{\_G94453} of the segment T_{b}H_{a}
med L_{\_G94453} T_{b} H_{a} 

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

color 200 200 200
drawsegment T_{b} H_{a} 
color 0 0 0

% Constructing a point P_{\_G94456} which is an image of the point H_{a} in a rotation around the point T_{b} for the angle angle[_G94379]
rotate P_{\_G94456} T_{b} angle[_G94379] H_{a} 
cmark_r P_{\_G94456}
color 200 200 200
drawarc_p T_{b} H_{a} angle[_G94379] 
color 0 0 0

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

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


% Constructing a point P_{\_G94462} which belongs to line L_{\_G94453} and line L_{\_G94459}
intersec P_{\_G94462} L_{\_G94453} L_{\_G94459} 
cmark_r P_{\_G94462}

% Constructing a circle circle[T_{b},H_{a},angle[a][s[b]]] whose center is at point P_{\_G94462} and which passes through point T_{b}
circle circle[T_{b},H_{a},angle[a][s[b]]] P_{\_G94462} T_{b} 

color 200 200 200
drawcircle circle[T_{b},H_{a},angle[a][s[b]]]
color 0 0 0



% NDG:  line h_{b} and circle circle[T_{b},H_{a},angle[a][s[b]]] intersect
% Constructing points B_{ca2} and B which are in intersection of circle[T_{b},H_{a},angle[a][s[b]]] and h_{b}
intersec2 B_{ca2} B circle[T_{b},H_{a},angle[a][s[b]]] h_{b} 
cmark_r B_{ca2}
cmark_b B


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

color 200 200 200
drawline a
color 0 0 0



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



% Constructing a point M_{a} such that CM_{a}/CB=0.5
towards M_{a} C B 0.5 
cmark_b M_{a}
color 200 200 200
drawsegment C B 
color 0 0 0


% NDG:  points H_{b} and M_{a} are not the same
% Constructing a circle k(M_{a},B) whose center is at point M_{a} and which passes through point H_{b}
circle k(M_{a},B) M_{a} H_{b} 

color 200 200 200
drawcircle k(M_{a},B)
color 0 0 0



% NDG:  line H_{b}H_{c} and circle k(M_{a},B) intersect% DET:  points H_{b} and H_{c} must be different
% Constructing a point P_{\_G95960} which is a foot of the point M_{a} on the line H_{b}H_{c}
foot P_{\_G95960} M_{a} H_{b}H_{c} 
cmark_r P_{\_G95960}
color 200 200 200
drawline M_{a} P_{\_G95960} 
color 0 0 0

% Constructing a point H_{c} which is an image of the point H_{b} in the symmetry to point/line P_{\_G95960}
sim H_{c} P_{\_G95960} H_{b} 
cmark_lt H_{c}


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

color 200 200 200
drawline c
color 0 0 0



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



drawsegment A B
drawsegment A C
drawsegment B C

% Non-degenerate conditions:  lines b and c are not parallel; line H_{b}H_{c} and circle k(M_{a},B) intersect; points H_{b} and M_{a} are not the same; lines b and a are not parallel; line h_{b} and circle circle[T_{b},H_{a},angle[a][s[b]]] intersect; points H_{a} and H_{b} are not the same; points H_{b} and T_{b} are not the same; points T_{b} and H_{a} are not the same; points H_{b} and T_{b} are not the same; points H_{a} and H_{b} are not the same
% Determination conditions:  lines b and c are not the same; points B and H_{c} are not the same; points H_{b} and H_{c} must be different; lines b and a are not the same; points B and H_{a} are not the same; points H_{b} and T_{b} are not the same; points H_{b} and T_{b} are not the same; points H_{a} and H_{b} are not the same