fact: Definition print_int (x : int) : Number.int := match x with | Posz n => Number.IntDecimal (Decimal.Pos (Nat.to_uint n)) | Negz n => Number.IntDecimal (Decimal.Neg (Nat.to_uint n.+1)) end.
imports: HB(structures) mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat choice seq) mathcomp(fintype finfun bigop order ssralg countalg ssrnum) mathcomp(poly)