proposition: Lemma itv_partition_cat a b c s t : itv_partition a b s -> itv_partition b c t -> itv_partition a c (s ++ t).
proof: Proof. rewrite /itv_partition => -[sa /eqP asb] [bt btc]. by rewrite cat_path// sa /= last_cat asb. Qed.
imports: mathcomp(all_ssreflect ssralg ssrint ssrnum finmap) mathcomp(matrix interval zmodp vector fieldext falgebra) mathcomp(mathcomp_extra boolp classical_sets functions) mathcomp(cardinality) ereal reals signed topology prodnormedzmodule normedtype derive sequences real_interval HB(structures)