vault backup: 2023-10-09 14:13:58

Algo/Courses/Chapter 6 - Lists (Exercises).md

@@ -140,12 +140,12 @@ let rec growing = function
 ```
 
 ## Exercise 3.2
-```Ocaml
+```ocaml
 let rec delete x = function
 	| [] -> []
 	| e::i -> 
 		if x == e then i 
-		else if e < x then
+		else 
 			e::delete x i
-		else 1
 ```
+j