Require Export B1_Confondu_Prop.
Section CLOCKWISE_PROPERTIES.

(* Specifications: *)
Lemma ClockwiseBCA : forall A B C,
Clockwise A B C -> Clockwise B C A.
Lemma ClockwiseCAB : forall A B C,
Clockwise A B C -> Clockwise C A B.
Lemma NotClockwiseAAB : forall A B, ~Clockwise A A B.
Lemma NotClockwiseABA : forall A B , ~Clockwise A B A.
Lemma NotClockwiseBAA : forall A B , ~Clockwise B A A.
Lemma ClockwiseDistinctAB : forall A B C,
Clockwise A B C -> A <> B.
Lemma ClockwiseDistinctBC : forall A B C,
Clockwise A B C -> B <> C.
Lemma ClockwiseDistinctCA : forall A B C,
Clockwise A B C -> C <> A.
Lemma ClockwiseNotClockwise : forall A B C,
Clockwise A B C -> ~Clockwise B A C.
Lemma ClockwiseClockwiseDistinct : forall A B C D,
Clockwise A B C ->
Clockwise B A D ->
C <> D.
Lemma ExclusiveFourCases : forall A B C,
A <> C ->
Clockwise A B C \/
Clockwise B A C \/
HalfLine A B C \/
EquiOriented A B C A.