From dcf93c51f5439c8afc324c6bd99fa0ab7356a2cf Mon Sep 17 00:00:00 2001 From: Arkitu Date: Tue, 23 Dec 2025 10:41:39 +0000 Subject: [PATCH] fix --- 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 2ffe31a..b75db38 100644 --- a/dm5/lib/lib.ml +++ b/dm5/lib/lib.ml @@ -4,7 +4,7 @@ let zip ta tb = Array.map2 (fun a b -> a,b) ta tb;; (* Exercice 1 *) let tirette t = let n = Array.length t in - Array.init (n/2) (fun i -> t.(i) + t.(n-i)) + Array.init (n/2) (fun i -> t.(i) + t.(n-i-1)) ;; (* Exercice 2 *)