fact: Definition zvalid pl pr := catrev_part pl pr = cat_part p0r p0r.
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat seq choice) mathcomp(fintype path fingraph) fourcolor(hypermap geometry part quiz quiztree)