let AFP be AffinPlane; :: thesis: for o, a, b, x, y, r being Element of AFP st o <> a & LIN o,a,b & AFP is Desarguesian & LIN o,a,x & ex p, p9 being Element of AFP st
( not LIN o,a,p & LIN o,p,p9 & a,p // b,p9 & p,x // p9,y & LIN o,a,y ) & ex p, p9 being Element of AFP st
( not LIN o,a,p & LIN o,p,p9 & a,p // b,p9 & p,x // p9,r & LIN o,a,r ) holds
y = r

let o, a, b, x, y, r be Element of AFP; :: thesis: ( o <> a & LIN o,a,b & AFP is Desarguesian & LIN o,a,x & ex p, p9 being Element of AFP st
( not LIN o,a,p & LIN o,p,p9 & a,p // b,p9 & p,x // p9,y & LIN o,a,y ) & ex p, p9 being Element of AFP st
( not LIN o,a,p & LIN o,p,p9 & a,p // b,p9 & p,x // p9,r & LIN o,a,r ) implies y = r )

assume that
A1: o <> a and
A2: LIN o,a,b and
A3: AFP is Desarguesian and
A4: LIN o,a,x and
A5: ex p, p9 being Element of AFP st
( not LIN o,a,p & LIN o,p,p9 & a,p // b,p9 & p,x // p9,y & LIN o,a,y ) and
A6: ex p, p9 being Element of AFP st
( not LIN o,a,p & LIN o,p,p9 & a,p // b,p9 & p,x // p9,r & LIN o,a,r ) ; :: thesis: y = r
consider q, q9 being Element of AFP such that
A7: not LIN o,a,q and
A8: LIN o,q,q9 and
A9: a,q // b,q9 and
A10: q,x // q9,r and
A11: LIN o,a,r by A6;
A12: o <> q by A7, AFF_1:16;
consider p, p9 being Element of AFP such that
A13: not LIN o,a,p and
A14: LIN o,p,p9 and
A15: a,p // b,p9 and
A16: p,x // p9,y and
A17: LIN o,a,y by A5;
A18: ( a = x implies y = r )
proof
A19: q,a // q9,b by A9, AFF_1:13;
A20: not LIN o,q,a by A7, AFF_1:15;
A21: p,a // p9,b by A15, AFF_1:13;
assume A22: a = x ; :: thesis: y = r
not LIN o,p,a by A13, AFF_1:15;
then b = y by A2, A14, A16, A17, A22, A21, AFF_1:70;
hence y = r by A2, A8, A10, A11, A22, A20, A19, AFF_1:70; :: thesis: verum
end;
A23: o <> p by A13, AFF_1:16;
A24: ( a <> b & a <> x & p <> q & o <> x implies y = r )
proof
assume that
a <> b and
a <> x and
A25: p <> q and
A26: o <> x ; :: thesis: y = r
A27: now end;
now end;
hence y = r by A27; :: thesis: verum
end;
A60: o <> a by A13, AFF_1:16;
A61: ( p = q & o <> x implies y = r )
proof
assume that
A62: p = q and
A63: o <> x ; :: thesis: y = r
A64: not LIN o,p,x
proof
assume LIN o,p,x ; :: thesis: contradiction
then A65: LIN o,x,p by AFF_1:15;
A66: LIN o,x,o by AFF_1:16;
LIN o,x,a by A4, AFF_1:15;
hence contradiction by A13, A63, A66, A65, AFF_1:17; :: thesis: verum
end;
A67: LIN o,a,o by AFF_1:16;
then A68: LIN o,x,y by A4, A17, A60, AFF_1:17;
A69: LIN o,x,r by A4, A11, A60, A67, AFF_1:17;
p9 = q9 by A2, A13, A14, A15, A8, A9, A62, AFF_1:70;
hence y = r by A14, A16, A10, A62, A68, A69, A64, AFF_1:70; :: thesis: verum
end;
A70: ( o = x implies y = r )
proof
assume A71: o = x ; :: thesis: y = r
then y = o by A1, A4, A5, Lm7;
hence y = r by A1, A4, A6, A71, Lm7; :: thesis: verum
end;
( a = b implies y = r )
proof
assume A72: a = b ; :: thesis: y = r
then x = y by A1, A4, A5, Lm10;
hence y = r by A1, A4, A6, A72, Lm10; :: thesis: verum
end;
hence y = r by A70, A61, A18, A24; :: thesis: verum