proposition: Lemma connected_component_max A B x : B x -> B `<=` A -> connected B -> B `<=` connected_component A x.
proof: Proof. by move=> Bx BA Bc y By; exists B. Qed.
imports: HB(structures) mathcomp(all_ssreflect all_algebra finmap generic_quotient) mathcomp(boolp classical_sets functions) mathcomp(cardinality mathcomp_extra fsbigop) reals signed