fact: Fixpoint cfcbr2 (et : colseq) : ctree := if et is e :: et' then h e (cfcbr2 et') else ctree_simple_leaf.
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat seq choice) mathcomp(fintype path fingraph) fourcolor(hypermap geometry color coloring cfmap ctree)