theorem :: ANPROJ10:60
for V being RealLinearSpace
for P, Q, R, S being Element of V st P,Q,R,S are_collinear & P <> R & P <> S & R <> Q & S <> Q holds
cross-ratio (Q,P,R,S) = 1 / (cross-ratio (P,Q,R,S))