fact: Fixpoint qzt_fitl (t : quiz_tree) : bool := if t is QztLeaf q1 q2 q3 t' then [&& fitq (qstepR x1) q1, fitq (qstepR x2) q2 & fitq (qstepR x3) q3] || qzt_fitl t' else false.
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat seq choice) mathcomp(fintype path fingraph) fourcolor(hypermap geometry color coloring quiz cfmap) fourcolor(cfquiz cfreducible)