diff --git a/.obsidian/workspace.json b/.obsidian/workspace.json
index c4e0161..c3bcaea 100644
--- a/.obsidian/workspace.json
+++ b/.obsidian/workspace.json
@@ -25,13 +25,14 @@
             "state": {
               "type": "markdown",
               "state": {
-                "file": "Algo/Séminaire/Chapter 5 - Recursivity.md",
+                "file": "Algo/Courses/Chapter 7 - X (exercises).md",
                 "mode": "source",
                 "source": false
               }
             }
           }
-        ]
+        ],
+        "currentTab": 1
       }
     ],
     "direction": "vertical"
@@ -97,7 +98,7 @@
             "state": {
               "type": "backlink",
               "state": {
-                "file": "Algo/CM/CM du 04 octobre.md",
+                "file": "Algo/Courses/Chapter 7 - X (exercises).md",
                 "collapseAll": false,
                 "extraContext": false,
                 "sortOrder": "alphabetical",
@@ -114,7 +115,7 @@
             "state": {
               "type": "outgoing-link",
               "state": {
-                "file": "Algo/CM/CM du 04 octobre.md",
+                "file": "Algo/Courses/Chapter 7 - X (exercises).md",
                 "linksCollapsed": false,
                 "unlinkedCollapsed": true
               }
@@ -137,7 +138,7 @@
             "state": {
               "type": "outline",
               "state": {
-                "file": "Algo/CM/CM du 04 octobre.md"
+                "file": "Algo/Courses/Chapter 7 - X (exercises).md"
               }
             }
           },
@@ -168,20 +169,20 @@
       "command-palette:Open command palette": false
     }
   },
-  "active": "c473a791e2b34194",
+  "active": "26919eaeae9a8f38",
   "lastOpenFiles": [
-    "Algo/CM/CM du 27 septembre.md",
-    "Algo/Séminaire/Chapter 3 - Case analysis.md",
+    "Algo/Courses/Chapter 6 - Lists.md",
+    "Algo/Courses/Chapter 7 - X (exercises).md",
     "Algo/Courses/Chapter 6 - Lists (Exercises).md",
     "Algo/Séminaire/Chapter 5 - Recursivity.md",
-    "Algo/Courses/Chapter 6 - Lists.md",
+    "Algo/CM/CM du 04 octobre.md",
+    "Algo/CM/CM du 27 septembre.md",
+    "Algo/Séminaire/Chapter 3 - Case analysis.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 04 octobre.md",
-    "Algo/Courses/Untitled.md",
     "Algo/Séminaire/Exercices seminaire.md",
     "Prog",
     "Algo/Séminaire/Remediation.md",
diff --git a/Algo/Courses/Chapter 6 - Lists (Exercises).md b/Algo/Courses/Chapter 6 - Lists (Exercises).md
index 02eb278..ee109bd 100644
--- a/Algo/Courses/Chapter 6 - Lists (Exercises).md	
+++ b/Algo/Courses/Chapter 6 - Lists (Exercises).md	
@@ -299,3 +299,4 @@ let rec decompose x =
 	else if x mod 13 = 0 then
 		decompose(x/13)
 	else x::l
+
diff --git a/Algo/Courses/Chapter 7 - X (exercises).md b/Algo/Courses/Chapter 7 - X (exercises).md
new file mode 100644
index 0000000..ea549e1
--- /dev/null
+++ b/Algo/Courses/Chapter 7 - X (exercises).md	
@@ -0,0 +1,2 @@
+```Ocaml
+# let double_succ
\ No newline at end of file