consider r9 being POINT of S such that
A3:
between r,A,r9
by A1, A2, Th16;
set P = ((half-plane (A,r)) \/ A) \/ (half-plane (A,r9));
((half-plane (A,r)) \/ A) \/ (half-plane (A,r9)) is set
;
hence
ex b1 being Subset of S ex r9 being POINT of S st
( between r,A,r9 & b1 = ((half-plane (A,r)) \/ A) \/ (half-plane (A,r9)) )
by A3; verum