let AFP be AffinPlane; :: thesis: for a, b being Element of AFP
for K being Subset of AFP
for f being Permutation of the carrier of AFP st a,b // K & not a in K & ( for x, y being Element of AFP holds
( f . x = y iff ( ( x in K & x = y ) or ( not x in K & ex p, p9 being Element of AFP st
( p in K & p9 in K & p,a // p9,x & p,b // p9,y & x,y // K ) ) ) ) ) holds
f is_Sc K

let a, b be Element of AFP; :: thesis: for K being Subset of AFP
for f being Permutation of the carrier of AFP st a,b // K & not a in K & ( for x, y being Element of AFP holds
( f . x = y iff ( ( x in K & x = y ) or ( not x in K & ex p, p9 being Element of AFP st
( p in K & p9 in K & p,a // p9,x & p,b // p9,y & x,y // K ) ) ) ) ) holds
f is_Sc K

let K be Subset of AFP; :: thesis: for f being Permutation of the carrier of AFP st a,b // K & not a in K & ( for x, y being Element of AFP holds
( f . x = y iff ( ( x in K & x = y ) or ( not x in K & ex p, p9 being Element of AFP st
( p in K & p9 in K & p,a // p9,x & p,b // p9,y & x,y // K ) ) ) ) ) holds
f is_Sc K

let f be Permutation of the carrier of AFP; :: thesis: ( a,b // K & not a in K & ( for x, y being Element of AFP holds
( f . x = y iff ( ( x in K & x = y ) or ( not x in K & ex p, p9 being Element of AFP st
( p in K & p9 in K & p,a // p9,x & p,b // p9,y & x,y // K ) ) ) ) ) implies f is_Sc K )

assume that
A1: a,b // K and
A2: not a in K and
A3: for x, y being Element of AFP holds
( f . x = y iff ( ( x in K & x = y ) or ( not x in K & ex p, p9 being Element of AFP st
( p in K & p9 in K & p,a // p9,x & p,b // p9,y & x,y // K ) ) ) ) ; :: thesis: f is_Sc K
A4: for x being Element of AFP holds x,f . x // K by A1, A3, Lm26;
A5: for x being Element of AFP st x in K holds
f . x = x by A3;
A6: K is being_line by A1, AFF_1:26;
f is collineation by A1, A2, A3, Lm27;
hence f is_Sc K by A6, A5, A4, Def1; :: thesis: verum