9 lines
188 B
Text
9 lines
188 B
Text
let is_int s =
|
|
try ignore (int_of_string s); true
|
|
with _ -> false
|
|
|
|
let is_float s =
|
|
try ignore (float_of_string s); true
|
|
with _ -> false
|
|
|
|
let is_numeric s = is_int s || is_float s
|