proposition: Lemma disjoints_subset A B : [disjoint A & B] = (A \subset ~: B).
proof: Proof. by rewrite subsets_disjoint setCK. Qed.
imports: HB(structures) mathcomp(ssreflect ssrbool ssrfun eqtype ssrnat div seq) mathcomp(choice fintype finfun bigop)