diff --git a/Algo/Courses/Chapter 6 - Lists (Exercises).md b/Algo/Courses/Chapter 6 - Lists (Exercises).md
index 6e22d33..2a452e2 100644
--- a/Algo/Courses/Chapter 6 - Lists (Exercises).md	
+++ b/Algo/Courses/Chapter 6 - Lists (Exercises).md	
@@ -281,7 +281,7 @@ Complexity : $O(\sum_{\forall{l\in{(el::ll)}}}^{}1+length(l))$
 
 ## Exercise 6.1
 ```Ocaml
-let rec decompose = function 
-	| 
-
-
+let rec decompose x =
+	if ()
+	if (x % 2) = 0 then
+		decompose(x/2)