diff --git a/Algo/Courses/Chapter 6 - Lists (Exercises).md b/Algo/Courses/Chapter 6 - Lists (Exercises).md
index 0126433..c732d15 100644
--- a/Algo/Courses/Chapter 6 - Lists (Exercises).md	
+++ b/Algo/Courses/Chapter 6 - Lists (Exercises).md	
@@ -111,7 +111,7 @@ let maximum = function
 
 ## Exercise 2.1
 ```Ocaml
-let rec arithmetic_list n a1 r =
+let rec arith_list n a1 r =
   if n <= 0 then []
   else a1 :: arithmetic_list (n - 1) (a1 + r) r;;
 ```