lgallet/epicours
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

vault backup: 2023-10-16 14:57:34

Browse Source
This commit is contained in:
Louis Gallet 2023-10-16 14:57:34 +02:00
parent 7eaa933e99
commit f625d132c9
Signed by: lgallet
SSH Key Fingerprint: SHA256:qnW7pk4EoMRR0UftZLZQKSMUImbEFsiruLC7jbCHJAY
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -251,6 +251,6 @@ let assos k l =
invalid_arg "k not natural" invalid_arg "k not natural"
else else
match l with match l with
| -> failwith "not found" | -> failwith "not found"
| (k,y)::t -> y | (k,y)::t -> y
| _ -> assos k t | _ -> assos k t