diff --git a/Algo/Séminaire/Exercices sémaines.md b/Algo/Séminaire/Exercices sémaines.md
index f953d6a..2431455 100644
--- a/Algo/Séminaire/Exercices sémaines.md	
+++ b/Algo/Séminaire/Exercices sémaines.md	
@@ -135,14 +135,14 @@ val max2 : 'a -> 'a -> 'a = <fun>
 # let min2 number1 number2 = if number1 > number2 then number2 else number1
 val min2 : 'a -> 'a -> 'a = <fun>
 
-let max3 x y z =
+# let max3 x y z =
 	let high = if x > y then x else y in
 		if high > z then
 			high
 		else z;;
 val max3 : 'a -> 'a -> 'a -> 'a = <fun>
 
-let min3 x y z =
+# let min3 x y z =
 	let low = if x < y then x else y in
 		if low < z then
 			low
@@ -153,10 +153,13 @@ val min3 : 'a -> 'a -> 'a -> 'a = <fun>
 	x + y + z - min3 x y z - max x y z ;;
 val middle3 = int -> int -> int = <fun>
 
-let max4 number1 number2 number3 number4 = 
+#let max4 number1 number2 number3 number4 = 
 	let nb1 = max2(number1 number2) and nb2 = max2(number3 number4) in max2(nb1 nb2)
 
-let min4 number1 number2 number3 number4 = let nb1 = min2(number1 number2) and nb2 = min2(number3 number4) in min2(nb1 nb2)
+# let max4 x y z t= max2(max2 x y)(max2 z t)
+val max4 : 'a -> 'a -> 'a -> 'a -> 'a = <fun>
+# let min4 x y z t= min2(min2 x y)(min2 z t)
+
 ```
 ### Exercise 3.4
 ```Ocaml