diff --git a/Algo/Courses/Chapter 6 - Lists (Exercises).md b/Algo/Courses/Chapter 6 - Lists (Exercises).md
index b475919..0d563cc 100644
--- a/Algo/Courses/Chapter 6 - Lists (Exercises).md	
+++ b/Algo/Courses/Chapter 6 - Lists (Exercises).md	
@@ -263,5 +263,6 @@ let assoc k l =
 				| (ke, ve)::t when k = ke -> ve
 				| (ke, ve)::t when k < ke -> failwith "not found"
 				| (ke, ve)::t -> findkey k t
-			in findkey l
+			in findkey l;;
+val assoc: int -> (int * 'a)list -> 'a = <fun>
 ```