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

vault backup: 2023-10-20 15:39:01

Browse Source
This commit is contained in:
Louis Gallet
2023-10-20 15:39:01 +02:00
parent 2917408758
commit 0bcda26295
2 changed files with 18 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
.obsidian/workspace.json vendored
View File

@ -13,7 +13,7 @@
"state": { "state": {
"type": "markdown", "type": "markdown",
"state": { "state": {
"file": "Algo/Séminaire/Chapter 3 - Case analysis.md", "file": "Algo/Courses/Chapter 6 - Lists (Exercises).md",
"mode": "source", "mode": "source",
"source": false "source": false
} }
@ -97,7 +97,7 @@
"state": { "state": {
"type": "backlink", "type": "backlink",
"state": { "state": {
"file": "Algo/Séminaire/Chapter 3 - Case analysis.md", "file": "Algo/Courses/Chapter 6 - Lists (Exercises).md",
"collapseAll": false, "collapseAll": false,
"extraContext": false, "extraContext": false,
"sortOrder": "alphabetical", "sortOrder": "alphabetical",
@ -114,7 +114,7 @@
"state": { "state": {
"type": "outgoing-link", "type": "outgoing-link",
"state": { "state": {
"file": "Algo/Séminaire/Chapter 3 - Case analysis.md", "file": "Algo/Courses/Chapter 6 - Lists (Exercises).md",
"linksCollapsed": false, "linksCollapsed": false,
"unlinkedCollapsed": true "unlinkedCollapsed": true
} }
@ -137,7 +137,7 @@
"state": { "state": {
"type": "outline", "type": "outline",
"state": { "state": {
"file": "Algo/Séminaire/Chapter 3 - Case analysis.md" "file": "Algo/Courses/Chapter 6 - Lists (Exercises).md"
} }
} }
}, },
@ -170,16 +170,16 @@
}, },
"active": "c473a791e2b34194", "active": "c473a791e2b34194",
"lastOpenFiles": [ "lastOpenFiles": [
"Algo/Courses/Chapter 6 - Lists (Exercises).md", "Algo/CM/CM du 27 septembre.md",
"Algo/Séminaire/Chapter 5 - Recursivity.md",
"Algo/Courses/Chapter 6 - Lists.md",
"Algo/Séminaire/Chapter 3 - Case analysis.md", "Algo/Séminaire/Chapter 3 - Case analysis.md",
"Algo/Séminaire/Chapter 5 - Recursivity.md",
"Algo/Courses/Chapter 6 - Lists (Exercises).md",
"Algo/Courses/Chapter 6 - Lists.md",
"Algo/Séminaire/Chapter 2 - Functions.md", "Algo/Séminaire/Chapter 2 - Functions.md",
"Algo/Séminaire/Chapter 1 - CAML basics.md", "Algo/Séminaire/Chapter 1 - CAML basics.md",
"Prog/Loops.md", "Prog/Loops.md",
"Algo/Séminaire/Chapter 4 - A bit of imperative.md", "Algo/Séminaire/Chapter 4 - A bit of imperative.md",
"Algo/CM/Lists.md", "Algo/CM/Lists.md",
"Algo/CM/CM du 27 septembre.md",
"Algo/CM/CM du 04 octobre.md", "Algo/CM/CM du 04 octobre.md",
"Algo/Courses/Untitled.md", "Algo/Courses/Untitled.md",
"Algo/Séminaire/Exercices seminaire.md", "Algo/Séminaire/Exercices seminaire.md",

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

@ -282,20 +282,20 @@ Complexity : $O(\sum_{\forall{l\in{(el::ll)}}}^{}1+length(l))$
## Exercise 6.1 ## Exercise 6.1
```Ocaml ```Ocaml
let rec decompose x = let rec decompose x =
if x = 1 then let l = [] in
return x if x = 1 then x::l
else if x % 2 == 0 then else if x mod 2 == 0 then
decompose(x/2) decompose(x/2)
else if x%3 = 0 then else if x mod 3 = 0 then
decompose(x/3) decompose(x/3)
else if x%5 = 0 then else if x mod 5 = 0 then
decompose(x/5) decompose(x/5)
else if x%7 = 0 then else if x mod 7 = 0 then
decompose(x/7) decompose(x/7)
else if x%9 = 0 then else if x mod 9 = 0 then
decompose(x/9) decompose(x/9)
else if x%11 = 0 then else if x mod 11 = 0 then
decompose(x/11) decompose(x/11)
else if x%13 = 0 then else if x mod 13 = 0 then
decompose(x/13) decompose(x/13)
else return x else x::l