(** Basic cases of sum *)

(* Specifications: *)
Lemma ts__suma : forall A B C D, TS A B C D -> SumA C B A A B D C B D.
Lemma inangle__suma : forall A B C P, InAngle P A B C -> SumA A B P P B C A B C.
Lemma bet__suma : forall A B C P, A <> B -> B <> C -> P <> B -> Bet A B C ->
SumA A B P P B C A B C.