let SAS be Semi_Affine_Space; for p, q being Element of st p <> q holds
ex r being Element of st not p,q // p,r
let p, q be Element of ; ( p <> q implies ex r being Element of st not p,q // p,r )
consider a, b, c being Element of such that
A1:
not a,b // a,c
by Def1;
assume
p <> q
; not for r being Element of holds p,q // p,r
then
( not p,q // p,a or not p,q // p,b or not p,q // p,c )
by A1, Th25;
hence
not for r being Element of holds p,q // p,r
; verum