fact: Definition zfanLt pr := match pr with | Pcons Pr55 _ _ => Zfan0l | Pcons Pr56 _ _ => Zfan1l | Pcons Pr66 _ _ => Zfan1l | Pcons6 _ _ _ => Zfan1l | Pcons7 _ _ _ _ => Zfan2l | Pcons8 _ _ _ _ _ => Zfan3l | _ => Znil end.
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat seq choice) mathcomp(fintype path fingraph) fourcolor(hypermap geometry part quiz quiztree)