A = (-9, -13)
straal = 3 (slider from 0 to 5, step 0.1)
c = Circle(A, straal)
D = Point(c)
B = Point(c)
d = CircleArc(A, B, D)
C = Point(d)
p = CircleArc(A, B, C)
e = CircleArc(A, C, D)
E = Point(e)
f = Segment(E, C)
F = Point(p)
g = Segment(F, C)
h = LineBisector(C, F)
i = LineBisector(E, C)
G = Intersect(i, f)
H = Intersect(h, g)
j = Segment(A, H)
k = Segment(A, G)