tracks/ocaml/exercises/prime-factors/example.ml in trackler-2.2.1.110 vs tracks/ocaml/exercises/prime-factors/example.ml in trackler-2.2.1.111

- old
+ new

@@ -1,9 +1,9 @@ -open Core +open Base let square_root_trunc n = (* Square root is not defined on int64 *) - Int64.to_float n |> sqrt |> Int64.of_float + Int64.to_float n |> Float.sqrt |> Int64.of_float let rec factors_of' = function | 1L -> [] | n -> factors_of_loop n and factors_of_loop n =