fact: Definition walkqz x qz := let: Quiz q0 q1 := qz in walkq x q0 ++ walkq (edge x) q1.
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat seq choice) mathcomp(fintype path fingraph) fourcolor(hypermap geometry coloring)