signature Sol_ranges = sig type int = Arbint.int val Shostak : (int * (string * int) list) list -> (string * int) list end
HOL 4, Kananaskis-10