signature Arbint = sig include Arbintcore where type int = Arbintcore.int val pp_int : int -> HOLPP.pretty end
HOL 4, Kananaskis-13