Goal:
    x : t  y : t  z : t  c : comparison
  ============================
   (compare x y = c -> compare y z = c -> compare x z = c)


DEBUG:Going to execute:
destruct (compare_spec x y); subst; intros <-;
            destruct (compare_spec y z)