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

vault backup: 2023-10-25 16:38:15

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

8
Algo/Courses/Chapter 7 - X (exercises).md
View File

@ -1,2 +1,8 @@
```Ocaml ```Ocaml
# let double_succ # let sum n =
if n = 0 then
0
else if n < 0 then
failwith "input must be positive"
else
n + sum(n-1)