fact: Definition gheight r := let: Grect _ _ ymin ymax := r in zwidth ymin ymax.
imports: HB(structures) mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat seq path) mathcomp(div choice order ssralg ssrnum ssrint intdiv) fourcolor(hypermap)