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

vault backup: 2023-09-25 14:29:27

Browse Source
This commit is contained in:
Louis Gallet 2023-09-25 14:29:27 +02:00
parent 7f3dd95837
commit e03032f741
Signed by: lgallet
SSH Key Fingerprint: SHA256:qnW7pk4EoMRR0UftZLZQKSMUImbEFsiruLC7jbCHJAY
1 changed files with 4 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
Algo/Séminaire/Exercices seminaire.md
View File

@ -444,14 +444,12 @@ $$
$$
= O(log(n))
$$
## 4.12 - Prime number
## Exercise 4.12 - Prime number
```Ocaml
let prime n =
if n < 1 then
invalid_args "n should not be inferior to zero"
else if n mod 2 = 0 then
false
else
let rec p n =
if n = 0 then
1
else