From 83f1ecc9c0fdd973533eb7d9975cc0106ca6fa27 Mon Sep 17 00:00:00 2001
From: Louis <me@louisgallet.fr>
Date: Fri, 13 Oct 2023 15:51:29 +0200
Subject: [PATCH] vault backup: 2023-10-13 15:51:29

---
 Algo/Courses/Chapter 6 - Lists (Exercises).md | 14 ++++++++++----
 1 file changed, 10 insertions(+), 4 deletions(-)

diff --git a/Algo/Courses/Chapter 6 - Lists (Exercises).md b/Algo/Courses/Chapter 6 - Lists (Exercises).md
index 8e8b692..86baea9 100644
--- a/Algo/Courses/Chapter 6 - Lists (Exercises).md	
+++ b/Algo/Courses/Chapter 6 - Lists (Exercises).md	
@@ -198,8 +198,14 @@ val insert_nth: 'a -> int -> 'a list -> 'a list = <fun>
 ```
 
 ## Exercise 3.4
-```
-# let insert_post x y list = match list with
+```Ocaml
+# let insert_post x y = function
 	| [] -> failwith "list is too large or empty"
-	| e::t -> if e = x then e::y::t else e::insert_post x y (t);;
-val insert_post : 'a -> a' list -> list = <fun>
\ No newline at end of file
+	| e::t -> if e = y then e::x::t else e::insert_post x y t;;
+val insert_post : 'a -> 'a -> a' list -> list = <fun>
+```
+
+## Exercise 3.5
+```
+
+```