let of_string s = String_to_int s