Nonstd.Float.of

let of_string s = try Some (float_of_string s) with _ -> None