let S be non empty satisfying_Tarski-model satisfying_Lower_Dimension_Axiom TarskiGeometryStruct ; :: thesis: for a, p being POINT of S
for A being Subset of S st A is_line & p in A & not a in A holds
between a,A, reflection (p,a)

let a, p be POINT of S; :: thesis: for A being Subset of S st A is_line & p in A & not a in A holds
between a,A, reflection (p,a)

let A be Subset of S; :: thesis: ( A is_line & p in A & not a in A implies between a,A, reflection (p,a) )
assume that
A1: A is_line and
A2: p in A and
A3: not a in A ; :: thesis: between a,A, reflection (p,a)
set c = reflection (p,a);
A4: between a,p, reflection (p,a)
proof
Middle a,p, reflection (p,a) by GTARSKI3:def 13;
hence between a,p, reflection (p,a) ; :: thesis: verum
end;
A5: reflection (p,a) <> p
proof end;
not reflection (p,a) in A
proof
assume reflection (p,a) in A ; :: thesis: contradiction
then A6: Line (p,(reflection (p,a))) = A by A2, A1, A5, GTARSKI3:87;
Collinear p, reflection (p,a),a by A4;
hence contradiction by A6, A3; :: thesis: verum
end;
hence between a,A, reflection (p,a) by A1, A2, A4, A3; :: thesis: verum