je trace un arc de cercle centré en S
et coupant les deux demi-droites

je marque le point d'intersection de cet arc
avec la première demi-droite ...

... et puis avec la seconde

je trace un arc de cercle centré en I ...

... et un autre, de même rayon que le précédent,
centré cette fois en  J

je marque le point d'intersection K
de ces deux arcs

la bissectrice de l'angle ASB
est la demi-droite  SK

S = (1.223565465286994, 3.247524904937758)
B = (8.289832005669078, -2.190145319039183)
a = Segment(S, B)
D = (3.268741144936473, -0.9120188625736583)
E = (5.448741144936473, 4.887981137426337)
c = CircleArc(S, D, E)
d = Circle(B, Segment[S, E])
F = Point(d)
g = 15.1 (slider from 0 to 24, step 0.1)
I_1 = (4.601000387011802, 5.237548800725818)
J_1 = Point(c)
u = Vector(I_1, J_1)
j = Ray(S, B)
A = (9.392052987385494, 4.813197226328196)
k = Ray(S, A)
I = Intersect(c, k)
J = Intersect(c, j)
f = Circle(I, 5.0)
h = Circle(J, 5.0)
K_1 = Point(f)
L = Point(f)
p = CircleArc(I, L, K_1)
M = Point(h)
N = Point(h)
q = CircleArc(J, N, M)
K = Intersect(p, q, 1.0)
b = Ray(S, K)
G = (6.644979156030736, 5.321914602505003)
v = Vector(G, I)
H = (4.644024143068628, -1.2066250584306888)
w = Vector(H, J)
O = (11.409965246220162, 3.8635914574648225)
Q = (10.426444985611669, -1.3253257795386106)
R = Point(q)
i = Vector(Q, R)
T = (10.612974690209832, 1.5065342811789493)
n2 = Vector(T, K)
U = (2.049565524566911, 1.0826031343649434)
V = Point(b)
m = Vector(U, V)
n = 5.1 (slider from 0 to 32, step 0.1)
P = Point(p)
z = Vector(O, P)