From 0bcda262951a3b7be75d05205e36e3fc38273fb4 Mon Sep 17 00:00:00 2001
From: Louis <me@louisgallet.fr>
Date: Fri, 20 Oct 2023 15:39:01 +0200
Subject: [PATCH] vault backup: 2023-10-20 15:39:01

---
 .obsidian/workspace.json                      | 16 +++++++--------
 Algo/Courses/Chapter 6 - Lists (Exercises).md | 20 +++++++++----------
 2 files changed, 18 insertions(+), 18 deletions(-)

diff --git a/.obsidian/workspace.json b/.obsidian/workspace.json
index 793489c..aca9991 100644
--- a/.obsidian/workspace.json
+++ b/.obsidian/workspace.json
@@ -13,7 +13,7 @@
             "state": {
               "type": "markdown",
               "state": {
-                "file": "Algo/Séminaire/Chapter 3 - Case analysis.md",
+                "file": "Algo/Courses/Chapter 6 - Lists (Exercises).md",
                 "mode": "source",
                 "source": false
               }
@@ -97,7 +97,7 @@
             "state": {
               "type": "backlink",
               "state": {
-                "file": "Algo/Séminaire/Chapter 3 - Case analysis.md",
+                "file": "Algo/Courses/Chapter 6 - Lists (Exercises).md",
                 "collapseAll": false,
                 "extraContext": false,
                 "sortOrder": "alphabetical",
@@ -114,7 +114,7 @@
             "state": {
               "type": "outgoing-link",
               "state": {
-                "file": "Algo/Séminaire/Chapter 3 - Case analysis.md",
+                "file": "Algo/Courses/Chapter 6 - Lists (Exercises).md",
                 "linksCollapsed": false,
                 "unlinkedCollapsed": true
               }
@@ -137,7 +137,7 @@
             "state": {
               "type": "outline",
               "state": {
-                "file": "Algo/Séminaire/Chapter 3 - Case analysis.md"
+                "file": "Algo/Courses/Chapter 6 - Lists (Exercises).md"
               }
             }
           },
@@ -170,16 +170,16 @@
   },
   "active": "c473a791e2b34194",
   "lastOpenFiles": [
-    "Algo/Courses/Chapter 6 - Lists (Exercises).md",
-    "Algo/Séminaire/Chapter 5 - Recursivity.md",
-    "Algo/Courses/Chapter 6 - Lists.md",
+    "Algo/CM/CM du 27 septembre.md",
     "Algo/Séminaire/Chapter 3 - Case analysis.md",
+    "Algo/Séminaire/Chapter 5 - Recursivity.md",
+    "Algo/Courses/Chapter 6 - Lists (Exercises).md",
+    "Algo/Courses/Chapter 6 - Lists.md",
     "Algo/Séminaire/Chapter 2 - Functions.md",
     "Algo/Séminaire/Chapter 1 - CAML basics.md",
     "Prog/Loops.md",
     "Algo/Séminaire/Chapter 4 - A bit of imperative.md",
     "Algo/CM/Lists.md",
-    "Algo/CM/CM du 27 septembre.md",
     "Algo/CM/CM du 04 octobre.md",
     "Algo/Courses/Untitled.md",
     "Algo/Séminaire/Exercices seminaire.md",
diff --git a/Algo/Courses/Chapter 6 - Lists (Exercises).md b/Algo/Courses/Chapter 6 - Lists (Exercises).md
index 3b2ab39..02eb278 100644
--- a/Algo/Courses/Chapter 6 - Lists (Exercises).md	
+++ b/Algo/Courses/Chapter 6 - Lists (Exercises).md	
@@ -282,20 +282,20 @@ Complexity : $O(\sum_{\forall{l\in{(el::ll)}}}^{}1+length(l))$
 ## Exercise 6.1
 ```Ocaml
 let rec decompose x =
-	if x = 1 then
-		return x
-	else if x % 2 == 0 then
+	let l = [] in
+	if x = 1 then x::l
+	else if x mod 2 == 0 then
 		decompose(x/2)
-	else if x%3 = 0 then
+	else if x mod 3 = 0 then
 		decompose(x/3)
-	else if x%5 = 0 then
+	else if x mod 5 = 0 then
 		decompose(x/5)
-	else if x%7 = 0 then
+	else if x mod 7 = 0 then
 		decompose(x/7)
-	else if x%9 = 0 then
+	else if x mod 9 = 0 then
 		decompose(x/9)
-	else if x%11 = 0 then
+	else if x mod 11 = 0 then
 		decompose(x/11)
-	else if x%13 = 0 then
+	else if x mod 13 = 0 then
 		decompose(x/13)
-	else return x
+	else x::l