contract Simple = type t = int => int