From e03032f74149313cf3897e8a4875492cf45e297e Mon Sep 17 00:00:00 2001 From: Louis Date: Mon, 25 Sep 2023 14:29:27 +0200 Subject: [PATCH] vault backup: 2023-09-25 14:29:27 --- Algo/Séminaire/Exercices seminaire.md | 10 ++++------ 1 file changed, 4 insertions(+), 6 deletions(-) diff --git a/Algo/Séminaire/Exercices seminaire.md b/Algo/Séminaire/Exercices seminaire.md index 0299035..76ac459 100644 --- a/Algo/Séminaire/Exercices seminaire.md +++ b/Algo/Séminaire/Exercices seminaire.md @@ -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 - \ No newline at end of file + \ No newline at end of file