diff --git a/src/libraries/floating_point/typed_float.mli b/src/libraries/floating_point/typed_float.mli
index 6c8e80170034ebce9ca435139a88205d52b8e72f..e1c24ff1132f0ee43b2c7cfd4dda83b9db288555 100644
--- a/src/libraries/floating_point/typed_float.mli
+++ b/src/libraries/floating_point/typed_float.mli
@@ -147,7 +147,7 @@ type parsed_result =
     [Error msg] if the parsing fails, where [msg] is the error message. *)
 val parse : string -> (parsed_result, string) result
 
-(** Calls {!parse} and evaluates the reuslt type.
+(** Calls {!parse} and evaluates the result type.
     @raise Log.AbortError if the parsing fails. *)
 val parse_exn : string -> parsed_result