let iosz x = try int_of_string x with Failure("int_of_string"-> 0