proposition: Lemma simple_rot p : simple (rot n0 p) = simple p.
proof: Proof. by move=> *; rewrite /simple map_rot rot_uniq. Qed.
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat seq choice) mathcomp(fintype path fingraph) fourcolor(hypermap jordan)