vault backup: 2023-10-09 13:17:48

This commit is contained in:
Louis Gallet 2023-10-09 13:17:48 +02:00
parent 9e34a76dae
commit 039c7bfd1c
Signed by: lgallet
SSH Key Fingerprint: SHA256:qnW7pk4EoMRR0UftZLZQKSMUImbEFsiruLC7jbCHJAY

View File

@ -111,7 +111,7 @@ let maximum = function
## Exercise 2.1 ## Exercise 2.1
```Ocaml ```Ocaml
let rec arithmetic_list n a1 r = let rec arith_list n a1 r =
if n <= 0 then [] if n <= 0 then []
else a1 :: arithmetic_list (n - 1) (a1 + r) r;; else a1 :: arithmetic_list (n - 1) (a1 + r) r;;
``` ```