From 3ff35d03d16b4b3a07f3183dfab97e6d4b9cafb5 Mon Sep 17 00:00:00 2001 From: Arkitu Date: Thu, 25 Dec 2025 10:19:51 +0000 Subject: [PATCH] opti --- dm5/lib/lib.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/dm5/lib/lib.ml b/dm5/lib/lib.ml index 5eacdf5..298dd10 100644 --- a/dm5/lib/lib.ml +++ b/dm5/lib/lib.ml @@ -12,7 +12,7 @@ let quarante_deux t = let n = Array.length t in let count = ref 0 in let i = ref 0 in - while !i < n do + while !i < n || !count <= 42 do if t.(!i) mod 42 = 0 then count := !count + 1; i := !i + 42