From f09a1f41a262fb6f4cbfcb27f1f338b24bf7300b Mon Sep 17 00:00:00 2001 From: Yawar Amin Date: Wed, 3 May 2023 23:26:08 -0400 Subject: [PATCH] Use Decimal custom inequality Instead of standard library polymorphic inequality operator. --- README.md | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/README.md b/README.md index f216ac0..d023147 100644 --- a/README.md +++ b/README.md @@ -127,7 +127,7 @@ module BigNumber = struct while TOML requires all special float values to be lowercase. *) let float_to_string x = Decimal.to_string x |> String.lowercase_ascii let float_of_boolean b = if b then Decimal.one else Decimal.zero - let float_to_boolean x = (x <> Decimal.zero) + let float_to_boolean x = Decimal.(x <> zero) let float_of_int = Decimal.of_bigint let int_of_float = Decimal.to_bigint