let S be OAffinSpace; :: thesis: for x, y, z, t being Element of S st x <> y & Mid x,y,z & Mid x,y,t & not Mid x,z,t holds
Mid x,t,z

let x, y, z, t be Element of S; :: thesis: ( x <> y & Mid x,y,z & Mid x,y,t & not Mid x,z,t implies Mid x,t,z )
assume A1: x <> y ; :: thesis: ( not Mid x,y,z or not Mid x,y,t or Mid x,z,t or Mid x,t,z )
assume ( Mid x,y,z & Mid x,y,t ) ; :: thesis: ( Mid x,z,t or Mid x,t,z )
then ( x,y // y,z & x,y // y,t ) by Def3;
then ( x,y // x,z & x,y // x,t ) by ANALOAF:def 5;
then x,z // x,t by A1, ANALOAF:def 5;
hence ( Mid x,z,t or Mid x,t,z ) by Th11; :: thesis: verum